MUX 4-1

Здравствуйте. Помогите, пожалуйста! У меня есть код программы, реализующей работу мультплексора 4-1. Мне нужно добовить туда ещё и вход разрешения!!! Т.е. просто вывести строку "Разрешить работу - нажмите 1, запретить - нажмите 0" и соответственно, чтобы это и выполнялось. Текс программы, как уже понятно, составлял не я.
Ассемблирование в TASM. Русские буквы закодированы в OEM

[highlight=asm]
.model tiny
.386
.code
org 100h
start:
lea dx,mess
mov ax,0900h
int 21h

m1:mov cl,00h
lea dx,adr
call zapr
mov bl,al
mov cl,01h
lea dx,adr
call zapr
mov bh,al
cmp bh,31h
je m2
cmp bl,31h
je m3

mov cx,04 ;а*Ў®в*Ґв 1 ўе®¤ ¬
c1:
lea dx,inf
sub cl,01
call zapr
add cl,01
cmp cx,1
je p1
jmp p2
p1: push ax
p2:loop c1
jmp k


m3:
mov cx,04 ;а*Ў®в*Ґв 2 ўе®¤ ¬
c2:
lea dx,inf
sub cl,01
call zapr
add cl,01
cmp cx,2
je p3
jmp p4
p3: push ax
p4:loop c2
jmp k


m2:
cmp bl,31h
je m4
mov cx,04 ;а*Ў®в*Ґв 3 ўе®¤ ¬
c3:
lea dx,inf
sub cl,01
call zapr
add cl,01
cmp cx,3
je p5
jmp p6
p5: push ax
p6:loop c3
jmp k


m4:
mov cx,04 ;а*Ў®в*Ґв 4 ўе®¤ ¬
c4:
lea dx,inf
sub cl,01
call zapr
add cl,01
cmp cx,4
je p7
jmp p8
p7: push ax
p8:loop c4


k:lea dx,itg
mov ax,0900h
int 21h
pop cx
mov dl,cl
mov ah,02
int 21h
lea dx,vih
mov ah,09
int 21h
mov ah,01
int 21h
cmp al,51h
je ko
jmp m1
ko:int 20h


mess db ' Џа®Ја*¬¬* ¬®¤Ґ«Ёагой*п а*Ў®вг ¬г«мвЁЇ«ҐЄб®а* $'
adr db 13,10,' ‚ўҐ¤ЁвҐ §**зҐ*ЁҐ *¤аҐб*®Ј® ўе®¤* Ї®¤ *®¬Ґа®¬ $'
inf db 13,10,' ‚ўҐ¤ЁвҐ §**зҐ*ЁҐ Ё*д®а¬*жЁ®*®Ј® ўе®¤* Ї®¤ *®¬Ґа®¬ $'
itg db 13,10,'----‡**зҐ*ЁҐ ўл室* ¬г«мвЁЇ«ҐЄб®а* а*ў*® $'
me db 13,10,' ‚ўҐ¤ЁвҐ 0 Ё«Ё 1 ',13,10,'$'
vih db 13,10,'** ** ** ** „«п ўл室* **¦¬ЁвҐ Q, ¤«п Їа®¤®«¦Ґ*Ёп «оЎго ¤агЈго Є«*ўЁиг$'
pro db ': $'



zapr proc
mov ah,09
int 21h
mov dl,cl
mov ah,02
add dl,30h
int 21h

lea dx,pro
mov ah,09
int 21h

mp3:
mov ah,01
int 21h
cmp al,31h
ja mp1
jmp mp2
mp1:mov ah,09
lea dx,me
int 21h
jmp mp3
mp2:ret
zapr endp

end start
[/highlight]

Помогите!!! Вся надежда на профессионалов!