/programs/develop/examples/example3/trunk/example3.asm |
---|
16,7 → 16,7 |
include '../../../../macros.inc' |
include '../../../../proc32.inc' |
include '../../../../KOSfuncs.inc' |
include '../../../../develop/libraries/box_lib/load_lib.mac' |
include '../../../../load_lib.mac' |
include '../../../../dll.inc' |
KMENUITEM_NORMAL equ 0 |
23,7 → 23,7 |
KMENUITEM_SUBMENU equ 1 |
KMENUITEM_SEPARATOR equ 2 |
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load |
@use_library mem.Alloc,mem.Free,mem.ReAlloc,dll.Load |
start: ; start of execution |
264,22 → 264,9 |
system_dir_0 db '/sys/lib/' |
lib_name_0 db 'kmenu.obj',0 |
if lang eq ru |
head_f_i: |
head_f_l db '¨á⥬ ï ®è¨¡ª ',0 |
err_msg_found_lib_0 db '¥ ©¤¥ ¡¨¡«¨®â¥ª ',39,'kmenu.obj',39,0 |
err_msg_import_0 db '訡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'kmenu',39,0 |
else |
head_f_i: |
head_f_l db 'System error',0 |
err_msg_found_lib_0 db 'Sorry I cannot found library ',39,'kmenu.obj',39,0 |
err_msg_import_0 db 'Error on load import library ',39,'kmenu.obj',39,0 |
end if |
align 4 |
l_libs_start: |
lib_0 l_libs lib_name_0, sys_path, file_name, system_dir_0,\ |
err_msg_found_lib_0, head_f_l, import_libkmenu,err_msg_import_0,head_f_i |
lib_0 l_libs lib_name_0, file_name, system_dir_0, import_libkmenu |
l_libs_end: |
align 4 |
/programs/develop/fasm/1.71/fasm.asm |
---|
1,7 → 1,7 |
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
;; ;; |
;; flat assembler source ;; |
;; Copyright (c) 1999-2012, Tomasz Grysztar ;; |
;; Copyright (c) 1999-2020, Tomasz Grysztar ;; |
;; All rights reserved. ;; |
;; ;; |
;; KolibriOS port by KolibriOS Team ;; |
42,7 → 42,8 |
include 'fasm.inc' |
include '../../../develop/libraries/box_lib/trunk/box_lib.mac' |
include '../../../develop/libraries/box_lib/load_lib.mac' |
include '../../../KOSfuncs.inc' |
include '../../../load_lib.mac' |
@use_library |
center fix true |
476,12 → 477,6 |
s_dbgdescr db '®§¤ ¢ âì ®â« ¤®çãî ¨ä®à¬ æ¨î',0 |
err_message_found_lib0 db '¥ ©¤¥ ¡¨¡«¨®â¥ª box_lib.obj',0 ;áâப , ª®â®à ï ¡ã¤¥â ¢ áä®à¬¨à®¢ ®¬ ®ª¥, ¥á«¨ ¡¨¡«¨®â¥ª ¥ ¡ã¤¥â ©¤¥ |
err_message_import0 db '訡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ box_lib.obj',0 |
err_message_found_lib1 db '¥ ©¤¥ ¡¨¡«¨®â¥ª proc_lib.obj',0 |
err_message_import1 db '訡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ proc_lib.obj',0 |
head_f_i: |
head_f_l db '¨á⥬ ï ®è¨¡ª ',0 ;§ £®«®¢®ª ®ª , ¯à¨ ¢®§¨ª®¢¥¨¨ ®è¨¡ª¨ |
else |
text: |
db ' InFile:' |
496,13 → 491,6 |
s_dbgdescr db 'Generate debug information',0 |
err_message_found_lib0 db 'Sorry I cannot found library box_lib.obj',0 |
err_message_import0 db 'Error on load import library box_lib.obj',0 |
err_message_found_lib1 db 'Sorry I cannot found library proc_lib.obj',0 |
err_message_import1 db 'Error on load import library proc_lib.obj',0 |
head_f_i: |
head_f_l db 'System error',0 ;§ £®«®¢®ª ®ª , ¯à¨ ¢®§¨ª®¢¥¨¨ ®è¨¡ª¨ |
end if |
system_dir0 db '/sys/lib/' |
547,8 → 535,8 |
;--------------------------------------------------------------------- |
;library structures |
l_libs_start: |
lib0 l_libs lib0_name, cur_dir_path, library_path, system_dir0, err_message_found_lib0, head_f_l, import_box_lib, err_message_import0, head_f_i |
lib1 l_libs lib1_name, cur_dir_path, library_path, system_dir1, err_message_found_lib1, head_f_l, import_proc_lib,err_message_import1, head_f_i |
lib0 l_libs lib0_name, library_path, system_dir0, import_box_lib |
lib1 l_libs lib1_name, library_path, system_dir1, import_proc_lib |
load_lib_end: |
edit1 edit_box 153, 72, 3, 0xffffff, 0xA4C4E4, 0x80ff, 0, 0x10000000,(outfile-infile-1), infile, mouse_dd, 0, 11,11 |
/programs/develop/h2d2b/trunk/h2d2b.asm |
---|
19,7 → 19,8 |
include '../../../proc32.inc' |
include '../../../macros.inc' ; ¬ ªà®áë ®¡«¥£ç îâ ¦¨§ì áᥬ¡«¥à騪®¢! |
include '../../../develop/libraries/box_lib/load_lib.mac' |
include '../../../KOSfuncs.inc' |
include '../../../load_lib.mac' |
include '../../../develop/libraries/box_lib/trunk/box_lib.mac' |
include 'lang.inc' |
289,12 → 290,9 |
system_dir_0 db '/sys/lib/' |
lib_name_0 db 'box_lib.obj',0 |
err_msg_found_lib_0 db '¥ ©¤¥ ¡¨¡«¨®â¥ª ',39,'box_lib.obj',39,0 |
err_msg_import_0 db '訡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ ',39,'box_lib',39,0 |
l_libs_start: |
lib_0 l_libs lib_name_0, sys_path, library_path, system_dir_0,\ |
err_msg_found_lib_0,head_f_l,import_box_lib,err_msg_import_0,head_f_i |
lib_0 l_libs lib_name_0, library_path, system_dir_0,import_box_lib |
l_libs_end: |
align 4 |
313,7 → 311,7 |
i_end: |
sys_colors system_colors |
rb 0x400 ;stack |
sys_path rb 4096 |
library_path rb 4096 |
rb 0x400 ; stack |
e_end: ; ¬¥âª ª®æ ¯à®£à ¬¬ë |
/programs/develop/heed/trunk/heed.asm |
---|
60,10 → 60,11 |
_title equ 'HeEd 0.16', 0 |
include 'lang.inc' |
include '../../../KOSfuncs.inc' |
include '../../../config.inc' ;for nightbuild |
include '../../../macros.inc' |
include '../../libraries/box_lib/trunk/box_lib.mac' |
include '../../libraries/box_lib/load_lib.mac' |
include '../../../load_lib.mac' |
@use_library |
;-------------------------------------------------------------------- |
3289,23 → 3290,9 |
head_f_i: |
if lang eq ru |
head_f_l db '®è¨¡ª ',0 |
err_message_found_lib1 db 'box_lib.obj - ¥ ©¤¥!',0 |
err_message_found_lib2 db 'proc_lib.obj - ¥ ©¤¥!',0 |
err_message_import1 db 'box_lib.obj - 訡ª ¨¬¯®àâ !',0 |
err_message_import2 db 'proc_lib.obj - 訡ª ¨¬¯®àâ !',0 |
error_open_file_string db " ©« ¥ ©¤¥!",0 |
error_save_file_string db " ©« ¥ á®åà ¥!",0 |
else |
head_f_l db 'error',0 |
err_message_found_lib1 db 'box_lib.obj - Not found!',0 |
err_message_found_lib2 db 'proc_lib.obj - Not found!',0 |
err_message_import1 db 'box_lib.obj - Wrong import!',0 |
err_message_import2 db 'proc_lib.obj - Wrong import!',0 |
error_open_file_string db "Isn't found!",0 |
error_save_file_string db "Isn't saved!",0 |
end if |
3397,14 → 3384,10 |
title db _title |
;--------------------------------------------------------------------- |
l_libs_start: |
; load_library boxlib_name,cur_dir_path,buf_cmd_lin,system_path,\ |
; err_message_found_lib,head_f_l,myimport,err_message_import,head_f_i |
library01 l_libs system_dir_Boxlib+9, cur_dir_path, buf_cmd_lin, system_dir_Boxlib, \ |
err_message_found_lib1, head_f_l, Box_lib_import, err_message_import1, head_f_i |
library01 l_libs system_dir_Boxlib+9, buf_cmd_lin, system_dir_Boxlib, Box_lib_import |
library02 l_libs system_dir_ProcLib+9, cur_dir_path, buf_cmd_lin, system_dir_ProcLib, \ |
err_message_found_lib2, head_f_l, ProcLib_import, err_message_import2, head_f_i |
library02 l_libs system_dir_ProcLib+9, buf_cmd_lin, system_dir_ProcLib, ProcLib_import |
end_l_libs: |
;--------------------------------------------------------------------- |
/programs/develop/kol_f_edit/kol_f_edit.asm |
---|
3,9 → 3,10 |
db 'MENUET01' |
dd 1,start,i_end,mem,stacktop,buf_cmd_lin,sys_path |
include '../../KOSfuncs.inc' |
include '../../macros.inc' |
include '../../proc32.inc' |
include '../../develop/libraries/box_lib/load_lib.mac' |
include '../../load_lib.mac' |
include '../../develop/libraries/box_lib/trunk/box_lib.mac' |
include '../../dll.inc' |
include '../../system/skincfg/trunk/kglobals.inc' |
13,7 → 14,7 |
include 'strlen.inc' |
include 'obj_codes.inc' |
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc, dll.Load |
@use_library mem.Alloc,mem.Free,mem.ReAlloc, dll.Load |
hed db 'kol_f_edit 29.09.20',0 |
88,12 → 89,12 |
cmp ebx,0xffffffff |
je @f |
;®¯à¥¤¥«ï¥¬ ¢¨¤ ¨§®¡à ¦¥¨ï ¨ ¯¥à¥¢®¤¨¬ ¥£® ¢® ¢à¥¬¥ë© ¡ãä¥à image_data |
stdcall dword[img_decode], dword[buf],ebx,0 |
mov dword[image_data],eax |
stdcall [img_decode], [buf],ebx,0 |
mov [image_data],eax |
;¯à¥®¡à §ã¥¬ ¨§®¡à ¦¥¨¥ ª ä®à¬ âã rgb |
stdcall dword[img_to_rgb2], dword[image_data],dword[buf] |
stdcall [img_to_rgb2], [image_data],[buf] |
;㤠«ï¥¬ ¢à¥¬¥ë© ¡ãä¥à image_data |
stdcall dword[img_destroy], dword[image_data] |
stdcall [img_destroy], [image_data] |
@@: |
} |
205,8 → 206,8 |
mcall 48,3,sc,sizeof.system_colors |
mcall 40,0x27 |
stdcall dword[tl_data_init], tree1 |
stdcall dword[tl_data_init], tree2 |
stdcall [tl_data_init], tree1 |
stdcall [tl_data_init], tree2 |
copy_path fn_icon,sys_path,file_name,0 ;ä®à¬¨à㥬 ¯®«ë© ¯ãâì ª ä ©«ã ¨§®¡à ¦¥¨ï, ¯®¤à §ã¬¥¢ ¥¬ çâ® ® ¢ ®¤®© ¯ ¯ª¥ á ¯à®£à ¬¬®© |
mov [run_file_70.Function], 0 |
478,15 → 479,15 |
mcall 4,10*65536+35,0x80ff0000,txtErrOpen |
@@: |
stdcall [edit_box_draw], dword edit1 |
stdcall [edit_box_draw], dword edit_sav |
stdcall [edit_box_draw], edit1 |
stdcall [edit_box_draw], edit_sav |
mov dword[w_scr_t1.all_redraw],1 |
;stdcall [scrollbar_ver_draw],dword w_scr_t1 |
stdcall [tl_draw],dword tree1 |
;stdcall [scrollbar_ver_draw], w_scr_t1 |
stdcall [tl_draw], tree1 |
mov dword[w_scr_t2.all_redraw],1 |
;stdcall [scrollbar_ver_draw],dword w_scr_t2 |
stdcall [tl_draw],dword tree2 |
;stdcall [scrollbar_ver_draw], w_scr_t2 |
stdcall [tl_draw], tree2 |
cmp byte[show_mode],0 ;ãá«®¢¨¥ ¢¨¤¨¬®á⨠®ª ª®áâàãªâ®à |
jne @f |
502,10 → 503,10 |
align 4 |
mouse: |
stdcall [edit_box_mouse], dword edit1 |
stdcall [edit_box_mouse], dword edit_sav |
stdcall [tl_mouse], dword tree1 |
stdcall [tl_mouse], dword tree2 |
stdcall [edit_box_mouse], edit1 |
stdcall [edit_box_mouse], edit_sav |
stdcall [tl_mouse], tree1 |
stdcall [tl_mouse], tree2 |
cmp byte[show_mode],1 ;ãá«®¢¨¥ ¢¨¤¨¬®á⨠⥪á⮢®£® ®ª |
jne @f |
stdcall [ted_mouse], tedit0 |
516,10 → 517,10 |
align 4 |
key: |
mcall 2 |
stdcall [edit_box_key], dword edit1 |
stdcall [edit_box_key], dword edit_sav |
stdcall [tl_key], dword tree1 |
stdcall [tl_key], dword tree2 |
stdcall [edit_box_key], edit1 |
stdcall [edit_box_key], edit_sav |
stdcall [tl_key], tree1 |
stdcall [tl_key], tree2 |
jmp still |
1328,39 → 1329,6 |
obj_count_txt_props dd 0 ;ª®«¨ç¥á⢮ ¨á¯®«ì§ã¥¬ëå ⥪á⮢ëå ᢮©á⢠|
obj_m_win dd 0 ;áâàãªâãà £« ¢®£® ®ª |
; |
if 1 ;lang eq ru |
err_message_found_lib0 db '¥ ©¤¥ ¡¨¡«¨®â¥ª box_lib.obj',39,'" -tE',0 |
err_message_import0 db '訡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ box_lib.obj',39,'" -tW',0 |
err_message_found_lib1 db '¥ ©¤¥ ¡¨¡«¨®â¥ª proc_lib.obj',39,'" -tE',0 |
err_message_import1 db '訡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ proc_lib.obj',39,'" -tW',0 |
err_message_found_lib2 db '¥ 㤠«®áì ©â¨ ¡¨¡«¨®â¥ªã buf2d.obj',39,'" -tE',0 |
err_message_import2 db '訡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ buf2d.obj',39,'" -tW',0 |
err_message_found_lib3 db '¥ 㤠«®áì ©â¨ ¡¨¡«¨®â¥ªã libimg.obj',39,'" -tE',0 |
err_message_import3 db '訡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ libimg.obj',39,'" -tW',0 |
err_message_found_lib4 db '¥ 㤠«®áì ©â¨ ¡¨¡«¨®â¥ªã msgbox.obj',39,'" -tE',0 |
err_message_import4 db '訡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ msgbox.obj',39,'" -tW',0 |
head_f_i: |
head_f_l db '"¨á⥬ ï ®è¨¡ª ',0 ;§ £®«®¢®ª ®ª , ¯à¨ ¢®§¨ª®¢¥¨¨ ®è¨¡ª¨ |
else |
err_message_found_lib0 db 'Sorry I cannot found library box_lib.obj',39,'" -tE',0 |
err_message_import0 db 'Error on load import library box_lib.obj',39,'" -tW',0 |
err_message_found_lib1 db 'Sorry I cannot found library proc_lib.obj',39,'" -tE',0 |
err_message_import1 db 'Error on load import library proc_lib.obj',39,'" -tW',0 |
err_message_found_lib2 db 'Sorry I cannot found library buf2d.obj',39,'" -tE',0 |
err_message_import2 db 'Error on load import library buf2d.obj',39,'" -tW',0 |
err_message_found_lib3 db 'Sorry I cannot found library libimg.obj',39,'" -tE',0 |
err_message_import3 db 'Error on load import library libimg.obj',39,'" -tW',0 |
err_message_found_lib4 db 'Sorry I cannot found library msgbox.obj',39,'" -tE',0 |
err_message_import4 db 'Error on load import library msgbox.obj',39,'" -tW',0 |
head_f_i: |
head_f_l db '"System error',0 ;§ £®«®¢®ª ®ª , ¯à¨ ¢®§¨ª®¢¥¨¨ ®è¨¡ª¨ |
end if |
system_dir0 db '/sys/lib/' |
lib0_name db 'box_lib.obj',0 |
1624,11 → 1592,11 |
;library structures |
l_libs_start: |
lib0 l_libs lib0_name, sys_path, library_path, system_dir0, err_message_found_lib0, head_f_l, import_box_lib, err_message_import0, head_f_i |
lib1 l_libs lib1_name, sys_path, library_path, system_dir1, err_message_found_lib1, head_f_l, import_proc_lib,err_message_import1, head_f_i |
lib2 l_libs lib2_name, sys_path, library_path, system_dir2, err_message_found_lib2, head_f_l, import_buf2d_lib, err_message_import2, head_f_i |
lib3 l_libs lib3_name, sys_path, library_path, system_dir3, err_message_found_lib3, head_f_l, import_libimg, err_message_import3, head_f_i |
lib4 l_libs lib4_name, sys_path, library_path, system_dir4, err_message_found_lib4, head_f_l, import_msgbox_lib, err_message_import4, head_f_i |
lib0 l_libs lib0_name, library_path, system_dir0, import_box_lib |
lib1 l_libs lib1_name, library_path, system_dir1, import_proc_lib |
lib2 l_libs lib2_name, library_path, system_dir2, import_buf2d_lib |
lib3 l_libs lib3_name, library_path, system_dir3, import_libimg |
lib4 l_libs lib4_name, library_path, system_dir4, import_msgbox_lib |
load_lib_end: |
/programs/develop/libraries/buf2d/trunk/examples/e0_dr_lines.asm |
---|
1,23 → 1,19 |
use32 |
org 0x0 |
db 'MENUET01' ;¨¤¥â¨ä. ¨á¯®«ï¥¬®£® ä ©« ¢á¥£¤ 8 ¡ ©â |
dd 0x1 |
dd start |
dd i_end ;à §¬¥à ¯à¨«®¦¥¨ï |
dd mem,stacktop |
dd 0,cur_dir_path |
org 0 |
db 'MENUET01' |
dd 1,start,i_end,mem,stacktop,0,cur_dir_path |
include '../../../../../KOSfuncs.inc' |
include '../../../../../macros.inc' |
include '../../../../../proc32.inc' |
include '../../../../../develop/libraries/box_lib/load_lib.mac' |
include '../../../../../load_lib.mac' |
include '../../../../../dll.inc' |
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc, 0 ;dll.Load |
@use_library mem.Alloc,mem.Free,mem.ReAlloc, 0 ;dll.Load |
align 4 |
start: |
load_library vectors_name, cur_dir_path, library_path, system_path, \ |
err_message_found_lib, head_f_l, import_buf2d_lib, err_message_import, head_f_i |
load_library lib0_name, library_path, system_path, import_buf2d_lib |
cmp eax,-1 |
jz button.exit |
132,11 → 128,7 |
;-------------------------------------------------- |
system_path db '/sys/lib/' |
vectors_name db 'buf2d.obj',0 |
err_message_found_lib db 'Sorry I cannot load library buf2d.obj',0 |
head_f_i: |
head_f_l db 'System error',0 |
err_message_import db 'Error on load import library buf2d.obj',0 |
lib0_name db 'buf2d.obj',0 |
;-------------------------------------------------- |
i_end: ;ª®¥æ ª®¤ |
/programs/develop/libraries/buf2d/trunk/examples/e1_scaling.asm |
---|
1,23 → 1,19 |
use32 |
org 0x0 |
db 'MENUET01' ;¨¤¥â¨ä. ¨á¯®«ï¥¬®£® ä ©« ¢á¥£¤ 8 ¡ ©â |
dd 0x1 |
dd start |
dd i_end ;à §¬¥à ¯à¨«®¦¥¨ï |
dd mem,stacktop |
dd 0,cur_dir_path |
org 0 |
db 'MENUET01' |
dd 1,start,i_end,mem,stacktop,0,cur_dir_path |
include '../../../../../KOSfuncs.inc' |
include '../../../../../macros.inc' |
include '../../../../../proc32.inc' |
include '../../../../../develop/libraries/box_lib/load_lib.mac' |
include '../../../../../dll.inc' |
include '../../../../../load_lib.mac' |
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc, 0 ;dll.Load |
@use_library mem.Alloc,mem.Free,mem.ReAlloc, 0 ;dll.Load |
align 4 |
start: |
load_library vectors_name, cur_dir_path, library_path, system_path, \ |
err_message_found_lib, head_f_l, import_buf2d_lib, err_message_import, head_f_i |
load_library lib0_name, library_path, system_path, import_buf2d_lib |
cmp eax,-1 |
jz button.exit |
164,11 → 160,7 |
;-------------------------------------------------- |
system_path db '/sys/lib/' |
vectors_name db 'buf2d.obj',0 |
err_message_found_lib db 'Sorry I cannot load library buf2d.obj',0 |
head_f_i: |
head_f_l db 'System error',0 |
err_message_import db 'Error on load import library buf2d.obj',0 |
lib0_name db 'buf2d.obj',0 |
;-------------------------------------------------- |
i_end: ;ª®¥æ ª®¤ |
/programs/develop/libraries/buf2d/trunk/examples/e2_images.asm |
---|
1,18 → 1,15 |
use32 |
org 0x0 |
db 'MENUET01' ;¨¤¥â¨ä. ¨á¯®«ï¥¬®£® ä ©« ¢á¥£¤ 8 ¡ ©â |
dd 0x1 |
dd start |
dd i_end ;à §¬¥à ¯à¨«®¦¥¨ï |
dd mem,stacktop |
dd 0,sys_path |
org 0 |
db 'MENUET01' |
dd 1,start,i_end,mem,stacktop,0,cur_dir_path |
include '../../../../../KOSfuncs.inc' |
include '../../../../../macros.inc' |
include '../../../../../proc32.inc' |
include '../../../../../develop/libraries/box_lib/load_lib.mac' |
include '../../../../../load_lib.mac' |
include '../../../../../dll.inc' |
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc, dll.Load |
@use_library mem.Alloc,mem.Free,mem.ReAlloc, dll.Load |
struct FileInfoBlock |
Function dd ? |
58,12 → 55,12 |
cmp ebx,0xffffffff |
je @f |
;®¯à¥¤¥«ï¥¬ ¢¨¤ ¨§®¡à ¦¥¨ï ¨ ¯¥à¥¢®¤¨¬ ¥£® ¢® ¢à¥¬¥ë© ¡ãä¥à image_data |
stdcall dword[img_decode], dword[buf],ebx,0 |
mov dword[image_data],eax |
stdcall [img_decode], [buf],ebx,0 |
mov [image_data],eax |
;¯à¥®¡à §ã¥¬ ¨§®¡à ¦¥¨¥ ª ä®à¬ âã rgb |
stdcall dword[img_to_rgb2], dword[image_data],dword[buf] |
stdcall [img_to_rgb2], [image_data],[buf] |
;㤠«ï¥¬ ¢à¥¬¥ë© ¡ãä¥à image_data |
stdcall dword[img_destroy], dword[image_data] |
stdcall [img_destroy], [image_data] |
@@: |
} |
146,23 → 143,17 |
popad |
ret |
head_f_i: |
head_f_l db '¨á⥬ ï ®è¨¡ª ',0 |
system_dir0 db '/sys/lib/' |
name_buf2d db 'buf2d.obj',0 |
err_message_found_lib0 db '¥ 㤠«®áì ©â¨ ¡¨¡«¨®â¥ªã buf2d.obj',0 |
err_message_import0 db '訡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ buf2d.obj',0 |
system_dir1 db '/sys/lib/' |
name_libimg db 'libimg.obj',0 |
err_message_found_lib1 db '¥ 㤠«®áì ©â¨ ¡¨¡«¨®â¥ªã libimg.obj',0 |
err_message_import1 db '訡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ libimg.obj',0 |
;library structures |
l_libs_start: |
lib0 l_libs name_buf2d, sys_path, file_name, system_dir0, err_message_found_lib0, head_f_l, import_buf2d_lib, err_message_import0, head_f_i |
lib1 l_libs name_libimg, sys_path, file_name, system_dir1, err_message_found_lib1, head_f_l, import_libimg, err_message_import1, head_f_i |
lib0 l_libs name_buf2d, file_name, system_dir0, import_buf2d_lib |
lib1 l_libs name_libimg, file_name, system_dir1, import_libimg |
load_lib_end: |
align 4 |
/programs/develop/libraries/buf2d/trunk/examples/e3_text.asm |
---|
1,18 → 1,15 |
use32 |
org 0x0 |
db 'MENUET01' ;¨¤¥â¨ä. ¨á¯®«ï¥¬®£® ä ©« ¢á¥£¤ 8 ¡ ©â |
dd 0x1 |
dd start |
dd i_end ;à §¬¥à ¯à¨«®¦¥¨ï |
dd mem,stacktop |
dd 0,sys_path |
org 0 |
db 'MENUET01' |
dd 1,start,i_end,mem,stacktop,0,cur_dir_path |
include '../../../../../KOSfuncs.inc' |
include '../../../../../macros.inc' |
include '../../../../../proc32.inc' |
include '../../../../../develop/libraries/box_lib/load_lib.mac' |
include '../../../../../load_lib.mac' |
include '../../../../../dll.inc' |
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc, dll.Load |
@use_library mem.Alloc,mem.Free,mem.ReAlloc, dll.Load |
struct FileInfoBlock |
Function dd ? |
56,12 → 53,12 |
cmp ebx,0xffffffff |
je @f |
;®¯à¥¤¥«ï¥¬ ¢¨¤ ¨§®¡à ¦¥¨ï ¨ ¯¥à¥¢®¤¨¬ ¥£® ¢® ¢à¥¬¥ë© ¡ãä¥à image_data |
stdcall dword[img_decode], dword[buf],ebx,0 |
mov dword[image_data],eax |
stdcall [img_decode], [buf],ebx,0 |
mov [image_data],eax |
;¯à¥®¡à §ã¥¬ ¨§®¡à ¦¥¨¥ ª ä®à¬ âã rgb |
stdcall dword[img_to_rgb2], dword[image_data],dword[buf] |
stdcall [img_to_rgb2], [image_data],[buf] |
;㤠«ï¥¬ ¢à¥¬¥ë© ¡ãä¥à image_data |
stdcall dword[img_destroy], dword[image_data] |
stdcall [img_destroy], [image_data] |
@@: |
} |
137,23 → 134,17 |
popad |
ret |
head_f_i: |
head_f_l db '¨á⥬ ï ®è¨¡ª ',0 |
system_dir0 db '/sys/lib/' |
name_buf2d db 'buf2d.obj',0 |
err_message_found_lib0 db '¥ 㤠«®áì ©â¨ ¡¨¡«¨®â¥ªã buf2d.obj',0 |
err_message_import0 db '訡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ buf2d.obj',0 |
system_dir1 db '/sys/lib/' |
name_libimg db 'libimg.obj',0 |
err_message_found_lib1 db '¥ 㤠«®áì ©â¨ ¡¨¡«¨®â¥ªã libimg.obj',0 |
err_message_import1 db '訡ª ¯à¨ ¨¬¯®à⥠¡¨¡«¨®â¥ª¨ libimg.obj',0 |
;library structures |
l_libs_start: |
lib0 l_libs name_buf2d, sys_path, file_name, system_dir0, err_message_found_lib0, head_f_l, import_buf2d_lib, err_message_import0, head_f_i |
lib1 l_libs name_libimg, sys_path, file_name, system_dir1, err_message_found_lib1, head_f_l, import_libimg, err_message_import1, head_f_i |
lib0 l_libs name_buf2d, file_name, system_dir0, import_buf2d_lib |
lib1 l_libs name_libimg, file_name, system_dir1, import_libimg |
load_lib_end: |
align 4 |
/programs/develop/libraries/buf2d/trunk/examples/e4_graf_ed.asm |
---|
1,18 → 1,15 |
use32 |
org 0x0 |
db 'MENUET01' ;èäåíòèô. èñïîëíÿåìîãî ôàéëà âñåãäà 8 áàéò |
dd 0x1 |
dd start |
dd i_end ;ðàçìåð ïðèëîæåíèÿ |
dd mem,stacktop |
dd 0,cur_dir_path |
org 0 |
db 'MENUET01' |
dd 1,start,i_end,mem,stacktop,0,cur_dir_path |
include '../../../../../KOSfuncs.inc' |
include '../../../../../macros.inc' |
include '../../../../../proc32.inc' |
include '../../../../../develop/libraries/box_lib/load_lib.mac' |
include '../../../../../load_lib.mac' |
include '../../../../../dll.inc' |
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc, 0 ;dll.Load |
@use_library mem.Alloc,mem.Free,mem.ReAlloc, 0 ;dll.Load |
buf2d_l equ word[edi+4] ;îòñòóï ñëåâà |
buf2d_t equ word[edi+6] ;îòñòóï ñâåðõó |
19,8 → 16,7 |
align 4 |
start: |
load_library vectors_name, cur_dir_path, library_path, system_path, \ |
err_message_found_lib, head_f_l, import_buf2d_lib, err_message_import, head_f_i |
load_library lib0_name, library_path, system_path, import_buf2d_lib |
cmp eax,-1 |
jz button.exit |
171,11 → 167,7 |
;-------------------------------------------------- |
system_path db '/sys/lib/' |
vectors_name db 'buf2d.obj',0 |
err_message_found_lib db 'Sorry I cannot load library buf2d.obj',0 |
head_f_i: |
head_f_l db 'System error',0 |
err_message_import db 'Error on load import library buf2d.obj',0 |
lib0_name db 'buf2d.obj',0 |
;-------------------------------------------------- |
i_end: ;êîíåö êîäà |
/programs/develop/libraries/buf2d/trunk/examples/e5_lines_sm.asm |
---|
1,18 → 1,15 |
use32 |
org 0x0 |
db 'MENUET01' ;¨¤¥â¨ä. ¨á¯®«ï¥¬®£® ä ©« ¢á¥£¤ 8 ¡ ©â |
dd 0x1 |
dd start |
dd i_end ;à §¬¥à ¯à¨«®¦¥¨ï |
dd mem,stacktop |
dd 0,cur_dir_path |
org 0 |
db 'MENUET01' |
dd 1,start,i_end,mem,stacktop,0,cur_dir_path |
include '../../../../../KOSfuncs.inc' |
include '../../../../../macros.inc' |
include '../../../../../proc32.inc' |
include '../../../../../develop/libraries/box_lib/load_lib.mac' |
include '../../../../../load_lib.mac' |
include '../../../../../dll.inc' |
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc, 0 ;dll.Load |
@use_library mem.Alloc,mem.Free,mem.ReAlloc, 0 ;dll.Load |
buf2d_l equ word[edi+4] ;®âáâ㯠᫥¢ |
buf2d_t equ word[edi+6] ;®âáâ㯠ᢥàåã |
20,8 → 17,7 |
align 4 |
start: |
load_library vectors_name, cur_dir_path, library_path, system_path, \ |
err_message_found_lib, head_f_l, import_buf2d_lib, err_message_import, head_f_i |
load_library lib0_name, library_path, system_path, import_buf2d_lib |
cmp eax,-1 |
jz button.exit |
165,11 → 161,7 |
;-------------------------------------------------- |
system_path db '/sys/lib/' |
vectors_name db 'buf2d.obj',0 |
err_message_found_lib db 'Sorry I cannot load library buf2d.obj',0 |
head_f_i: |
head_f_l db 'System error',0 |
err_message_import db 'Error on load import library buf2d.obj',0 |
lib0_name db 'buf2d.obj',0 |
;-------------------------------------------------- |
i_end: ;ª®¥æ ª®¤ |