Rev 485 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 485 | Rev 1247 | ||
---|---|---|---|
Line 39... | Line 39... | ||
39 | 39 | ||
Line 40... | Line 40... | ||
40 | jmp still |
40 | jmp still |
- | 41 | ||
- | 42 | ||
- | 43 | read_input: |
|
41 | 44 | mcall 42,4,text+120*80 |
|
42 | 45 | test eax, eax |
|
43 | read_input: |
46 | jle still |
44 | 47 | ||
45 | push ecx |
- | |
46 | mov eax,42 |
48 | read_input_loop: |
47 | mov ebx,4 |
- | |
48 | mcall |
49 | mov bl,[ecx] |
49 | pop ecx |
50 | inc ecx |
50 | 51 | push eax ecx |
|
51 | cmp bl,27 ; ESCAPE COMMAND |
52 | cmp bl,27 ; ESCAPE COMMAND |
52 | jne no_esc |
53 | jne no_esc |
Line 118... | Line 119... | ||
118 | mov eax,ebx |
119 | mov eax,ebx |
119 | sub eax,80 |
120 | sub eax,80 |
120 | noeaxz: |
121 | noeaxz: |
121 | mov [pos],eax |
122 | mov [pos],eax |
122 | newdata: |
123 | newdata: |
123 | mov eax,11 |
124 | pop ecx eax |
124 | mcall |
- | |
125 | cmp eax,16+4 |
125 | dec eax |
126 | je read_input |
126 | jnz read_input_loop |
127 | call draw_text |
127 | call draw_text |
128 | jmp still |
128 | jmp still |
Line 129... | Line 129... | ||
129 | 129 | ||
Line 159... | Line 159... | ||
159 | mov al,'D' |
159 | mov al,'D' |
160 | call arrow |
160 | call arrow |
161 | jmp still |
161 | jmp still |
162 | noaleft: |
162 | noaleft: |
163 | modem_out: |
163 | modem_out: |
164 | mov ecx,0x3f8 |
164 | mov dx,0x3f8 |
165 | mov bl,al |
165 | out dx,al |
166 | mov eax,43 |
- | |
167 | mcall |
- | |
168 | jmp still |
166 | jmp still |
Line 169... | Line 167... | ||
169 | 167 | ||
170 | button: ; BUTTON |
168 | button: ; BUTTON |
171 | mov eax,17 |
169 | mov eax,17 |
Line 203... | Line 201... | ||
203 | 201 | ||
Line 204... | Line 202... | ||
204 | to_modem: |
202 | to_modem: |
Line 205... | Line 203... | ||
205 | 203 | ||
206 | pusha |
204 | pusha |
207 | - | ||
208 | mov ecx,0x3f8 |
- | |
209 | mov ebx,eax |
205 | |
210 | mov eax,43 |
206 | mov dx,0x3f8 |
211 | mcall |
207 | out dx,al |
Line 212... | Line 208... | ||
212 | mov eax,5 |
208 | mov eax,5 |
Line 279... | Line 275... | ||
279 | mov ecx,4 |
275 | mov ecx,4 |
280 | mcall |
276 | mcall |
Line 281... | Line 277... | ||
281 | 277 | ||
Line 282... | Line 278... | ||
282 | ; jmp noportint |
278 | ; jmp noportint |
283 | 279 | ||
284 | mov cx,0x3f8+3 |
280 | mov dx,0x3f8+3 |
285 | mov bl,0x80 |
- | |
286 | mov eax,43 |
281 | mov al,0x80 |
287 | mcall |
282 | out dx,al |
288 | 283 | ||
289 | mov cx,0x3f8+1 |
284 | mov dx,0x3f8+1 |
290 | mov bl,0 |
- | |
291 | mov eax,43 |
285 | mov al,0 |
292 | mcall |
286 | out dx,al |
293 | 287 | ||
294 | mov cx,0x3f8+0 |
288 | mov dx,0x3f8+0 |
295 | mov bl,0x30 / 16 |
- | |
296 | mov eax,43 |
289 | mov al,0x30 / 16 |
297 | mcall |
290 | out dx,al |
298 | 291 | ||
299 | mov cx,0x3f8+3 |
292 | mov dx,0x3f8+3 |
300 | mov bl,3 |
- | |
301 | mov eax,43 |
293 | mov al,3 |
302 | mcall |
294 | out dx,al |
303 | 295 | ||
304 | mov cx,0x3f8+4 |
296 | mov dx,0x3f8+4 |
305 | mov bl,0xB |
- | |
306 | mov eax,43 |
297 | mov al,0xB |
307 | mcall |
298 | out dx,al |
308 | 299 | ||
309 | mov cx,0x3f8+1 |
300 | mov dx,0x3f8+1 |
310 | mov bl,1 |
- | |
Line 311... | Line 301... | ||
311 | mov eax,43 |
301 | mov al,1 |
Line 312... | Line 302... | ||
312 | mcall |
302 | out dx,al |
313 | 303 | ||
Line 733... | Line 723... | ||
733 | db ' ' |
723 | db ' ' |
734 | db ' ' |
724 | db ' ' |
735 | db ' ' |
725 | db ' ' |
Line 736... | Line 726... | ||
736 | 726 | ||
737 | I_END: |
- | |
738 | 727 | I_END: |