Rev 3427 | Rev 3469 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 3427 | Rev 3463 | ||
---|---|---|---|
Line 94... | Line 94... | ||
94 | c_start_y = 10 |
94 | c_start_y = 10 |
Line 95... | Line 95... | ||
95 | 95 | ||
96 | c_size_x = 40 |
96 | c_size_x = 40 |
97 | c_size_y = 20 |
97 | c_size_y = 20 |
98 | ;--------------------------------------------------------------------- |
- | |
- | 98 | ;--------------------------------------------------------------------- |
|
- | 99 | x_minimal_size equ 350 |
|
- | 100 | y_minimal_size equ 250 |
|
99 | 101 | ;--------------------------------------------------------------------- |
|
100 | START: |
102 | START: |
101 | mcall 68,11 |
103 | mcall 68,11 |
102 | mcall 66,1,1 |
104 | mcall 66,1,1 |
103 | mcall 40,0x27 |
105 | mcall 40,0x27 |
Line 178... | Line 180... | ||
178 | and eax,0xffff |
180 | and eax,0xffff |
179 | ; dps "CD flag value: " |
181 | ; dps "CD flag value: " |
180 | ; dpd eax |
182 | ; dpd eax |
181 | ; newline |
183 | ; newline |
Line -... | Line 184... | ||
- | 184 | ||
- | 185 | call get_window_param |
|
- | 186 | mov ebx,[communication_area] |
|
- | 187 | mov ecx,procinfo |
|
- | 188 | ; mov eax,[window_x] |
|
- | 189 | mov eax,[ecx+34] |
|
- | 190 | shl eax,16 |
|
- | 191 | add eax,[ecx+42] |
|
- | 192 | mov [ebx+4],eax |
|
- | 193 | ; mov eax,[window_y] |
|
- | 194 | mov eax,[ecx+38] |
|
- | 195 | shl eax,16 |
|
- | 196 | add eax,[ecx+46] |
|
- | 197 | mov [ebx+8],eax |
|
182 | 198 | ||
183 | mcall -1 |
199 | mcall -1 |
- | 200 | ;--------------------------------------------------------------------- |
|
- | 201 | get_window_param: |
|
- | 202 | mcall 9,procinfo,-1 |
|
- | 203 | mov eax,[ebx+66] |
|
- | 204 | inc eax |
|
- | 205 | ; mov [window_high],eax |
|
- | 206 | mov eax,[ebx+62] |
|
- | 207 | inc eax |
|
- | 208 | ; mov [window_width],eax |
|
- | 209 | mov eax,[ebx+70] |
|
- | 210 | ; mov [window_status],eax |
|
- | 211 | ret |
|
184 | ;--------------------------------------------------------------------- |
212 | ;--------------------------------------------------------------------- |
185 | align 4 |
213 | align 4 |
186 | get_communication_area: |
214 | get_communication_area: |
187 | xor eax,eax |
215 | xor eax,eax |
188 | mov al,[param] |
216 | mov al,[param] |
Line 191... | Line 219... | ||
191 | mcall 68,22,param,,0x01 |
219 | mcall 68,22,param,,0x01 |
192 | mov [communication_area],eax |
220 | mov [communication_area],eax |
193 | ; movzx ebx,word [eax+2] |
221 | ; movzx ebx,word [eax+2] |
194 | ; mov [color_dialog_type],ebx |
222 | ; mov [color_dialog_type],ebx |
Line 195... | Line 223... | ||
195 | 223 | ||
196 | ; mov ebx,[eax+4] |
224 | mov ebx,[eax+4] |
197 | ; cmp bx,word x_minimal_size ;300 |
225 | cmp bx,word x_minimal_size ;300 |
198 | ; jb @f |
226 | jb @f |
199 | ; mov [window_x],ebx |
227 | mov [window_x],ebx |
200 | ; mov ebx,[eax+8] |
228 | mov ebx,[eax+8] |
201 | ; cmp bx,word y_minimal_size ;200 |
229 | cmp bx,word y_minimal_size ;200 |
202 | ; jb @f |
230 | jb @f |
203 | ; mov [window_y],ebx |
231 | mov [window_y],ebx |
204 | @@: |
232 | @@: |
205 | ret |
233 | ret |
206 | ;--------------------------------------------------------------------- |
234 | ;--------------------------------------------------------------------- |
207 | align 4 |
235 | align 4 |
Line 252... | Line 280... | ||
252 | align 4 |
280 | align 4 |
253 | color_button: |
281 | color_button: |
254 | mov eax,[communication_area] |
282 | mov eax,[communication_area] |
255 | mov [eax],word 1 |
283 | mov [eax],word 1 |
256 | mov ebx,[selected_color] |
284 | mov ebx,[selected_color] |
- | 285 | and ebx,0xffffff |
|
257 | mov [eax+20],ebx |
286 | mov [eax+20],ebx |
258 | ; dps "CD flag value: OK " |
287 | ; dps "CD flag value: OK " |
259 | jmp button.exit_1 |
288 | jmp button.exit_1 |
260 | ;--------------------------------------------------------------------- |
289 | ;--------------------------------------------------------------------- |
261 | align 4 |
290 | align 4 |
Line 281... | Line 310... | ||
281 | ret |
310 | ret |
282 | ;--------------------------------------------------------------------- |
311 | ;--------------------------------------------------------------------- |
283 | align 4 |
312 | align 4 |
284 | draw_window: |
313 | draw_window: |
285 | mcall 12,1 |
314 | mcall 12,1 |
286 | mcall 0, |
315 | ; mcall 0, |
- | 316 | mcall 0,[window_x],[window_y], 0x33AABBCC,,title |
|
287 | mcall 8, |
317 | mcall 8, |
288 | mcall , |
318 | mcall , |
289 | mcall 65,[palette_area],<[palette_SIZE_X],[palette_SIZE_Y]>, |
319 | mcall 65,[palette_area],<[palette_SIZE_X],[palette_SIZE_Y]>, |
290 | call draw_tone |
320 | call draw_tone |
291 | call draw_selected_color |
321 | call draw_selected_color |