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 '../../../../../dll.inc'
  10. include '../../../../../load_lib.mac'
  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.         stdcall [buf2d_img_hdiv2], buf_0 ;ᦨ¬ ¥¬ ¨§®¡à ¦¥­¨¥ ¢ ¡ãä¥à¥ ¯® ¢ëá®â¥ ¢ 2 à § 
  29.         stdcall [buf2d_img_wdiv2], buf_0 ;ᦨ¬ ¥¬ ¨§®¡à ¦¥­¨¥ ¢ ¡ãä¥à¥ ¯® è¨à¨­¥ ¢ 2 à § 
  30.         stdcall [buf2d_create_f_img], buf_1,[buf_0] ;ᮧ¤ ¥¬ ¬ «¥­ìª¨© ¡ãä¥à buf_1, ­  ®á­®¢¥ ᦠ⮣® ¨§®¡à ¦¥­¨ï ¨§ buf_0
  31.  
  32.         ;¥á«¨ ¡ë ¨á¯®«ì§®¢ « áì äã­ªæ¨ï buf2d_create, ⮣¤  ¡¨âë ¨§®¡à ¦¥­¨ï
  33.         ;¯à¨è«®áì ¡ë ª®¯¨à®¢ âì á«¥¤ã騬¨ áâப ¬¨:
  34.         ;xor ecx,ecx
  35.         ;xor eax,eax
  36.         ;mov cx,word[buf_1.size_x]
  37.         ;mov ax,word[buf_1.size_y]
  38.         ;imul ecx,eax
  39.         ;imul ecx,3 ;ecx - ª®««¨ç¥á⢮ ¡ ©â ¢ ¬ «¥­ìª®¬ ¡ãä¥à¥
  40.         ;stdcall mem_copy, dword[buf_0],dword[buf_1],ecx
  41.  
  42.         stdcall [buf2d_clear], buf_0,0xffffff
  43.         stdcall [buf2d_bit_blt], buf_0, 15,10, buf_1
  44.         stdcall [buf2d_bit_blt], buf_0, 110,65, buf_1
  45.  
  46.         stdcall [buf2d_conv_24_to_8], buf_1
  47.         ;stdcall [buf2d_bit_blt_alpha], buf_0, 1,1, buf_1,0xff8080 ;à¨á㥬 ª®­âãàë ¨§®¡à ¦¥­¨ï ­  ä®â®£à ä¨¨
  48.  
  49. align 4
  50. red_win:
  51.         call draw_window
  52.  
  53. align 4
  54. still:
  55.         mcall 10
  56.         cmp al,1 ;¨§¬. ¯®«®¦¥­¨¥ ®ª­ 
  57.         jz red_win
  58.         cmp al,2
  59.         jz key
  60.         cmp al,3
  61.         jz button
  62.         jmp still
  63.  
  64. align 4
  65. draw_window:
  66.         pushad
  67.         mcall 12,1
  68.  
  69.         ;mov edx,0x32000000
  70.         mov edx,0x33000000
  71.         mcall 0,(50 shl 16)+330,(30 shl 16)+275,,,caption
  72.  
  73.         stdcall [buf2d_draw], buf_0
  74.  
  75.         mcall 12,2
  76.         popad
  77.         ret
  78.  
  79. align 4
  80. key:
  81.         mcall 2
  82.  
  83.         cmp ah,27 ;Esc
  84.         je button.exit
  85.  
  86.         jmp still
  87.  
  88. align 4
  89. button:
  90.         mcall 17 ;¯®«ãç¨âì ª®¤ ­ ¦ â®© ª­®¯ª¨
  91.         cmp ah,1
  92.         jne still
  93. .exit:
  94.         stdcall [buf2d_delete],buf_0 ;㤠«ï¥¬ ¡ãä¥à
  95.         stdcall [buf2d_delete],buf_1 ;㤠«ï¥¬ ¡ãä¥à
  96.         mcall -1 ;¢ë室 ¨§ ¯à®£à ¬¬ë
  97.  
  98. caption db 'Test buf2d library, [Esc] - exit',0
  99.  
  100. ;--------------------------------------------------
  101. align 4
  102. import_buf2d_lib:
  103.         dd sz_lib_init
  104.         buf2d_create dd sz_buf2d_create
  105.         buf2d_create_f_img dd sz_buf2d_create_f_img
  106.         buf2d_clear dd sz_buf2d_clear
  107.         buf2d_draw dd sz_buf2d_draw
  108.         buf2d_delete dd sz_buf2d_delete
  109.         buf2d_line dd sz_buf2d_line
  110.         buf2d_circle dd sz_buf2d_circle
  111.         buf2d_img_hdiv2 dd sz_buf2d_img_hdiv2
  112.         buf2d_img_wdiv2 dd sz_buf2d_img_wdiv2
  113.         buf2d_conv_24_to_8 dd sz_buf2d_conv_24_to_8
  114.         buf2d_conv_24_to_32 dd sz_buf2d_conv_24_to_32
  115.         buf2d_bit_blt dd sz_buf2d_bit_blt
  116.         buf2d_bit_blt_transp dd sz_buf2d_bit_blt_transp
  117.         buf2d_bit_blt_alpha dd sz_buf2d_bit_blt_alpha
  118.         buf2d_curve_bezier dd sz_buf2d_curve_bezier
  119.         buf2d_convert_text_matrix dd sz_buf2d_convert_text_matrix
  120.         buf2d_draw_text dd sz_buf2d_draw_text
  121.         dd 0,0
  122.         sz_lib_init db 'lib_init',0
  123.         sz_buf2d_create db 'buf2d_create',0
  124.         sz_buf2d_create_f_img db 'buf2d_create_f_img',0
  125.         sz_buf2d_clear db 'buf2d_clear',0
  126.         sz_buf2d_draw db 'buf2d_draw',0
  127.         sz_buf2d_delete db 'buf2d_delete',0
  128.         sz_buf2d_line db 'buf2d_line',0
  129.         sz_buf2d_circle db 'buf2d_circle',0 ;à¨á®¢ ­¨¥ ®ªà㦭®áâ¨
  130.         sz_buf2d_img_hdiv2 db 'buf2d_img_hdiv2',0
  131.         sz_buf2d_img_wdiv2 db 'buf2d_img_wdiv2',0
  132.         sz_buf2d_conv_24_to_8 db 'buf2d_conv_24_to_8',0
  133.         sz_buf2d_conv_24_to_32 db 'buf2d_conv_24_to_32',0
  134.         sz_buf2d_bit_blt db 'buf2d_bit_blt',0
  135.         sz_buf2d_bit_blt_transp db 'buf2d_bit_blt_transp',0
  136.         sz_buf2d_bit_blt_alpha db 'buf2d_bit_blt_alpha',0
  137.         sz_buf2d_curve_bezier db 'buf2d_curve_bezier',0
  138.         sz_buf2d_convert_text_matrix db 'buf2d_convert_text_matrix',0
  139.         sz_buf2d_draw_text db 'buf2d_draw_text',0
  140.  
  141. align 4
  142. buf_0:
  143.         dd 0 ;㪠§ â¥«ì ­  ¡ãä¥à ¨§®¡à ¦¥­¨ï
  144.         dw 20 ;+4 left
  145.         dw 10 ;+6 top
  146.         dd 160 ;+8 w
  147.         dd 128 ;+12 h
  148.         dd 0x80 ;+16 color
  149.         db 24 ;+20 bit in pixel
  150.  
  151. align 4
  152. buf_1:
  153.         dd 0 ;㪠§ â¥«ì ­  ¡ãä¥à ¨§®¡à ¦¥­¨ï
  154.         dw 10 ;+4 left
  155.         dw 10 ;+6 top
  156. .size_x: dd 80 ;+8 w
  157. .size_y: dd 64 ;+12 h
  158.         dd 0x80 ;+16 color
  159.         db 24 ;+20 bit in pixel
  160.  
  161. ;--------------------------------------------------
  162. system_path db '/sys/lib/'
  163. lib0_name db 'buf2d.obj',0
  164. ;--------------------------------------------------
  165.  
  166. i_end: ;ª®­¥æ ª®¤ 
  167.         rb 1024
  168. stacktop:
  169. cur_dir_path:
  170.         rb 4096
  171. library_path:
  172.         rb 4096
  173. mem:
  174.  
  175.