Código de Ensamblador - Verifique que todos los caracteres de una cadena se encuentran en otra cadena

Imágen de perfil

Verifique que todos los caracteres de una cadena se encuentran en otra cadenagráfica de visualizaciones


Ensamblador

Publicado el 7 de Diciembre del 2019 por Administrador
463 visualizaciones desde el 7 de Diciembre del 2019
Escribir un código que verifique que todas los caracteres de una cadena se encuentran en otra cadena.
Por ejemplo: todas las letras de la cadena "casa" se encuentran en "escaso". Pero no todas las letras de "cerro" se en encuentran en "recanate".

20130520

Publicado el 7 de Diciembre del 2019gráfica de visualizaciones de la versión: 20130520
464 visualizaciones desde el 7 de Diciembre del 2019
estrellaestrellaestrellaestrellaestrella
estrellaestrellaestrellaestrella
estrellaestrellaestrella
estrellaestrella
estrella


Forma parte de Ejercicios resueltos en Ensamblador 8086
 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
org 100h
mov si, 0 ;ponemos si en 0
comienzo:
cmp msg[si],"$" ;si es el fin de la cadena mandar a final
jz resultado
 
 mov di, 0 ;poner en 0 di
 comprobar:
 mov al, msg2[di] ;copiar msg2 con su posicion a al
 cmp msg[si], al ;comparar msg con su posicion con al
 jz seguir ;si se encuentra entonces continua
 
 inc di ;incrementar di para seguir recorriendo cadena
cmp msg2[di], "$" ;si es que llega al final y no encontro coincidencia, entonces ya termina el programa
 jz final
 
 loop comprobar ;bucle para recorrer
 
seguir:
inc si ;para seguir recorriendo la palabra
loop comienzo ;bucle principal para recorrer palabra
resultado:
mov dx, offset msg3 ;copiar msg3 a dx
mov ah, 9 ;preparar ah con 9 para la interrupcion 21h
int 21h ;mostrar contenido en dx
final:
ret
msg db "cerro$"
msg2 db "recanate$"
msg3 db "Si se encuentran todos los caracteres$"



Comentarios sobre la versión: 20130520 (0)


No hay comentarios
 

Comentar la versión: 20130520

Nombre
Correo (no se visualiza en la web)
Valoración
Comentarios
Es necesario revisar y aceptar las políticas de privacidad

http://lwp-l.com/s5708