Subversion Repositories Kolibri OS

Rev

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

Rev 2045 Rev 6352
Line 1... Line 1...
1 
;----------------------------------------------------------
 1 
;----------------------------------------------------------
2 
;-------------draw window of program-----------------------
 2 
;-------------draw window of program-----------------------
3 
;----------------------------------------------------------
 3 
;----------------------------------------------------------
4 
drawwin:
 4 
drawwin:
5 
	or	ecx,-1
 5 
	or	ecx,-1
6 
	mcall	9,procinfo
 6 
	mcall SF_THREAD_INFO,procinfo
7 
	mov	esi,procinfo
 7 
	mov	esi,procinfo
Line 8... Line 8...
8 
 
 8 
 
9 
	mov	eax,[esi+34]
 9 
	mov	eax,[esi+34]
10 
	mov	ebx,[esi+38]
 10 
	mov	ebx,[esi+38]
Line 45... Line 45...
45 
 
 45 
 
Line 46... Line 46...
46 
	mov	[MaxWorkScreen_SizeY],edx
 46 
	mov	[MaxWorkScreen_SizeY],edx
Line 47... Line 47...
47 
 
 47 
 
48 
no_znak2:
 48 
no_znak2:
49 
 
 49 
 
50 
	mcall	12,1
 50 
	mcall SF_REDRAW,SSF_BEGIN_DRAW
51 
;------------------------------------------------
 51 
;------------------------------------------------
52 
	mov	ebx,50 ;[Window_CordinatX]
 52 
	mov	ebx,50 ;[Window_CordinatX]
53 
	mov	ecx,50 ;[Window_CordinatY]
 53 
	mov	ecx,50 ;[Window_CordinatY]
54 
	shl	ebx,16
 54 
	shl	ebx,16
55 
	shl	ecx,16
 - 
 
56 
	add	ebx,[Window_SizeX]
 - 
 
57 
	add	ecx,[Window_SizeY]
 55 
	shl	ecx,16
Line 58... Line 56...
58 
	;xor	esi,esi	;0x805080d0
 56 
	add	ebx,[Window_SizeX]
59 
;	xor	edi,edi	;0x005080d0
 57 
	add	ecx,[Window_SizeY]
60 
	mcall	0,,,0x53aabbcc,,name_of_program
 58 
	mcall SF_CREATE_WINDOW,,,0x53aabbcc,,name_of_program
Line 85... Line 83...
85 
	call	draw_volume_rectangle ; tools panel
 83 
	call	draw_volume_rectangle ; tools panel
86 
	call	draw_icons
 84 
	call	draw_icons
87 
	call	PrintMousePos
 85 
	call	PrintMousePos
88 
;------------------------------------------------
 86 
;------------------------------------------------
89 
	mov	ecx,[k]
 87 
	mov ecx,[k]
90 
	and	[PosX],0
 - 
 
91 
	and	[PosY],0
 - 
 
92 
	call	MovePictureToWorkScreen
 88 
	call MovePictureToWorkScreen
93 
;------------------------------------------------
 89 
;------------------------------------------------
94 
	mov	ebx,[WorkScreen_SizeX]
 90 
	mov	ebx,[WorkScreen_SizeX]
95 
	add	ebx,5+3
 91 
	add	ebx,5+3
96 
	mov	edx,[Window_SizeX]
 92 
	mov	edx,[Window_SizeX]
Line 106... Line 102...
106 
	sub	edx,eax
 102 
	sub	edx,eax
107 
	sub	edx,20+15+1+49+2+25+10
 103 
	sub	edx,20+15+1+49+2+25+10
108 
	shl	ecx,16
 104 
	shl	ecx,16
109 
	mov	cx,dx
 105 
	mov	cx,dx
Line 110... Line 106...
110 
 
 106 
 
111 
	mcall	13,,,0xc7cbcf
 107 
	mcall SF_DRAW_RECT,,,0xc7cbcf
112 
;------------------------------------------------
 108 
;------------------------------------------------
113 
	mcall	,<5,3>
 109 
	mcall	,<5,3>
114 
;------------------------------------------------
 110 
;------------------------------------------------
115 
	mov	ebx,5
 111 
	mov	ebx,5
Line 127... Line 123...
127 
	sub	edx,ecx
 123 
	sub	edx,ecx
128 
	sub	edx,25+10-3
 124 
	sub	edx,25+10-3
129 
	shl	ecx,16
 125 
	shl	ecx,16
130 
	mov	cx,dx
 126 
	mov	cx,dx
Line 131... Line 127...
131 
 
 127 
 
132 
	mcall	13,,,0xc7cbcf
 128 
	mcall SF_DRAW_RECT,,,0xc7cbcf
133 
;------------------------------------------------
 129 
;------------------------------------------------
134 
	mcall	,,<20+15+1+49+2,3>
 130 
	mcall	,,<20+15+1+49+2,3>
135 
;------------------------------------------------
 131 
;------------------------------------------------
136 
;	draw_volume_rectangle
 132 
;	draw_volume_rectangle
Line 166... Line 162...
166 
	sub	eax,25+10
 162 
	sub	eax,25+10
167 
	sub	ebx,25+10
 163 
	sub	ebx,25+10
168 
	call	draw_volume_rectangle	; down and right small area
 164 
	call	draw_volume_rectangle	; down and right small area
169 
;------------------------------------------------
 165 
;------------------------------------------------
170 
.end:
 166 
.end:
171 
	mcall	12,2
 167 
	mcall SF_REDRAW,SSF_END_DRAW
172 
	ret
 168 
	ret
173 
;-----------------------------------------------------------------------------
 169 
;-----------------------------------------------------------------------------
174 

            170