Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 2060 → Rev 2061

/programs/games/snake/trunk/first_menu.asm
19,14 → 19,15
call Set_geometry
mcall 12,1
mcall 0, , ,[window_style], ,window_title
test [proc_info.wnd_state], 0x04 ; is rolled up?
jnz @f
 
call Draw_decorations
call Draw_first_menu_picture
call Draw_menu_strings
call Draw_buttons
 
@@:
mcall 12,2
 
.still:
mcall 10 ; wait for event
; ok, what an event?
/programs/games/snake/trunk/game_over.asm
36,13 → 36,14
call Set_geometry
mcall 12,1
mcall 0, , ,[window_style], ,window_title
test [proc_info.wnd_state], 0x04 ; is rolled up?
jnz @f
 
call Draw_decorations
call Draw_game_over_picture
call Draw_game_over_strings ; edit_box is here
 
mcall 12,2
 
@@:
.still:
mcall 10 ; wait for event
; ok, what an event?
/programs/games/snake/trunk/level.asm
19,6 → 19,8
call Set_geometry
mcall 12,1
mcall 0, , ,[window_style], ,window_title
test [proc_info.wnd_state], 0x04 ; is rolled up?
jnz Pause_mode
call Draw_decorations
call Draw_stones
25,7 → 27,6
call Draw_snake
call Draw_eat
call Draw_level_strings
 
mcall 12,2
.still:
/programs/games/snake/trunk/pause.asm
12,14 → 12,14
call Set_geometry
mcall 12,1
mcall 0, , ,[window_style], ,window_title
test [proc_info.wnd_state], 0x04 ; is rolled up?
jnz @f
 
call Draw_decorations
call Draw_pause_picture
call Draw_pause_strings
 
mcall 12,2
@@:
.still:
mcall 10 ; wait for event
; ok, what an event?
/programs/games/snake/trunk/snake.asm
12,7 → 12,7
include '../../../system/launch/trunk/mem.inc'
include '../../../develop/libraries/libs-dev/.test/dll.inc'
include '../../../develop/libraries/box_lib/trunk/box_lib.mac'
include '../../../system/board/trunk/debug.inc'
;include '../../../system/board/trunk/debug.inc'
 
;;===Define_chapter============================================================================================================
 
188,7 → 188,7
 
mov eax, WINDOW_MODE_WINDOWED
call Set_window_mode
mcall 0,0,0,0x51000000 ; create empty window. Set_geometry will set all parameters
mcall 0,0,0,[window_style_windowed] ; create empty window. Set_geometry will set all parameters
call Set_geometry.by_hotkey
mcall 71,1,window_title
 
249,7 → 249,15
jnz .by_hotkey
 
mcall 9,proc_info,-1
test [proc_info.wnd_state], 0x04 ; is rolled up?
jz @f
mov eax, [proc_info.box.width]
mov [window_width], eax
mov eax, [proc_info.box.height]
mov [window_height], eax
jmp .quit
@@:
mov eax, [proc_info.box.width]
cmp eax, [window_width]
jne @f
mov eax, [proc_info.box.height]
328,7 → 336,14
.by_hotkey:
mcall 9,proc_info,-1
mov [resized_by_hotkey], 0
 
test [proc_info.wnd_state], 0x04 ; is rolled up?
jz @f
mov eax, [proc_info.box.width]
mov [window_width], eax
mov eax, [proc_info.box.height]
mov [window_height], eax
jmp .quit
@@:
mov eax, [square_side_length]
inc eax ; space between squares
mov [g_s], eax