Rev 2029 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 2029 | Rev 2094 | ||
---|---|---|---|
Line 1... | Line 1... | ||
1 | include "lang.inc" |
1 | include "lang.inc" |
2 | include "..\..\..\macros.inc" |
2 | include "../../../macros.inc" |
Line 3... | Line 3... | ||
3 | 3 | ||
4 | WND_SIZE_X = 320 |
4 | WND_SIZE_X = 320 |
Line 5... | Line 5... | ||
5 | WND_SIZE_Y = 200 |
5 | WND_SIZE_Y = 200 |
Line 30... | Line 30... | ||
30 | 30 | ||
31 | or eax,-1 |
31 | or eax,-1 |
Line 32... | Line 32... | ||
32 | mcall |
32 | mcall |
- | 33 | ||
- | 34 | .draw_screen: |
|
33 | 35 | test [proc_info.wnd_state], 0x04 |
|
34 | .draw_screen: |
36 | jnz .event_loop |
35 | add word [ver_counter],VC_DELTA |
37 | add word [ver_counter],VC_DELTA |
36 | add word [hor_counter],HC_DELTA |
38 | add word [hor_counter],HC_DELTA |
37 | call handle_animation |
39 | call handle_animation |
Line 41... | Line 43... | ||
41 | xor edx,edx |
43 | xor edx,edx |
42 | mcall |
44 | mcall |
43 | jmp .event_loop |
45 | jmp .event_loop |
Line 44... | Line 46... | ||
44 | 46 | ||
- | 47 | .paint_window: |
|
45 | .paint_window: |
48 | mcall 9,proc_info,-1 |
46 | mov eax,12 |
49 | mov eax,12 |
47 | mov ebx,1 |
50 | mov ebx,1 |
Line 48... | Line 51... | ||
48 | mcall |
51 | mcall |
Line 52... | Line 55... | ||
52 | mov ecx,(100 shl 16)+(WND_SIZE_Y+26) |
55 | mov ecx,(100 shl 16)+(WND_SIZE_Y+26) |
53 | mov edx,0x74000000 |
56 | mov edx,0x74000000 |
54 | mov edi,title |
57 | mov edi,title |
55 | mcall |
58 | mcall |
Line -... | Line 59... | ||
- | 59 | ||
- | 60 | test [proc_info.wnd_state], 0x04 |
|
- | 61 | jnz @f |
|
56 | 62 | ||
57 | mov eax,7 |
63 | mov eax,7 |
58 | mov ebx,virtual_screen_32 |
64 | mov ebx,virtual_screen_32 |
59 | mov ecx,(WND_SIZE_X shl 16)+WND_SIZE_Y |
65 | mov ecx,(WND_SIZE_X shl 16)+WND_SIZE_Y |
60 | xor edx,edx |
66 | xor edx,edx |
61 | mcall |
67 | mcall |
62 | 68 | @@: |
|
63 | mov eax,12 |
69 | mov eax,12 |
64 | mov ebx,2 |
70 | mov ebx,2 |
Line 65... | Line 71... | ||
65 | mcall |
71 | mcall |
Line 175... | Line 181... | ||
175 | rb 256*256 |
181 | rb 256*256 |
Line 176... | Line 182... | ||
176 | 182 | ||
177 | sinetable: |
183 | sinetable: |
Line -... | Line 184... | ||
- | 184 | rw 256 |
|
- | 185 | ||
178 | rw 256 |
186 | proc_info process_information |
179 | 187 |