DS1307 Clock Freeze in Battry Supply

arvinfx said:

Hi, I use a DS1307 and it's work perfect then supply power is in Vcc.
But when i disconnect Vcc in 02:40 and one hour late I connect the Vcc unfortunately time is 02:40 ....!

any one have this proglem whit this IC?

Click to expand...

blueroomelectronics said:

The DS1307 is a very reliable RTCC the biggest problem I've had was forgetting to set the run bit.

Click to expand...

arvinfx said:

HI

I use the lithium type of battery (Maxell CR2032 3V) 3.2v in voltmer .
And i Change it to 2.5 volt battery and my problem not solved.

The clock and Run BIT set whit this line :

I2CWRITE SDA,SCL,$D0,$00,[$00,$55,$18,$01,$2,$12,$08,$00]

It is correct?

Click to expand...

ericgibbs said:

hi,
I use a 3V lithium battery, works OK.
Look at these images.

It sounds like the DS1307 is being stopped at power down for some reason.
Can you post your code.?
Use the '#' menu symbol when you post code.

Click to expand...

arvinfx said:

Hi

I change to # but compiler give an error for this symbol !!!

Click to expand...

ericgibbs said:

hi,
I dont mean use the '#' for compiling.????

When you post your program source code text to the forum, use the '#' symbol.

example:
post your program to the forum.
SELECT [highlight] all the code you have posted
and then click the '#' symbol on the upper menu bar of this message box.

This will keep the formatting for you code correct... without the '#' your code will be displayed as a text list, without any formatting.. OK.?

Click to expand...

[B]@ DEVICE    HS_OSC
'@ device wdt_off
INCLUDE "modedefs.bas" 
define OSC 20
DEFINE LCD_BITS 4 'LCD bus size 4 or 8 

DEFINE LCD_DREG PORTA 'LCD data port 
DEFINE LCD_DBIT 0 'LCD data starting bit 0 or 4 

DEFINE LCD_RSREG PORTD 'LCD register select port 
DEFINE LCD_RSBIT 0 'LCD register select bit
 
DEFINE LCD_EREG PORTD 'LCD enable port 
DEFINE LCD_EBIT 1 'LCD enable bit 

DEFINE LCD_LINES 4 'Number lines on LCD 
define lcd_commandus 2000
define lcd_dataus 1000
' DEFINE I2C_SLOW 1

symbol sda = portd.2
symbol scl = portc.3 
   



h var byte 
m var byte
s var byte
' Read time Secs,Mins,Hours,Day,Date,Month,Year,Control
I2CWRITE SDA,SCL,$D0,$00,[$00,$22,$01,$27,$6,$11,$08,$00] ' Write to DS1307
pause 10


read_1307:


I2CREAD SDA,SCL,$D0,$00,[s,m,h]
  
lcdout $fe,1,"Time=",hex2 h ,":",hex2 m  ,":",hex2 s
pause 1200
goto read_1307[/B]