PROGRAMA #3: Pe04_hol.
FUNCION : ESCRITURA DE 3 FRASES EN PANTALLA ECHA CON PROCEDIMIENTOS
REALIZADO POR : Jose Juan Muñiz Hernandez
-----------------------------------------------------------------------------------------------------------------------
LF EQU 10 ; salto de linea
DATOS SEGMENT ; Inicio del segmento de datos
MENSAJE1 DB CR,LF,'Jose Hdz ',CR,LF,'$'
MENSAJE2 DB 'carrera iNG. SISTEMAS COMPUTACIONALES',CR,LF,'$'
MENSAJE3 DB '7 SEMESTRE ',CR,LF,'$'
DATOS ENDS ; Fin del segmento de datos
-----------------------------------------------------------------------------
DECLARACION DEL SEGMENTO DE PILA
DECLARACION DEL SEGMENTO DE PILA
------------------------------------------------------------
PILA SEGMENT STACK ; Inicio del segmento de pila
DB 64 DUP('PILA') ; Inicialización de la pila
PILA ENDS ; Fin del segmento de pila
---------------------------------------------------------------------------
; DECLARACION DEL SEGMENTO DE CODIGO
------------------------------------------------------------------
CODIGO SEGMENT ; Inicio del segmento de código
Pe04_hol PROC FAR ; Inicio procedimiento Pee2_letreros
ASSUME CS:CODIGO,DS:DATOS,SS:PILA ; Asignar segmentos
MOV AX,DATOS ; AX=Dirección del segmento de datos
MOV DS,AX ; DS=AX. Indicar el segmento de datos
LEA DX,MENSAJE1
CALL ESCRIBE
LEA DX,MENSAJE2
CALL ESCRIBE
LEA DX,MENSAJE3
CALL ESCRIBE
MOV AX,4C00H ; Función para terminar el programa
INT 21H
Pe04_hol ENDP
ESCRIBE PROC
MOV AH,9 ; función DOS escribe el texto en la pantalla
INT 21H ; interrupcion
RET ; Retorna donde se quedo
ESCRIBE ENDP
CODIGO ENDS
END Pe04_hol
CODIGO SEGMENT ; Inicio del segmento de código
Pe04_hol PROC FAR ; Inicio procedimiento Pee2_letreros
ASSUME CS:CODIGO,DS:DATOS,SS:PILA ; Asignar segmentos
MOV AX,DATOS ; AX=Dirección del segmento de datos
MOV DS,AX ; DS=AX. Indicar el segmento de datos
LEA DX,MENSAJE1
CALL ESCRIBE
LEA DX,MENSAJE2
CALL ESCRIBE
LEA DX,MENSAJE3
CALL ESCRIBE
MOV AX,4C00H ; Función para terminar el programa
INT 21H
Pe04_hol ENDP
ESCRIBE PROC
MOV AH,9 ; función DOS escribe el texto en la pantalla
INT 21H ; interrupcion
RET ; Retorna donde se quedo
ESCRIBE ENDP
CODIGO ENDS
END Pe04_hol
0 comentarios:
Publicar un comentario