senseless upgrade in useless application

git-svn-id: svn://kolibrios.org@1247 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Evgeny Grechnikov (Diamond) 2009-11-05 20:27:56 +00:00
parent c4874ac302
commit 1c03f9f1e4

View File

@ -41,13 +41,14 @@ still:
read_input: read_input:
mcall 42,4,text+120*80
push ecx test eax, eax
mov eax,42 jle still
mov ebx,4
mcall read_input_loop:
pop ecx mov bl,[ecx]
inc ecx
push eax ecx
cmp bl,27 ; ESCAPE COMMAND cmp bl,27 ; ESCAPE COMMAND
jne no_esc jne no_esc
call esc_command call esc_command
@ -120,10 +121,9 @@ read_input:
noeaxz: noeaxz:
mov [pos],eax mov [pos],eax
newdata: newdata:
mov eax,11 pop ecx eax
mcall dec eax
cmp eax,16+4 jnz read_input_loop
je read_input
call draw_text call draw_text
jmp still jmp still
@ -161,10 +161,8 @@ read_input:
jmp still jmp still
noaleft: noaleft:
modem_out: modem_out:
mov ecx,0x3f8 mov dx,0x3f8
mov bl,al out dx,al
mov eax,43
mcall
jmp still jmp still
button: ; BUTTON button: ; BUTTON
@ -205,10 +203,8 @@ to_modem:
pusha pusha
mov ecx,0x3f8 mov dx,0x3f8
mov ebx,eax out dx,al
mov eax,43
mcall
mov eax,5 mov eax,5
mov ebx,5 mov ebx,5
mcall mcall
@ -281,35 +277,29 @@ set_variables:
; jmp noportint ; jmp noportint
mov cx,0x3f8+3 mov dx,0x3f8+3
mov bl,0x80 mov al,0x80
mov eax,43 out dx,al
mcall
mov cx,0x3f8+1 mov dx,0x3f8+1
mov bl,0 mov al,0
mov eax,43 out dx,al
mcall
mov cx,0x3f8+0 mov dx,0x3f8+0
mov bl,0x30 / 16 mov al,0x30 / 16
mov eax,43 out dx,al
mcall
mov cx,0x3f8+3 mov dx,0x3f8+3
mov bl,3 mov al,3
mov eax,43 out dx,al
mcall
mov cx,0x3f8+4 mov dx,0x3f8+4
mov bl,0xB mov al,0xB
mov eax,43 out dx,al
mcall
mov cx,0x3f8+1 mov dx,0x3f8+1
mov bl,1 mov al,1
mov eax,43 out dx,al
mcall
noportint: noportint:
@ -735,4 +725,3 @@ db ' '
db ' ' db ' '
I_END: I_END: