Subversion Repositories Kolibri OS

Rev

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

Rev 551 Rev 2704
Line 140... Line 140...
140 
;   *********************************************
 140 
;   *********************************************
Line 141... Line 141...
141 
 
 141 
 
Line 142... Line -...
142 
 
 - 
 
143 
draw_window:
 - 
 
144 
 
 142 
 
Line 145... Line 143...
145 
    mov  eax,12                    ; tell os about windowdraw
 143 
draw_window:
146 
    mov  ebx,1                     ; 1, start of draw
 144 
 
147 
    mcall
 145 
    mcall 12,1
148 
 
 146 
 
149 
    mov  eax,0                     ; DRAW WINDOW
 147 
    mov  eax,0                     ; DRAW WINDOW
150 
    mov  ebx,1*65536+200           ; [x start] *65536 + [x size]
 148 
    mov  ebx,1*65536+200           ; [x start] *65536 + [x size]
Line 151... Line 149...
151 
    mov  ecx,200*65536+240         ; [y start] *65536 + [y size]
 149 
    mov  ecx,200*65536+240         ; [y start] *65536 + [y size]
Line 152... Line -...
152 
    mov  edx,0x14000000            ; work area color (type II)
 - 
 
153 
    mov  edi,title                ; frame color
 - 
 
154 
    mcall
 150 
    mov  edx,0x14000000            ; work area color (type II)
Line 155... Line 151...
155
151 
    mov  edi,title                ; frame color
Line 156... Line 152...
156 
    call palette                   ; display color palette
 152 
    mcall
Line 276... Line 272...
276 
    mcall
 272 
    mcall
Line 277... Line 273...
277 
 
 273 
 
Line 278... Line 274...
278 
    ret
 274 
    ret
- 
 
 275 
 
279 
 
 276 
help:
- 
 
 277 
	mcall 48,4
- 
 
 278 
	mov ecx, eax
- 
 
 279 
	shl ecx, 16
- 
 
 280 
	add ecx, 236
- 
 
 281 
	sub ecx, eax
280 
help:
 282 
 
281 
    mov  ebx,4*65536+192           ; x and width
 283
282 
    mov  ecx,20*65536+216          ; y and depth
 284 
    mov  ebx,5*65536+191           ; x and width
283 
    mov  edx,0x465e8f              ; dark denim color
 285 
    mov  edx,0x465e8f              ; dark denim color
284 
    mov  eax,13                    ; write text funx
 286 
    mov  eax,13                    ; write text funx
285 
    mcall
 287 
    mcall
Line 303... Line 305...
303 
    mcall
 305 
    mcall
304 
    cmp  eax,2                     ; got a key?
 306 
    cmp  eax,2                     ; got a key?
305 
    jne  h2                        ; nope
 307 
    jne  h2                        ; nope
306 
    mov  eax,2                     ; yep, burn it
 308 
    mov  eax,2                     ; yep, burn it
307 
    mcall
 309 
    mcall
308 
h2: mov  ebx,4*65536+192           ; y and width
 - 
 
309 
    mov  ecx,20*65536+216          ; x and depth
 - 
 
310 
    mov  edx,0x00000               ; restore black bkg
 - 
 
311 
    mov  eax,13                    ; draw bar funx
 - 
 
312 
    mcall
 310 
h2:
313 
    call palette                   ; redraw color palette
 311 
	call draw_window
Line 314... Line 312...
314 
 
 312 
 
Line 315... Line 313...
315 
    ret
 313 
    ret