Subversion Repositories Kolibri OS

Rev

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

Rev 3734 Rev 3808
Line 1311... Line 1311...
1311
;---------------------------------------------------------------------
1311
;---------------------------------------------------------------------
1312
draw_window:
1312
draw_window:
Line 1313... Line 1313...
1313
 
1313
 
Line -... Line 1314...
-
 
1314
	mcall	12,1
-
 
1315
	
1314
	mcall	12,1
1316
	call	prepare_system_colors
1315
 
1317
 
-
 
1318
;	mcall	0,<10,420>,<10,320>,0x63AABBCC,
-
 
1319
	xor	esi,esi
1316
;	mcall	0,<10,420>,<10,320>,0x63AABBCC,
1320
;	mov	edx,[w_work]	; color of work area RRGGBB,8->color
Line 1317... Line 1321...
1317
	xor	esi,esi
1321
;	or	edx,0x63000000
1318
	mcall	0,[window_x],[window_y],0x63AABBCC,
1322
	mcall	0,[window_x],[window_y],0x63AABBCC
1319
 
1323
 
1320
;	mov	ecx,[communication_area]
1324
;	mov	ecx,[communication_area]
Line 1335... Line 1339...
1335
	sub	eax,10+20
1339
	sub	eax,10+20
1336
	mov	[file_browser_data_1.size_x],ax
1340
	mov	[file_browser_data_1.size_x],ax
1337
	add	ax,10
1341
	add	ax,10
1338
	mov	[scroll_bar_data_vertical.start_x],ax
1342
	mov	[scroll_bar_data_vertical.start_x],ax
Line 1339... Line -...
1339
	
-
 
-
 
1343
	
-
 
1344
	mov	edx,[w_work]	; color of work area RRGGBB,8->color
1340
	
1345
	or	edx,0x63000000
Line 1341... Line 1346...
1341
	mcall	13,[window_width],45,0xcccccc
1346
	mcall	13,[window_width],45	;,0xcccccc
1342
 
1347
 
1343
	push	ecx
1348
	push	ecx
1344
	rol	ecx,16
1349
	rol	ecx,16
Line 1380... Line 1385...
1380
	mov	bx,ax
1385
	mov	bx,ax
1381
	shl	eax,16
1386
	shl	eax,16
1382
	sub	ebx,eax
1387
	sub	ebx,eax
1383
	mov	ecx,26 shl 16+15
1388
	mov	ecx,26 shl 16+15
Line 1384... Line 1389...
1384
 
1389
 
Line 1385... Line 1390...
1385
	mcall	8,,,2,0xffffff
1390
	mcall	8,,,2,[w_work_button]	;0xffffff
1386
 
1391
 
1387
	pusha
1392
	pusha
1388
	shr	ecx,16
1393
	shr	ecx,16
-
 
1394
	mov	bx,cx
-
 
1395
	add	ebx,20 shl 16+2
1389
	mov	bx,cx
1396
	mov	ecx,[w_work_button_text]
1390
	add	ebx,20 shl 16+2
1397
	or	ecx,0x90000000
1391
	mcall	4,,0x90000000,message_ExitDir_button
1398
	mcall	4,,,message_ExitDir_button
1392
	add	ebx,4
1399
	add	ebx,4
1393
	mcall
1400
	mcall
1394
	add	ebx,4
1401
	add	ebx,4
Line 1401... Line 1408...
1401
	mcall	8,,,6
1408
	mcall	8,,,6
Line 1402... Line 1409...
1402
 
1409
 
1403
	shr	ecx,16
1410
	shr	ecx,16
1404
	mov	bx,cx
1411
	mov	bx,cx
-
 
1412
	add	ebx,5 shl 16+4
-
 
1413
	mov	ecx,[w_work_button_text]
1405
	add	ebx,5 shl 16+4
1414
	or	ecx,0x90000000
1406
	mcall	4,,0x90000000,message_ReloadDir_button
1415
	mcall	4,,,message_ReloadDir_button
Line 1407... Line 1416...
1407
	pop	ebx
1416
	pop	ebx
Line 1408... Line 1417...
1408
 
1417
 
Line 1428... Line 1437...
1428
	pusha
1437
	pusha
Line 1429... Line 1438...
1429
 
1438
 
1430
	shr	ecx,16
1439
	shr	ecx,16
1431
	mov	bx,cx
1440
	mov	bx,cx
-
 
1441
	add	ebx,6 shl 16+ 4
-
 
1442
	mov	ecx,[w_work_button_text]
1432
	add	ebx,6 shl 16+ 4
1443
	or	ecx,0x90000000
1433
	mcall	4,,0x90000000,message_cancel_button
1444
	mcall	4,,,message_cancel_button
Line 1434... Line 1445...
1434
	popa
1445
	popa
1435
 
1446
 
Line 1447... Line 1458...
1447
	
1458
	
1448
	cmp	[open_dialog_type],2	; Select dir
1459
	cmp	[open_dialog_type],2	; Select dir
1449
	jne	@f
1460
	jne	@f
1450
	sub	ebx,5 shl 16
1461
	sub	ebx,5 shl 16
1451
@@:
-
 
-
 
1462
@@:
-
 
1463
	mov	ecx,[w_work_button_text]
1452
	
1464
	or	ecx,0x90000000
Line 1453... Line 1465...
1453
	mcall	4,,0x90000000	;message_open_button
1465
	mcall	4	;message_open_button
1454
	
1466
	
1455
;	mcall	47,0x80000,[file_browser_data_1.ini_file_start],<250,0>,0x0
1467
;	mcall	47,0x80000,[file_browser_data_1.ini_file_start],<250,0>,0x0
1456
;	mcall	4,<3,420>,0,fb_extension_start,3
1468
;	mcall	4,<3,420>,0,fb_extension_start,3
Line 1457... Line 1469...
1457
.end:
1469
.end:
1458
	mcall	12,2
1470
	mcall	12,2
-
 
1471
 
-
 
1472
	ret
-
 
1473
;---------------------------------------------------------------------
-
 
1474
prepare_system_colors:
-
 
1475
	mcall	48,3,app_colours,10*4
-
 
1476
 
-
 
1477
	mov	eax,[w_work]
-
 
1478
	mov	[menu_data_1.bckg_col],eax
-
 
1479
	mov	[menu_data_2.bckg_col],eax
-
 
1480
	mov	[menu_data_3.bckg_col],eax
-
 
1481
 
-
 
1482
	mov	[menu_data_1.menu_col],eax
-
 
1483
	mov	[menu_data_2.menu_col],eax
-
 
1484
	mov	[menu_data_3.menu_col],eax
-
 
1485
	
-
 
1486
	mov	[scroll_bar_data_vertical.bckg_col],eax	
-
 
1487
 
-
 
1488
	mov	eax,[w_work_button]
-
 
1489
	mov	[menu_data_1.frnt_col],eax
-
 
1490
	mov	[menu_data_2.frnt_col],eax
-
 
1491
	mov	[menu_data_3.frnt_col],eax
-
 
1492
 
-
 
1493
	mov	[scroll_bar_data_vertical.frnt_col],eax	
-
 
1494
 
-
 
1495
	mov	eax,[w_work_button]
-
 
1496
	mov	[menu_data_1.menu_sel_col],eax
-
 
1497
	mov	[menu_data_2.menu_sel_col],eax
-
 
1498
	mov	[menu_data_3.menu_sel_col],eax
-
 
1499
 
-
 
1500
	mov	eax,[w_work_text]
-
 
1501
	mov	[menu_data_1.bckg_text_col],eax
-
 
1502
	mov	[menu_data_2.bckg_text_col],eax
-
 
1503
	mov	[menu_data_3.bckg_text_col],eax
-
 
1504
	
-
 
1505
	mov	eax,[w_work_button_text]
-
 
1506
	mov	[menu_data_1.frnt_text_col],eax
-
 
1507
	mov	[menu_data_2.frnt_text_col],eax
-
 
1508
	mov	[menu_data_3.frnt_text_col],eax
-
 
1509
	
1459
 
1510
	mov	[scroll_bar_data_vertical.line_col],eax	
1460
	ret
1511
	ret
Line 1461... Line 1512...
1461
;---------------------------------------------------------------------
1512
;---------------------------------------------------------------------
1462
draw_for_fs_errors:
1513
draw_for_fs_errors:
Line 1571... Line 1622...
1571
	sub	eax,5
1622
	sub	eax,5
Line 1572... Line 1623...
1572
	
1623
	
1573
	mov	[PathShow_data_1.area_size_x],ax
1624
	mov	[PathShow_data_1.area_size_x],ax
1574
	mov	[PathShow_data_1.start_x],bx
1625
	mov	[PathShow_data_1.start_x],bx
1575
;--------------------------------------
1626
;--------------------------------------
1576
; top line
1627
;; top line
1577
	mov	ebx,[file_browser_data_1.x]
1628
;	mov	ebx,[file_browser_data_1.x]
1578
	mcall	13,,<7,1>,0x0
1629
;	mcall	13,,<7,1>,0x0
1579
; down line
1630
; down line
1580
	push	ebx ecx
1631
;	push	ebx ecx
1581
	mcall	,,<21,1>,
1632
;	mcall	,,<21,1>,
1582
	pop	ecx ebx
1633
;	pop	ecx ebx
1583
; left line	
1634
; left line	
1584
	push	ebx
1635
;	push	ebx
1585
	mov	bx,1
1636
;	mov	bx,1
1586
	mov	cx,15
1637
;	mov	cx,15
1587
	mcall
1638
;	mcall
1588
	pop	ebx
1639
;	pop	ebx
1589
; right line
1640
; right line
1590
	mov	ax,bx
1641
;	mov	ax,bx
1591
	shr	ebx,16
1642
;	shr	ebx,16
1592
	add	bx,ax
1643
;	add	bx,ax
1593
	dec	ebx
1644
;	dec	ebx
1594
	shl	ebx,16
1645
;	shl	ebx,16
1595
	mov	bx,1
1646
;	mov	bx,1
1596
	mcall	13
1647
;	mcall	13
1597
;--------------------------------------	
1648
;--------------------------------------	
1598
	mov	ebx,[file_browser_data_1.x]
1649
	mov	ebx,[file_browser_data_1.x]
1599
	sub	ebx,2
1650
	sub	ebx,2
1600
	add	ebx,1 shl 16
1651
	add	ebx,1 shl 16
1601
	mcall	13,,<8,13>,0xffffff
1652
	mcall	13,,<8,13>,0xffffcc
1602
;--------------------------------------
1653
;--------------------------------------
1603
; prepare for PathShow
1654
; prepare for PathShow
1604
	push	dword PathShow_data_1
1655
	push	dword PathShow_data_1
Line 2990... Line 3041...
2990
;---------------------------------------------------------------------
3041
;---------------------------------------------------------------------
2991
example_name_temp:	
3042
example_name_temp:	
2992
	db 'temp1.asm',0
3043
	db 'temp1.asm',0
2993
;---------------------------------------------------------------------
3044
;---------------------------------------------------------------------
2994
IM_END:
3045
IM_END:
-
 
3046
;---------------------------------------------------------------------
-
 
3047
align 4
-
 
3048
app_colours:
-
 
3049
 
-
 
3050
w_frame			rd 1
-
 
3051
w_grab			rd 1
-
 
3052
w_grab_button		rd 1
-
 
3053
w_grab_button_text	rd 1
-
 
3054
w_grab_text		rd 1
-
 
3055
w_work			rd 1
-
 
3056
w_work_button		rd 1
-
 
3057
w_work_button_text	rd 1
-
 
3058
w_work_text		rd 1
-
 
3059
w_work_graph		rd 1
-
 
3060
;---------------------------------------------------------------------
2995
menu_text_area_1_1:
3061
menu_text_area_1_1:
2996
rb 256
3062
rb 256
2997
;---------------------------------------------------------------------
3063
;---------------------------------------------------------------------
2998
	rb 1024
3064
	rb 1024
2999
stacktop:
3065
stacktop: