martes, 4 de abril de 2017

Programa #2

;======================================================================
 ; PROGRAMA #2: 4 mensajes
 ; FUNCION : ESCRITURA DE 4 FRASE EN PANTALLA
 ; REALIZADO POR : Yesenia Lizbeth Guerrero Garcia
 ; FECHA : Mi?rcoles 23 marzo 2017
;======================================================================

CR EQU 13                               ; Constante CR (Retorno de carro)
LF EQU 0Ah                             ;salto de linea


DATOS SEGMENT                  ; Inicio del segmento de datos   
  
    MENSAJE1 DB CR,LF,'Yesenia Guerrero ',CR,LF,'$'
    MENSAJE2 DB 'carrera iNG. SISTEMAS COMPUTACIONALES',CR,LF,'$'
    MENSAJE3 DB '6 SEMESTRE ',CR,LF,'$'
    MENSAJE4 DB 'CEL:8681619330 ',CR,LF,'$'

DATOS ENDS                            ; Fin del segmento de datos     

;====================================
; 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

;======================================
; DECLARACIÓN DEL SEGMENTO DE CODIGO
;======================================

    CODIGO SEGMENT             ; Inicio del segmento de c?digo
    Pee2_letreros 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
      
        LEA DX,MENSAJE4
        CALL ESCRIBE
      
  
        MOV AX,4C00H              ; Función para terminar el programa
        INT 21H         
  
  
 Pee2_letreros 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  Pee2_letreros   


No hay comentarios:

Publicar un comentario