Subversion Repositories Kolibri OS

Rev

Rev 3105 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1. use32
  2.         org 0
  3.         db 'MENUET01'
  4.         dd 1,start,i_end,mem,stacktop,0,cur_dir_path
  5.  
  6. include '../../../../../KOSfuncs.inc'
  7. include '../../../../../macros.inc'
  8. include '../../../../../proc32.inc'
  9. include '../../../../../load_lib.mac'
  10. include '../../../../../dll.inc'
  11.  
  12. @use_library mem.Alloc,mem.Free,mem.ReAlloc, 0 ;dll.Load
  13.  
  14. align 4
  15. start:
  16.         load_library lib0_name, library_path, system_path, import_buf2d_lib
  17.         cmp eax,-1
  18.         jz button.exit
  19.  
  20.         mcall 40,0x27
  21.         stdcall [buf2d_create], buf_0 ;ᮧ¤ ¥¬ ¡ãä¥à
  22.         stdcall [buf2d_line], buf_0, 110, 20, 125, 90, 0xffff00 ;à¨á㥬 «¨­¨î
  23.         stdcall [buf2d_line], buf_0, 60, 120, 110, 20, 0xd000 ;à¨á㥬 «¨­¨î
  24.         stdcall [buf2d_curve_bezier], buf_0, (10 shl 16)+20,(110 shl 16)+10,(50 shl 16)+90, dword 0xff
  25.         stdcall [buf2d_circle], buf_0, 125, 90, 30, 0xffffff ;à¨á㥬 ®ªà㦭®áâì
  26.         stdcall [buf2d_circle], buf_0, 25, 70, 15, 0xff0000 ;à¨á㥬 ®ªà㦭®áâì
  27.  
  28. align 4
  29. red_win:
  30.         call draw_window
  31.  
  32. align 4
  33. still:
  34.         mcall 10
  35.         cmp al,1 ;¨§¬¥­¨«®áì ¯®«®¦¥­¨¥ ®ª­ 
  36.         jz red_win
  37.         cmp al,2
  38.         jz key
  39.         cmp al,3
  40.         jz button
  41.         jmp still
  42.  
  43. align 4
  44. draw_window:
  45.         pushad
  46.         mcall 12,1
  47.  
  48.         ;mov edx,0x32000000
  49.         mov edx,0x33000000
  50.         mcall 0,(50 shl 16)+330,(30 shl 16)+275,,,caption
  51.  
  52.         stdcall [buf2d_draw], buf_0
  53.  
  54.         mcall 12,2
  55.         popad
  56.         ret
  57.  
  58. align 4
  59. key:
  60.         mcall 2
  61.  
  62.         cmp ah,27 ;Esc
  63.         je button.exit
  64.  
  65.         jmp still
  66.  
  67. align 4
  68. button:
  69.         mcall 17 ;¯®«ãç¨âì ª®¤ ­ ¦ â®© ª­®¯ª¨
  70.         cmp ah,1
  71.         jne still
  72. .exit:
  73.         stdcall [buf2d_delete],buf_0 ;㤠«ï¥¬ ¡ãä¥à
  74.         mcall -1 ;¢ë室 ¨§ ¯à®£à ¬¬ë
  75.  
  76. caption db 'Test buf2d library, [Esc] - exit',0
  77.  
  78. ;--------------------------------------------------
  79. align 4
  80. import_buf2d_lib:
  81.         dd sz_lib_init
  82.         buf2d_create dd sz_buf2d_create
  83.         buf2d_create_f_img dd sz_buf2d_create_f_img
  84.         buf2d_clear dd sz_buf2d_clear
  85.         buf2d_draw dd sz_buf2d_draw
  86.         buf2d_delete dd sz_buf2d_delete
  87.         buf2d_line dd sz_buf2d_line
  88.         buf2d_circle dd sz_buf2d_circle
  89.         buf2d_img_hdiv2 dd sz_buf2d_img_hdiv2
  90.         buf2d_img_wdiv2 dd sz_buf2d_img_wdiv2
  91.         buf2d_conv_24_to_8 dd sz_buf2d_conv_24_to_8
  92.         buf2d_conv_24_to_32 dd sz_buf2d_conv_24_to_32
  93.         buf2d_bit_blt dd sz_buf2d_bit_blt
  94.         buf2d_bit_blt_transp dd sz_buf2d_bit_blt_transp
  95.         buf2d_bit_blt_alpha dd sz_buf2d_bit_blt_alpha
  96.         buf2d_curve_bezier dd sz_buf2d_curve_bezier
  97.         buf2d_convert_text_matrix dd sz_buf2d_convert_text_matrix
  98.         buf2d_draw_text dd sz_buf2d_draw_text
  99.         dd 0,0
  100.         sz_lib_init db 'lib_init',0
  101.         sz_buf2d_create db 'buf2d_create',0
  102.         sz_buf2d_create_f_img db 'buf2d_create_f_img',0
  103.         sz_buf2d_clear db 'buf2d_clear',0
  104.         sz_buf2d_draw db 'buf2d_draw',0
  105.         sz_buf2d_delete db 'buf2d_delete',0
  106.         sz_buf2d_line db 'buf2d_line',0
  107.         sz_buf2d_circle db 'buf2d_circle',0 ;à¨á®¢ ­¨¥ ®ªà㦭®áâ¨
  108.         sz_buf2d_img_hdiv2 db 'buf2d_img_hdiv2',0
  109.         sz_buf2d_img_wdiv2 db 'buf2d_img_wdiv2',0
  110.         sz_buf2d_conv_24_to_8 db 'buf2d_conv_24_to_8',0
  111.         sz_buf2d_conv_24_to_32 db 'buf2d_conv_24_to_32',0
  112.         sz_buf2d_bit_blt db 'buf2d_bit_blt',0
  113.         sz_buf2d_bit_blt_transp db 'buf2d_bit_blt_transp',0
  114.         sz_buf2d_bit_blt_alpha db 'buf2d_bit_blt_alpha',0
  115.         sz_buf2d_curve_bezier db 'buf2d_curve_bezier',0
  116.         sz_buf2d_convert_text_matrix db 'buf2d_convert_text_matrix',0
  117.         sz_buf2d_draw_text db 'buf2d_draw_text',0
  118.  
  119. align 4
  120. buf_0:
  121.         dd 0 ;㪠§ â¥«ì ­  ¡ãä¥à ¨§®¡à ¦¥­¨ï
  122.         dw 20 ;+4 left
  123.         dw 10 ;+6 top
  124.         dd 160 ;+8 w
  125.         dd 128 ;+12 h
  126.         dd 0x80 ;+16 color
  127.         db 24 ;+20 bit in pixel
  128.  
  129. ;--------------------------------------------------
  130. system_path db '/sys/lib/'
  131. lib0_name db 'buf2d.obj',0
  132. ;--------------------------------------------------
  133.  
  134. i_end: ;ª®­¥æ ª®¤ 
  135.         rb 1024
  136. stacktop:
  137. cur_dir_path:
  138.         rb 4096
  139. library_path:
  140.         rb 4096
  141. mem:
  142.  
  143.