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 |