Subversion Repositories Kolibri OS

Rev

Rev 8679 | Rev 9587 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 8679 Rev 9568
Line 1392... Line 1392...
1392
@IMPORT:
1392
@IMPORT:
Line 1393... Line 1393...
1393
 
1393
 
Line 1394... Line 1394...
1394
library box_lib, 'box_lib.obj'
1394
library box_lib, 'box_lib.obj'
1395
 
1395
 
1396
import  box_lib,\
1396
import  box_lib,\
1397
        edit_box_draw,          'edit_box',\
1397
        edit_box_draw,          'edit_box_draw',\
1398
        edit_box_key,           'edit_box_key',\
1398
        edit_box_key,           'edit_box_key',\
1399
        edit_box_mouse,         'edit_box_mouse',\
1399
        edit_box_mouse,         'edit_box_mouse',\
1400
        init_checkbox,          'init_checkbox2',\
1400
        init_checkbox,          'init_checkbox2',\
Line 1577... Line 1577...
1577
   ret
1577
   ret
Line 1578... Line 1578...
1578
 
1578
 
1579
 
1579
 
1580
IntToStr:  ;in esi - ñòðîêà; eñx - ÷èñëî
1580
IntToStr:  ;in esi - ñòðîêà; eñx - ÷èñëî
1581
   push eax ecx edx esi
1581
   push eax ecx edx esi
1582
   cmp ecx, 0
1582
   or ecx, ecx
1583
   jne @f
1583
   jnz @f
1584
   mov byte[esi], 48 ; '0'
1584
   mov byte[esi], '0'
1585
   inc esi
1585
   inc esi
1586
   jmp .end
1586
   jmp .end
1587
@@:
1587
@@:
1588
   mov eax, ecx
1588
   mov eax, ecx
1589
   mov ecx, 10
1589
   mov ecx, 10
1590
.next:
1590
.next:
1591
   mov edx, 0
1591
   xor edx, edx
Line 1592... Line 1592...
1592
   div ecx
1592
   div ecx
Line 1593... Line 1593...
1593
   add edx, 48
1593
   add edx, '0'
1594
 
1594
 
1595
   mov byte[esi], dl
1595
   mov byte[esi], dl
1596
 
1596
 
1597
   inc esi
1597
   inc esi
1598
   cmp eax, 0
1598
   or eax, eax
1599
   je .end
1599
   jz .end
1600
   jmp .next
1600
   jmp .next