Mis Algoritmos

;Autor Hector Torres
;URL

; progarma que usa movs para mover cadenas

.model small
.stack
.data

 cad1 db 'hola $'
 cad2 db 'adios$'
 cad3 db 'xxxxxxxxxxx$'
 
.code
.startup

 mov ah,06h         ; peticion de recorrido de la pantalla
 mov al,00h         ; indica la pantalla completa
 mov bh,07h         ; attributos de color y fondo 7 blanco 0 negro
 mov cx,0000h       ; esquina superior izquierda renglon columna
 mov dx,184fh       ; esquina inferior derecha renglon columna
 int 10h            ; llamada a la interrupcion de video BIOS

 lea si,cad1
 lea di,cad3
 push ES             ; guarda el valor de ES en la pila
 mov AX,DS           ; asigna a AX el valod del DS para   
 mov ES,AX           ; igualarlo en ES
 mov cx,5            ; va a over 5 caracteres
 rep movsb           ; aqui muevee ls cinco caracters con el REP
 lea si,cad2         ; mueve la segunda cadena
 mov cx,5            ; 5 caracteres
 rep movsb           ; aqui los mueve
 pop ES              ; recupera el valor de ES de la pila

 lea dx, cad1        ; imprime la primer cadena
 mov ah,09h
 int 21h
 lea dx, cad2        ; imprime la segunda cadena
 mov ah,09h
 int 21h
 lea dx, cad3        ; imprime la cadena resultante
 mov ah,09h
 int 21h

.exit
end