Rev 3808 | Rev 3815 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 3808 | Rev 3812 | ||
|---|---|---|---|
| Line 309... | Line 309... | ||
| 309 | mov [file_browser_data_1.key_action],ebx |
309 | mov [file_browser_data_1.key_action],ebx |
| Line 310... | Line 310... | ||
| 310 | 310 | ||
| 311 | push dword file_browser_data_1 |
311 | push dword file_browser_data_1 |
| Line -... | Line 312... | ||
| - | 312 | call [FileBrowser_key] |
|
| - | 313 | ||
| 312 | call [FileBrowser_key] |
314 | call draw_open_button_label |
| 313 | 315 | ||
| 314 | cmp [file_browser_data_1.draw_scroll_bar],0 |
316 | cmp [file_browser_data_1.draw_scroll_bar],0 |
| 315 | je @f |
317 | je @f |
| 316 | call draw_scrollbar1 |
318 | call draw_scrollbar1 |
| Line 758... | Line 760... | ||
| 758 | mov [file_browser_data_1.select_flag],0 |
760 | mov [file_browser_data_1.select_flag],0 |
| Line 759... | Line 761... | ||
| 759 | 761 | ||
| 760 | push dword file_browser_data_1 |
762 | push dword file_browser_data_1 |
| Line -... | Line 763... | ||
| - | 763 | call [FileBrowser_mouse] |
|
| - | 764 | ||
| 761 | call [FileBrowser_mouse] |
765 | call draw_open_button_label |
| 762 | 766 | ||
| 763 | mov eax,file_browser_data_1.mouse_keys_delta |
767 | mov eax,file_browser_data_1.mouse_keys_delta |
| 764 | cmp [eax],dword 3 |
768 | cmp [eax],dword 3 |
| 765 | jne .check_focus ; scrollbar |
769 | jne .check_focus ; scrollbar |
| Line 1366... | Line 1370... | ||
| 1366 | cmp [error_window],0 |
1370 | cmp [error_window],0 |
| 1367 | je @f |
1371 | je @f |
| 1368 | call draw_for_fs_errors |
1372 | call draw_for_fs_errors |
| 1369 | jmp .1 |
1373 | jmp .1 |
| 1370 | @@: |
1374 | @@: |
| - | 1375 | mov [do_not_draw_open_button_label],1 |
|
| 1371 | call draw_draw_file_browser1 |
1376 | call draw_draw_file_browser1 |
| - | 1377 | mov [do_not_draw_open_button_label],0 |
|
| 1372 | .1: |
1378 | .1: |
| 1373 | push dword menu_data_1 |
1379 | push dword menu_data_1 |
| 1374 | call [menu_bar_draw] |
1380 | call [menu_bar_draw] |
| 1375 | push dword menu_data_2 |
1381 | push dword menu_data_2 |
| 1376 | call [menu_bar_draw] |
1382 | call [menu_bar_draw] |
| Line 1447... | Line 1453... | ||
| 1447 | sub ebx,65 shl 16 |
1453 | sub ebx,65 shl 16 |
| 1448 | mcall 8,,,4 |
1454 | mcall 8,,,4 |
| Line 1449... | Line 1455... | ||
| 1449 | 1455 | ||
| 1450 | shr ecx,16 |
1456 | shr ecx,16 |
| 1451 | mov bx,cx |
1457 | mov bx,cx |
| Line 1452... | Line 1458... | ||
| 1452 | add ebx,12 shl 16+4 |
1458 | add ebx,6 shl 16+4 |
| 1453 | 1459 | ||
| 1454 | mov edx,[open_dialog_type] |
1460 | mov edx,[open_dialog_type] |
| 1455 | shl edx,2 |
1461 | shl edx,2 |
| Line 1456... | Line 1462... | ||
| 1456 | add edx,message_open_dialog_button |
1462 | add edx,message_open_dialog_button |
| - | 1463 | mov edx,[edx] |
|
| 1457 | mov edx,[edx] |
1464 | |
| - | 1465 | mov eax,[file_browser_data_1.selected_BDVK_adress] |
|
| 1458 | 1466 | test [eax],byte 0x10 |
|
| 1459 | cmp [open_dialog_type],2 ; Select dir |
1467 | jz @f |
| - | 1468 | ||
| 1460 | jne @f |
1469 | mov edx,message_0 ; Open Dir |
| 1461 | sub ebx,5 shl 16 |
1470 | @@: |
| 1462 | @@: |
1471 | mov [open_button_coordinates],ebx |
| Line 1463... | Line 1472... | ||
| 1463 | mov ecx,[w_work_button_text] |
1472 | mov ecx,[w_work_button_text] |
| Line 1469... | Line 1478... | ||
| 1469 | .end: |
1478 | .end: |
| 1470 | mcall 12,2 |
1479 | mcall 12,2 |
| Line 1471... | Line 1480... | ||
| 1471 | 1480 | ||
| 1472 | ret |
1481 | ret |
| - | 1482 | ;--------------------------------------------------------------------- |
|
| - | 1483 | draw_open_button_label: |
|
| - | 1484 | cmp [do_not_draw_open_button_label],1 |
|
| - | 1485 | je .exit_1 |
|
| - | 1486 | ||
| - | 1487 | cmp [open_dialog_type],1 |
|
| - | 1488 | jne .exit_1 |
|
| - | 1489 | ||
| - | 1490 | pusha |
|
| - | 1491 | mov ebx,[open_button_coordinates] |
|
| - | 1492 | test ebx,ebx |
|
| - | 1493 | jz .exit |
|
| - | 1494 | ||
| - | 1495 | mov edx,[open_dialog_type] |
|
| - | 1496 | shl edx,2 |
|
| - | 1497 | add edx,message_open_dialog_button |
|
| - | 1498 | mov edx,[edx] |
|
| - | 1499 | ||
| - | 1500 | mov eax,[file_browser_data_1.selected_BDVK_adress] |
|
| - | 1501 | test [eax],byte 0x10 |
|
| - | 1502 | jz @f |
|
| - | 1503 | ||
| - | 1504 | mov edx,message_0 ; Open Dir |
|
| - | 1505 | jmp .1 |
|
| - | 1506 | @@: |
|
| - | 1507 | call copy_new_file_name |
|
| - | 1508 | .1: |
|
| - | 1509 | mov ecx,[w_work_button_text] |
|
| - | 1510 | or ecx,0xd0000000 |
|
| - | 1511 | mov edi,[w_work_button] |
|
| - | 1512 | mcall 4 ;message_open_button |
|
| - | 1513 | .exit: |
|
| - | 1514 | popa |
|
| - | 1515 | .exit_1: |
|
| - | 1516 | ret |
|
| - | 1517 | ;--------------------------------------------------------------------- |
|
| - | 1518 | copy_new_file_name: |
|
| - | 1519 | mov esi,[file_browser_data_1.selected_BDVK_adress] |
|
| - | 1520 | add esi,40 |
|
| - | 1521 | mov edi,user_selected_name |
|
| - | 1522 | cld |
|
| - | 1523 | @@: |
|
| - | 1524 | lodsb |
|
| - | 1525 | stosb |
|
| - | 1526 | test al,al |
|
| - | 1527 | jnz @r |
|
| - | 1528 | ||
| - | 1529 | sub edi,user_selected_name |
|
| - | 1530 | dec edi |
|
| - | 1531 | ||
| - | 1532 | mov esi,edit1 |
|
| - | 1533 | mov [esi+48],edi ;ed_size |
|
| - | 1534 | mov [esi+52],edi ;ed_pos |
|
| - | 1535 | ||
| - | 1536 | push dword name_editboxes |
|
| - | 1537 | call [edit_box_draw] |
|
| - | 1538 | ret |
|
| 1473 | ;--------------------------------------------------------------------- |
1539 | ;--------------------------------------------------------------------- |
| 1474 | prepare_system_colors: |
1540 | prepare_system_colors: |
| Line 1475... | Line 1541... | ||
| 1475 | mcall 48,3,app_colours,10*4 |
1541 | mcall 48,3,app_colours,10*4 |
| 1476 | 1542 | ||
| Line 1658... | Line 1724... | ||
| 1658 | ; draw for PathShow |
1724 | ; draw for PathShow |
| 1659 | push dword PathShow_data_1 |
1725 | push dword PathShow_data_1 |
| 1660 | call [PathShow_draw] |
1726 | call [PathShow_draw] |
| Line 1661... | Line 1727... | ||
| 1661 | 1727 | ||
| 1662 | ret |
- | |
| 1663 | - | ||
| 1664 | ;draw_dir_path_1: |
- | |
| 1665 | ; mov ebx,[file_browser_data_1.x] |
- | |
| 1666 | ; mcall 13,,<7,15>,0xffffb0 |
- | |
| 1667 | ; mov bx,10 |
- | |
| 1668 | ; add ebx,4 shl 16 |
- | |
| 1669 | ; mcall 4,,0xC0000000,dir_path,,0xffffb0 |
- | |
| 1670 | ; ret |
1728 | ret |
| 1671 | ;--------------------------------------------------------------------- |
1729 | ;--------------------------------------------------------------------- |
| 1672 | draw_draw_file_browser1: |
1730 | draw_draw_file_browser1: |
| 1673 | call draw_dir_path |
1731 | call draw_dir_path |
| 1674 | cmp [open_dialog_type],1 |
1732 | cmp [open_dialog_type],1 |
| Line 1681... | Line 1739... | ||
| 1681 | mov [scroll_bar_data_vertical.all_redraw],eax |
1739 | mov [scroll_bar_data_vertical.all_redraw],eax |
| Line 1682... | Line 1740... | ||
| 1682 | 1740 | ||
| 1683 | push dword file_browser_data_1 |
1741 | push dword file_browser_data_1 |
| Line -... | Line 1742... | ||
| - | 1742 | call [FileBrowser_draw] |
|
| Line 1684... | Line 1743... | ||
| 1684 | call [FileBrowser_draw] |
1743 | |
| Line 1685... | Line 1744... | ||
| 1685 | 1744 | call draw_open_button_label |
|
| Line 1700... | Line 1759... | ||
| 1700 | call get_scrollbar_data |
1759 | call get_scrollbar_data |
| Line 1701... | Line 1760... | ||
| 1701 | 1760 | ||
| 1702 | push dword file_browser_data_1 |
1761 | push dword file_browser_data_1 |
| Line -... | Line 1762... | ||
| - | 1762 | call [FileBrowser_draw] |
|
| - | 1763 | ||
| 1703 | call [FileBrowser_draw] |
1764 | call draw_open_button_label |
| 1704 | 1765 | ||
| 1705 | xor eax,eax |
1766 | xor eax,eax |
| 1706 | mov [file_browser_data_1.all_redraw],eax |
1767 | mov [file_browser_data_1.all_redraw],eax |
| 1707 | ret |
1768 | ret |
| Line 1736... | Line 1797... | ||
| 1736 | mov eax,[file_browser_data_1.max_panel_line] |
1797 | mov eax,[file_browser_data_1.max_panel_line] |
| 1737 | mov [scroll_bar_data_vertical.cur_area],eax |
1798 | mov [scroll_bar_data_vertical.cur_area],eax |
| 1738 | ret |
1799 | ret |
| 1739 | ;--------------------------------------------------------------------- |
1800 | ;--------------------------------------------------------------------- |
| 1740 | get_active_pocess: |
1801 | get_active_pocess: |
| 1741 | ; mcall 9,procinfo,-1 |
- | |
| 1742 | ; mov eax,[ebx+30] |
- | |
| 1743 | ; mov [PID],eax |
- | |
| 1744 | ; xor ecx,ecx |
- | |
| 1745 | ;@@: |
- | |
| 1746 | ; inc ecx |
- | |
| 1747 | ; mcall 9,procinfo |
- | |
| 1748 | ; mov eax,[PID] |
- | |
| 1749 | ; cmp eax,[ebx+30] |
- | |
| 1750 | ; jne @r |
- | |
| 1751 | ; mov [active_process],ecx |
- | |
| 1752 | - | ||
| 1753 | mcall 9,procinfo,-1 |
1802 | mcall 9,procinfo,-1 |
| 1754 | mov ecx,[ebx+30] ; PID |
1803 | mov ecx,[ebx+30] ; PID |
| 1755 | mcall 18,21 |
1804 | mcall 18,21 |
| 1756 | mov [active_process],eax ; WINDOW SLOT |
1805 | mov [active_process],eax ; WINDOW SLOT |
| 1757 | mov ebx,[communication_area] |
1806 | mov ebx,[communication_area] |
| Line 2742... | Line 2791... | ||
| 2742 | message_1: |
2791 | message_1: |
| 2743 | db 'Save',0 |
2792 | db ' Save ',0 |
| 2744 | message_2: |
2793 | message_2: |
| 2745 | db 'Select',0 |
2794 | db 'Select',0 |
| Line 2746... | Line -... | ||
| 2746 | - | ||
| 2747 | 2795 | ||
| 2748 | title_0: |
2796 | title_0: |
| 2749 | db 'Open Dialog',0 |
2797 | db 'Open Dialog',0 |
| 2750 | title_1: |
2798 | title_1: |
| 2751 | db 'Save Dialog',0 |
2799 | db 'Save Dialog',0 |
| Line 3042... | Line 3090... | ||
| 3042 | example_name_temp: |
3090 | example_name_temp: |
| 3043 | db 'temp1.asm',0 |
3091 | db 'temp1.asm',0 |
| 3044 | ;--------------------------------------------------------------------- |
3092 | ;--------------------------------------------------------------------- |
| 3045 | IM_END: |
3093 | IM_END: |
| 3046 | ;--------------------------------------------------------------------- |
3094 | ;--------------------------------------------------------------------- |
| - | 3095 | do_not_draw_open_button_label rb 1 |
|
| - | 3096 | ;--------------------------------------------------------------------- |
|
| 3047 | align 4 |
3097 | align 4 |
| 3048 | app_colours: |
3098 | app_colours: |
| Line 3049... | Line 3099... | ||
| 3049 | 3099 | ||
| 3050 | w_frame rd 1 |
3100 | w_frame rd 1 |
| Line 3056... | Line 3106... | ||
| 3056 | w_work_button rd 1 |
3106 | w_work_button rd 1 |
| 3057 | w_work_button_text rd 1 |
3107 | w_work_button_text rd 1 |
| 3058 | w_work_text rd 1 |
3108 | w_work_text rd 1 |
| 3059 | w_work_graph rd 1 |
3109 | w_work_graph rd 1 |
| 3060 | ;--------------------------------------------------------------------- |
3110 | ;--------------------------------------------------------------------- |
| - | 3111 | open_button_coordinates rd 1 |
|
| - | 3112 | ;--------------------------------------------------------------------- |
|
| 3061 | menu_text_area_1_1: |
3113 | menu_text_area_1_1: |
| 3062 | rb 256 |
3114 | rb 256 |
| 3063 | ;--------------------------------------------------------------------- |
3115 | ;--------------------------------------------------------------------- |
| 3064 | rb 1024 |
3116 | rb 1024 |
| 3065 | stacktop: |
3117 | stacktop: |