Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 2094 → Rev 2093

/programs/demos/movback/trunk/movback.asm
1,5 → 1,5
include "lang.inc"
include "../../../macros.inc"
include "..\..\..\macros.inc"
 
WND_SIZE_X = 320
WND_SIZE_Y = 200
32,8 → 32,6
mcall
 
.draw_screen:
test [proc_info.wnd_state], 0x04
jnz .event_loop
add word [ver_counter],VC_DELTA
add word [hor_counter],HC_DELTA
call handle_animation
45,7 → 43,6
jmp .event_loop
 
.paint_window:
mcall 9,proc_info,-1
mov eax,12
mov ebx,1
mcall
57,15 → 54,12
mov edi,title
mcall
 
test [proc_info.wnd_state], 0x04
jnz @f
 
mov eax,7
mov ebx,virtual_screen_32
mov ecx,(WND_SIZE_X shl 16)+WND_SIZE_Y
xor edx,edx
mcall
@@:
 
mov eax,12
mov ebx,2
mcall
183,6 → 177,4
sinetable:
rw 256
 
proc_info process_information
 
MEOS_APP_END
MEOS_APP_END