Rev 1728 | Rev 2552 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 1728 | Rev 2095 | ||
---|---|---|---|
Line 17... | Line 17... | ||
17 | dd STARTAPP ; program start |
17 | dd STARTAPP ; program start |
18 | dd I_END ; program image size |
18 | dd I_END ; program image size |
19 | dd 0x100000 ; required amount of memory |
19 | dd 0x100000 ; required amount of memory |
20 | dd 0x00000000 ; reserved=no extended header |
20 | dd 0x00000000 ; reserved=no extended header |
Line -... | Line 21... | ||
- | 21 | ||
21 | 22 | include '../../../macros.inc' |
|
22 | include "aspapi.inc" |
23 | include "aspapi.inc" |
23 | SCREEN_WIDTH equ 320 |
24 | SCREEN_WIDTH equ 320 |
24 | SCREEN_HEIGHT equ 200 |
25 | SCREEN_HEIGHT equ 200 |
25 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
26 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
Line 158... | Line 159... | ||
158 | 159 | ||
Line 159... | Line 160... | ||
159 | jmp MAIN |
160 | jmp MAIN |
- | 161 | ||
160 | 162 | ||
161 | 163 | red: |
|
- | 164 | mcall 9,proc_info,-1 |
|
- | 165 | draw_window |
|
162 | red: |
166 | MAIN: |
163 | draw_window |
167 | test [proc_info.wnd_state], 0x04 |
164 | MAIN: |
168 | jnz still |
165 | mov ecx, NUM_PARTS |
169 | mov ecx, NUM_PARTS |
166 | mov ebp, particles |
170 | mov ebp, particles |
Line 361... | Line 365... | ||
361 | ; x, y, x_speed, y_speed, color |
365 | ; x, y, x_speed, y_speed, color |
362 | particles: times NUM_PARTS dd 0, 0, 0, 0, 0 |
366 | particles: times NUM_PARTS dd 0, 0, 0, 0, 0 |
363 | blur_right_flag: dd 0 |
367 | blur_right_flag: dd 0 |
364 | ;include 'Dex.inc' |
368 | ;include 'Dex.inc' |
365 | I_END: |
369 | I_END: |
- | 370 | proc_info process_information |
|
366 | pal rb 256*4 ;dup(0) |
371 | pal rb 256*4 ;dup(0) |
367 | ;pal dd 256 dup(0) |
372 | ;pal dd 256 dup(0) |
368 | ;buffer rb 1024*64 |
373 | ;buffer rb 1024*64 |
369 | buffer rb SCREEN_WIDTH*SCREEN_HEIGHT |
374 | buffer rb SCREEN_WIDTH*SCREEN_HEIGHT |