.model small
.stack
.data
  x db 10011010b
.code
.startup
       mov dl,x
       mov cl,4
       shr dl,cl
       call disp
       mov dl,x
       and dl,0fh
       call disp
       mov ah,4ch
       int 21h
.exit 0
disp   proc
       push dx
       add dl,30h
       cmp dl,'9'
       jbe next
       add dl,7
next:  mov ah,2
       int 21h
       pop dx
       ret
disp   endp
end