Ensambaldor

Páginas: 2 (377 palabras) Publicado: 24 de enero de 2012
.MODEL SMALL
.Data
mensaje1 DW 'BIENVENIDO A BANJILO$'
error DW ' ERROR: Usuario incorrecto$'

user1 DW ' EMMANUEL$'
user2 DW ' ALONSO$'
varnip DB 5,0,5 DUP(?)
nip DB 13,10,13,10,'INTRODUZCA SU NIP: $'
DB 13,10,13,10,'$'
emmanuel DB '9999'
DB 13,10,13,10,'$'
alonso DB '0101'

oppp DB 2,0,2 DUP(?)
opciones DB 13,10,13,10,'PRESIONA 1 PARA RETIRAR / 2 PARA SALIR: $'
DB 13,10,13,10,'$'
noo DB '2'
DB 13,10,13,10,'$'
sii DB '1'
errores DB 13,10,13,10,' ERROR: la opcion nopuede ser nula $'

.CODE
EMPIEZA:
MOV AH,0Fh
Int 10h
MOV AH,0
INT 10h
MOV Ax,@Data
MOV DS,AX
MOV DX,OFFSET mensaje1
MOV AH,9
INT 21h
PUSH DS
POP ES

CODIGONIP:
MOVDX,OFFSET nip
MOV AH,9
INT 21h
MOV AH,0AH
MOV DX,OFFSET varnip
PUSH DX
int 21h
pop DX
Inc DX
mov si,dx
cmp Byte ptr[si],0
jz error1
jnz codnip1
jmp CODIGONIP

error1:
lea DX,errores
MOVAH,09
INT 21h

codnip1:

inc dx
mov cx ,5
mov si, dx
mov di ,offset alonso
repe cmpsb
jcxz codnip3

codnip2:
mov cx ,4
mov si, dx
mov di ,offset emmanuel
repe cmpsbjcxz codnip4
JMP menerror
LENGUAJE ENSAMBLADOR
Ing. Sistemas Computacionales
Ejercicio
Emmanuel González Domínguez
José Alonso Martínez Lugo
LENGUAJE ENSAMBLADOR
Ing. SistemasComputacionales
Ejercicio
Emmanuel González Domínguez
José Alonso Martínez Lugo

menerror:
lea DX,error
MOV AH,09
INT 21h
jmp CODIGONIP

codnip3:
lea dx,user2
mov ah,09
int 21h
jmp opcioncodnip4:
lea Dx,user1
mov ah,09
int 21h
jmp opcion




opcion:
mov dx ,00h
mov si ,00h
mov di ,00h
mov DX,OFFSET opciones
mov AH,9
int 21hmov AH,0AH
mov DX,OFFSET oppp
push DX
int 21h
pop DX
Inc DX
mov si,dx
cmp Byte ptr[si],0
jz error2
jnz val2
jmp opcion


error2:
lea DX,errores
mov AH,09
int 21h
jmp...
Leer documento completo

Regístrate para leer el documento completo.

Estos documentos también te pueden resultar útiles

  • Ensambaldor

Conviértase en miembro formal de Buenas Tareas

INSCRÍBETE - ES GRATIS