Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 2709 → Rev 2710

/programs/system/mousemul/trunk/build.bat
1,2 → 1,6
@fasm mousemul.asm mousemul
@erase lang.inc
@echo lang fix ru >lang.inc
@fasm -m 16384 mousemul.asm mousemul
@kpack mousemul
@erase lang.inc
@pause
/programs/system/mousemul/trunk/mousemul.asm
2,6 → 2,11
; compiler: FASM 1.67.23
; name: Mouse Emulation For KolibriOS
;-----------------------------------------------------------------------------
; version: 1.2
; last update: 01/06/2012
; written by: Marat Zakiyanov aka Mario79, aka Mario
; changes: using new functions 66.6 and 66.7
;-----------------------------------------------------------------------------
; version: 1.1
; last update: 26/05/2012
; written by: Lipatov Kirill aka Leency
30,9 → 35,7
CODE
;-----------------------------------------------------------------------------
start:
mov eax,70
mov ebx,notifyapp
mcall
mcall 70,notifyapp
start1:
xor ebx,ebx
41,7 → 44,7
mcall 23,10
 
mcall 66,3
test eax,0x80
test eax,0x80 ;NumLock status
jz @r
 
mov ebx,4
61,7 → 64,7
push eax
mcall 66,3
test eax,0x80
test eax,0x80 ;NumLock status
pop eax
jnz @f
mov ebx,5
270,6 → 273,9
 
mov cl,73 ; Down Num 9
mcall 66
; disable/enable input, work only hotkeys (f.66.6,66.7)
add ebx,2
mcall 66
ret
;-----------------------------------------------------------------------------
; <--- initialised data --->
280,7 → 286,7
mouse_timer_ticks dd 0
;-----------------------------------------------------------------------------
if lang eq ru
ud_user_message db 'NumLock ¢ª«/¢ëª« í¬ã«ïâ®à ¬ëè¨. “¯à ¢«¥­¨¥ Numpad',0 ;㤠«¨âì áâà®çªã ¨§ å®â_ª¥©§
ud_user_message db 'NumLock ¢ª«/¢ëª« í¬ã«ïâ®à ¬ëè¨. “¯à ¢«¥­¨¥ Numpad',0
else
ud_user_message db 'NumLock - on/off mouse emul. Numpad - move cursor',0
end if
293,9 → 299,6
dd 0
db '@notify',0
;-----------------------------------------------------------------------------
 
 
 
MEOS_APP_END
; <--- end of KolibriOS application --->
; ZG