You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
mov bx,0<br />
llamarinvertir:<br />
CALL IC<br />
llamarmayusculas:<br />
CALL CM<br />
llamarfin:<br />
CALL SDP<br />
IC proc near<br />
INVERTIRCADENA ca<strong>de</strong>na<br />
ret<br />
IC endp<br />
CM proc near<br />
CAMBIARAMAYUSCULAS<br />
ret<br />
CM endp<br />
SDP PROC NEAR<br />
SALIRDELPROGRAMA<br />
RET<br />
SDP ENDP<br />
opcionDeSalida:<br />
xor lencad,0h<br />
GOTOXY 25,15<br />
IMPRIME mensaje5<br />
LEE maximo_caracteres2<br />
IMPRIME linea_en_blanco<br />
GOTOXY 24,16<br />
IMPRIME mensaje3<br />
GOTOXY 39,18<br />
LEE maximo_caracteres2<br />
IMPRIME linea_en_blanco<br />
cmp ca<strong>de</strong>na2[0],'s'<br />
je salir<br />
cmp ca<strong>de</strong>na2[0],'S'<br />
je salir<br />
jmp inicio<br />
57