12f675_fuse_about_to_blow!

[LEDave]

Well plenty to think about today. Maybe a little consolidation from me, drum those basics into my mind (I still have plenty to learn here).

I see what you're saying regards splitting port1 & port1 to drive the display.

Absolutely fascinating stuff though, I think I'm hooked and I've only managed to flash a few LED's.

Again many thanks to you all.

Dave

[LEDave]

Hi everyone. I've been working on a program below which is a modification of Henrik's look up table program. I know if you had a PIC with an eight bit wide output you could store the output words in the lookup table and then drive a seven segment display directly as Henrik explained.

So I thought I'd try and load a lookup table to blink an LED (D0) 3 times using a for-next-loop (I've never used a for-next-loop before). It works except after three cycles it doesn't stop. I read up that after the loop has finished it then moves on down to the next instruction, so I've added STOP / END. IF i = 4 then STOP. None of these work and when any of these lines are added the program only cycles once.

The only thing I can think of is that the 12F683 doesn't support LOOKUP tables.

Any ideas please? Dave

ANSEL = %00000000 'disable analog select so ports work as digital i/o
CMCON0 = %00000111 'Disable analog comparators
TRISIO = %11001111 'Set GPIO.4&5 to input
GPIO = %00000000 ' set all outputs low

i VAR BYTE

START
Main:
pause 500 'pause 500 mili-secs
For i = 1 to 3 ' loop count variable (value i) also number of times to loop.
LOOKUP i, [ 223, 223, 223] ,GPIO '223 = %11011111 D0 switches on (GPIO.4)
Pause 500 'pause 500 mili-secs
LOW GPIO.4 ' DO switches off
Next i ' loop again. ONE is added to count i and prog jumps to FOR

[Acetronics2]

Hi,

I read "somewhere" a program might end by the " END " directive, or loop to a known label in the program...

Alain

[rmteo]

Dave, use <code> tags and format your code - makes it easier to read.

ANSEL  = %00000000 'disable analog select so ports work as digital i/o
CMCON0 = %00000111 'Disable analog comparators
TRISIO = %11001111 'Set GPIO.4&5 to input
GPIO   = %00000000 ' set all outputs low

i VAR BYTE

START
Main:
pause 500          'pause 500 mili-secs
For i = 1 to 3     ' loop count variable (value i) also number of times to loop.
  LOOKUP i, [ 223, 223, 223] ,GPIO      '223 = %11011111 D0 switches on (GPIO.4)
  Pause 500        'pause 500 mili-secs
  LOW GPIO.4       ' DO switches off
Next i             ' loop again. ONE is added to count i and prog jumps to FOR

[HenrikOlsson]

Hi Dave,
Two things.... First as you figured out and as Alain also pointed out you will need an END after the loop or the PIC will wonder off to never never land eventually starting over (I think). Second, you need another PAUSE in there or you will not see the LED blink. It will get turned on then 500ms later it will get turned off and then on again almost instantly as the loop goes back to the beginning. I guess that's what you were trying with the PAUSE right after Main but remeber that the loop starts over at the FOR statement.

Main:
pause 500          'pause 500 mili-secs
For i = 1 to 3     ' loop count variable (value i) also number of times to loop.
  LOOKUP i, [ 223, 223, 223] ,GPIO      '223 = %11011111 D0 switches on (GPIO.4)
  Pause 500        'pause 500 mili-secs
  LOW GPIO.4       ' DO switches off
  Pause 500
Next i
END

[LEDave]

Henrik you are a star.....!

So I was pretty close then? I guess we wouldn't want to be flying in an aeroplane with any PIC'S in it I'd programmed just yet though...

Right, I'm off for some for-next-loop practice.

Cheers: Dave

[LEDave]

Testing 1.2.3.

So that's a code tag then, I really didn't know that...doh.