You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
cmp bl,lencad<br />
jne poppila6<br />
mov girat2[bx],'$'<br />
imprime girat2<br />
IMPRIME linea_en_blanco<br />
;IMPRIME mensaje4<br />
;jmp opcionDeSalida<br />
ENDM<br />
CAMBIARAMAYUSCULAS MACRO<br />
pushpila2:<br />
mov al,ca<strong>de</strong>na[bx]<br />
push ax<br />
inc bl<br />
cmp bl,lencad<br />
jne pushpila2<br />
mov bx,0<br />
poppila2:<br />
pop ax<br />
AND AL,11011111B<br />
mov girat[bx],al<br />
inc bl<br />
cmp bl,lencad<br />
jne poppila2<br />
mov girat[bx],'$'<br />
INVERTIRCADENA2 girat<br />
ENDM<br />
CAMBIARAMINUSCULAS MACRO<br />
pushpila3:<br />
mov al,girat2[bx]<br />
push ax<br />
inc bl<br />
cmp bl,lencad<br />
jne pushpila3<br />
mov bx,0<br />
poppila3:<br />
pop ax<br />
ADD AL,20H<br />
mov girat[bx],al<br />
inc bl<br />
63