Subversion Repositories Kolibri OS

Rev

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

Rev 4589 Rev 9044
Line 65... Line 65...
65
; function 12:tell os about windowdraw ; 1, start of draw
65
; function 12:tell os about windowdraw ; 1, start of draw
66
	mcall	12,1
66
    mcall   12,1
Line 67... Line 67...
67
 
67
 
68
                                   ; DRAW WINDOW
68
                                   ; DRAW WINDOW
69
	mov	eax,0                     ; function 0 : define and draw window
69
    mov eax,0                     ; function 0 : define and draw window
70
	mov	ebx,100*65536+270         ; [x start] *65536 + [x size]
70
    mov ebx,200*65536+250         ; [x start] *65536 + [x size]
71
	mov	ecx,100*65536+100          ; [y start] *65536 + [y size]
71
    mov ecx,200*65536+106          ; [y start] *65536 + [y size]
72
	mov	edx,0x34ffffff            ; color of work area RRGGBB,8->color gl
72
    mov edx,0x34ffffff            ; color of work area RRGGBB,8->color gl
73
	mov	edi,title
73
    mov edi,title
Line 74... Line 74...
74
	mcall
74
    mcall
75
 
-
 
76
; function 4 : write text to window
75
 
77
	xor	ecx,ecx
76
; function 4 : write text to window
78
	mcall	4,<33,8>,,text1,6
77
    mcall   4,<55,8>,0x10000000,text1,5
79
	mcall	,<85,8>,,text2,9
78
    mcall   ,<130,8>,,text2,9
80
	mcall	,<8,28>,,tdec,4
79
    mcall   ,<8,30>,,tdec,4
Line 81... Line 80...
81
	add	ebx,23
80
    add ebx,23
82
	mcall	,,,thex
81
    mcall   ,,,thex
83
 
82
 
84
	movzx  ecx,byte [keyid]
83
    movzx  ecx,byte [keyid]
85
	mcall	47,0x30000,,<40,28>,0x224466
84
    mcall   47,0x30000,,<55,30>,0x10224466
Line 86... Line 85...
86
	add	edx,23
85
    add edx,23
87
	mov	bh,1
86
    mov bh,1
88
	mcall
87
    mcall
89
 
88
 
90
	mov	bh,0
89
    mov bh,0
91
	movzx	ecx,byte [scan_keyid]
90
    movzx   ecx,byte [scan_keyid]
Line 92... Line 91...
92
	mcall	,,,<100,28>
91
    mcall   ,,,<130,30>
93
	add	edx,23
92
    add edx,23
94
	mov	bh,1
93
    mov bh,1
Line 95... Line 94...
95
	mcall
94
    mcall
96
 
95
 
97
; function 12:tell os about windowdraw ; 2, end of draw
96
; function 12:tell os about windowdraw ; 2, end of draw
98
	mcall	12,2
97
    mcall   12,2
99
	ret
98
    ret
100
 
99
 
101
 
100
 
102
; DATA AREA
101
; DATA AREA
103
 text1: db 'ASCII:'
102
 text1: db 'ASCII'