Elapsed Timer Demo in a PIC12F675

[Leonardo]

Yup, that'll work.
As long as it's the only thing the chip will be doing.

But to answer the original question...
> How to use the Elapsed Timer Demo in a PIC12F675 to maintain a on led by 5 days and then goes off

CLEAR
LED        VAR GPIO.0
CMCON = 7
ANSEL = 0

Include "Elapsed.bas"

Gosub ResetTime                ' Reset Time to  0d-00:00:00.00
Gosub StartTimer               ' Start the Elapsed Timer

HIGH LED                         ; Start with LED on

Loop:
    if DaysChanged then  
       DaysChanged = 0
       if Days = 5 then LOW LED  ; Turn off LED
    endif
Goto Loop

Or you can add a blinky LED to show that it's still counting...

CLEAR
LED        VAR GPIO.0
StatLED    VAR GPIO.1
CMCON = 7
ANSEL = 0

Include "Elapsed.bas"

Gosub ResetTime                ' Reset Time to  0d-00:00:00.00
Gosub StartTimer               ' Start the Elapsed Timer

HIGH LED                         ; Start with LED on

Loop:
    if DaysChanged then  
       DaysChanged = 0
       if Days = 5 then LOW LED  ; Turn off LED
    endif
    
    IF SecondsChanged then
       SecondsChanged = 0
       Toggle StatLED
    endif

    ; Rest of the program goes here
Goto Loop

And you can still do other stuff at the same time.

Hey Darrel,

In compiling I get this error because it will be.

<a href="http://imageshack.us"><img src="http://img231.imageshack.us/img231/9863/errorcv5.jpg" border="0" alt="Image Hosted by ImageShack.us"/></a><br/><a href="http://g.imageshack.us/img231/errorcv5.jpg/1/"><img src="http://img231.imageshack.us/img231/errorcv5.jpg/1/w626.png" border="0"></a>

[mister_e]

open ASM_INTS.bas file, there you'll discover ..

' --- IF any of these three lines cause an error ??  Simply Comment them out to fix the problem ----
wsave1      var byte    $A0     SYSTEM          ' location for W if in bank1
wsave2      var byte    $120    SYSTEM          ' location for W if in bank2
wsave3      var byte    $1A0    SYSTEM          ' location for W if in bank3

[Leonardo]

open ASM_INTS.bas file, there you'll discover ..

' --- IF any of these three lines cause an error ??  Simply Comment them out to fix the problem ----
wsave1      var byte    $A0     SYSTEM          ' location for W if in bank1
wsave2      var byte    $120    SYSTEM          ' location for W if in bank2
wsave3      var byte    $1A0    SYSTEM          ' location for W if in bank3

Steve,

Did not take into account the memory banks and compiles well, will do some tests and the results then I said.

Thank you

[Leonardo]

Steve,

Perform tests on a 4-MHz external crystal setting 1 hour and was led off in 56:41 minutes of taking a delay time of 3:06 minutes. Is it normal that delay?.

Thank you

[mister_e]

Can't tell, i never used it before. Would be of great help if you could post the whole schematic, code and configuration fuses.

I would guess you just use the internal OSC... probably where the huge gap come from.

[Leonardo]

Can't tell, i never used it before. Would be of great help if you could post the whole schematic, code and configuration fuses.

I would guess you just use the internal OSC... probably where the huge gap come from.

Steve,
I'm using an external 4MHz crystal and the code is this for PIC12F675.

[HTML]CLEAR
LED VAR GPIO.0
CMCON = 7
ANSEL = 0

Include "Elapsed.bas"

Gosub ResetTime ' Reset Time to 0d-00:00:00.00
Gosub StartTimer ' Start the Elapsed Timer

HIGH LED ; Start with LED on

Loop:
if HoursChanged then
HoursChanged = 0
if Hours = 1 then LOW LED ; Turn off LED
endif
Goto Loop[/HTML]

[Leonardo]

Can't tell, i never used it before. Would be of great help if you could post the whole schematic, code and configuration fuses.

I would guess you just use the internal OSC... probably where the huge gap come from.

Hello,

I doubt arises as to obtain such a delay of 1:20 hours and minutes.

Thanks

[Leonardo]

Steve,

I've done some testing with minutes and works extremely well using a 4-MHz crystal, the oscillator's internal PIC12F675 is not very accurate there is any way to use it with good presicion?.

Thank you

[Darrel Taylor]

Try adding ...

DEFINE OSCCAL_1K 1

when using the internal OSC.