Subversion Repositories Kolibri OS

Compare Revisions

No changes between revisions

Regard whitespace Rev 1226 → Rev 1227

/programs/develop/libraries/box_lib/trunk/build.sh
0,0 → 1,10
#!/bin/bash
# This script does for Linux the same as build.bat for DOS,
# it compiles the current KolibriOS applications
 
mkdir bin
fasm -m 16384 box_lib.asm ./bin/box_lib.obj
exit 0
 
 
 
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/programs/develop/libraries/box_lib/trunk/optionbox.mac
47,7 → 47,12
 
option_box_mouse:
pusha
 
mcall 37,2
test eax,eax
jnz @f
popa
ret 4
@@:
mov eax,dword [esp+36]
@@: mov edi,dword [eax]
test edi,edi
156,16 → 161,6
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
option_box_mouse_op: ;îáðàáîòêà ìûøè
pusha
mov eax,37 ;áóäåì ÷òî òî äåëàòü åñëè ó íàñ ÷òî - íèòü íàæàòî
mov ebx,2 ;âíåñòè â ðåãèñòð çíà÷åíèå 2
mcall ;ïðîâåðêà íå íàæàë ëè ïîëüçîâàòåëü êíîïêó ìûøêè
test eax,eax ;ïðîâåðêà åñëè ó íàñ â eax=0, òî óñòàíîâèì ôëàã è âûéäåì
jnz @f ;ïåðåéòè íà íèæíþþ ìåòêó @@
 
jmp option_box_mouse_end
;åñëè íè÷åãî íå ïðîèçîøëî, òî âîññòàíîâèì çíà÷åíèÿ ðåãèñòðîâ èç ñòåêà
;âûõîä
@@:
mov esi,dword op_text_length ;çàãðóçèòü êîë-âî ñèìâîëîâ â òåêñòîâîé ñòðîêå
;Óìíîæåíèå íà 6 Áûñòðîå óìíîæåíèå ìîæíî âîñïîëüçîâàòüñÿ ëþáûì ìç ìåòîäîâ, íî íà ñòàðûõ Ïðîöåññîðàõ (386,486,P1)áûñòðåå áóäåò ñ èíñòðóêöèåé Lea
; lea esi,[eax*2+eax]