Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 7995 → Rev 7996

/programs/develop/tinypad/trunk/tp-key.asm
1620,11 → 1620,11
;---------------------------------------------------------------
proc key.ctrl_plus ;///// ZOOM IN //////////////////////////////
;---------------------------------------------------------------
cmp [scale],7
cmp [scale],0x17
jz @f
inc [scale]
add [lineHeight],LINEH
add [charWidth],6
add [charWidth], 8
jmp draw_editor
endp
 
1631,11 → 1631,11
;---------------------------------------------------------------
proc key.ctrl_minus ;///// ZOOM OUT ////////////////////////////
;---------------------------------------------------------------
cmp [scale],0
cmp [scale],0x10
jz @f
dec [scale]
sub [lineHeight],LINEH
sub [charWidth],6
sub [charWidth], 8
jmp draw_editor
@@:
ret