.model small
         .386
         .code
         org    0

chkdkey  proc   near
         mov    ax,4800h
         int    2fh
         sub    al,1
         setc   al
         mov    ah,4ch
         int    21h
chkdkey  endp
         end