Te encuentras en la páginas de Blogsperu, los resultados son los ultimos contenidos del blog. Este es un archivo temporal y puede no representar el contenido actual del mismo.

Comparte esta página:

Carta smith y stubs


Fecha Publicación: 2011-12-13T21:08:00.000-08:00

Bueno aunque esta publicacion se aleja un poco de la tematica de este blog les comparto un archivo en power point donde les explicara de manera didactica el tema de carta Smith y los stubs.
Estudien..!!!!!!!! XD
A pedido de mis compañeros FIEE-UNI 2007-I

Enlace: http://www.mediafire.com/?cle7m8g82g8rafe

Avast antivirus FREE


Fecha Publicación: 2011-12-04T11:09:00.000-08:00


Aqui le presento el Antivirus Avast Free que en mi opinión es un buen antivirus para maquinas de pocos recursos,para maquinas de menos de 1GB de ram.
Descargalo de la pagina oficial : http://files.avast.com/iavs5x/setup_av_free.exe
Para activarla introduce el siguiente serial: S65969262R9983N1147-S7BPR456

Adidas Telstar...algo de satelites


Fecha Publicación: 2011-10-12T23:39:00.000-07:00

El Adidas Telstar fue el balón de fútbol utilizado en la Copa Mundial de Fútbol de 1970 celebrada en México y en la Copa Mundial de Fútbol de 1974 de Alemania Federal. Fue el primer balón que la empresa alemana Adidas puso a disposición de la FIFA. Por primera vez, en este Mundial de 1970, se utilizó el diseño de un icosaedro truncado conformado por 20 hexágonos blancos y 12 pentágonos negros, en lugar del anterior de bandas alargadas del tipo como las de la actual pelota de voleibol. Este diseño de polígonos blancos y negros se ha convertido en una imagen clásica de un balón de fútbol. Su nombre se deriva del satélite Telstar lanzado al espacio en los años 1960 para transmisiones televisivas entre Europa y América ya que el balón guarda cierto parecido con este satélite sobre todo con los paneles solares de donde obtiene la energía.

Su diseño con 20 hexágonos blancos y 12 pentágonos negros, generó una revolución en el concepto del balón de fútbol, siendo tomado como un estándar por parte de dibujantes y caricaturistas, quienes recrean sus diseños ambientados en el fútbol, utilizando un balón con las características del Telstar. Precisamente, el logotipo de la Copa Mundial de Fútbol de 1970, es el primero en presentar en su diseño, un balón con el diseño del Telstar. A partír de este mundial, todos los logotipos de los mundiales siguientes, tenían como figura principal un balón con el diseño del Telstar. Finalmente, este diseño dejó de usarse a partír del Mundial '98 celebrado en Francia, donde el logotipo del mismo tuvo como diseño sobresaliente, un balón con el diseño de la pelota Adidas Tricolore. Esto sin embargo, no logró quitar al Telstar de su posición como diseño estándar de un balón de fútbol.

Fuente: http://es.wikipedia.org/wiki/Adidas_Telstar

Pedro Paulet


Fecha Publicación: 2011-07-02T16:33:00.000-07:00

ORGULLO DEL PERÚ---->DOODLE


Pedro Paulet Mostajo (Arequipa, Perú, 2 de julio de 1874 - Buenos Aires, Argentina, 30 de enero de 1945) fue un ingeniero peruano, pionero de la astronáutica y la era espacial. El científico Wernher von Braun lo considera, "el padre de la astronautica moderna"
Fuente:Wikipedia

Aunque el doodle no aparecio mundialmente igualmente es buen detalle de parte de Google :)
Pero si lo buscamos como google.com sí....

ARCHIVOS ASSEMBLER Microprocesadores IT134 UNI FIEE


Fecha Publicación: 2011-01-25T10:19:00.000-08:00

EMU 8086: http://www.mediafire.com/?2cycnhb2yf8ada0
MANUALES ASSEMBLER ,ESTOS SON LOS MEJORES : http://www.mediafire.com/?mw7pm1bxw8uzvud
MANUALES DE LA CLASE :http://www.mediafire.com/?7dxwyhhb9uqo385
MI MANUAL:http://www.mediafire.com/?6k283dp3gan46b6
ALGUNOS PROGRAMAS:http://www.mediafire.com/?ezleg9c6n2rwl2q
TEORIA DEL PROFESOR : http://www.mediafire.com/?3d89b9b9lwzm58j
TERCERA PRACTICA 2010-II: http://www.mediafire.com/?vsp9sh3lsh6p8d8
MIX DE ARCIHVOS Y PROBLEMAS MICROPROCESADORES:http://www.mediafire.com/?xxrl2h1ip1v5pn3
ALGUNAS MACROS:http://www.mediafire.com/?z3577iv37wc85np
ALGUNOS PROBLEMAS:http://www.mediafire.com/?2dc6kgna9czg065
PROBLEMAS DE LA BANDERA ,DE LA CANCION ,DEL SENO,ETC:http://www.mediafire.com/?22lu156pztoqvj2

Programa sacar el seno de un numero con assembler emu8086


Fecha Publicación: 2011-01-25T10:17:00.001-08:00

;NOMBRE:JOE MENDOZA ANGELES 20070100I
.model small
.stack
.data

cadena1 db 10,13,'Ingrese la parte entera$'
cadena2 db 10,13,'Ingrese la parte decimal$'
numero dw 00
num dw 00
coci1 dw 00
resi1 dw 00 ;CALCULO DEL SENO CON MAC LAURIN
coci2 dw 00
resi2 dw 00
coci3 dw 00 ;HAY QUE CAMBIAR DONDE DICEN LAS FLECHAS
pe1 dw 00 ;EL ANGULO TIENE QUE ESTAR EN RADIANES Y DE DOS CIFRAS
pd1 dw 00
coc1 dw 00 ;EJEMPLP CON EL SEN 1,29
res1 dw 00
coc2 dw 00
res2 dw 00
coc3 dw 00
nu dw 00
dpe1 dw 00
dpd1 dw 00

pe3 dw 00
pd3 dw 00

pe6 dw 00
pd6 dw 00

pe0 dw 00
pd0 dw 00
sp1 dw 00
sp2 dw 00
sp3 dw 00
st dw 00

pef dw 00
pdf dw 00

j dw 00

ptee1 dw 00
pted1 dw 00
pted1a dw 00
pted1b dw 00

imprimeca macro f

lea dx,f
mov ah,9
int 21h

endm



sacadecimal macro a,b

mov dx,a
add dx,30h
mov ah,2
int 21h
mov dx,'.'
mov ah,2
int 21h

mov ax,b
mov dx,0
mov cx,10
div cx
mov j,dx

mov dx,ax
add dx,30h
mov ah,2
int 21h



mov dx,j
add dx,30h

mov ah,2
int 21h

mov j,0

endm



divide macro pe,pd,coc
mov ax,coc
mov bx,100
mul bx
mov nu,ax; aqui tengo el cociente

mov ax,pe
mov bx,100
mul bx
add ax,pd

mov dx,0
mov bx,nu
div bx

mov coc1,ax
mov res1,dx

mov ax,res1
mov bx,10
mul bx

mov dx,0
mov bx,nu
div bx

mov coc2,ax
mov res2,dx


mov ax,res2
mov bx,10
mul bx

mov dx,0
mov bx,nu
div bx

mov coc3,ax

mov ax,coc1
mov dpe1,ax ;dpe1 entero de la division

mov ax,coc2
mov bx,10
mul bx
add ax,coc3

mov dpd1,ax ; dpd1 decimal de la division





endm



eleva macro pe,pd,poten

local lazoeleva

;calculando el numero
mov ax,pe
mov bx,100
mul bx
add ax,pd
mov numero,ax;ya tenemos el numero

mov ax,pe
mov pe1,ax



mov ax,pd
mov pd1,ax


mov cx,poten
sub cx,1


lazoeleva:




mov ax,pe1
mov bx,100
mul bx
add ax,pd1

mov num,ax
mov ax,num
mov bx,numero
mul bx

mov dx,0
mov bx,10000
div bx
mov coci1,ax
mov resi1,dx

mov ax,resi1

mov dx,0
mov bx,1000
div bx
mov coci2,ax
mov resi2,dx

mov ax,resi2

mov dx,0
mov bx,100
div bx
mov coci3,ax


mov ax,coci1
mov pe1,ax ;pe1 es la parte entera ya elevada

mov ax,coci2
mov bx,10
mul bx
add ax,coci3

mov pd1,ax ;pd1 es la parte decimal ya elevada



loop lazoeleva


endm





.code



inicio:
mov ax,data
mov ds,ax

;eleva 1,23,4; 1.23^3




;imprimeca cadena1

;mov ah,1
;int 21h

;mov ptee1,ax
;sub ptee1,30h
;imprimeca cadena2
;mov ah,1
;int 21h


;mov pted1a,ax
;sub pted1a,30h

;mov ah,1
;int 21h
;mov pted1b,ax
;sub pted1b,30h

;;mov ax,pted1
;add ax,pted1a
;mov bx,10
;mul bx
;add ax,pted1b
;mov pted1,ax



;**********

;mov dx,ptee1
;mov ah,2
;int 21h

;mov dx,pted1
; mov ah,2
;int 21h


; mov cx,ptee1
;*******

eleva 1,29,3 ;<-----------CAMBIAR PARTE ENTERA Y DECIMAL ,NO MODIFICAR EL 3

divide pe1,pd1,6

mov ax,dpe1
mov pe3,ax

mov ax,dpd1
mov pd3,ax

eleva 1,29,5 ;<-----------CAMBIAR PARTE ENTERA Y DECIMAL ,NO MODIFICAR EL 5

divide pe1,pd1,120

mov ax,dpe1
mov pe6,ax

mov ax,dpd1
mov pd6,ax

mov ax,1 ;<-------------------------CAMBIAR PARTE ENTERA
mov bx,100
mul bx
add ax,29 ;<-------------------------CAMBIAR PARTE DECIMAL
mov sp1,ax ;el numero a,bc ahora esta como abc



mov ax,pe3
mov bx,100
mul bx
add ax,pd3

mov sp2,ax





mov ax,pe6
mov bx,100
mul bx
add ax,pd6 ; RECORDAR HAY QUE REINICIAR VALORES

mov sp3,ax







;aca ya tengo las sumas parciales

mov ax,sp1
add st,ax
mov ax,sp3
add st,ax

mov ax,sp2
sub st,ax ;aca ya ta



mov pef,0

mov ax,st
mov pdf,ax


;mov dx,pdf
;mov ah,2
;int 21h

sacadecimal 0,pdf


mov ah,4ch
int 21h




end inicio

Programa para tocar una cancion con assemler emu8086


Fecha Publicación: 2011-01-25T10:15:00.000-08:00

;CON EMU 8086
;NOMBRE:JOE MENDOZA ANGELES 20070100I
;si quieren que suene mejor cambien las notas

; para que suene se ejecuta
;1.Emulate (NO hagas RUN)
;2.Menu:external
;3.hacer en la pestana que dice run external y le dan en SI
stack segment
db 64 dup ('xxxxxx')
stack ends

datos segment


titulo db ,' ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿',10,13
db ,' ³ ³',10,13
db ,' ³ NOCHE DE PAZ CON EL ALTAVOZ ³',10,13
db ,' ³ ³',10,13
db ,' ³ ³',10,13
db ,' ³ BY: MENDOZA ANGELES JOE ³',10,13
db ,' ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ$',10,13



joe db 3fh,4fh,4fh,40h,3fh,4fh,3dh,4dh,43h,43h,3fh,4fh,4fh,40h,3fh,4fh,3dh,4dh,43h,43h,3ch,4ch,4ch,4ch,3ch,4ch,41h,51h,51h,51h,41h,51h,3bh,4bh,4bh,4bh,3bh,4bh,3fh,4fh,4fh,4fh,43h,43h,40h,50h,50h,40h,40h,50h,3bh,4bh,4bh,3bh,3bh,4bh,3fh,4fh,4fh,40h,3fh,4fh,3dh,4dh,43h,43h,40h,50h,50h,40h,40h,50h,3bh,4bh,4bh,3bh,3bh,4bh,3fh,4fh,4fh,40h,3fh,4fh,3dh,4dh,43h,43h,3ch,4ch,4ch,3ch,3ch,4ch,3eh,4eh,3ch,4ch,41h,51h,3bh,4bh,4bh,4bh,3dh,4dh,4dh,43h,3fh,4fh,4fh,3dh,3bh,4bh,3eh,4eh,3ch,4ch,41h,51h,3bh,4bh,4bh,4bh,3bh,4bh,4bh,43h,42H
conta dw 00

elegirnota MACRO
mov si,conta
mov ah,joe[si]
inc si

mov conta,si


endm
retardomacro MACRO
push cx
mov cx,0fffh
n1:mov bx,0ffffh
n2:dec bx
jnz n2
loop n1
mov cx,0fffh
n3:mov bx,0ffffh
n4:dec bx
jnz n4
loop n3
pop cx
endm

codigo segment
assume cs:codigo,ds:datos,ss:stack
principal proc far
push ds
sub ax,ax
push ax
mov ax,datos
mov ds,ax
lea dx,titulo
mov ah,09
int 21h ; imprime el mensaje inicial
denuevo: call ingresa1
retardomacro ; retardar entre nota y nota
cmp ah,42h
je dos
cmp ah,43h
je etret ;si es non se saltea todo

call frecuencia ; frecuencia de timer 8253/4
;call inicializa ; inicializa 8253/4
call cargar ; llevar cuenta al 8253/4
call sonido ; activa timer
etret: call retardo ; retarda dando mas volumen
call retardo ; retarda dando mas volumen

cmp ah,43h
je continuo ;si deseamos continuidad
cmp ah,4bh
je continuo ;si deseamos continuidad
cmp ah,4ch
je continuo ;si deseamos continuidad
cmp ah,4dh
je continuo ;si deseamos continuidad
cmp ah,4eh
je continuo ;si deseamos continuidad
cmp ah,4fh
je continuo ;si deseamos continuidad
cmp ah,50h
je continuo ;si deseamos continuidad
cmp ah,51h
je continuo ;si deseamos continuidad

call desactivar ; desactivar el parlante
continuo:
jmp denuevo
dos: ret
principal endp


ingresa1 proc near
elegirnota
call ingresa2
ret
endp

ingresa2 proc near
ingr:
cmp ah,42h; compara si es doss para salir del dos
je fin
cmp ah,3bh
je f1 ; compara si es DO
cmp ah,3ch
je f2 ; compara si es RE
cmp ah,3dh
je f3 ; compara si es MI
cmp ah,3eh
je f4 ; compara si es FA
cmp ah,3fh
je f5 ; compara si es SOL
cmp ah,40h
je f6 ; compara si es LA
cmp ah,41h
je f7 ; compara si es SI
sostenidos:
cmp ah,4bh
je f1 ; compara si es DO
cmp ah,4ch
je f2 ; compara si es RE
cmp ah,4dh
je f3 ; compara si es MI
cmp ah,4eh
je f4 ; compara si es FA
cmp ah,4fh
je f5 ; compara si es SOL
cmp ah,50h
je f6 ; compara si es LA
cmp ah,51h
je f7 ; compara si es SI


cmp ah,43h
je fnon ; no hace nada
cmp ah,44h
je fnon ;continuo
jmp ingr ;retorna al inicio del bucle

f1: mov cx,2093 ; frecuencia do

jmp fin
f2: mov cx,2349 ; frecuencia re

jmp fin
f3: mov cx,2637 ; frecuencia mi

jmp fin
f4: mov cx,2794 ; frecuencia fa

jmp fin
f5: mov cx,3136 ; frecuencia sol

jmp fin
f6: mov cx,3520 ; frecuencia la

jmp fin
f7: mov cx,3951 ; frecuencia si
jmp fin

fnon:
jmp fin ; no hace nada
fin: ret

retardo proc near
push cx
mov cx,20h
; mov cx,0020h
v1:mov bx,0ffffh
v5:dec bx
jnz v5
loop v1
pop cx
ret
retardo endp

frecuencia proc near
push ax
push dx
mov dx,12h ; frecuencia de clk 8253
mov ax,34dch ; frecuencia 34dch=13532dec
div cx ; div ax/cx(dx:ax/cx; ax<-cocien;dx<-resto) (cx depende de la nota leida Do Re)
mov cx,ax ; cx(soloimportaelcociente) cuenta de timer
pop dx
pop ax
ret
frecuencia endp

inicializa proc near
push ax
mov al,182 ; palabra de control
out 67,al ; programar 8253
pop ax
ret
inicializa endp

cargar proc near
push ax
mov al,cl ; enviar cuenta 8253
out 66,al ;
mov al,ch ;
out 66,al ;
pop ax
ret
cargar endp

sonido proc near
push ax
in al,97 ; leer pto 97 del 8255
or al,03h ;
out 97,al ; activar
pop ax ;
ret
sonido endp

desactivar proc near ;Apagara el parlante
push ax ;para que el sonido no sea
in al,97 ;continuo
and al,0fch ; bit 0 y bit 8255 = 0
out 97,al ; parlante apagado
pop ax
ret
desactivar endp

codigo ends
end principal



;PARA NOTA:PARA ESCUCHAR EN EL MENU EXTERNAL (RUN EXTERNAL) QUE APARECE CUANDO CORRES EL PROGRAMA

Programa para voltear y contar vocales de un nombre


Fecha Publicación: 2011-01-25T10:13:00.000-08:00

;NOMBRE:JOE MENDOZA ANGELES 20070100I
;los nombres ya apellidos en mayuscula

.model small
.stack
.data
cadena1 db 10,13,'Ingrese los nombres y apellidos:$'

vocala db 10,13,'Nros de vocales A:$'
vocale db 10,13,'Nros de vocales E:$'
vocali db 10,13,'Nros de vocales I:$'
vocalo db 10,13,'Nros de vocales O:$'
vocalu db 10,13,'Nros de vocales U:$'
error db 10,13,'Error digite una opcion valida!!$'
enter db 10,13,' $'


titulo db ,' ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿',10,13
db ,' ³ ³',10,13
db ,' ³ PROGRAMA 1 ³',10,13
db ,' ³ ³',10,13
db ,' ³ INGRESAR APELLIDOS Y NOMBRES: ³',10,13
db ,' ³ ³',10,13
db ,' ³ ³',10,13
db ,' ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ$',10,13









menut db 10,13 ,' ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿',10,13
db ,' ³ ³',10,13
db ,' ³ MENU ³',10,13
db ,' ³ ³',10,13
db ,' ³ DIGITE: 1 (OPCION 1), 2(OPCION 2), 3(OPCION 3), 4 (OPCION 4) ³',10,13
db ,' ³ ³',10,13
db ,' ³ ³',10,13
db ,' ³ * OPCION 1:CUENTE EL NUMERO DE VOCALES DE NOMBRES Y APELLIDOS ³',10,13
db ,' ³ ³',10,13
db ,' ³ * OPCION 2:NOMBRES Y APELLIDOS EN MINUSCULA ³',10,13
db ,' ³ ³',10,13
db ,' ³ * OPCION 3:NOMBRES Y APELLIDOS EN FORMA INVERTIDA ³',10,13
db ,' ³ ³',10,13
db ,' ³ * OPCION 4:SALIR ³',10,13
db ,' ³ ³',10,13
db ,' ³ BY :JOE MENDOZA ANGELES ³',10,13
db ,' ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ$',10,13


nombre dw 100 dup(0)
cont dw 0
na db 00
ne db 00
ni db 00
no db 00
nu db 00
nt db 00


verifica macro


;Aqui viene el "al" y hay que verificarlo

;para que sea mayucula tiene que estar en el rango de [65 -90]
;y tambien el blackspace


mov cl,al;Rescatamos el valor de "al"
cmp al,65
jb cambio
cmp al,90
ja cambio

jmp chaubien

cambio:

cmp al,' '
je chaubien

mov dl,7 ;<-----beep
mov ah,2
int 21h

mov dl,8 ;<-----retrocede1
mov ah,2
int 21h


mov dl,32 ;<-----escribe un espacio
mov ah,2
int 21h

mov dl,8 ;<-----retrocede un espacio
mov ah,2
int 21h


chaumal:

jmp ingresa ;<-- Me pide de nuevo el ingreso

chaubien: ;<--el numero esta correcto

mov al,cl

endm

.code

inicio:


mov ax,@data
mov ds,ax

mov ah,9
lea dx,titulo
int 21h

mov ah,9
lea dx,cadena1
int 21h

mov si,0
ingresa:

mov ah,1
int 21h

cmp al,13
je salir

verifica ;<---------SE VERIFICA

mov ah,0
mov bx,ax

mov nombre[si],bx
inc si

jmp ingresa

salir:


mov cont,si ;<<<--



;MENU
menu:
mov ah,9
lea dx,menut
int 21h

mov ah,1
int 21h


cmp al,'1'
je vocales

cmp al,'2'
je minuscula

cmp al,'3'
je invertida

cmp al,'4'
je salirprograma


lea dx,error
mov ah,9
int 21h

jmp menu





;CALCULANDO EL NUMERO DE VOCALES QUE TIENE




vocales:

mov si,0

contado:
cmp si,cont
je salcont

mov cx,nombre[si]

cmp cl,'A'
je a

t1:
cmp cl,'E'
je e

t2:

cmp cl,'I'
je i

t3:
cmp cl,'O'
je o

t4:
cmp cl,'U'

je u

t5:

jmp s1
a:
add na,1

add si,1
jmp contado

e:
add ne,1

add si,1
jmp contado

i:
add ni,1

add si,1
jmp contado

o:
add no,1

add si,1
jmp contado

u:
add nu,1

add si,1
jmp contado


s1:
add si,1

jmp contado
salcont:
;saca la palabra
lea dx,enter
mov ah,9
int 21h





mov si,0

saca:

cmp si,cont
je salio

mov bx,nombre[si]
mov dx,bx
mov ah,2
int 21h

inc si

jmp saca

salio:
mov ah,9
lea dx,vocala
int 21h

mov dl,na
add dl,30h
mov ah,2
int 21h



mov ah,9
lea dx,vocale
int 21h

mov dl,ne
add dl,30h
mov ah,2
int 21h

mov ah,9
lea dx,vocali
int 21h

mov dl,ni
add dl,30h
mov ah,2
int 21h

mov ah,9
lea dx,vocalo
int 21h

mov dl,no
add dl,30h
mov ah,2
int 21h

mov ah,9
lea dx,vocalu
int 21h

mov dl,nu
add dl,30h
mov ah,2
int 21h

saliop:



mov al,0
mov na,0

mov al,0
mov ne,0

mov al,0
mov ni,0


mov al,0
mov no,0


mov al,0
mov nu,0

jmp menu

;MOSTRANDO LOS NOMBRES Y APELLIDOS EN MINUSCULA





minuscula:
lea dx,enter
mov ah,9
int 21h



mov si,0

sacaminus:

cmp si,cont
je saliominus

mov bx,nombre[si]
cmp bl,' '
je blanco:
jmp noblanco
blanco:
mov dx,' '
mov ah,2
int 21h
inc si
jmp sacaminus
noblanco:
mov dx,bx
add dx,32
mov ah,2
int 21h

inc si

jmp sacaminus
saliominus:

jmp menu

;MOSTANDO LOS NOMBRES Y APELLIDOS EN FORMA INVERTIDA



invertida:
lea dx,enter
mov ah,9
int 21h

mov si,cont

sub si,1
sacainv:

cmp si,-1
je salioinv

mov bx,nombre[si]
mov dx,bx
mov ah,2
int 21h

dec si

jmp sacainv

salioinv:


jmp menu


salirprograma:

Programa bandera flameando


Fecha Publicación: 2011-01-25T10:10:00.000-08:00

;NOMBRE:JOE MENDOZA ANGELES 20070100I
.model small
.stack

.data

.code


inicio:




MOV AH, 0 ;ESTABLECER MODO VIDEO
MOV AL, 10H
INT 10H

MOV AH, 05H ;VER PAGINA 0
MOV AL, 0H
INT 10H

;//////////////////////////////////////////////////////////


;Fila 1 (fila5)




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 16 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 17 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 18 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 19 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 20 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 21 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 22 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 23 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H






MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 24 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 25 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 26 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 27 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 28 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 29 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 30 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 31 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 32 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 33 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 34 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 35 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 36 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 37 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 38 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 39 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 40 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 41 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 42 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 43 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 44 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 45 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 46 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 47 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 48 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 49 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 50 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 51 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 52 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 53 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 54 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 55 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 56 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 56 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 57 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 58 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 59 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 60 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 61 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 62 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 63 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 64 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 65 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 05H ;POSICION Y
MOV DL, 66 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


;Fila 2 (fila6)




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 16 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 17 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 18 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 19 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 20 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 21 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 22 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 23 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H






MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 24 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 25 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 26 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 27 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 28 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 29 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 30 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 31 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 32 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 33 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 34 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 35 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 36 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 37 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 38 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 39 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 40 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 41 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 42 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 43 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 44 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 45 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 46 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 47 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 48 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 49 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 50 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 51 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 52 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 53 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 54 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 55 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 56 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 56 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 57 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 58 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 59 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 60 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 61 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 62 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 63 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 64 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 65 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 06H ;POSICION Y
MOV DL, 66 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


;Fila 3(fila7)




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 16 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 17 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 18 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 19 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 20 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 21 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 22 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 23 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H






MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 24 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 25 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 26 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 27 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 28 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 29 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 30 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 31 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 32 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 33 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 34 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 35 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 36 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 37 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 38 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 39 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 40 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 41 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 42 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 43 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 44 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 45 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 46 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 47 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 48 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 49 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 50 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 51 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 52 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 53 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 54 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 55 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 56 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 56 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 57 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 58 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 59 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 60 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 61 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 62 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 63 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 64 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 65 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 07H ;POSICION Y
MOV DL, 66 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


;Fila 4 (fila8)




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 16 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 17 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 18 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 19 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 20 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 21 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 22 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 23 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H






MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 24 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 25 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 26 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 27 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 28 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 29 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 30 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 31 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 32 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 33 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 34 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 35 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 36 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 37 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 38 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 39 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 40 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 41 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 42 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 43 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 44 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 45 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 46 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 47 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 48 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 49 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 50 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 51 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 52 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 53 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 54 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 55 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 56 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 56 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 57 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 58 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 59 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 60 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 61 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 62 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 63 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 64 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 65 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 08H ;POSICION Y
MOV DL, 66 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



;Fila 5 (fila9)




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 16 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 17 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 18 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 19 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 20 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 21 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 22 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 23 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H






MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 24 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 25 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 26 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 27 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 28 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 29 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 30 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 31 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 32 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 33 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 34 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 35 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 36 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 37 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 38 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 39 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 40 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 41 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 42 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 43 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 44 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 45 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 46 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 47 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 48 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 49 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 50 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 51 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 52 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 53 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 54 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 55 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 56 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 56 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 57 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 58 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 59 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 60 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 61 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 62 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 63 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 64 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 65 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 09H ;POSICION Y
MOV DL, 66 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


;Fila 6 (fila 10)




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 16 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 17 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 18 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 19 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 20 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 21 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 22 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 23 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H






MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 24 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 25 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 26 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 27 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 28 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 29 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 30 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 31 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 32 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 33 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 34 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 35 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 36 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 37 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 38 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 39 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 40 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 41 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 42 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 43 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 44 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 45 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 46 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 47 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 48 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 49 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 50 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 51 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 52 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 53 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 54 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 55 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 56 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 56 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 57 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 58 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 59 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 60 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 61 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 62 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 63 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 64 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 65 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 66 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


;Fila 7 (fila 11)




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 16 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 17 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 18 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 19 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 20 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 21 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 22 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 23 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H






MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 24 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 25 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 26 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 27 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 28 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 29 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 30 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 31 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 32 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 33 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 34 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 35 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 36 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 37 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 38 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 39 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 40 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 41 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 42 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 43 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 44 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 45 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 46 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 47 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 48 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 49 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 50 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 51 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 52 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 53 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 54 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 55 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 56 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 56 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 57 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 58 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 59 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 60 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 61 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 62 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 63 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 64 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 65 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 66 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


;Fila 8 (fila 12)




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 16 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 17 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 18 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 19 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 20 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 21 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 22 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 23 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H






MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 24 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 25 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 26 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 27 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 28 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 29 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 30 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 31 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 32 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 33 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 34 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 35 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 36 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 37 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 38 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 39 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 40 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 41 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 42 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 43 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 44 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 45 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 46 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 47 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 48 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 49 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 50 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 51 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 52 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 53 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 54 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 55 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 56 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 56 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 57 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 58 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 59 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 60 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 61 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 62 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 63 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 64 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 65 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 66 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



lazo:

;PRIMER MOVIMIENTO


; Fila 8 (fila12)


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 16 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 0
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 67 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H

;>>>>>>>blan

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 33 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 51 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H





; Fila 7 (fila11)


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 16 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 0
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 67 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




;>>>>>>>blan

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 33 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 51 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


; Fila 6 (fila10)


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 16 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 0
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 67 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


;>>>>>>>blan

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 33 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 51 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


; Fila 5 (fila 9)


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 9 ;POSICION Y
MOV DL, 16 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 0
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 9 ;POSICION Y
MOV DL, 67 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


;>>>>>>>blan

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 9 ;POSICION Y
MOV DL, 33 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 9 ;POSICION Y
MOV DL, 51 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



; Fila 4 (fila 8)


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 8 ;POSICION Y
MOV DL, 16 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 0
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 8 ;POSICION Y
MOV DL, 67 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H





;>>>>>>>blan

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 8 ;POSICION Y
MOV DL, 33 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 8 ;POSICION Y
MOV DL, 51 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H


; Fila 3 (fila 7)


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 7 ;POSICION Y
MOV DL, 16 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 0
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 7 ;POSICION Y
MOV DL, 67 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



;>>>>>>>blan

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 7 ;POSICION Y
MOV DL, 33 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 7 ;POSICION Y
MOV DL, 51 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



; Fila 2 (fila 6)


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 6 ;POSICION Y
MOV DL, 16 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 0
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 6 ;POSICION Y
MOV DL, 67 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


;>>>>>>>blan

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 6 ;POSICION Y
MOV DL, 33 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 6 ;POSICION Y
MOV DL, 51 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H




;SEGUNDO MOVIMIENTO



; Fila 2 (fila 6)


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 6 ;POSICION Y
MOV DL, 16 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 6 ;POSICION Y
MOV DL, 67 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 0
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H





;>>>>>>>blan

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 6 ;POSICION Y
MOV DL, 33 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 6 ;POSICION Y
MOV DL, 51 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H

; Fila 3 (fila 7)


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 7 ;POSICION Y
MOV DL, 16 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 7 ;POSICION Y
MOV DL, 67 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 0
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H

;>>>>>>>blan

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 7 ;POSICION Y
MOV DL, 33 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 7 ;POSICION Y
MOV DL, 51 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



; Fila 4 (fila 8)


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 8 ;POSICION Y
MOV DL, 16 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 8 ;POSICION Y
MOV DL, 67 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 0
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


;>>>>>>>blan

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 8 ;POSICION Y
MOV DL, 33 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 8 ;POSICION Y
MOV DL, 51 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


; Fila 5 (fila 9)


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 9 ;POSICION Y
MOV DL, 16 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 9 ;POSICION Y
MOV DL, 67 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 0
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




;>>>>>>>blan

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 9 ;POSICION Y
MOV DL, 33 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 9 ;POSICION Y
MOV DL, 51 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


; Fila 6 (fila10)


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 16 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 67 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 0
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1

INT 10H


;>>>>>>>blan

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 33 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 10 ;POSICION Y
MOV DL, 51 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H




; Fila 7 (fila11)


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 16 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 67 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 0
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H





;>>>>>>>blan

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 33 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 11 ;POSICION Y
MOV DL, 51 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H


; Fila 8 (fila12)


MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 16 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 67 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 0
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H
;>>>>>>>blan

MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 33 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 15 ;COLOR LETRA
MOV CX, 1
INT 10H



MOV AH, 02H ;SITUAR CURSOR(PAGINA 0)
MOV BH, 0H
MOV DH, 12 ;POSICION Y
MOV DL, 51 ;POSICION X
INT 10H


MOV AH, 09H ;ESCRIBE CARACTER 34H?
MOV AL, 219
MOV BH, 0H
MOV BL, 4 ;COLOR LETRA
MOV CX, 1
INT 10H



jmp lazo


mov ah,4ch
int 21h

end inicio

programa calculo de areas emu 8086 assembler


Fecha Publicación: 2011-01-25T10:04:00.000-08:00

;NOMBRE:JOE MENDOZA ANGELES 20070100I
.model small

.stack

.data



menut db 10,13 ,' ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿',10,13
db ,' ³ ³',10,13
db ,' ³ MENU ³',10,13
db ,' ³ ³',10,13
db ,' ³ DIGITE: 1 (OPCION 1), 2(OPCION 2), ......., 9 (OPCION 9) ³',10,13
db ,' ³ ³',10,13
db ,' ³ ³',10,13
db ,' ³ * OPCION 1:AREA DEL TRIANGULO ³',10,13
db ,' ³ * OPCION 2:AREA DEL TRAPECIO ³',10,13
db ,' ³ * OPCION 3:AREA DEL CIRCULO ³',10,13
db ,' ³ * OPCION 4:AREA DEL POLIGONO ³',10,13
db ,' ³ * OPCION 5:VOLUMEN DEL CUBO ³',10,13
db ,' ³ * OPCION 6:VOLUMEN DEL CILINDRO ³',10,13
db ,' ³ * OPCION 7:VOLUMEN DEL PIRAMIDE ³',10,13
db ,' ³ * OPCION 8:VOLUMEN DE LA ESFERA ³',10,13
db ,' ³ ³',10,13
db ,' ³ * OPCION 9:SALIR ³',10,13
db ,' ³ ³',10,13
db ,' ³ BY :JOE MENDOZA ANGELES ³',10,13
db ,' ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ$',10,13


cadena0 db 10,13,'El area del triangulo es:$'
cadena1 db 10,13,'Ingrese la base del triangulo:$'
cadena2 db 10,13,'Ingrese la altura del triangulo:$'
cadena3 db 10,13,'Ingrese la base menor del trapecio:$'
cadena4 db 10,13,'Ingrese la base mayor del trapecio:$'
cadena5 db 10,13,'Ingrese la altura del trapecio:$'
cadena6 db 10,13,'El area del trapecio es:$'
cadena7 db 10,13,'Ingrese el radio del circulo:$'
cadena8 db 10,13,'El area del circulo es:$'


cadena30 db 10,13,' Ingrese la medida del lado del poligono:$'
cadena31 db 10,13,' Ingrese el apotema del poligono:$'
cadena32 db 10,13,' El area del poligono es:$'
cadena33 db 10,13,' Ingrese el numero de lados del poligono:$'
cadena34 db 10,13,' Ingrese el lado del cubo:$'
cadena35 db 10,13,' El volumen del cubo es:$'
cadena36 db 10,13,' Ingrese el radio de la base:$'
cadena37 db 10,13,' Ingrese la altura del cilindro:$'
cadena38 db 10,13,' El volumen del cilindro es:$'
cadena39 db 10,13,' Ingrese el lado de la base:$'
cadena40 db 10,13,' Ingrese la altura de la piramide:$'
cadena41 db 10,13,' El volumen de la pieramide es:$'
cadena42 db 10,13,' Ingrese el radio de la esfera:$'
cadena43 db 10,13,' El volumen de la esfera es:$'
cadena9 db 10,13,' presione(1) para hallar el AREA DE UN TRIANGULO$'
cadena10 db 10,13," presione(2) para hallar el AREA DE UN TRAPECIO$"
cadena11 db 10,13,' presione(3) para hallar el AREA DE UN CIRCULO$'
cadena12 db 10,13,' presione(4) para hallar el AREA DE UN POLIGONO$'
cadena13 db 10,13,' presione(5) para hallar el VOLUMEN DE UN CUBO$'
cadena14 db 10,13,' presione(6) para hallar el VOLUMEN DE UN CILINDRO$'
cadena15 db 10,13,' presione(7) para hallar el VOLUMEN DE UNA PIRAMIDE$'
cadena16 db 10,13,' presione(8) para hallar el VOLUMEN DE UNA ESFERA$'


baset dw 00
alturat dw 00
error db 10,13,'Error digite una opcion valida!!$'
basemetr dw 00
basematr dw 00
alturatr dw 00



jojo dw 00
j dw 00
q dw 00
u dw 00
t dw 00
f dw 00
w dw 00
g dw 00
n dw 00
c dw 00
d dw 00
ne dw 00
nd dw 00
netr dw 00
ndtr dw 00
rad dw 00
sum1 dw 00
pdcir dw 00
pecir dw 00
sum2 dw 00
sum3 dw 00
lado dw 00
apot dw 00
ladoc dw 00
pecubo dw 00
pepoli dw 00
pdpoli dw 00
z dw 00
radcil dw 00
altcil dw 00
sum1cil dw 00
sum2cil dw 00
sum11cil dw 00
sum22cil dw 00
sum222 dw 00
sum111 dw 00
sum333 dw 00
sum3cil dw 00
pdbcil dw 00
pebcil dw 00
pdcil dw 00
pecil dw 00
pdpiram dw 00
pepiram dw 00
altp dw 00
ladop dw 00
radesf dw 00
peesf dw 00
pdesf dw 00
peesf1 dw 00
pdesf1 dw 00
peesf2 dw 00
pdesf2 dw 00



saca macro x
mov ax,x
mov bx,1000
mov dx,0
div bx
mov c,dx
mov dx,ax
add dx,30h
mov ah,02
int 21h

mov ax,c
mov bx,100
mov dx,0
div bx
mov c,dx
mov dx,ax
add dx,30h
mov ah,02
int 21h

mov ax,c
mov bx,10
mov dx,0
div bx
mov c,dx
mov dx,ax
add dx,30h
mov ah,02
int 21h

mov ax,c
add ax,30h
mov dx,ax
mov ah,2
int 21h

endm




imprimec macro jeje

lea dx,jeje
mov ah,9
int 21h



endm


guarda macro jojo

mov ah,1
int 21h

sub al,30h
mov ah,0
mov bx,10
mul bx
mov jojo,ax
mov ah,1
int 21h
sub al,30h
mov ah,0
add jojo,ax

endm



.code



inicio:



mov ax,@data
mov ds,ax

;MENU
menu:
mov ah,9
lea dx,menut
int 21h

mov ah,1
int 21h


cmp al,'1'
je triangulo

cmp al,'2'
je trapecio

cmp al,'3'
je circulo

cmp al,'4'
je poligono

cmp al,'5'
je cubo


cmp al,'6'
je cilindro



cmp al,'7'
je piramide



cmp al,'8'
je esfera


cmp al,'9'

je salirprograma




lea dx,error
mov ah,9
int 21h

jmp menu



triangulo:

;CALCULANDO EL AREA DEL TRIANGULO
imprimec cadena1
guarda baset ;se guarda en baset
imprimec cadena2
guarda alturat

mov ax,baset
mov bx,alturat
mul bx
mov dx,0
mov bx,2
div bx

mov ne,ax

mov ax,dx
mov bx,10
mul bx

mov dx,0
mov bx,2
div bx
mov nd,ax



mov dx,10
mov ah,2
int 21h

mov dx,13
mov ah,2
int 21h
imprimec cadena0
saca ne
mov dx,"."
mov ah,2
int 21h

mov dx,nd
add dx,30h
mov ah,2
int 21h

mov dx,10
mov ah,2
int 21h

mov dx,13
mov ah,2
int 21h

mov ah,7
int 21h

jmp menu
;CALCULANDO EL AREA DEL TRAPECIO


trapecio:

imprimec cadena3
guarda basemetr
imprimec cadena4
guarda basematr
imprimec cadena5
guarda alturatr
mov ax,basemetr
add ax,basematr
mov bx,alturatr
mul bx

mov bx,2
mov dx,0
div bx

mov netr,ax

mov ax,dx

mov bx,10
mul bx
mov dx,0
mov bx,2
div bx
mov ndtr,ax

mov dx,10
mov ah,2
int 21h

mov dx,13
mov ah,2
int 21h

imprimec cadena6
saca netr
mov dx,"."
mov ah,2
int 21h

mov dx,ndtr
add dx,30h
mov ah,2
int 21h

mov dx,10
mov ah,2
int 21h

mov dx,13
mov ah,2
int 21h



mov ah,7
int 21h

jmp menu
;CALCULANDO EL AREA DEL CIRCULO



circulo:
imprimec cadena7
guarda rad

mov ax,rad
mov bx,rad
mul bx
mov dx,0
mov d,ax

mov bx,3
mul bx

mov sum1,ax


;segunda sum1

mov ax,d
mov bx,10
mov dx,0
div bx
mov sum2,ax
mov pdcir,dx

mov bx,4
mov ax,d
mul bx

mov dx,0
mov bx,100
div bx
mov sum3,ax

mov ax,sum1
add ax,sum2
add ax,sum3

mov pecir,ax

mov dx,10
mov ah,2
int 21h

mov dx,13
mov ah,2
int 21h
imprimec cadena8
saca pecir
mov ah,2
mov dx,"."
int 21h

mov dx,pdcir
add dx,30h
mov ah,2
int 21h



mov ah,7
int 21h

jmp menu




;>apslsdplaspdlpasldplaspd



poligono:
;CALCULANDO EL AREA DEL POLIGONO

mov dx,10
mov ah,2
int 21h

mov dx,13
mov ah,2
int 21h
imprimec cadena33
guarda n
imprimec cadena30
guarda lado
imprimec cadena31
guarda apot

mov ax,n
mov bx,apot
mul bx
mov z,ax

mov dx,0
mov ax,z
mov bx,lado
mul bx

mov dx,0
mov bx,2
div bx
mov pepoli,ax

mov ax,dx

mov bx,10
mul bx
mov dx,0
mov bx,2
div bx
mov pdpoli,ax


mov dx,10
mov ah,2
int 21h

mov dx,13
mov ah,2
int 21h
imprimec cadena32
saca pepoli
mov dx,"."
mov ah,2
int 21h

mov dx,pdpoli
add dx,30h
mov ah,2
int 21h

mov dx,10
mov ah,2
int 21h

mov dx,13
mov ah,2
int 21h

mov ah,7
int 21h

jmp menu







cubo:
;CALCULANDO EL VOLUMEN DEL CUBO

mov dx,10
mov ah,2
int 21h

mov dx,13
mov ah,2
int 21h
imprimec cadena34
guarda ladoc

mov ax,ladoc
mov bx,ladoc
mul bx

mov dx,0
mov bx,ladoc
mul bx

mov pecubo,ax
imprimec cadena35
saca pecubo
mov dx,10
mov ah,2
int 21h

mov dx,13
mov ah,2
int 21h

mov ah,7
int 21h

jmp menu

cilindro:



;CALCULANDO EL VOLUMEN DEL CILINDRO
mov dx,10
mov ah,2
int 21h

mov dx,13
mov ah,2
int 21h

imprimec cadena36
guarda radcil

mov ax,radcil
mov bx,radcil
mul bx
mov dx,0
mov j,ax

mov bx,3
mul bx

mov sum1cil,ax


;segunda sum1

mov ax,j
mov bx,10
mul bx
mov sum2cil,ax


mov bx,4
mov ax,j
mul bx
add ax,sum2cil
mov dx,0

mov bx,100
div bx
mov sum3cil,ax
mov w,dx
mov dx,0

mov ax,sum1cil
add ax,sum3cil

mov pebcil,ax

mov bx,10
mov ax,w
div bx
mov pdbcil,ax
mov dx,0


imprimec cadena37
guarda altcil
mov ax,pebcil
mov bx,altcil
mul bx
mov dx,0
mov sum11cil,ax

mov ax,pdbcil
mov bx,altcil
mul bx
mov dx,0

mov bx,10
div bx
mov pdcil,ax
;mov pdcil,dx
mov ax,dx
add ax,sum11cil
mov pecil,ax
mov dx,0


mov dx,10
mov ah,2
int 21h

mov dx,13
mov ah,2
int 21h


imprimec cadena38
saca pecil
mov ah,2
mov dx,"."
int 21h

mov dx,pdcil
add dx,30h
mov ah,2
int 21h


mov dx,10
mov ah,2
int 21h

mov dx,13
mov ah,2
int 21h


mov ah,7
int 21h

jmp menu




piramide:
;CALCULANDO EL VOLUMEN DELA PIRAMIDE

mov dx,10
mov ah,2
int 21h

mov dx,13
mov ah,2
int 21h
imprimec cadena39
guarda ladop
imprimec cadena40
guarda altp

mov ax,ladop
mov bx,ladop
mul bx

;mov pebase,ax

mov bx,altp
mul bx

mov bx,3
div bx

mov pepiram,ax
mov f,dx
mov ax,f
mov bx,10
mul bx
mov bx,3
div bx
mov pdpiram,ax

imprimec cadena41
saca pepiram
mov ah,2
mov dx,"."
int 21h

mov dx,pdpiram
add dx,30h
mov ah,2
int 21h

mov dx,10
mov ah,2
int 21h

mov dx,13
mov ah,2
int 21h

mov ah,7
int 21h

jmp menu









esfera:
;CALCULANDO EL VOLUMEN DE UNA ESFERA

mov dx,10
mov ah,2
int 21h

mov dx,13
mov ah,2
int 21h
imprimec cadena42
guarda radesf

mov ax,radesf
mov bx,radesf
mul bx
mov bx,radesf
mul bx
mov dx,0
mov t,ax

mov bx,3
mul bx

mov sum111,ax


;segunda sum1

mov ax,t
mov bx,10
mul bx
mov sum222,ax


mov bx,4
mov ax,t
mul bx
add ax,sum222
mov dx,0

mov bx,100
div bx
mov sum333,ax
mov q,dx
mov dx,0

mov ax,sum111
add ax,sum333

mov peesf1,ax

mov bx,10
mov ax,q
div bx
mov pdesf1,ax
mov dx,0





mov ax,peesf1
mov bx,4
mul bx
mov u,ax

mov ax,pdesf1
mov bx,4
mul bx
mov dx,0
mov bx,10
div bx
mov pdesf,dx ;<---------------------
mov dx,0
add ax,u
mov peesf,ax



mov dx,10
mov ah,2
int 21h

mov dx,13
mov ah,2
int 21h







mov ax,peesf
mov bx,10
mul bx

mov bx,3
div bx
mov dx,0

mov bx,10
div bx
mov peesf2,ax
mov pdesf2,dx




;imprimec cadena

saca peesf2
mov ah,2
mov dx,"."
int 21h

mov dx,pdesf2
add dx,30h
mov ah,2
int 21h


mov dx,10
mov ah,2
int 21h

mov dx,13
mov ah,2
int 21h

mov ah,7
int 21h

jmp menu




salirprograma:



end inicio

Problemas de assembler


Fecha Publicación: 2010-12-11T16:08:00.000-08:00

Pronto colgare los problemas de Microprocesadores IT134 UNI ,como el programa del piano o del himno nacional o el de l a bandera todo para los chicos de la FIEE

Desocultar archivos de usb debido a virus


Fecha Publicación: 2010-03-19T10:44:00.000-07:00

Alguna vez no nos ha pasado que un virus entro a nuestro usb y despues de pasar el antivirus ,nuestras carpetas archivos ya no seencuentran por que estan ocultos?????
La mayoria de veces uno va a opciones de carpeta y hacemos click en mostrar archivos ocultos....
Pero en alguna socasiones nuestra maquina esta infectada y ya no nos muestra nuestros archivos ocultos, o si no los muestran la opcion de desocultar no esta activada.......
¿Entonces que hacemos?


abrimos el cmd con las teclas : windows+r
colocamos por ejemplo f: y enter (f es el nomvre asignadoa tu usb,no neceariamente es f ,puede ser g dependiendo ,esta letra se asigna al meter tu usb velo en mi pc)
colocamos attrib -a -s -h -r /s /d y le damos enter.
listo!!!!!!!!!!!!!!!!
para que desoculte demora unos segundos dependiendo de la cantidad de los archivos ocultos
Eso es todo

ESTE AÑO CON DRUPAL


Fecha Publicación: 2010-02-10T10:39:00.001-08:00


Ahora este año trataremos sobre paginas web con drupal,debido que en este año voy a ser participe en la creacion de una pagina web .
Recuerden el proximo año somos INTERCON

office 2010 beta


Fecha Publicación: 2010-02-03T10:43:00.000-08:00

descarga office 2010 version beta desde la pagina principal o desde este enlace:
http://www.microsoft.com/office/2010/en/default.aspx