Subversion Repositories Kolibri OS

Rev

Rev 485 | Rev 6359 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 485 Rev 1643
Line 1... Line 1...
1
;-----------------------------------------------------
1
;----------------------------------------------------------
2
draw_volume_rectangle:
2
draw_volume_rectangle:
204
;----------------------------------------------------------
192
;----------------------------------------------------------
205
rectangle:
193
rectangle:
206
 
-
 
207
 no_light_rectangle:
194
no_light_rectangle:
208
 mov [line_x],eax
195
	mov	[line_x],eax
209
 mov [line_y],ebx
196
	mov	[line_y],ebx
210
 mov [line_size_x],ecx
197
	mov	[line_size_x],ecx
211
 mov [line_size_y],edx
198
	mov	[line_size_y],edx
212
 mov edx,esi
199
	mov	edx,esi
213
 mov eax,13
200
	mov	eax,13
214
 mov ebx,[line_x]
201
	mov	ebx,[line_x]
215
 mov ecx,[line_y]
202
	mov	ecx,[line_y]
216
 shl ebx,16
203
	shl	ebx,16
217
 shl ecx,16
204
	shl	ecx,16
218
 add ebx,[line_size_x]
205
	add	ebx,[line_size_x]
219
 add ecx,[line_size_y]
206
	add	ecx,[line_size_y]
220
 mcall
207
	mcall
221
 ret
208
	ret
222
;----------------------------------------------------------
209
;----------------------------------------------------------
223
draw_conture:
210
draw_conture:
224
 
-
 
225
 mov [line_x],eax
211
	mov	[line_x],eax
226
 mov [line_y],ebx
212
	mov	[line_y],ebx
227
 mov [line_size_x],ecx
213
	mov	[line_size_x],ecx
228
 mov [line_size_y],edx
214
	mov	[line_size_y],edx
229
 
-
 
230
 mov [color_line1],0xaeabae
215
	mov	[color_line1],0xaeabae
231
 
-
 
232
 
-
 
233
 ;line 1
216
;line	1
234
 mov edx,[color_line1]
217
	mov	edx,[color_line1]
235
 mov ebx,[line_x]
218
	mov	ebx,[line_x]
236
 mov ecx,[line_y]
219
	mov	ecx,[line_y]
237
 shl ebx,16
220
	shl	ebx,16
238
 shl ecx,16
221
	shl	ecx,16
239
 add ebx,[line_x]
222
	add	ebx,[line_x]
240
 add ecx,[line_y]
223
	add	ecx,[line_y]
241
 add ebx,[line_size_x]
224
	add	ebx,[line_size_x]
242
 call draw_line
225
	call	draw_line
243
 ;line 2
226
;line	2
244
 mov edx,[color_line1]
227
	mov	edx,[color_line1]
245
 mov ebx,[line_x]
228
	mov	ebx,[line_x]
246
 mov ecx,[line_y]
229
	mov	ecx,[line_y]
247
 shl ebx,16
230
	shl	ebx,16
248
 shl ecx,16
231
	shl	ecx,16
249
 add ebx,[line_x]
232
	add	ebx,[line_x]
250
 add ecx,[line_y]
233
	add	ecx,[line_y]
251
 add ecx,[line_size_y]
234
	add	ecx,[line_size_y]
252
 call draw_line
235
	call	draw_line
253
 ;line 3
236
;line	3
254
 mov edx,[color_line1]
237
	mov	edx,[color_line1]
255
 mov ebx,[line_x]
238
	mov	ebx,[line_x]
256
 mov ecx,[line_y]
239
	mov	ecx,[line_y]
257
 add ecx,[line_size_y]
240
	add	ecx,[line_size_y]
258
 shl ebx,16
241
	shl	ebx,16
259
 shl ecx,16
242
	shl	ecx,16
260
 add ebx,[line_x]
243
	add	ebx,[line_x]
261
 add ecx,[line_y]
244
	add	ecx,[line_y]
262
 add ebx,[line_size_x]
245
	add	ebx,[line_size_x]
263
 add ecx,[line_size_y]
246
	add	ecx,[line_size_y]
264
 call draw_line
247
	call	draw_line
265
 ;line 4
248
;line	4
266
 mov edx,[color_line1]
249
	mov	edx,[color_line1]
267
 mov ebx,[line_x]
250
	mov	ebx,[line_x]
268
 mov ecx,[line_y]
251
	mov	ecx,[line_y]
269
 add ebx,[line_size_x]
252
	add	ebx,[line_size_x]
270
 shl ebx,16
253
	shl	ebx,16
271
 shl ecx,16
254
	shl	ecx,16
272
 add ebx,[line_x]
255
	add	ebx,[line_x]
273
 add ecx,[line_y]
256
	add	ecx,[line_y]
274
 add ebx,[line_size_x]
257
	add	ebx,[line_size_x]
275
 add ecx,[line_size_y]
258
	add	ecx,[line_size_y]
276
 call draw_line
259
	call	draw_line
277
 
-
 
278
 ret
260
	ret
279
;----------------------------------------------------------
261
;----------------------------------------------------------
280
columnus:
262
columnus:
281
 
-
 
282
 sub eax,ecx
263
	sub	eax,ecx
283
 jns no_columnus
264
	jns	no_columnus
284
 neg eax
265
	neg	eax
285
 cmp eax,esi
266
	cmp	eax,esi
286
 ja no_columnus
267
	ja	no_columnus
287
 sub ebx,edx
268
	sub	ebx,edx
288
 jns no_columnus
269
	jns	no_columnus
289
 neg ebx
270
	neg	ebx
290
 cmp ebx,edi
271
	cmp	ebx,edi
291
 ja no_columnus
272
	ja	no_columnus
292
 mov eax,1
273
	mov	eax,1
293
 jmp columnus_true
274
	jmp	columnus_true
294
 no_columnus:
275
no_columnus:
295
 xor eax,eax
276
	xor	eax,eax
296
 columnus_true:
277
columnus_true:
297
 ret
278
	ret
298
;----------------------------------------------------------
279
;----------------------------------------------------------
299
print_text:
280
print_text:
300
 mov [text_x],eax
281
	mov	[text_x],eax
301
 mov [text_y],ebx
282
	mov	[text_y],ebx
302
 mov eax,4
283
	mov	eax,4
303
 mov ebx,[text_x]
284
	mov	ebx,[text_x]
304
 shl ebx,16
285
	shl	ebx,16
305
 add ebx,[text_y]
286
	add	ebx,[text_y]
306
 mcall
287
	mcall
307
 ret
288
	ret
308
;----------------------------------------------------------
289
;----------------------------------------------------------
309
draw_rectangle:
290
draw_rectangle:
310
 mov eax,13
-
 
311
 mcall
291
	mcall	13
312
 ret
292
	ret
313
;------------------------
293
;------------------------
314
draw_line:
294
draw_line:
315
 mov eax,38
295
	mov	eax,38
316
 mcall
296
	mcall
317
 ret
297
	ret
318
;----------------------------------------------------------
298
;----------------------------------------------------------
319
;lightlin 12508927
299
;lightlin 12508927
320
;lines    5669590
300
;lines 5669590
321
;workpan  9350879
301
;workpan 9350879
322
;btnpress 9089258
302
;btnpress 9089258
323
line_x		dd 0
303
line_x		dd	0
324
line_y		dd 0
304
line_y		dd	0
325
line_size_x	dd 0
305
line_size_x	dd	0
326
line_size_y	dd 0
306
line_size_y	dd	0
327
color_line1	dd 0
307
color_line1	dd	0
328
color_line2	dd 0
308
color_line2	dd	0
329
color_line3	dd 0
309
color_line3	dd	0
330
color_rectangle dd 0
310
color_rectangle	dd	0
331
;--------------------
311
;--------------------
332
text_x		dd 0
312
text_x		dd	0
333
text_y		dd 0
313
text_y		dd	0
334
;--------------------
314
;--------------------
335
315