Scripts de ensamblador

Este programa pide una cadena y dos caracteres, el primero es el carácter a buscar en la cadena y el segundo es el carácter a remplazar, con las instrucciones rep y scas se realiza la búsqueda si encuentra un carácter igual lo remplaza con stos.

;programa que pide una cadena y dos caracteres,en ella
;se realiza una busqueda con el primer caracter y al
;encontrar una ocurrencia lo remplaza por el segundo.
;utiliza las instrucciones stos y scas.
.model tiny
.data
cadena db 10 dup (' '),'$'
carb db 1
carr db 1
ms1 db 10,13,'Cadena => $'
ms2 db 10,13,'Caracter buscar => $'
ms3 db 10,13,'Caracter remplazar => $'
.code
mensaje macro
mov ah,09h ;mostramos la cadena
int 21h
endm
.startup
lea dx,ms1
mensaje
mov cx,10
lea di,cadena
repite:
mov ah,01h
int 21h ;lee un caracter
stosb ;pasa lo que ahy en al a la cadena
loop repite
 
lea dx,ms2
mensaje
mov ah,01h
int 21h ;lee el caracter a buscar
mov carb,al
 
lea dx,ms3
mensaje
mov ah,01h
int 21h ;lee el caracter a remplazar
mov carr,al
 
mov cx,10
lea di,cadena
repite1:
mov al,carb ;caracter a buscar
repne scasb ;repite si es distinto
dec di
mov al,carr ;caracter a remplazar
stosb ;lo cambia
cmp cx,0
jne repite1
 
lea dx,ms1
mensaje
mov ah,09h ;mostramos la cadena
lea dx,cadena
int 21h
.exit
end
Autor: elgame DescargarDescargar

Comentarios en "Buscar y remplazar (cadenas) en ensamblador"

Table 'programa_programas.t_comentarios' doesn't exist