blinking LED

[kindows]

untested . . .

PortA = %00000000
TrisA = %00000000
i var byte
Start:
PortA.1 = 1
while PortA.1 = 1
For i = 0 to 5
portA.0 = 1
pause 500
PortA.0 = 0
pause 500
next i
portA.1 = 0
wend

end

Hi..
Thanks for all
I test your code and its working fine but because I am new with picbasic what dose this meen
PortA = %00000000
TrisA = %00000000
When I remove this tow lines the code not working,
Best regard

[Jerson]

PORTA = %00000000 read this as PORTA gets bits 00000000
This means, write 0 to each bit position of PORTA. Each 0 represents the bits in PORTA from bit 7 to bit 0. You could also write it as
PORTA = $00 read this as PortA gets Hex 0

TRISA = %00000000
This is the tristate register which tells your PIC to allow the values of PORTA to 'drive' the external world circuits. Same as above for the bit position part. If you set any 1 position to 1, that position will only be able to read (INPUT) from the external circuit.

Clear now? Don't hesitate to ask. See how many responses you got.

[charudatt]

I am looking for a way to change the rate of blink (Blinking rate) using Interrupt. I would read a POT using ADC and then change the blink rate, Any idea how I could impliment it in Sayzer's code.

Thanks.

p.s. maybe using TMR0

[Melanie]

A question for you first... why do you specify using INTERRUPT?

[charudatt]

Cause, I want to use it in a code where I am doing some other things like reading ADC channel , and monitoring inputs , while the led is blinking.

Thanks

[mackrackit]

You may want to look at this. Post #2 might be of interest.
http://www.picbasic.co.uk/forum/showthread.php?t=3251