sendkey proc　　far
;　ax=charcode

testkey proc　　far
; out:
;　　　zf=1　buff empty;
;　　　zf=0　ax=key code


getkey　proc　　far
; out:
;　　 ax=key code
; if buf empty, it will wait


bufempty proc　　far　　; test key buffer be empty or not
; out:
;　　　zf=0　not empty;　 zf=1　empty


buffull　proc　　far　　; test key buffer be full or not
; out:
;　　　zf=0　not full;　　zf=1　full