Name:
Location: Tijuana, Baja California N., Mexico

Soy un estudiante de Informatica en el TECNOLOGICO DE TIJUANA, y que trato de terminar mi carrera para poder hacer un profecionista exitoso. Pero lo mas Importante trato de ser un buen amigo aunque aveces me paso con la carrilla.

Google

Tuesday, January 31, 2006

Ejemplo 2

;Lenguaje Ensamblador I
;practica 1 v3
;t2u2
;programa que despliega tres mensajes, captura un caracter y una cadena
;para despues imprimirlas

.model small
.stack
.data
mensaje db 10,13, 'CLASE DE ENSAMBLADOR$'
mensaje1 db 10,13,'introduce cadena:$'
mensaje2 db 10,13,'introduce caracter:$'
mensaje5 db 10,13,'Posicion:$'
mensaje6 db 10,13,'Numero de veces a insertar:$'
c_v db '$'
c db '$'
p db 0
n db 0

.code
inicio:

mov ax,@data
mov ds,ax

;desplegar mensages
mov ah,09h
mov dx,offset mensaje
int 21h

;cadena
mov ah,09h
mov dx,offset mensaje1
int 21h

;captura de cadena
mov ah,0ah
mov dx, offset c_v
int 21h


;caracter
mov ah,09h
mov dx,offset mensaje2
int 21h

;captura de caracter
mov ah,0ah
mov dx, offset c
int 21h

;caracter
mov ah,09h
mov dx,offset mensaje5
int 21h

;captura de caracter
mov ah,0ah
mov dx, offset p
int 21h

;caracter
mov ah,09h
mov dx,offset mensaje6
int 21h

;captura de caracter
mov ah,0ah
mov dx, offset n
int 21h

;busqueda de posicion en cadena,para insercion de caracter
mov al,c
lea di,c_v
add di,p
stosb

;desplegar cadena modificada
mov ah,09h
mov dx,offset c_v
int 21h

mov ah,4ch
int 21h
end

0 Comments:

Post a Comment

<< Home