hola Gracias x respodner estoy usando dos codigo est es el primero
Define osc 4
cmcon=7
trisb=0
inicio:
portb=%1000000
pause 300
Portb=121
pause 300
Portb=%0100100
pause 300
Portb=%0110000
pause 300
Portb=25
pause 300
Portb=18
pause 300
Portb=2
pause 300
Portb=120
pause 300
Portb=0
pause 300
portb=16
pause 300
goto inicio
....
y est es el segundo
define osc 4
CMCON=7
trisb=0
trisa=1
porta=%111111
a var byte
z var byte
inicio:
for a= 0 to 9
lookup a,[64,121,36,48,25,18,2,120,0,16],z
portb=z
pause 1000
next a
goto inicio