Rev 7412 | Rev 7443 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 7412 | Rev 7436 | ||
---|---|---|---|
Line 1... | Line 1... | ||
1 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
2 | ; Hot Angles Config ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
2 | ; Hot Angles Config ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
3 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
3 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
4 | ; Compile with FASM |
4 | ; Compile with FASM |
5 | ; Version 0.3.2: Sep 24, 2018 |
5 | ; Version 0.3.5: Oct 5, 2018 |
Line 6... | Line 6... | ||
6 | 6 | ||
7 | ; Copyright (c) 2018, Efremenkov Sergey aka TheOnlyMirage |
7 | ; Copyright (c) 2018, Efremenkov Sergey aka TheOnlyMirage |
8 | ; All rights reserved. |
8 | ; All rights reserved. |
9 | ; Redistribution and use in source and binary forms, with or without modification, |
9 | ; Redistribution and use in source and binary forms, with or without modification, |
Line 43... | Line 43... | ||
43 | include 'lang.inc' ;ïîääåðæêà ÿçûêîâ ïðè êîìïèëÿöèè |
43 | include 'lang.inc' ;ïîääåðæêà ÿçûêîâ ïðè êîìïèëÿöèè |
44 | include '../../macros.inc' |
44 | include '../../macros.inc' |
45 | include '../../proc32.inc' |
45 | include '../../proc32.inc' |
46 | include '../../dll.inc' |
46 | include '../../dll.inc' |
47 | include '../../develop/libraries/box_lib/trunk/box_lib.mac' ;êîìïîíåíòû checkBox è editBox |
47 | include '../../develop/libraries/box_lib/trunk/box_lib.mac' ;êîìïîíåíòû checkBox è editBox |
- | 48 | ;![ |
|
- | 49 | include '../../develop/libraries/box_lib/load_lib.mac' ;ìàêðîñ äëÿ çàãðóçêè áèáëèîòåê |
|
- | 50 | @use_library |
|
- | 51 | ;@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load |
|
48 | 52 | ;!] |
|
49 | Otstup = 30 |
53 | Otstup = 30 |
Line 50... | Line 54... | ||
50 | 54 | ||
51 | START: |
55 | START: |
52 | call copyKill ;ïðîñòåéøàÿ çàùèòà îò çàïóñêà âòîðîé êîïèè ïðèëîæåíèÿ |
56 | call copyKill ;ïðîñòåéøàÿ çàùèòà îò çàïóñêà âòîðîé êîïèè ïðèëîæåíèÿ |
Line -... | Line 57... | ||
- | 57 | mcall 68, 11 ;èíèöèàëèçàöèÿ êó÷è |
|
53 | mcall 68, 11 ;èíèöèàëèçàöèÿ êó÷è |
58 | |
54 | 59 | ;mcall 48,3,sc,sizeof.system_colors ;ïîëó÷èòü ñèñòåìíûå öâåòà |
|
55 | mov eax,48 ;ïîëó÷èòü ñèñòåìíûå öâåòà |
60 | mov eax,48 ;ïîëó÷èòü ñèñòåìíûå öâåòà |
56 | mov ebx,3 |
61 | mov ebx,3 |
57 | mov ecx, sc |
62 | mov ecx, sc |
Line 58... | Line -... | ||
58 | mov edx, sizeof.system_colors |
- | |
59 | mcall |
63 | mov edx, sizeof.system_colors |
60 | 64 | mcall |
|
61 | 65 | ||
Line 62... | Line 66... | ||
62 | stdcall dll.Load, @IMPORT |
66 | stdcall dll.Load, @IMPORT |
Line 63... | Line 67... | ||
63 | or eax, eax |
67 | or eax, eax |
64 | jnz exit |
68 | jnz exit |
65 | 69 | ||
Line -... | Line 70... | ||
- | 70 | invoke init_checkbox, ch1 |
|
- | 71 | ||
- | 72 | mov eax,40 ;óñòàíîâèòü ìàñêó äëÿ îæèäàåìûõ ñîáûòèé |
|
- | 73 | mov ebx,0x27 ;ñèñòåìà áóäåò ðåàãèðîâàòü òîëüêî íà ñîîáùåíèå î ïåðåðèñîâêå, íàæàòà êíîïêà, îïðåäåë¸ííàÿ ðàíåå, ñîáûòèå îò ìûøè (÷òî-òî ñëó÷èëîñü - íàæàòèå íà êíîïêó ìûøè èëè ïåðåìåùåíèå; ñáðàñûâàåòñÿ ïðè ïðî÷òåíèè) |
|
66 | invoke init_checkbox, ch1 |
74 | mcall |
67 | 75 | ||
Line 68... | Line 76... | ||
68 | mov eax,40 ;óñòàíîâèòü ìàñêó äëÿ îæèäàåìûõ ñîáûòèé |
76 | load_libraries l_libs_start,load_lib_end ;çàãðóçêà áèáëèîòåê(è) |
69 | mov ebx,0x27 ;ñèñòåìà áóäåò ðåàãèðîâàòü òîëüêî íà ñîîáùåíèå î ïåðåðèñîâêå, íàæàòà êíîïêà, îïðåäåë¸ííàÿ ðàíåå, ñîáûòèå îò ìûøè (÷òî-òî ñëó÷èëîñü - íàæàòèå íà êíîïêó ìûøè èëè ïåðåìåùåíèå; ñáðàñûâàåòñÿ ïðè ïðî÷òåíèè) |
77 | ;mcall 48,3,sc,sizeof.system_colors ;ïîëó÷èòü ñèñòåìíûå öâåòà |
Line 121... | Line 129... | ||
121 | exit: |
129 | exit: |
122 | mov eax,-1 ; Function -1 : close this program |
130 | mov eax,-1 ; Function -1 : close this program |
123 | mcall |
131 | mcall |
124 | noclose: |
132 | noclose: |
125 | cmp ah, 2 ;êíîïêà "Ïðèìåíèòü" |
133 | cmp ah, 2 ;êíîïêà "Ïðèìåíèòü" |
126 | jne butend |
134 | jne @f ;butend |
127 | call applyButton ;âûçîâ íàøåãî îáðàáîò÷èêà íàæàòèÿ êíîïêè |
135 | call applyButton ;âûçîâ íàøåãî îáðàáîò÷èêà íàæàòèÿ êíîïêè |
- | 136 | jmp event_wait |
|
- | 137 | @@: |
|
- | 138 | cmp ah, 4 |
|
- | 139 | jne @f |
|
- | 140 | mov byte[editID], 4 |
|
- | 141 | call but_open_dlg |
|
- | 142 | jmp event_wait |
|
- | 143 | @@: |
|
- | 144 | cmp ah, 5 |
|
- | 145 | jne @f |
|
- | 146 | mov byte[editID], 5 |
|
- | 147 | call but_open_dlg |
|
- | 148 | jmp event_wait |
|
- | 149 | @@: |
|
- | 150 | cmp ah, 6 |
|
- | 151 | jne @f |
|
- | 152 | mov byte[editID], 6 |
|
- | 153 | call but_open_dlg |
|
- | 154 | jmp event_wait |
|
- | 155 | @@: |
|
- | 156 | cmp ah, 7 |
|
- | 157 | jne @f |
|
- | 158 | mov byte[editID], 7 |
|
- | 159 | call but_open_dlg |
|
- | 160 | jmp event_wait |
|
- | 161 | @@: |
|
128 | butend: |
162 | butend: |
129 | jmp event_wait ;this is for ignored events, useful at development |
163 | jmp event_wait ;this is for ignored events, useful at development |
Line 215... | Line 249... | ||
215 | mov dword[createFile.size], ecx ;ïîëîæèì ðàçìåð áàéò â ñòðóêòóðó ñîçäàíèÿ/ïåðåçàïèñè ôàéëà |
249 | mov dword[createFile.size], ecx ;ïîëîæèì ðàçìåð áàéò â ñòðóêòóðó ñîçäàíèÿ/ïåðåçàïèñè ôàéëà |
216 | mcall 68, 12, ecx ;âûäåëÿåì áëîê ïàìÿòè ïîä áóôåð ñîäåðæèìîãî |
250 | mcall 68, 12, ecx ;âûäåëÿåì áëîê ïàìÿòè ïîä áóôåð ñîäåðæèìîãî |
217 | mov dword[createFile.data_adr], eax ;ñîõðàíÿåì àäðåñ áóôåðà â ñòðóêòóðó |
251 | mov dword[createFile.data_adr], eax ;ñîõðàíÿåì àäðåñ áóôåðà â ñòðóêòóðó |
Line 218... | Line 252... | ||
218 | 252 | ||
- | 253 | ;çàïîëíèì áóôåð ñîäåðæèìîãî: |
|
- | 254 | ;cmp byte[mode], 0 |
|
- | 255 | ;jne @f |
|
- | 256 | ;@@: |
|
219 | ;çàïîëíèì áóôåð ñîäåðæèìîãî: |
257 | ; |
220 | mov byte[eax], 110; 'n' ;ïî óìîë÷àíèþ ôëàã ñíÿò |
258 | mov byte[eax], 48;'0' ;110; 'n' ;ïî óìîë÷àíèþ ôëàã ñíÿò |
221 | cmp word[ch1.flags], 110b ;ch_flag_en and ch_flag_middle ;âûñòàâëåí checkBox èëè íåò? |
259 | cmp word[ch1.flags], 110b ;ch_flag_en and ch_flag_middle ;âûñòàâëåí checkBox èëè íåò? |
222 | jne applyButton.no |
260 | jne applyButton.no |
223 | mov byte[eax], 121 ;èíà÷å êëàä¸ì 'y' |
261 | mov byte[eax], 49;'1' ;121 ;èíà÷å êëàä¸ì 'y' |
224 | .no: |
262 | .no: |
225 | inc eax |
263 | inc eax |
Line 226... | Line 264... | ||
226 | call addPerenos |
264 | call addPerenos |
Line 374... | Line 412... | ||
374 | je loadConfig.default |
412 | je loadConfig.default |
375 | .start: |
413 | .start: |
376 | add edx, eax ;êëàä¸ì â edx - àäðåñ êîíöà êîíôèã.äàííûõ |
414 | add edx, eax ;êëàä¸ì â edx - àäðåñ êîíöà êîíôèã.äàííûõ |
Line 377... | Line 415... | ||
377 | 415 | ||
378 | .chStart: |
416 | .chStart: |
379 | cmp byte[eax], 121 ;'y' ;âûñòàâëÿåì checkBox - ïàðàìåòð àêòèâíîñòè ïðèëîæåíèÿ |
417 | cmp byte[eax], 49;'1' ;121 ;'y' ;âûñòàâëÿåì checkBox - ïàðàìåòð àêòèâíîñòè ïðèëîæåíèÿ |
380 | jne loadConfig.no |
418 | jne @f ;loadConfig.no |
381 | .yes: |
419 | .yes: |
382 | mov word[ch1.flags], 110b ;ch_flag_en and ch_flag_middle |
420 | mov word[ch1.flags], 110b ;ch_flag_en and ch_flag_middle |
- | 421 | jmp loadConfig.chEnd |
|
- | 422 | @@: |
|
- | 423 | cmp byte[eax], 50;'2' ;âòîðîé ðåæèì àêòèâèðîâàí |
|
383 | jmp loadConfig.chEnd |
424 | je loadConfig.yes |
384 | .no: |
425 | .no: |
385 | mov word[ch1.flags], 100b ;ch_flag_middle |
426 | mov word[ch1.flags], 100b ;ch_flag_middle |
386 | .chEnd: |
427 | .chEnd: |
Line 554... | Line 595... | ||
554 | draw_window: |
595 | draw_window: |
555 | ;óäàëÿåì êíîïêó, åñëè åñòü |
596 | ;óäàëÿåì êíîïêó, åñëè åñòü |
556 | mov edx, 0x80000002 |
597 | mov edx, 0x80000002 |
557 | mcall 8 |
598 | mcall 8 |
Line -... | Line 599... | ||
- | 599 | ||
- | 600 | ;óäàëÿåì åù¸ 4 êíîïêè åñëè îíè åñòü |
|
- | 601 | mov edx, 0x80000004 |
|
- | 602 | mcall 8 |
|
- | 603 | mov edx, 0x80000005 |
|
- | 604 | mcall 8 |
|
- | 605 | mov edx, 0x80000006 |
|
- | 606 | mcall 8 |
|
- | 607 | mov edx, 0x80000007 |
|
- | 608 | mcall 8 |
|
558 | 609 | ||
559 | mov eax, 12 ; function 12: tell os about windowdraw |
610 | mov eax, 12 ; function 12: tell os about windowdraw |
560 | mov ebx, 1 ; 1, start of draw |
611 | mov ebx, 1 ; 1, start of draw |
Line 561... | Line 612... | ||
561 | mcall |
612 | mcall |
Line 606... | Line 657... | ||
606 | mov ecx, 0xFFFFFF ;áåëûé öâåò òåêñòà |
657 | mov ecx, 0xFFFFFF ;áåëûé öâåò òåêñòà |
607 | mov edx, buttonText |
658 | mov edx, buttonText |
608 | mov esi, buttonTextSize ;5 ;ðàçìåð òåêñòà â ñèìâîëàõ |
659 | mov esi, buttonTextSize ;5 ;ðàçìåð òåêñòà â ñèìâîëàõ |
609 | mcall 4 |
660 | mcall 4 |
Line -... | Line 661... | ||
- | 661 | ||
- | 662 | ;ðèñóåì åù¸ 4 êíîïêè äëÿ äèàëîãîâîãî îêíà âûáîðà ôàéëà |
|
- | 663 | ;íîìåðà 4,5,6 è 7 |
|
- | 664 | buttonH = 14 ;20 |
|
- | 665 | buttonW = 30 |
|
- | 666 | ;ëåâûé âåðõíèé óãîë |
|
- | 667 | mov ebx, Otstup*65536 + buttonW ;êîîðäèíàòà X, øèðèíà êíîïêè |
|
- | 668 | mov ecx, 85*65536 + buttonH ;êîîðäèíàòà Y, âûñîòà êíîïêè |
|
- | 669 | mov edx, 0x00000004 ;íîìåð êíîïêè |
|
- | 670 | mov esi, 0x00AABBCC ;öâåò êíîïêè |
|
- | 671 | mcall 8 |
|
- | 672 | ;ëåâûé íèæíèé óãîë |
|
- | 673 | mov ebx, Otstup*65536 + buttonW ;êîîðäèíàòà X, øèðèíà êíîïêè |
|
- | 674 | mov ecx, 120*65536 + buttonH ;êîîðäèíàòà Y, âûñîòà êíîïêè |
|
- | 675 | mov edx, 0x00000005 ;íîìåð êíîïêè |
|
- | 676 | mov esi, 0x00AABBCC ;öâåò êíîïêè |
|
- | 677 | mcall 8 |
|
- | 678 | ;ïðàâûé âåðõíèé óãîë |
|
- | 679 | mov ebx, (WindowsWidth-Otstup-buttonW)*65536 + buttonW ;êîîðäèíàòà X, øèðèíà êíîïêè |
|
- | 680 | mov ecx, 85*65536 + buttonH ;êîîðäèíàòà Y, âûñîòà êíîïêè |
|
- | 681 | mov edx, 0x00000006 ;íîìåð êíîïêè |
|
- | 682 | mov esi, 0x00AABBCC ;öâåò êíîïêè |
|
- | 683 | mcall 8 |
|
- | 684 | ;ïðàâûé íèæíèé óãîë |
|
- | 685 | mov ebx, (WindowsWidth-Otstup-buttonW)*65536 + buttonW ;êîîðäèíàòà X, øèðèíà êíîïêè |
|
- | 686 | mov ecx, 120*65536 + buttonH ;êîîðäèíàòà Y, âûñîòà êíîïêè |
|
- | 687 | mov edx, 0x00000007 ;íîìåð êíîïêè |
|
- | 688 | mov esi, 0x00AABBCC ;öâåò êíîïêè |
|
- | 689 | mcall 8 |
|
- | 690 | ||
- | 691 | ;ðèñóåì òåêñòû äëÿ ýòèõ 4 êíîïîê |
|
- | 692 | mov ecx, 0xFFFFFF ;áåëûé öâåò òåêñòà |
|
- | 693 | mov edx, commonButtonText ;ñòðîêà òåêñòà |
|
- | 694 | mov esi, commonButtonTextSize ;ðàçìåð òåêñòà â ñèìâîëàõ |
|
- | 695 | ;êîîðäèíàòû òåêñòà (x, y) |
|
- | 696 | deltaCommonTextX = 7 |
|
- | 697 | deltaCommonTextY = 2 |
|
- | 698 | mov ebx, (Otstup+deltaCommonTextX) * 65536 + (85 + deltaCommonTextY) |
|
- | 699 | mcall 4 |
|
- | 700 | mov ebx, (Otstup+deltaCommonTextX) * 65536 + (120 + deltaCommonTextY) |
|
- | 701 | mcall 4 |
|
- | 702 | mov ebx, (WindowsWidth-Otstup-buttonW+deltaCommonTextX) * 65536 + (85 + deltaCommonTextY) |
|
- | 703 | mcall 4 |
|
- | 704 | mov ebx, (WindowsWidth-Otstup-buttonW+deltaCommonTextX) * 65536 + (120 + deltaCommonTextY) |
|
- | 705 | mcall 4 |
|
- | 706 | ||
610 | 707 | ||
Line 611... | Line 708... | ||
611 | call draw_super_text |
708 | call draw_super_text |
612 | 709 | ||
613 | LineLength = 62 |
710 | LineLength = 62 |
Line 652... | Line 749... | ||
652 | ;DATA äàííûå check_box èñïîëüçóåò ñèñòåìíûå öâåòà |
749 | ;DATA äàííûå check_box èñïîëüçóåò ñèñòåìíûå öâåòà |
Line 653... | Line 750... | ||
653 | 750 | ||
654 | ;êîîðäèíàòû (x,y) = (30, 160) ðàçìåð ÷åêáîêñà 12, öâåò òåêñòà 0x224466 |
751 | ;êîîðäèíàòû (x,y) = (30, 160) ðàçìåð ÷åêáîêñà 12, öâåò òåêñòà 0x224466 |
Line -... | Line 752... | ||
- | 752 | ch1 check_box2 30 shl 16 + 12, 160 shl 16 + 12, 6, 0xFFFFFFFF, 0xAABBCC, 0x224466, ch_text, 110b ; ch_flag_en and ch_flag_middle |
|
- | 753 | ||
Line 655... | Line 754... | ||
655 | ch1 check_box2 30 shl 16 + 12, 160 shl 16 + 12, 6, 0xFFFFFFFF, 0xAABBCC, 0x224466, ch_text, 110b ; ch_flag_en and ch_flag_middle |
754 | commonButtonText db '...', 0 ;òåêñò äëÿ êíîïîê âûçîâà OpenDial |
Line 656... | Line 755... | ||
656 | 755 | commonButtonTextSize = 3 |
|
657 | 756 | ||
Line 723... | Line 822... | ||
723 | mcall 4 |
822 | mcall 4 |
Line 724... | Line 823... | ||
724 | 823 | ||
725 | pop esi edi edx ecx ebx eax |
824 | pop esi edi edx ecx ebx eax |
Line -... | Line 825... | ||
- | 825 | ret |
|
- | 826 | ||
- | 827 | ;![ |
|
- | 828 | editID db 0 |
|
- | 829 | initEBX: |
|
- | 830 | cmp byte[editID], 4 |
|
- | 831 | jne @f |
|
- | 832 | mov ebx, dataBuffer.1 |
|
- | 833 | ret |
|
- | 834 | @@: |
|
- | 835 | cmp byte[editID], 5 |
|
- | 836 | jne @f |
|
- | 837 | mov ebx, dataBuffer.2 |
|
- | 838 | ret |
|
- | 839 | @@: |
|
- | 840 | cmp byte[editID], 6 |
|
- | 841 | jne @f |
|
- | 842 | mov ebx, dataBuffer.3 |
|
- | 843 | ret |
|
- | 844 | @@: |
|
- | 845 | cmp byte[editID], 7 |
|
- | 846 | jne @f |
|
- | 847 | mov ebx, dataBuffer.4 |
|
- | 848 | ret |
|
- | 849 | @@: |
|
- | 850 | ret |
|
- | 851 | setRESULT: |
|
- | 852 | cmp byte[editID], 4 |
|
- | 853 | jne @f |
|
- | 854 | mov dword[dataBuffer.size1], ecx |
|
- | 855 | mov dword[editLU.size], ecx |
|
- | 856 | mov dword[editLU.pos], ecx |
|
- | 857 | ret |
|
- | 858 | @@: |
|
- | 859 | cmp byte[editID], 5 |
|
- | 860 | jne @f |
|
- | 861 | mov dword[dataBuffer.size2], ecx |
|
- | 862 | mov dword[editLD.size], ecx |
|
- | 863 | mov dword[editLD.pos], ecx |
|
- | 864 | ret |
|
- | 865 | @@: |
|
- | 866 | cmp byte[editID], 6 |
|
- | 867 | jne @f |
|
- | 868 | mov dword[dataBuffer.size3], ecx |
|
- | 869 | mov dword[editRU.size], ecx |
|
- | 870 | mov dword[editRU.pos], ecx |
|
- | 871 | ret |
|
- | 872 | @@: |
|
- | 873 | cmp byte[editID], 7 |
|
- | 874 | jne @f |
|
- | 875 | mov dword[dataBuffer.size4], ecx |
|
- | 876 | mov dword[editRD.size], ecx |
|
- | 877 | mov dword[editRD.pos], ecx |
|
- | 878 | ret |
|
- | 879 | @@: |
|
- | 880 | ret |
|
- | 881 | copyPath: |
|
- | 882 | push eax ebx ecx edx ;copy file name path |
|
- | 883 | mov eax, openfile_path ;dword[OpenDialog_data.openfile_path] |
|
- | 884 | call initEBX ;mov ebx, dataBuffer.1 ;.data |
|
- | 885 | mov ecx, 0 |
|
- | 886 | @@: |
|
- | 887 | mov dl, byte[eax] |
|
- | 888 | cmp dl, 0 ;byte[eax], 0 |
|
- | 889 | je @f |
|
- | 890 | mov byte[ebx], dl |
|
- | 891 | inc eax |
|
- | 892 | inc ebx |
|
- | 893 | inc ecx |
|
- | 894 | jmp @b |
|
- | 895 | @@: |
|
- | 896 | mov byte[ebx], 0 |
|
- | 897 | call setRESULT |
|
- | 898 | pop edx ecx ebx eax |
|
- | 899 | ret |
|
- | 900 | ||
- | 901 | ||
- | 902 | align 4 |
|
- | 903 | but_open_dlg: |
|
- | 904 | pushad |
|
- | 905 | copy_path open_dialog_name,communication_area_default_path,file_name,0 |
|
- | 906 | mov [OpenDialog_data.type],0 |
|
- | 907 | stdcall[OpenDialog_Start], OpenDialog_data |
|
- | 908 | cmp [OpenDialog_data.status],2 |
|
- | 909 | je @f |
|
- | 910 | cmp [OpenDialog_data.status],0 ;ïîëüçîâàòåëü íàæàë Cancel? |
|
- | 911 | je .end_open |
|
- | 912 | ;êîä ïðè óäà÷íîì îòêðûòèè äèàëîãà |
|
- | 913 | call copyPath |
|
- | 914 | jmp .end_open |
|
- | 915 | @@: |
|
- | 916 | ;êîä ïðè íå óäà÷íîì îòêðûòèè äèàëîãà |
|
- | 917 | ;... |
|
- | 918 | .end_open: |
|
- | 919 | popad |
|
- | 920 | ret |
|
- | 921 | ||
- | 922 | ;äûííûå äëÿ äèàëîãà îòêðûòèÿ ôàéëîâ |
|
- | 923 | align 4 |
|
- | 924 | OpenDialog_data: |
|
- | 925 | .type dd 0 ;0 - îòêðûòü, 1 - ñîõðàíèòü, 2 - âûáðàòü äèðåêòîðèþ |
|
- | 926 | .procinfo dd procinfo |
|
- | 927 | .com_area_name dd communication_area_name ;+8 |
|
- | 928 | .com_area dd 0 ;+12 |
|
- | 929 | .opendir_path dd plugin_path ;+16 |
|
- | 930 | .dir_default_path dd default_dir ;+20 |
|
- | 931 | .start_path dd file_name ;+24 ïóòü ê äèàëîãó îòêðûòèÿ ôàéëîâ |
|
- | 932 | .draw_window dd draw_window ;+28 |
|
- | 933 | .status dd 0 ;+32 |
|
- | 934 | .openfile_path dd openfile_path ;+36 ïóòü ê îòêðûâàåìîìó ôàéëó |
|
- | 935 | .filename_area dd filename_area ;+40 |
|
- | 936 | .filter_area dd Filter |
|
- | 937 | .x: |
|
- | 938 | .x_size dw 420 ;+48 ; Window X size |
|
- | 939 | .x_start dw 10 ;+50 ; Window X position |
|
- | 940 | .y: |
|
- | 941 | .y_size dw 320 ;+52 ; Window y size |
|
- | 942 | .y_start dw 10 ;+54 ; Window Y position |
|
- | 943 | ||
- | 944 | default_dir db '/rd/1',0 ;äèðåêòîðèÿ ïî óìîë÷àíèþ |
|
- | 945 | communication_area_name: db 'FFFFFFFF_open_dialog',0 |
|
- | 946 | open_dialog_name: db 'opendial',0 |
|
- | 947 | communication_area_default_path: db '/rd/1/File managers/',0 |
|
- | 948 | ||
- | 949 | Filter: |
|
- | 950 | dd Filter.end - Filter.1 |
|
- | 951 | .1: |
|
- | 952 | ;db 'ASM',0 |
|
- | 953 | ;db 'KEX',0 |
|
- | 954 | ;db 'TXT',0 |
|
- | 955 | .end: |
|
- | 956 | db 0 |
|
- | 957 | ||
- | 958 | align 4 |
|
- | 959 | proclib_import: ;îïèñàíèå ýêñïîðòèðóåìûõ ôóíêöèé |
|
- | 960 | OpenDialog_Init dd aOpenDialog_Init |
|
- | 961 | OpenDialog_Start dd aOpenDialog_Start |
|
- | 962 | dd 0,0 |
|
- | 963 | aOpenDialog_Init db 'OpenDialog_init',0 |
|
- | 964 | aOpenDialog_Start db 'OpenDialog_start',0 |
|
- | 965 | ||
- | 966 | head_f_i: |
|
- | 967 | head_f_l db 'Ñèñòåìíàÿ îøèáêà',0 |
|
- | 968 | err_message_found_lib0 db 'Íå íàéäåíà áèáëèîòåêà ',39,'proc_lib.obj',39,0 |
|
- | 969 | err_message_import0 db 'Îøèáêà ïðè èìïîðòå áèáëèîòåêè ',39,'proc_lib.obj',39,0 |
|
- | 970 | ||
- | 971 | system_dir0 db '/sys/lib/' |
|
- | 972 | lib0_name db 'proc_lib.obj',0 |
|
- | 973 | ||
- | 974 | ;library structures |
|
- | 975 | l_libs_start: |
|
- | 976 | lib0 l_libs lib0_name, sys_path, file_name, system_dir0, err_message_found_lib0, head_f_l, proclib_import,err_message_import0, head_f_i |
|
- | 977 | load_lib_end: |
|
- | 978 | ||
- | 979 | ;txt_open db 'Îòêðûòü',0 |
|
- | 980 | ||
- | 981 | sys_path: rb 4096 |
|
- | 982 | file_name: rb 4096 |
|
- | 983 | plugin_path: rb 4096 |
|
- | 984 | openfile_path: rb 4096 |
|
- | 985 | filename_area: rb 256 |
|
- | 986 | rb 1024 |
|
- | 987 | procinfo process_information |
|
- | 988 | ;!] |
|
Line 726... | Line 989... | ||
726 | ret |
989 | |
727 | 990 | ||
Line 728... | Line 991... | ||
728 | 991 | ||
729 | edMaxSize = 510 ;òåïåðü ñ íîâûì êîìïîíåíòîì ìîæíî è 511 óêàçàòü |
992 | edMaxSize = 510 ;òåïåðü ñ íîâûì êîìïîíåíòîì ìîæíî è 511 óêàçàòü |
730 | edMax = 0 ;max, size, pos |
993 | edMax = 0 ;max, size, pos |
731 | 994 | ||
732 | align 4 |
995 | align 4 |
- | 996 | editLU edit_box 180-buttonW,Otstup+buttonW,85, 0xffffff, 0x6a9480, 0, 0xAABBCC, 0, edMaxSize, dataBuffer.1, mouse_dd, 0, edMax, edMax ;ed_focus |
|
- | 997 | editLD edit_box 180-buttonW,Otstup+buttonW,120, 0xffffff, 0x6a9480, 0, 0xAABBCC, 0, edMaxSize, dataBuffer.2, mouse_dd, 0, edMax, edMax |
|
- | 998 | editRU edit_box 180-buttonW,240,85, 0xffffff, 0x6a9480, 0, 0xAABBCC, 0, edMaxSize, dataBuffer.3, mouse_dd, 0, edMax, edMax |
|
Line 733... | Line 999... | ||
733 | editLU edit_box 180,Otstup,85, 0xffffff, 0x6a9480, 0, 0xAABBCC, 0, edMaxSize, dataBuffer.1, mouse_dd, 0, edMax, edMax ;ed_focus |
999 | editRD edit_box 180-buttonW,240,120, 0xffffff, 0x6a9480, 0, 0xAABBCC, 0, edMaxSize, dataBuffer.4, mouse_dd, 0, edMax, edMax |
734 | editLD edit_box 180,Otstup,120, 0xffffff, 0x6a9480, 0, 0xAABBCC, 0, edMaxSize, dataBuffer.2, mouse_dd, 0, edMax, edMax |
1000 | |
735 | editRU edit_box 180,240,85, 0xffffff, 0x6a9480, 0, 0xAABBCC, 0, edMaxSize, dataBuffer.3, mouse_dd, 0, edMax, edMax |
1001 | mouse_dd dd ? |
736 | editRD edit_box 180,240,120, 0xffffff, 0x6a9480, 0, 0xAABBCC, 0, edMaxSize, dataBuffer.4, mouse_dd, 0, edMax, edMax |
1002 | sc system_colors |
Line 746... | Line 1012... | ||
746 | .size4: rd 1 |
1012 | .size4: rd 1 |
747 | ;255+255+2 |
1013 | ;255+255+2 |
748 | ;äâà çàïàñíûõ áàéòà íåîáõîäèìû äëÿ òîãî ÷òî áû íå ïåïåðåïèñàòü ñëåäóþùèåé áàéòû, â êîíöå áóôåðà 0 |
1014 | ;äâà çàïàñíûõ áàéòà íåîáõîäèìû äëÿ òîãî ÷òî áû íå ïåïåðåïèñàòü ñëåäóþùèåé áàéòû, â êîíöå áóôåðà 0 |
749 | dataBufferEnd: |
1015 | dataBufferEnd: |
Line 750... | Line -... | ||
750 | - | ||
751 | mouse_dd dd ? |
- | |
Line 752... | Line 1016... | ||
752 | sc system_colors |
1016 | |
753 | 1017 | ||
754 | I_END: |
1018 | I_END: |
755 | rb 4096 |
1019 | rb 4096 |