Simulación de un menu de opciones.
Aplicación que simula el comportamiento de un menu de opciones, ya que cambia los atributos a la línea seleccionada dando el efecto de \"línea seleccionada\".
Funciona con las teclas 8 y 2 para bajar y subir.
;Autor Hector Torres
;URL
lecar macro
mov ah,08
mov bh,00
int 10h
endm
atributo macro car,attri
mov ah,09h
mov al,car
mov bh,00
mov bl,attri
mov cx,01
int 10h
endm
gotoxy macro fila,col
mov ah,02h
mov dh,fila
mov dl,col
mov bh,0
int 10h
endm
.model small
.stack
.data
cont db ?
colum db ?
tecla db ?
.code
.startup
mov cont,1
teclaso:
mov colum,0
mascolum:
gotoxy cont,colum
lecar
atributo al,56
inc colum
cmp colum,79
jne mascolum
mov ah,07
int 21h
mov tecla,al
mov colum,0
mascolum2:
gotoxy cont,colum
lecar
atributo al,07
inc colum
cmp colum,79
jne mascolum2
cmp tecla,0dh
je salir
cmp tecla,38h
je arriba
cmp tecla,32h
je abajo
jne teclaso
arriba:
dec cont
cmp cont,0
je baja
jne teclaso
abajo:
inc cont
cmp cont,24
je sube
jne teclaso
sube:
mov cont,0
jmp teclaso
baja:
mov cont,24
jmp teclaso
salir:
.exit
end