hola
Programa En Codigo Asembler
;CODIGO FUENTE
;PROGRAMA EN TURBO ASSEMBLER
;buscanom
.MODEL SMALL
; definición del segmento de datos
DATOS SEGMENT
titulo1 db "BIENVENIDOS A LA ULTIMA TAREA DE ASSEMBLER",13,10,13,10
creador1 db "HECHO POR: ",10,13
db " Maria Estela Aguilar Cardona ",13,10
creador2 db " Blanca Maria Aguilar Cardona ",13,10, "$"
tabulador db 13,10,"$"
titulo2 db "- B U S C A N O M B R E - "
db "(Distingue entre MAYUSCULAS y minusculas)",13,10, "$"
instruccion1 db "A continuacion debe ingresar 10 nombres de pila. (Presione ENTER)", "$"
no_enc db "NOMBRE NO ENCONTRADO",10,13,"$"
enc db "NOMBRE ENCONTRADO EN LA LISTA",13,10,"Ubicado en la Posicion # ","$"
texto2 db "Presione ENTER para continuar","$"
adios db 13,10,"ADIOS",13,10,"$"
posicion10 db "10",13,10,"$"
n1 db 13,10,"1-. $"
nombre1 db 80 dup (0)
n2 db "2-. $"
nombre2 db 80 dup (0)
n3 db "3-. $"
nombre3 db 80 dup (0)
n4 db "4-. $"
nombre4 db 80 dup (0)
n5 db "5-. $"
nombre5 db 80 dup (0)
n6 db "6-. $"
nombre6 db 80 dup (0)
n7 db "7-. $"
nombre7 db 80 dup (0)
n8 db "8-. $"
nombre8 db 80 dup (0)
n9 db "9-. $"
nombre9 db 80 dup (0)
n10 db "10-. $"
nombre10 db 80 dup (0)
mensaje db "LISTA DE NOMBRES COMPLETADA",13,10, "(Presione ENTER para continuar) ", "$"
mensaje2 db "LISTA DE NOMBRES INGRESADA:",13,10, "$"
instruccion2 db "Ahora, ingrese el nombre que desea buscar: $"
nom_buscar db 80 dup (0)
long_nom1 dw 0
long_nom2 dw 0
long_nom3 dw 0
long_nom4 dw 0
long_nom5 dw 0
long_nom6 dw 0
long_nom7 dw 0
long_nom8 dw 0
long_nom9 dw 0
long_nom10 dw 0
long_nom_bus dw 0
bandera_encontrado db "0"
posicion db "0"
titulo3 db "OPCIONES:",13,10,13,10
seguir db "b.- Para buscar un nombre presione b",13,10
terminar db "s.- Para salir del programa presione s",13,10,13,10
texto db "Ingrese letra de la opcion: ","$"
opcion db 80 dup (0)...