Hola:
Aqui tienes un ejemplo que muestra un mensaje de "HOLA" en una matriz de leds en Proteus y PBP.
Codigo:
"Matriz de Leds
"Giovanni LAfebre
"Cuenca - Ecuador
trisd=0
trisb=0
x var byte
i var byte
inicio:
gosub LETRA_H
gosub LETRA_o
gosub LETRA_l
gosub LETRA_A
goto inicio
Letra_A:
for i=0 to 30
PORTD=%00000001:PORTB=%10000001:pause 4
PORTD=%00000010:PORTB=%11110110:pause 4
PORTD=%00000100:PORTB=%11110110:pause 4
PORTD=%00001000:PORTB=%11110110:pause 4
PORTD=%00010000:PORTB=%10000001:pause 4
Next i
return
Letra_H:
for i=0 to 30
PORTD=%00000001:PORTB=%10000000:pause 4
PORTD=%00000010:PORTB=%11110111:pause 4
PORTD=%00000100:PORTB=%11110111:pause 4
PORTD=%00001000:PORTB=%11110111:pause 4
PORTD=%00010000:PORTB=%10000000:pause 4
Next i
return
Letra_L:
for i=0 to 30
PORTD=%00000001:PORTB=%10111111:pause 4
PORTD=%00000010:PORTB=%10111111:pause 4
PORTD=%00000100:PORTB=%10111111:pause 4
PORTD=%00001000:PORTB=%10111111:pause 4
PORTD=%00010000:PORTB=%10000000:pause 4
Next i
return
Letra_O:
for i=0 to 30
PORTD=%00000001:PORTB=%11000001:pause 4
PORTD=%00000010:PORTB=%10111110:pause 4
PORTD=%00000100:PORTB=%10111110:pause 4
PORTD=%00001000:PORTB=%10111110:pause 4
PORTD=%00010000:PORTB=%11000001:pause 4
Next i
return
END
Aqui los archivos:
http://miarroba.com/foros/ver.php?foroid=348538&temaid=3612207