EJEMPLO LEER DESDE TECLADO

LES DEJO EL SIGUIENTE EJEMPLO:
PARA LEER DESDE TECLADO MEDIANTE LA INTERRUPCION 21H

EJEMPLO:

title presiona cualquier tecla
.model small
.stack
.data
dato db "presiona cualquier tecla para salir$"
.code
inicio: mov ax,@data
mov ds,ax
clrscr: mov ah,06h
mov al,00h
mov bh,07h
mov cx,0000h
mov dh,24
mov dl,78
int 10h
pos: mov ah,02h
mov bh,00
mov dh,10
mov dl,20
int 10h
rotulo: mov dx,offset dato
mov ah,09h
int 21h
tecla: mov ah,07h
int 21h
salir: mov ax,4c00h
int 21h
end inicio