0,0 → 1,80 |
;;===Pause_mode================================================================================================================ |
|
Pause_mode: |
|
mov [action], 0 |
mov eax, [time_wait_limit] |
mov [time_to_wait], eax |
|
Pause_Redraw_window: |
mcall 12,1 |
mcall 0,200*65536+WINDOW_WIDTH,326*65536+WINDOW_HEIGHT,[window_style], ,window_title |
|
call Draw_decorations |
call Draw_pause_picture |
call Draw_pause_strings |
|
mcall 12,2 |
|
|
Pause_Wait_for_event: |
mcall 10 ; wait for event |
; ok, what an event? |
dec al ; has the window been moved or resized? |
jz Pause_Redraw_window |
dec al ; was a key pressed? |
jz Pause_Is_key |
|
|
Pause_Is_button: ; a button was pressed |
mcall 17 ; get button number |
shr eax, 8 ; we should do it to get the real button code |
|
cmp eax, 1 |
je Exit |
|
jmp Pause_Wait_for_event |
|
|
Pause_Is_key: ; a key was pressed |
mcall 2 ; get keycode |
|
cmp ah, 0x1B ; Escape - go to menu |
je First_menu |
cmp ah, 0x20 ; Space - resume game |
je Level_body |
|
jmp Pause_Wait_for_event |
|
;;---Pause_mode---------------------------------------------------------------------------------------------------------------- |
|
|
;;===Some_functions============================================================================================================ |
|
Draw_pause_picture: |
;;===Draw_pause_picture======================================================================================================== |
|
mov al, 6 |
mov bh, 2 |
mov ecx, picture_pause |
mov edx, [pause_picture_color] |
call Draw_picture |
|
ret |
|
;;---Draw_pause_picture-------------------------------------------------------------------------------------------------------- |
|
|
Draw_pause_strings: |
;;===Draw_pause_strings================================================================================================ |
|
mcall 4,219*65536+BOTTOM_MIDDLE_STRINGS,[navigation_strings_color],string_resume_space ; Show 'RESUME - SPACE' string |
|
call Draw_menu_esc ; Show 'MENU - ESC' string |
|
|
ret |
|
;;---Draw_pause_strings------------------------------------------------------------------------------------------------ |
|
;;---Some_functions------------------------------------------------------------------------------------------------------------ |