Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 2107 → Rev 2108

/programs/system/test/trunk/test.asm
22,8 → 22,7
 
still:
 
mov eax,10 ; wait here for event
int 0x40
mcall 10 ; wait here for event
 
cmp eax,1 ; redraw request ?
jz red
51,7 → 50,7
 
cmp ah,1 ; button id=1 ?
jnz noclose
mov eax,0xffffffff ; close this program
mov eax,-1 ; close this program
int 0x40
noclose:
 
104,41 → 103,17
 
draw_window:
 
mov eax,12 ; function 12:tell os about windowdraw
mov ebx,1 ; 1, start of draw
int 0x40
;mcall 48, 3, sys_colors, 40
 
; DRAW WINDOW
mov eax,0 ; function 0 : define and draw window
mov ebx,100*65536+300 ; [x start] *65536 + [x size]
mov ecx,100*65536+240 ; [y start] *65536 + [y size]
mov edx,0x02ffffff ; color of work area RRGGBB
mov esi,0x80597799 ; color of grab bar RRGGBB,8->color glide
mov edi,0x00597799 ; color of frames RRGGBB
int 0x40
mcall 12, 1
 
; WINDOW LABEL
mov eax,4 ; function 4 : write text to window
mov ebx,8*65536+8 ; [x start] *65536 + [y start]
mov ecx,0x00ffffff ; color of text RRGGBB
mov edx,tlabel ; pointer to text beginning
mov esi,labellen-tlabel ; text length
int 0x40
mcall 0, <200,292>, <200,230>, 0x14FFFFFF,,tlabel
 
; CLOSE BUTTON
mov eax,8 ; function 8 : define and draw button
mov ebx,(300-19)*65536+12 ; [x start] *65536 + [x size]
mov ecx,5*65536+12 ; [y start] *65536 + [y size]
mov edx,1 ; button id
mov esi,0x5977bb ; button color RRGGBB
int 0x40
 
 
mov eax,8 ; function 8 : define and draw button
mov ebx,25*65536+9 ; [x start] *65536 + [x size]
mov ecx,74*65536+9 ; [y start] *65536 + [y size]
mov ebx,32*65536+10 ; [x start] *65536 + [x size]
mov ecx,75*65536+10 ; [y start] *65536 + [y size]
mov edx,2 ; button id
mov esi,0x5977bb ; button color RRGGBB
mov esi,0x6888B8 ; button color RRGGBB
newb:
int 0x40
add ecx,20*65536
147,7 → 122,7
jb newb
 
cld
mov ebx,25*65536+36 ; draw info text with function 4
mov ebx,26*65536+37 ; draw info text with function 4
mov ecx,0x000000
mov edx,text
mov esi,40
160,21 → 135,19
jnz newline
 
 
mov eax,12 ; function 12:tell os about windowdraw
mov ebx,2 ; 2, end of draw
int 0x40
mcall 12, 2 ; function 12:tell os about windowdraw
 
 
ret
 
 
; DATA AREA
 
 
text:
 
db 'APPLICATION USES 0x10000 BYTES OF MEMORY'
db 'Application uses 0x10000 bytes of memory'
db ' '
db 'OPEN DEBUG BOARD FOR PARAMETERS '
db 'Open debug board for rezult information '
db ' '
db ' CLI '
db ' '
194,7 → 167,7
 
 
tlabel:
db 'MENUET PROTECTION TEST'
labellen:
db 'Kolibri protection test',0
 
 
I_END: