Programa #4

;=====================================================================

 ; PROGRAMA #4:  : pe06_cls

 ; FUNCION : LIMPIAR PANTALLA

 ; REALIZADO POR : Yesenia Lizbeth Guerrero Garcia

 ; FECHA : Miércoles 29 marzo 2017

;======================================================================

FIN_4C00H EQU 4C00H

DOS_21H EQU 21H

BIOS_10H EQU 10H

;====================================

; DECLARACION DEL SEGMENTO DE PILA

;====================================

    PILA SEGMENT STACK

    DW 100 DUP('0')

    PILA ENDS

;======================================

; DECLARACION DEL SEGMENTO DE CODIGO

;======================================

     CODIGO SEGMENT

 pe06_cls PROC FAR                     ; Inicio procedimiento pe06_cls

 ASSUME CS:CODIGO,SS:PILA

 CALL LIMPIA_PANTALLA              ; Llama a procedimiento par limpiar pantalla.

 MOV AX,FIN_4C00H                     ; Fin del programa

 INT DOS_21H

 pe06_cls ENDP                             ; Fin del procedimiento EJEMPLO

 LIMPIA_PANTALLA PROC NEAR

 MOV AX,01000H                           ; Establecer modo texto y CLS

 MOV BH,6AH                                ; Colores de fondo (negro=0) y texto (verde=A).

 MOV CX,0000H                             ; Desde el inicio de pantalla

 MOV DX,484FH                             ; Hasta el fin de la pantalla Reng (48)72 col(79)4F

 INT BIOS_10H                               ; Interrupci?n que llama al BIOS

 RET

 LIMPIA_PANTALLA ENDP

 CODIGO ENDS

 END pe06_cls