	assume cs:_text
_text	segment public byte 'code'
	public _jzinkey

_jzinkey   proc near

	push bp
	mov bp,sp
	mov ah,0
	int 16h 	; get scan code
	push ax
	pop cx		; save scan in cx
	xchg ah,al
	mov ah,0
	mov bx,[bp+4]
	mov [bx],ax
	mov al,cl
	mov sp,bp
	pop bp
	ret
_jzinkey   endp
_text	ends
end
