forked from KolibriOS/kolibrios
120 lines
2.2 KiB
Plaintext
120 lines
2.2 KiB
Plaintext
macro start_draw_window x,y,xsize,ysize,areacolor,caption
|
|
{
|
|
mov eax, 12 ; function 12:tell os about windowdraw
|
|
mov ebx, 1 ; 1, start of draw
|
|
int 0x40
|
|
; DRAW WINDOW
|
|
mov eax, 0 ; function 0 : define and draw window
|
|
mov ebx, x*65536+xsize ; [x start] *65536 + [x size]
|
|
mov ecx, y*65536+ysize ; [y start] *65536 + [y size]
|
|
mov edx,areacolor ; color of work area RRGGBB
|
|
mov edi,caption ; window title
|
|
int 0x40
|
|
}
|
|
|
|
macro end_draw_window
|
|
{
|
|
mov eax, 12 ; end of redraw
|
|
mov ebx, 2
|
|
int 0x40
|
|
}
|
|
|
|
macro draw_button x,y,xsize,ysize,id,butcolor,text,textlen,textcolor
|
|
{
|
|
mov eax, 8 ; function 8 : define and draw button
|
|
mov ebx, (x)*65536+xsize ; [x start] *65536 + [x size]
|
|
mov ecx, (y)*65536+ysize ; [y start] *65536 + [y size]
|
|
mov edx, id ; button id
|
|
mov esi, butcolor ; button color RRGGBB
|
|
int 0x40
|
|
|
|
mov ebx, (x+5)*65536+y+(ysize-5)/2 ; Draw button text
|
|
mov ecx, textcolor
|
|
mov edx, text
|
|
xor eax, eax
|
|
mov al, textlen
|
|
mov esi, eax
|
|
mov eax, 4
|
|
int 0x40
|
|
}
|
|
|
|
macro outtextxy x,y,prompt,prompt_len,color
|
|
{
|
|
mov ebx, x*65536+y ; draw info text with function 4
|
|
mov ecx, color
|
|
mov edx, prompt
|
|
xor eax, eax
|
|
mov al, prompt_len
|
|
mov esi, eax
|
|
mov eax, 4
|
|
int 0x40
|
|
}
|
|
|
|
macro bar x,y,xsize,ysize,color
|
|
{
|
|
mov eax, 13
|
|
mov ebx, x*65536+xsize
|
|
mov ecx, y*65536+ysize
|
|
mov edx, color
|
|
int 0x40
|
|
}
|
|
|
|
macro line x1,y1,x2,y2,color
|
|
{
|
|
mov eax, 38
|
|
mov ebx, x1*65536+x2
|
|
mov ecx, y1*65536+y2
|
|
mov edx, color
|
|
int 0x40
|
|
}
|
|
|
|
macro rectangle x,y,xsize,ysize,color
|
|
{
|
|
x2=x+xsize
|
|
y2=y+ysize
|
|
line x,y,x2,y,color
|
|
line x,y,x,y2,color
|
|
line x,y2,x2,y2,color
|
|
line x2,y,x2,y2,color
|
|
}
|
|
|
|
macro putpixel x,y,color
|
|
{
|
|
mov eax, 1
|
|
mov ebx, x
|
|
mov ecx, y
|
|
mov edx, color
|
|
int 0x40
|
|
}
|
|
|
|
macro lights_on cns
|
|
{
|
|
mov ax, cns
|
|
test ax, 0x40
|
|
jz @f
|
|
push ax
|
|
bar 532, 53, 10, 11, 0x0000FF00
|
|
pop ax
|
|
@@:
|
|
test ax, 0x80
|
|
jz @f
|
|
push ax
|
|
bar 500, 53, 10, 11, 0x0000FF00
|
|
pop ax
|
|
@@:
|
|
test ax, 0x100
|
|
jz @f
|
|
bar 565, 53, 10, 11, 0x0000FF00
|
|
@@:
|
|
}
|
|
|
|
out_symbol:
|
|
;mov ebx, x*65536+y ; draw info text with function 4
|
|
;mov ecx, color
|
|
;mov edx, prompt
|
|
mov esi, 1
|
|
mov eax, 4
|
|
int 0x40
|
|
ret
|
|
|