Luces del auto fantástico con Pic 16f84a

CON ESTE PROGRAMA EN PBP PROGRAMARAS TU PIC 16F84A
EL DIAGRAMA ES SENCILLO, CONECTA LEDS AL PUERTOB
CONECTA EL OSCILADOR DE 4MHZ
CONECTA EL MCLR
Y LISTOS
ES MEJOR TODOS LOS LEDS DE UN SOLO COLOR

PROGRAMA:


'****************************************************************
'* Name : UNTITLED.BAS *
'* Author : FRANCISCO HILARIÓN *
'* Notice : Copyright (c) 2010 [select VIEW...EDITOR OPTIONS] *
'* : All Rights Reserved *
'* Date : 27/12/2010 *
'* Version : 1.0 *
'* Notes : *
'* : *
'****************************************************************
'LUCES DEL AUTO FANTÁSTICO
X VAR BYTE
LEDS VAR PORTB
TRISB=0
LEDS=1
AUTOFANTASTICO:
FOR X=1 TO 7
LEDS=LEDS<<1
PAUSE 75
NEXT
FOR X=1 TO 7
LEDS=LEDS>>1
PAUSE 75
NEXT
FOR X=1 TO 7
LEDS=LEDS<<1
PAUSE 10
NEXT
FOR X=1 TO 7
LEDS=LEDS>>1
PAUSE 10
NEXT
FOR X=1 TO 7
LEDS=LEDS<<1
PAUSE 100
NEXT
FOR X=1 TO 7
LEDS=LEDS>>1
PAUSE 100
NEXT
GOTO AUTOFANTASTICO

END



PD: Perdonen la escritura en mayúscula