Programa 6 -Posicion del cursor-

PILA SEGMENT STACK
    DW 100 DUP('0')
   
PILA ENDS

CODIGO SEGMENT
    PC PROC FAR
    ASSUME CS:CODIGO, DS:DATOS, SS:PILA
    MOV AX,DATOS
    MOV DS, AX
    LEA DX, MENSAJE
    CALL POSICION_CURSOR
    MOV AH, IMPRIMIR_9
    INT DOS_21H
    MOV AX, FIN_4C00H
    INT DOS_21H
   
    PC ENDP
    POSICION_CURSOR PROC NEAR
    MOV AH,02
    MOV BH, 00
    MOV DH, RENGLON
    MOV DL, COLUMNA
    INT BIOS_10H
    RET
    POSICION_CURSOR ENDP

CODIGO ENDS
END PC