Rev 539 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 539 | Rev 552 | ||
|---|---|---|---|
| Line 47... | Line 47... | ||
| 47 | ;****************************************************************************** |
47 | ;****************************************************************************** |
| 48 | include '..\..\..\macros.inc' |
48 | include '..\..\..\macros.inc' |
| 49 | include 'ascl.inc' |
49 | include 'ascl.inc' |
| 50 | include 'ascgl.inc' |
50 | include 'ascgl.inc' |
| Line 51... | Line -... | ||
| 51 | - | ||
| 52 | gif_hash_offset = gif_hash |
- | |
| 53 | 51 | ||
| 54 | START: ; start of execution |
52 | START: ; start of execution |
| 55 | ; //// Willow |
53 | ; //// Willow |
| 56 | ; mov eax,58 |
54 | ; mov eax,58 |
| 57 | ; mov ebx,MRUfile |
55 | ; mov ebx,MRUfile |
| Line 1102... | Line 1100... | ||
| 1102 | jne cyc |
1100 | jne cyc |
| Line 1103... | Line 1101... | ||
| 1103 | 1101 | ||
| 1104 | popad |
1102 | popad |
| Line -... | Line 1103... | ||
| - | 1103 | ret |
|
| 1105 | ret |
1104 | |
| 1106 | 1105 | iglobal |
|
| 1107 | ;HELP TEXT |
1106 | ;HELP TEXT |
| 1108 | help_text: |
1107 | help_text: |
| 1109 | ;0123456789012345678901234567890123456789 |
1108 | ;0123456789012345678901234567890123456789 |
| Line 1129... | Line 1128... | ||
| 1129 | db ' INFO 84 Ver ' |
1128 | db ' INFO 84 Ver ' |
| 1130 | db ' ' |
1129 | db ' ' |
| 1131 | db ' Create by Pavlushin Evgeni ' |
1130 | db ' Create by Pavlushin Evgeni ' |
| 1132 | db 'with ASCL library special for Kolibri OS' |
1131 | db 'with ASCL library special for Kolibri OS' |
| 1133 | db ' www.deck4.narod.ru waptap@mail.ru ' |
1132 | db ' www.deck4.narod.ru waptap@mail.ru ' |
| 1134 | 1133 | endg |
|
| Line 1135... | Line 1134... | ||
| 1135 | 1134 | ||
| 1136 | ; ********************************************* |
1135 | ; ********************************************* |
| 1137 | ; ******* WINDOW DEFINITIONS AND DRAW ******** |
1136 | ; ******* WINDOW DEFINITIONS AND DRAW ******** |
| Line 1378... | Line 1377... | ||
| 1378 | 1377 | ||
| 1379 | ;List size |
1378 | ;List size |
| 1380 | outcount [listsize],294,25,cl_Black,4*65536 |
1379 | outcount [listsize],294,25,cl_Black,4*65536 |
| Line -... | Line 1380... | ||
| - | 1380 | jmp isb5 |
|
| 1381 | jmp isb5 |
1381 | |
| 1382 | 1382 | iglobal |
|
| 1383 | head_dlg: db 'OPEN FILE' |
1383 | head_dlg: db 'OPEN FILE' |
| 1384 | db 'SAVE FILE' |
1384 | db 'SAVE FILE' |
| - | 1385 | but_dlg: db 'OPEN' |
|
| Line 1385... | Line 1386... | ||
| 1385 | but_dlg: db 'OPEN' |
1386 | db 'SAVE' |
| Line 1386... | Line 1387... | ||
| 1386 | db 'SAVE' |
1387 | endg |
| 1387 | 1388 | ||
| Line 1942... | Line 1943... | ||
| 1942 | mov edi,8 |
1943 | mov edi,8 |
| 1943 | mov ebx,9*65536+37 |
1944 | mov ebx,9*65536+37 |
| 1944 | mov ecx,cl_Black |
1945 | mov ecx,cl_Black |
| 1945 | mov edx,file_text_label |
1946 | mov edx,file_text_label |
| 1946 | call drawmenu |
1947 | call drawmenu |
| 1947 | jmp no_drawhftext |
- | |
| Line -... | Line 1948... | ||
| - | 1948 | ||
| 1948 | 1949 | iglobal |
|
| 1949 | file_text_label: |
1950 | file_text_label: |
| 1950 | db ' Open ' |
1951 | db ' Open ' |
| 1951 | db ' Copy ' |
1952 | db ' Copy ' |
| 1952 | db ' Paste ' |
1953 | db ' Paste ' |
| 1953 | db ' Delete ' |
1954 | db ' Delete ' |
| 1954 | db ' Tinypad ' |
1955 | db ' Tinypad ' |
| 1955 | db ' Edit ' |
1956 | db ' Edit ' |
| 1956 | db ' ' |
1957 | db ' ' |
| - | 1958 | db ' Exit ' |
|
| Line 1957... | Line 1959... | ||
| 1957 | db ' Exit ' |
1959 | endg |
| Line 1958... | Line 1960... | ||
| 1958 | 1960 | ||
| 1959 | no_drawhftext: |
1961 | no_drawhftext: |
| Line 1967... | Line 1969... | ||
| 1967 | mov edi,4 |
1969 | mov edi,4 |
| 1968 | mov ebx,(9+6*8)*65536+37 |
1970 | mov ebx,(9+6*8)*65536+37 |
| 1969 | mov ecx,cl_Black |
1971 | mov ecx,cl_Black |
| 1970 | mov edx,view_text_label |
1972 | mov edx,view_text_label |
| 1971 | call drawmenu |
1973 | call drawmenu |
| 1972 | jmp no_drawhvtext |
- | |
| Line -... | Line 1974... | ||
| - | 1974 | ||
| 1973 | 1975 | iglobal |
|
| 1974 | view_text_label: |
1976 | view_text_label: |
| 1975 | db ' Name sort ' |
1977 | db ' Name sort ' |
| 1976 | db ' Ext. sort ' |
1978 | db ' Ext. sort ' |
| 1977 | db ' Size sort ' |
1979 | db ' Size sort ' |
| - | 1980 | db ' Date sort ' |
|
| Line 1978... | Line 1981... | ||
| 1978 | db ' Date sort ' |
1981 | endg |
| Line 1979... | Line 1982... | ||
| 1979 | 1982 | ||
| 1980 | no_drawhvtext: |
1983 | no_drawhvtext: |
| Line 1989... | Line 1992... | ||
| 1989 | mov eax,4 |
1992 | mov eax,4 |
| 1990 | mov ebx,(9+12*8)*65536+37 |
1993 | mov ebx,(9+12*8)*65536+37 |
| 1991 | mov ecx,cl_Black |
1994 | mov ecx,cl_Black |
| 1992 | mov edx,info_text_label |
1995 | mov edx,info_text_label |
| 1993 | call drawmenu |
1996 | call drawmenu |
| 1994 | jmp no_drawhitext |
- | |
| Line -... | Line 1997... | ||
| - | 1997 | ||
| 1995 | 1998 | iglobal |
|
| 1996 | info_text_label: |
1999 | info_text_label: |
| 1997 | db ' Help ' |
2000 | db ' Help ' |
| - | 2001 | db ' About ' |
|
| Line 1998... | Line 2002... | ||
| 1998 | db ' About ' |
2002 | endg |
| Line 1999... | Line 2003... | ||
| 1999 | 2003 | ||
| 2000 | no_drawhitext: |
2004 | no_drawhitext: |
| Line 2012... | Line 2016... | ||
| 2012 | 2016 | ||
| Line 2013... | Line 2017... | ||
| 2013 | ret |
2017 | ret |
| Line -... | Line 2018... | ||
| - | 2018 | ||
| 2014 | 2019 | ;FILE LIST PARAMETRS |
|
| 2015 | ;FILE LIST PARAMETRS |
2020 | |
| 2016 | 2021 | iglobal |
|
| 2017 | listx dd 15 |
2022 | listx dd 15 |
| Line 2032... | Line 2037... | ||
| 2032 | 2037 | ||
| 2033 | urlx dd 10 |
2038 | urlx dd 10 |
| 2034 | urly dd 20 |
2039 | urly dd 20 |
| 2035 | urlxsize dd 350 |
2040 | urlxsize dd 350 |
| 2036 | urlysize dd 12 |
2041 | urlysize dd 12 |
| Line 2037... | Line 2042... | ||
| 2037 | 2042 | endg |
|
| 2038 | 2043 | ||
| 2039 | drawmenu: |
2044 | drawmenu: |
| 2040 | mov eax,4 |
2045 | mov eax,4 |
| Line 2557... | Line 2562... | ||
| 2557 | view3ds db '/sys/3D/VIEW3DS',0 |
2562 | view3ds db '/sys/3D/VIEW3DS',0 |
| 2558 | life2 db '/sys/DEMOS/LIFE2',0 |
2563 | life2 db '/sys/DEMOS/LIFE2',0 |
| Line 2559... | Line 2564... | ||
| 2559 | 2564 | ||
| Line -... | Line 2565... | ||
| - | 2565 | more_char db 10h |
|
| - | 2566 | ||
| 2560 | more_char db 10h |
2567 | IncludeIGlobals |
| 2561 | 2568 | ||
| 2562 | fileinfo_start: |
2569 | fileinfo_start: |
| 2563 | dd 7 |
2570 | dd 7 |
| 2564 | dd 0 |
2571 | dd 0 |
| Line 2574... | Line 2581... | ||
| 2574 | dd ? |
2581 | dd ? |
| 2575 | dd 0 |
2582 | dd 0 |
| 2576 | dd 0 |
2583 | dd 0 |
| 2577 | dd ? |
2584 | dd ? |
| 2578 | dd paramtest |
2585 | dd paramtest |
| 2579 | db '/sys/CLIPFILE.TXT',0 |
2586 | db '/SYS/CLIPFILE.TXT',0 |
| 2580 | copyr_run: |
2587 | copyr_run: |
| 2581 | dd 7 |
2588 | dd 7 |
| 2582 | dd 0 |
2589 | dd 0 |
| 2583 | dd copyr_param |
2590 | dd copyr_param |
| 2584 | dd 0 |
2591 | dd 0 |
| 2585 | dd 0 |
2592 | dd 0 |
| 2586 | db '/sys/COPYR',0 |
2593 | db '/SYS/COPYR',0 |
| Line 2587... | Line 2594... | ||
| 2587 | 2594 | ||
| 2588 | fileinfoblock: |
2595 | fileinfoblock: |
| 2589 | dd 0x1 ; read folder |
2596 | dd 0x1 ; read folder |
| 2590 | dd 0x0 ; first block |
2597 | dd 0x0 ; first block |
| Line 2641... | Line 2648... | ||
| 2641 | 2648 | ||
| 2642 | tempimg: ;reserve ram for images |
2649 | tempimg: ;reserve ram for images |
| 2643 | rb 400*100*3+8 ;for picture |
2650 | rb 400*100*3+8 ;for picture |
| Line 2644... | Line -... | ||
| 2644 | rb 8000 |
- | |
| 2645 | - | ||
| 2646 | gif_hash: |
- | |
| 2647 | rd 4096 |
2651 | rb 8000 |
| 2648 | 2652 | ||
| Line 2649... | Line 2653... | ||
| 2649 | MYPID: |
2653 | MYPID: |
| 2650 | rd 8 |
2654 | rd 8 |
| 2651 | 2655 | ||
| 2652 | param_area: |
2656 | param_area: |
| 2653 | rb 256 |
2657 | rb 256 |
| 2654 | paramtest: |
2658 | paramtest: |
| Line -... | Line 2659... | ||
| - | 2659 | rb 1024 |
|
| - | 2660 | filedir: |
|
| 2655 | rb 1024 |
2661 | rb 1024 |
| 2656 | filedir: |
2662 | |
| Line 2657... | Line 2663... | ||
| 2657 | rb 1024 |
2663 | IncludeUGlobals |
| 2658 | 2664 | ||