12f675_fuse_about_to_blow!

[LEDave]

Hi mackrackit,

Really sorry for the late reply, has been one of those days today.

I've got a couple of small problems with LCD / Counting at the moment, nothing I shouldn't be able to fix by now so please bear with me. If I can't get it going soon I'll have to ask.

Dave

[mackrackit]

Really sorry for the late reply, has been one of those days today.

Days???
I have been having one of those weeks

[LEDave]

Hi mackrackit,

I have been having one of those weeks

Lol..... Nice to know I'm not alone, you do have my sympathy though.

Here's what I thought was a silly question, now I'm not so sure it is:

When you declare a VAR WORD, I thought that the value would automatically be set at zero, now I'm not so sure it is. Do you have to have to re-set it to zero before you start a count program or is it zero already?

I know it's Friday tomorrow but I hope your week gets better.

Dave

[mackrackit]

Sometimes it will be zero at power up but you never know.

You can use CLEAR, in the manual

or

VAR_IN_QUESTION = 0

Not a stupid question at all

[LEDave]

Not a stupid question at all

Cheers mackrackit, I'm feeling better already I hope you are too!

So probably good practice to set VAR_IN_QUESTION = 0 just in case.

Hopefully I'll have moved the program on tomorrow, fingers x'd.

Right, time for me bed.

See you tomorrow.

Dave

[mackrackit]

Hint
COUNT is for pulses in a time period.

Maybe
if switch goes high
then
var = var + 1

[LEDave]

Hi mackrackit,

Question: How long does it take LEDave to wire a push_button_switch to a PIC16F684?

Answer: About 48hrs

I think the program below should work ok:

Total var word
clear

MAIN:
if PORTA.5 = 0  then  count_up:
IF PORTA.5 = 1  THEN      MAIN: 
    
Count_up:
let Total = Total + 1 
pauseus 25   
LCDOUT $FE,1
LCDOUT $FE,$C0,DEC Total
PAUSE 500    
GOTO MAIN:

LEDave current status: Eyes going, mind boarderline!

Dvae

[mackrackit]

I think the program below should work ok:

Total var word
clear

MAIN:
if PORTA.5 = 0  then  count_up:
IF PORTA.5 = 1  THEN      MAIN: 
    
Count_up:
let Total = Total + 1 
pauseus 25   
LCDOUT $FE,1
LCDOUT $FE,$C0,DEC Total
PAUSE 500    
GOTO MAIN:

It looks good.

LEDave current status: Eyes going, mind boarderline!

Dvae

Hey, that means you have passed the initiation and are a full codder now.

[LEDave]

So the next thing it to WRITE 'Total' to EEPROM address, then READ that value and put it back into 'Total'.

The theory is that when the PIC power supply is turned off then restarted last 'Total' reappears on the LCD.

Dave

[mackrackit]

Yup, that is the mission