Subversion Repositories Kolibri OS

Rev

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