Witam,
podłączyłem do Atmegi8 zegar PCF8583 tak jak na rysunku
SCL i SDA podłączyłem przez oporniki 1k do +5V
użyłem takiego programu:
i mam problem bo wyświtlacz mruga
i zegar gubi co kilka sekund jedną sekunde
co robię źle ??
Poprawiłem tytuł - regulamin p.11.1, p.11.2
[zumek]
podłączyłem do Atmegi8 zegar PCF8583 tak jak na rysunku
![[bascom][atmega8]Zegar na pcf8583 gubi sekundy [bascom][atmega8]Zegar na pcf8583 gubi sekundy](https://obrazki.elektroda.pl/67_1228932238.gif)
SCL i SDA podłączyłem przez oporniki 1k do +5V
użyłem takiego programu:
Code:
$regfile = "m8def.dat"
$crystal = 1000000
Config Pinc.4 = Input
Config Pinc.3 = Input
Config Lcdpin = Pin , Db4 = Portb.0 , Db5 = Portb.1 , Db6 = Portb.2 , Db7 = Portb.3 , E = Portb.4 , Rs = Portb.5 'tu zmien na odpowiednie piny
Config Lcd = 20 * 4
Cls
Cursor Off Noblink
Config Scl = Portc.4
Config Sda = Portc.3
Config I2cdelay = 5
Dim Sekundy As Byte
Dim Minuty As Byte
Dim Godziny As Byte
Cursor Off
Const Pcf_o = 161 'adres zegara RTC odzczytu
Const Pcf_z = 160 'adres zegara RTC zapisu
'poczatek programu
Const Control = 8
I2cinit
I2cstart
I2cwbyte Pcf_z
I2cwbyte 0
I2cwbyte Control
I2cstop
Do
I2cinit
I2cstart
I2cwbyte Pcf_z
I2cwbyte 2
I2cstart
I2cwbyte Pcf_o
I2crbyte Sekundy , Ack
I2crbyte Minuty , Ack
I2crbyte Godziny , Nack
I2cstop
Cls
Lcd "ZEGAR:" ; " ERR:" ; Err
Lowerline
Lcd Bcd(godziny) ; ":" ; Bcd(minuty) ; ":" ; Bcd(sekundy)
Waitms 500
Loop
End
i mam problem bo wyświtlacz mruga


Poprawiłem tytuł - regulamin p.11.1, p.11.2
[zumek]