assem / задачи на экзамен / 20

20. Написать процедуру проверки готовности устройства с адресом порта 200h. Для проверки необходимо: установить 0 и 2 биты: инвертировать 1 и 6 биты; сбросить 3 и 4 биты; затем инвертировать все значения и проверить установку 7 и 1 бита. При выполнении условий дать сообщение.
model small
data_sg segment
mes db "YES",'$'
.stack 100h
data_sg ends
code_sg segment
assume cs:code_sg, ds:data_sg
gulko proc
in ax,200h
or ax,0005h
xor ax,042h
and ax,0ffe7h
not ax
mov cx,ax
and cx,082h
cmp cx,082h
jne m1
mov ah,09h
mov dx,offset mes
int 21h
m1:
ret
gulko endp
start:
mov ax,data_sg
mov ds,ax
call sergey
mov ax,4c00h
int 21h
ret
code_sg ends
end start