I have compiled this and dont know why only 3 LEDs are blinking and the 4th doesnt blink.Could you tell me where I am mistaken,to understand better.Thank you
Code:'**************************************************************** '* Name : P16F690.INC * '* Author : [osceola] * '* Notice : * '* : All Rights Reserved * '* Date : 25/08/2009 * '* Version : 1.0 * '* Notes : * '* : * '**************************************************************** ' PICBASIC PRO program to blink 3 LEDS in sequence ' Define LOADER_USED to allow use of the boot loader. ' This will not affect normal program operation. Define LOADER_USED 1 DEFINE OSC 4 'This is the default setting OSCCON=%01100000 @ device pic16F690, intrc_osc_noclkout, wdt_on, mclr_on, protect_off i Var Byte ' Define loop variable LED1 VAR PORTC.0 LED2 VAR PORTC.1 LED3 Var PORTC.2 LED4 VAR PORTC.3 LEDS Var PORTC TRISC = %00000000 ' Set PORTC to all output mainloop: LEDs = 1 Pause 500 LEDS = 2 Pause 500 LEDS = 3 Pause 500 ' LEDS = 4 Pause 500 ' Delay for .5 seconds For i = 1 To 4 ' Go through For..Next loop 2 times LEDS = LEDS << 1 ' Shift on LED one to left Pause 500 ' Delay for .5 seconds Next i Goto mainloop ' Go back to mainloop and blink LED forever End




Bookmarks