.model medium,basic
.stack 10h
.386
.code
public gswait
gswait proc
push bp
mov bp,sp
mov cx,[bp+6]
mov dx,3dah
l1:
in al,dx
and al,8
jnz l1
l2:
in al,dx
and al,8
jz l2
loop l1
pop bp
ret 2
gswait endp
end
