Leer datos en Lenguaje Ensamblador

Leer.asm

; Ensamblador Para 8086
; Recibir Cadenas
; http://www.ousob.com/ng/asm/ng5589f.php
; Por RedToor

.MODEL TINY
.STACK
.DATA
    VAR DB ?  ; Variable para la Entrada
.CODE
MAIN:
              ; Obtener Datos
MOV AX,@DATA  ; Direccion de DATA en AX
MOV DS, AX    ; Direccion de DATA en Data segment

                   ; Leer Entrada
MOV DX, OFFSET VAR ; Obtiene la Direccion de "VAR"
MOV AH, 3FH        ; Funcion (Read from File or Device, Using a Handle)
INT 21H            ; Ejecutar       

              ; FIN
MOV AH, 4cH   ; Terminacion de Programa con Codigo de Retorno 
INT 21H       ; Ejecutar
END MAIN      ; Terminar Funcion Principal