FORT- NEXT se encarga de generar un
bucle finito, ósea repite un número determinado de veces las instrucciones dentro
de este comando.
FOR
conteo = inicio TO final STEP incremento o decremento
Instrucciones
NEXT
conteo
Todo mejor con un ejemplo:
Este ejemplo consiste en generar un
juego de luces con 4 leds los cuales se encenderán y apagaran en secuencia, a
medida que transcurre el tiempo la frecuencia de encendido aumenta.
'**********************PROGRAMA*******************'
'Juego de Luces con Pic Basic Pro
y PIC 16F84A con FOR-NEXT
'Un poco de seudocódigo
'1. definir el programa y los
puertos a usar
'2. si el botón es activado
'3. dar un tiempo de 500 a X
'4. for para pulso pin 1
' 4.1
for pulso pin 2
' 4.2
for pulso pin 3
' 4.3
for pulso pin 4
'5. Repetir programa
i var byte
x var byte
m var byte
n var byte
o var byte
TRISA = 000001
TRISB = %11000001
Luces:
PORTB = 0
IF PORTA.0 = 1 THEN
x = 500
FOR
i = 1 TO 50 STEP 1
HIGH
PORTB.1
PAUSE
x
LOW
PORTB.1
PAUSE
x
x
= x-4
m=
1
FOR
m = 1 TO 1 STEP 1
HIGH
PORTB.2
PAUSE
x
LOW
PORTB.2
PAUSE
x
x
= x-2
n
= 1
FOR
n = 1 TO 1STEP 1
HIGH
PORTB.3
PAUSE
x
LOW
PORTB.3
PAUSE
x
x
= x-2
o
= 1
FOR
o = 1 TO 1 STEP 1
HIGH
PORTB.4
PAUSE
x
LOW
PORTB.4
PAUSE
x
x
= x-2
NEXT
o
NEXT
n
NEXT
m
NEXT
i
ENDIF
GOTO Luces
'****************************FIN*****************************'
No olvidar que cada pin de los microcntroladores tienen un maximo de corriente aprox de 5mA por pin verificar datasheet de cada microcntrolador.
Descargar el proyecto: Juego de Luces con Pic Basic Pro y PIC 16F84A con FOR-NEXT
0 comentarios:
Publicar un comentario