Rev 1566 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 1566 | Rev 1677 | ||
|---|---|---|---|
| Line 1... | Line 1... | ||
| 1 | ;;===Pause_mode================================================================================================================ |
1 | ;;===Pause_mode================================================================================================================ |
| Line 2... | Line 2... | ||
| 2 | 2 | ||
| Line -... | Line 3... | ||
| - | 3 | Pause_mode: |
|
| 3 | Pause_mode: |
4 | |
| 4 | 5 | mcall 66,1,1 ; set scan codes mode for keyboard |
|
| 5 | call Show_cursor |
6 | call Show_cursor |
| 6 | mov [action], 0 |
7 | mov [action], 0 |
| Line 7... | Line 8... | ||
| 7 | mov eax, [time_wait_limit] |
8 | mov eax, [time_wait_limit] |
| - | 9 | mov [time_to_wait], eax |
|
| 8 | mov [time_to_wait], eax |
10 | |
| 9 | - | ||
| 10 | .redraw: |
- | |
| 11 | mcall 12,1 |
- | |
| 12 | mov ebx, [wp_x] |
- | |
| 13 | shl ebx, 16 |
- | |
| 14 | add ebx, dword[window_width] |
- | |
| 15 | mov ecx, [wp_y] |
11 | .redraw: |
| Line 16... | Line 12... | ||
| 16 | shl ecx, 16 |
12 | call Set_geometry |
| 17 | add ecx, dword[window_height] |
13 | mcall 12,1 |
| 18 | mcall 0, , ,[window_style], ,window_title |
14 | mcall 0, , ,[window_style], ,window_title |
| Line 44... | Line 40... | ||
| 44 | 40 | ||
| 45 | 41 | ||
| Line 46... | Line 42... | ||
| 46 | .key: ; a key was pressed |
42 | .key: ; a key was pressed |
| 47 | mcall 2 ; get keycode |
43 | mcall 2 ; get keycode |
| 48 | 44 | ||
| 49 | cmp ah, 0x1B ; Escape - go to menu |
45 | cmp ah, 0x01 ; Escape - go to menu |
| - | 46 | je First_menu |
|
| - | 47 | cmp ah, 0x39 ; Space - resume game |
|
| - | 48 | je Level_body |
|
| - | 49 | cmp ah, [shortcut_increase] |
|
| - | 50 | jne @f |
|
| - | 51 | call Increase_geometry |
|
| - | 52 | jmp .redraw |
|
| - | 53 | @@: |
|
| - | 54 | cmp ah, [shortcut_decrease] |
|
| - | 55 | jne @f |
|
| Line 50... | Line 56... | ||
| 50 | je First_menu |
56 | call Decrease_geometry |
| Line 51... | Line 57... | ||
| 51 | cmp ah, 0x20 ; Space - resume game |
57 | jmp .redraw |