realizar un margen
programa que realiza un margen en lenguaje ensamblador
;Autor Hector Guaman
;URL http://yovis873.blogspot.com/
.model small; permite seleccionar el modelo de emoria
.stack 100h; reserva memoria en la pila
; declaracion de variables
.data
msg1 DB,10,13,' * * * * * * * * * * * * * * * * * * * *$',10,13
msg2 DB,10,13,' * *$',10,13
msg3 DB,10,13,' * *$',10,13
msg4 DB,10,13,' * UNIVERSIDAD TECNICA DE COTOPAXI *$',10,13
msg5 DB,10,13,' * UNIDAD ACADEMICA DE CIENCIAS *$',10,13
msg6 DB,10,13,' * DE LA INGENIERIA Y APLICADAS *$',10,13
msg7 DB,10,13,' * *$',10,13
msg8 DB,10,13,' * ALUMNO *$',10,13
msg9 DB,10,13,' * HECTOR GUAMAN *$',10,13
msg10 DB,10,13,' * *$',10,13
msg11 DB,10,13,' * CICLO *$',10,13
msg12 DB,10,13,' * SEXTO "A" SISTEMAS *$',10,13
msg13 DB,10,13,' * *$',10,13
msg14 DB,10,13,' * *$',10,13
msg15 DB,10,13,' * FECHA *$',10,13
msg16 DB,10,13,' * 30-11-2010 *$',10,13
msg17 DB,10,13,' * LATACUNGA-ECUADOR *$',10,13
msg18 DB,10,13,' * *$',10,13
msg19 DB,10,13,' * ING.CARLA CANTUÑA *$',10,13
msg20 DB,10,13,' * *$',10,13
msg21 DB,10,13,' * * * * * * * * * * * * * * * * * * * *$',10,13
;CODIGO DEL PROGRAMA
.code
inicio:
MOV AX,@data
MOV DS,AX
;imprimir el mensaje
MOV AH,9; imprimir una cadena
MOV DX,OFFSET msg1
INT 21h ; llamar a dos
MOV AH,9; imprimir una cadena
MOV DX,OFFSET msg2
INT 21h ; llamar a dos
MOV AH,9; imprimir una cadena
MOV DX,OFFSET msg3
INT 21h ; llamar a dos
MOV AH,9; imprimir una cadena
MOV DX,OFFSET msg4
INT 21h ; llamar a dos
MOV AH,9; imprimir una cadena
MOV DX,OFFSET msg5
INT 21h ; llamar a dos
MOV AH,9; imprimir una cadena
MOV DX,OFFSET msg6
INT 21h ; llamar a dos
MOV AH,9; imprimir una cadena
MOV DX,OFFSET msg7
INT 21h ; llamar a dos
MOV AH,9; imprimir una cadena
MOV DX,OFFSET msg8
INT 21h ; llamar a dos
MOV AH,9; imprimir una cadena
MOV DX,OFFSET msg9
INT 21h ; llamar a dos
MOV AH,9; imprimir una cadena
MOV DX,OFFSET msg10
INT 21h ; llamar a dos
MOV AH,9; imprimir una cadena
MOV DX,OFFSET msg11
INT 21h ; llamar a dos
MOV AH,9; imprimir una cadena
MOV DX,OFFSET msg12
INT 21h ; llamar a dos
MOV AH,9; imprimir una cadena
MOV DX,OFFSET msg13
INT 21h ; llamar a dos
MOV AH,9; imprimir una cadena
MOV DX,OFFSET msg14
INT 21h ; llamar a dos
MOV AH,9; imprimir una cadena
MOV DX,OFFSET msg15
INT 21h ; llamar a dos
MOV AH,9; imprimir una cadena
MOV DX,OFFSET msg16
INT 21h ; llamar a dos
MOV AH,9; imprimir una cadena
MOV DX,OFFSET msg17
INT 21h ; llamar a dos
MOV AH,9; imprimir una cadena
MOV DX,OFFSET msg18
INT 21h ; llamar a dos
MOV AH,9; imprimir una cadena
MOV DX,OFFSET msg19
INT 21h ; llamar a dos
MOV AH,9; imprimir una cadena
MOV DX,OFFSET msg20
INT 21h ; llamar a dos
MOV AH,9; imprimir una cadena
MOV DX,OFFSET msg21
INT 21h ; llamar a dos
MOV AH,4ch ;detengase
INT 21h ;llamar a dos
END inicio
