mov ax,binval_b mov b2,al
mov al,b1 or al,b2
mov word ptr rezult,ax mov word ptr rezult[2],0
call bin_bin
mov ah,09h lea dx,ascval int 21h
call cursor
mov ah,09h lea dx,soobe_1 int 21h
call cursor
mov ah,09h lea dx,soob0_3 int 21h
call cursor
vvod_f1: mov ah,0ah lea dx,namepar int 21h
xor ax,ax
lea si,namefld mov al,[si] and al,00fh mov binval,ax
cmp binval,1 je jmp_ret1 cmp binval,2 je jmp_bg1 mov ah,09h
lea dx,soobl_err int 21h
call cursor jmp vvod_f1
jmp_ret1: jmp rt
121
jmp_bg1: jmp bg ;===============================================================
f2: ;b1 xor b2
call clrscr call cursor
mov ah,09h lea dx,soobl_2 int 21h
call cursor
;b1
mov ah,09h lea dx,soob_b1 int 21h
mov ah,0ah
lea dx,namepar_b int 21h
call cursor
call ascii_binb
mov ax,binval_b mov b1,al
;b2
mov ah,09h lea dx,soob_b2 int 21h
mov ah,0ah
lea dx,namepar_b int 21h
call cursor
call ascii_binb
mov ax,binval_b mov b2,al
122
mov al,b1 xor al,b2
mov word ptr rezult,ax mov word ptr rezult[2],0
call bin_bin
mov ah,09h lea dx,ascval int 21h
call cursor
mov ah,09h lea dx,soobe_1 int 21h
call cursor
mov ah,09h lea dx,soob0_3 int 21h
call cursor
vvod_f2: mov ah,0ah lea dx,namepar int 21h
xor ax,ax
lea si,namefld mov al,[si] and al,00fh mov binval,ax
cmp binval,1 je jmp_ret2 cmp binval,2 je jmp_bg2 mov ah,09h
lea dx,soobl_err int 21h
call cursor jmp vvod_f2
jmp_ret2: jmp rt jmp_bg2: jmp bg
123
;===============================================================
f3: ;b1 and b2
call clrscr call cursor
mov ah,09h lea dx,soobl_3 int 21h
call cursor
;b1
mov ah,09h lea dx,soob_b1 int 21h
mov ah,0ah
lea dx,namepar_b int 21h
call cursor
call ascii_binb
mov ax,binval_b mov b1,al
;b2
mov ah,09h lea dx,soob_b2 int 21h
mov ah,0ah
lea dx,namepar_b int 21h
call cursor
call ascii_binb
mov ax,binval_b mov b2,al
mov al,b1
124
and al,b2
mov word ptr rezult,ax mov word ptr rezult[2],0
call bin_bin
mov ah,09h lea dx,ascval int 21h
call cursor
mov ah,09h lea dx,soobe_1 int 21h
call cursor
mov ah,09h lea dx,soob0_3 int 21h
call cursor
vvod_f3: mov ah,0ah lea dx,namepar int 21h
xor ax,ax
lea si,namefld mov al,[si] and al,00fh mov binval,ax
cmp binval,1 je jmp_ret3 cmp binval,2 je jmp_bg3 mov ah,09h
lea dx,soobl_err int 21h
call cursor jmp vvod_f3
jmp_ret3: jmp rt jmp_bg3: jmp bg
;===============================================================
125