| 0,0 → 1,277 |
|---|
| use32 |
| org 0x0 |
| |
| db 'MENUET01' |
| dd 1,START,I_END,MEM,STACKTOP,0,cur_dir_path |
| |
| |
| include '../../../../../proc32.inc' |
| include '../../../../../macros.inc' |
| include '../../../../../KOSfuncs.inc' |
| include '../../../box_lib/load_lib.mac' |
| include '../../../../../dll.inc' |
| include '../../libimg/libimg.inc' |
| |
| macro cStr dest,txt |
| { |
| local .end_t |
| local .m_txt |
| jmp .end_t |
| align 4 |
| .m_txt db txt,0 |
| align 4 |
| .end_t: |
| if dest eq |
| mov eax,.m_txt |
| else |
| mov dest,.m_txt |
| end if |
| } |
| |
| @use_library_mem mem.Alloc,mem.Free,mem.ReAlloc, dll.Load |
| |
| align 4 |
| m1size dd 16*1024 |
| m1 rb 16*1024 |
| |
| align 4 |
| START: |
| load_libraries l_libs_start,load_lib_end |
| mov ebp,lib0 |
| .test_lib_open: |
| cmp dword [ebp+ll_struc_size-4],0 |
| jz @f |
| mcall SF_TERMINATE_PROCESS ;exit not correct |
| @@: |
| add ebp,ll_struc_size |
| cmp ebp,load_lib_end |
| jl .test_lib_open |
| |
| ;create image data |
| stdcall [buf2d_create], buf_0 |
| stdcall [buf2d_line], buf_0, 110, 20, 125, 90, 0xffff00 |
| stdcall [buf2d_line], buf_0, 60, 120, 110, 20, 0xd000 |
| stdcall [buf2d_curve_bezier], buf_0, (10 shl 16)+20,(110 shl 16)+10,(50 shl 16)+90, dword 0xff |
| stdcall [buf2d_circle], buf_0, 125, 90, 30, 0xffffff |
| stdcall [buf2d_circle], buf_0, 25, 70, 15, 0xff0000 |
| |
| ;create image struct |
| stdcall [img.create], [buf_0.w], [buf_0.h], Image.bpp24 |
| test eax,eax |
| jz @f |
| ;copy image |
| mov edi,[eax+Image.Data] |
| mov esi,[buf_0] |
| mov ecx,[buf_0.w] |
| imul ecx,[buf_0.h] |
| imul ecx,3 |
| rep movsb |
| |
| ;encode image |
| stdcall [img.encode], eax, LIBIMG_FORMAT_PNG, 0 |
| test eax,eax |
| jz @f |
| |
| ;copy output image |
| mov edi,m1 |
| mov esi,eax |
| mov [m1size],ecx |
| rep movsb |
| @@: |
| |
| align 4 |
| red: |
| call draw_window |
| |
| align 4 |
| still: |
| mcall SF_WAIT_EVENT ; äãªæ¨ï 10 - ¦¤ âì ᮡëâ¨ï |
| |
| cmp eax,1 ; ¯¥à¥à¨á®¢ âì ®ª® ? |
| je red ; ¥á«¨ ¤ - ¬¥âªã red |
| cmp eax,2 ; ¦ â ª« ¢¨è ? |
| je key ; ¥á«¨ ¤ - key |
| cmp eax,3 ; ¦ â ª®¯ª ? |
| je button ; ¥á«¨ ¤ - button |
| |
| jmp still ; ¥á«¨ ¤à㣮¥ ᮡë⨥ - ¢ ç «® 横« |
| |
| align 4 |
| key: ; ¦ â ª« ¢¨è ª« ¢¨ âãॠ|
| mcall SF_GET_KEY ; äãªæ¨ï 2 - áç¨â âì ª®¤ ᨬ¢®« (¢ ah) |
| |
| cmp ah,178 ;Up |
| jne @f |
| call but_save_file |
| @@: |
| jmp still ; ¢¥àãâìáï ª ç «ã 横« |
| |
| ;--------------------------------------------------------------------- |
| align 4 |
| button: |
| mcall SF_GET_BUTTON |
| cmp ah, 1 |
| jne still |
| .exit: |
| stdcall [buf2d_delete],buf_0 |
| mcall SF_TERMINATE_PROCESS |
| |
| align 4 |
| draw_window: |
| mcall SF_REDRAW, SSF_BEGIN_DRAW |
| mcall SF_STYLE_SETTINGS, SSF_GET_COLORS, sc,sizeof.system_colors |
| mov edx, [sc.work] ; 梥â ä® |
| or edx, 0x33000000 ; ¨ ⨯ ®ª 3 |
| mcall SF_CREATE_WINDOW, <50,400>, <50,230>, , ,title |
| |
| stdcall [buf2d_draw], buf_0 |
| |
| cStr edx,'Img. size:' |
| mcall SF_DRAW_TEXT, <10,130>,0x40f0,,10 |
| mcall SF_DRAW_NUMBER, (5 shl 16)+1, m1size, <80,130>, 0 |
| |
| mcall SF_REDRAW, SSF_END_DRAW |
| ret |
| |
| align 4 |
| title db 'Press button [Up] and see ' |
| openfile_path db '/rd/1/t1.png',0 |
| |
| struct FileInfoBlock |
| Function dd ? |
| Position dd ? |
| Flags dd ? |
| Count dd ? |
| Buffer dd ? |
| db ? |
| FileName dd ? |
| ends |
| |
| align 4 |
| run_file_70 FileInfoBlock |
| |
| align 4 |
| but_save_file: |
| pushad |
| mov eax,SF_FILE |
| mov [run_file_70.Function], SSF_CREATE_FILE |
| mov [run_file_70.Position], 0 |
| mov [run_file_70.Flags], 0 |
| mov [run_file_70.Buffer], m1 |
| mov ebx,[m1size] |
| mov dword[run_file_70.Count], ebx |
| mov byte[run_file_70+20], 0 |
| mov dword[run_file_70.FileName], openfile_path |
| mov ebx,run_file_70 |
| int 0x40 |
| ;cmp ebx,0xffffffff |
| ;je .end_save_file |
| ;... if error ... |
| ;.end_save_file: |
| popad |
| ret |
| |
| align 4 |
| buf_0: |
| dd 0 |
| dw 10 ;+4 left |
| dw 4 ;+6 top |
| .w: dd 360 ;+8 w |
| .h: dd 120 ;+12 h |
| dd 0x80 ;+16 color |
| db 24 ;+20 bit in pixel |
| |
| align 4 |
| sc system_colors |
| |
| align 4 |
| import_buf2d_lib: |
| dd sz_lib_init |
| buf2d_create dd sz_buf2d_create |
| buf2d_create_f_img dd sz_buf2d_create_f_img |
| buf2d_clear dd sz_buf2d_clear |
| buf2d_draw dd sz_buf2d_draw |
| buf2d_delete dd sz_buf2d_delete |
| buf2d_line dd sz_buf2d_line |
| buf2d_circle dd sz_buf2d_circle |
| buf2d_img_hdiv2 dd sz_buf2d_img_hdiv2 |
| buf2d_img_wdiv2 dd sz_buf2d_img_wdiv2 |
| buf2d_conv_24_to_8 dd sz_buf2d_conv_24_to_8 |
| buf2d_conv_24_to_32 dd sz_buf2d_conv_24_to_32 |
| buf2d_bit_blt dd sz_buf2d_bit_blt |
| buf2d_bit_blt_transp dd sz_buf2d_bit_blt_transp |
| buf2d_bit_blt_alpha dd sz_buf2d_bit_blt_alpha |
| buf2d_curve_bezier dd sz_buf2d_curve_bezier |
| buf2d_convert_text_matrix dd sz_buf2d_convert_text_matrix |
| buf2d_draw_text dd sz_buf2d_draw_text |
| dd 0,0 |
| sz_lib_init db 'lib_init',0 |
| sz_buf2d_create db 'buf2d_create',0 |
| sz_buf2d_create_f_img db 'buf2d_create_f_img',0 |
| sz_buf2d_clear db 'buf2d_clear',0 |
| sz_buf2d_draw db 'buf2d_draw',0 |
| sz_buf2d_delete db 'buf2d_delete',0 |
| sz_buf2d_line db 'buf2d_line',0 |
| sz_buf2d_circle db 'buf2d_circle',0 |
| sz_buf2d_img_hdiv2 db 'buf2d_img_hdiv2',0 |
| sz_buf2d_img_wdiv2 db 'buf2d_img_wdiv2',0 |
| sz_buf2d_conv_24_to_8 db 'buf2d_conv_24_to_8',0 |
| sz_buf2d_conv_24_to_32 db 'buf2d_conv_24_to_32',0 |
| sz_buf2d_bit_blt db 'buf2d_bit_blt',0 |
| sz_buf2d_bit_blt_transp db 'buf2d_bit_blt_transp',0 |
| sz_buf2d_bit_blt_alpha db 'buf2d_bit_blt_alpha',0 |
| sz_buf2d_curve_bezier db 'buf2d_curve_bezier',0 |
| sz_buf2d_convert_text_matrix db 'buf2d_convert_text_matrix',0 |
| sz_buf2d_draw_text db 'buf2d_draw_text',0 |
| |
| align 4 |
| import_libimg: |
| libimg.init dd sz_lib_init1 |
| img.draw dd sz_img_draw |
| img.decode dd sz_img_decode |
| img.encode dd sz_img_encode |
| img.create dd sz_img_create |
| img.destroy dd sz_img_destroy |
| img.to_rgb2 dd sz_img_to_rgb2 |
| img.formats_table dd sz_img_formats_table |
| dd 0,0 |
| sz_lib_init1 db 'lib_init',0 |
| sz_img_draw db 'img_draw',0 |
| sz_img_decode db 'img_decode',0 |
| sz_img_encode db 'img_encode',0 |
| sz_img_create db 'img_create',0 |
| sz_img_destroy db 'img_destroy',0 |
| sz_img_to_rgb2 db 'img_to_rgb2',0 |
| sz_img_formats_table db 'img_formats_table',0 |
| |
| ;-------------------------------------------------- |
| system_dir_0 db '/sys/lib/' |
| lib_name_0 db 'buf2d.obj',0 |
| |
| system_dir_1 db '/sys/lib/' |
| lib_name_1 db 'libimg.obj',0 |
| |
| err_message_found_lib0 db 'Sorry I cannot load library buf2d.obj',0 |
| err_message_found_lib1 db 'Sorry I cannot load library libimg.obj',0 |
| head_f_i: |
| head_f_l db 'System error',0 |
| err_message_import0 db 'Error on load import library buf2d.obj',0 |
| err_message_import1 db 'Error on load import library libimg.obj',0 |
| |
| l_libs_start: |
| lib0 l_libs lib_name_0, cur_dir_path, library_path, system_dir_0,\ |
| err_message_found_lib0, head_f_l, import_buf2d_lib,err_message_import0, head_f_i |
| lib1 l_libs lib_name_1, cur_dir_path, library_path, system_dir_1,\ |
| err_message_found_lib1, head_f_l, import_libimg, err_message_import1, head_f_i |
| load_lib_end: |
| ;--------------------------------------------------------------------- |
| |
| align 16 |
| I_END: |
| rd 4096 |
| STACKTOP: |
| cur_dir_path: |
| rb 4096 |
| library_path: |
| rb 4096 |
| MEM: |