Rev 123 | Rev 485 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 123 | Rev 180 | ||
---|---|---|---|
Line 19... | Line 19... | ||
19 | label: |
19 | label: |
20 | file fn |
20 | file fn |
21 | label2: |
21 | label2: |
22 | FILE_COUNT=FILE_COUNT+1 |
22 | FILE_COUNT=FILE_COUNT+1 |
23 | } |
23 | } |
24 | - | ||
- | 24 | appname equ 'Doc Pack' |
|
25 | use32 |
25 | use32 |
26 | org 0x0 |
26 | org 0x0 |
27 | db 'MENUET01' ; 8 byte id |
27 | db 'MENUET01' ; 8 byte id |
28 | dd 0x01 ; header version |
28 | dd 0x01 ; header version |
29 | dd start ; start of code |
29 | dd start ; start of code |
Line 83... | Line 83... | ||
83 | .close: |
83 | .close: |
84 | mcall -1 |
84 | mcall -1 |
Line 85... | Line 85... | ||
85 | 85 | ||
86 | red: |
86 | red: |
- | 87 | mov [my_param],'a' |
|
- | 88 | ||
- | 89 | mov eax,48 |
|
- | 90 | mov ebx,3 |
|
- | 91 | mov ecx,sc |
|
- | 92 | mov edx,sizeof.system_colors |
|
- | 93 | int 0x40 |
|
87 | mov [my_param],'a' |
94 | |
- | 95 | mcall 12,1 |
|
- | 96 | ||
- | 97 | xor eax,eax |
|
88 | mcall 12,1 |
98 | mov ebx,220*65536+120 |
- | 99 | mov ecx,30*65536+FILECOUNT*16+35 |
|
89 | mcall 0,<220,120>,<30,FILECOUNT*16+35>,0x3b0b0b0 |
100 | mov edx,[sc.work] |
- | 101 | or edx,0x33000000 |
|
- | 102 | mov edi,header |
|
- | 103 | int 0x40 |
|
90 | mcall 4,<8,8>,0x10ffffff,title,titlen-title |
104 | |
91 | mov ecx,FILECOUNT |
105 | mov ecx,FILECOUNT |
92 | mov ebx,10 shl 16+100 |
106 | mov ebx,5 shl 16+100 |
93 | mov esi,0xb0b0b0 |
107 | mov esi,[sc.work_button] |
94 | mov edi,27 shl 16+14 |
108 | mov edi,5 shl 16+14 |
95 | mov edx,10 |
109 | mov edx,10 |
96 | mov eax,8 |
110 | mov eax,8 |
97 | .btnlp: |
111 | .btnlp: |
98 | push ecx |
112 | push ecx |
Line 102... | Line 116... | ||
102 | pop ecx |
116 | pop ecx |
103 | loop .btnlp |
117 | loop .btnlp |
104 | mov ecx,FILECOUNT |
118 | mov ecx,FILECOUNT |
105 | mov edx,embedded |
119 | mov edx,embedded |
106 | xor edi,edi |
120 | xor edi,edi |
107 | mov ebx,30 shl 16+30 |
121 | mov ebx,25 shl 16+8 |
108 | mov eax,4 |
122 | mov eax,4 |
109 | .list: |
123 | .list: |
110 | lea edx,[edx+edi+8] |
124 | lea edx,[edx+edi+8] |
111 | mov edi,[edx-8] |
125 | mov edi,[edx-8] |
112 | pusha |
126 | pusha |
113 | sub ebx,15 shl 16 |
127 | sub ebx,15 shl 16 |
114 | mcall ,,0xff,my_param,1 |
128 | mcall ,,0xff0000,my_param,1 |
115 | inc [my_param] |
129 | inc [my_param] |
116 | popa |
130 | popa |
117 | push ecx |
131 | push ecx |
118 | mcall ,,0xffffff,,[edx-4] |
132 | mcall ,,[sc.work_button_text],,[edx-4] |
119 | pop ecx |
133 | pop ecx |
120 | add edx,esi |
134 | add edx,esi |
121 | add ebx,16 |
135 | add ebx,16 |
122 | loop .list |
136 | loop .list |
123 | mcall 12,2 |
137 | mcall 12,2 |
Line 143... | Line 157... | ||
143 | sub ah,10-'a' |
157 | sub ah,10-'a' |
144 | .cxax: |
158 | .cxax: |
145 | movzx ecx,ah |
159 | movzx ecx,ah |
146 | jmp start.open |
160 | jmp start.open |
Line 147... | Line 161... | ||
147 | 161 | ||
148 | title db 'Doc Pack' |
- | |
Line 149... | Line 162... | ||
149 | titlen: |
162 | header db appname,0 |
150 | 163 | ||
151 | fileinfo: |
164 | fileinfo: |
152 | dd 7 |
165 | dd 7 |
Line 185... | Line 198... | ||
185 | end if |
198 | end if |
Line 186... | Line 199... | ||
186 | 199 | ||
187 | my_param db 0 |
200 | my_param db 0 |
188 | rb 256 |
201 | rb 256 |
- | 202 | I_END: |
|
- | 203 |