Po przeczytaniu niebieskiej książki i przyswojeniu wiedzy teoretycznej postanowiłem napisać pierwszy projekt w c.
Jest to projekt zegara ledowego sterowany przez rejestry szeregowo-równoległe.
Sercem układu jest avr mega8, a zegar RTC PCF8563 z adresem 0xA2 i rezystorami 4,7k pomiędzy SCL - Vcc , SDA - Vcc.
Zewnętrzny rezonator kwarcowy 7372800Hz ustawiony w "Target Hardware" oraz fusebit do pracy z ww rezonatorem.
Układ pracuję już kilka lat , zapisuje oraz czyta dane z PCFa poprawnie z istniejącym wgranym programem napisanym w BASCOM.
fragment kodu odpowiedzialny z wysyłanie oraz odbieranie w BASCOM - wszystko działa OK:
[syntax=basic4gl]Sub Odczyt_danych
I2cstart 'inicjalizacja i2c
I2cwbyte 162 'adres rtc
I2cwbyte 2 'od rejestru sekund
I2cstart
I2cwbyte 163 'adres do odczytu z rtc
I2crbyte Sec_bcd , Ack
I2crbyte Min_bcd , Ack
I2crbyte Godz_bcd , Ack
I2crbyte Dzien_bcd , Ack
I2crbyte Dzientyg_bcd , Ack
I2crbyte Msc_bcd , Ack
I2crbyte Rok_bcd , Nack
I2cstop
'zerowanie nieznaczacych bitow
Sec_bcd = Sec_bcd And &B01111111
Min_bcd = Min_bcd And &B01111111
Godz_bcd = Godz_bcd And &B00111111
Dzien_bcd = Dzien_bcd And &B00111111
Msc_bcd = Msc_bcd And &B00011111
'konwersja do dziesietnej
Sec_dec = Makedec(sec_bcd)
Min_dec = Makedec(min_bcd)
Godz_dec = Makedec(godz_bcd)
Dzien_dec = Makedec(dzien_bcd)
Msc_dec = Makedec(msc_bcd)
Rok_dec = Makedec(rok_bcd)
End Sub
Sub Zapis_czasu
'konwersja do BCD
Sec_bcd = Makebcd(sec_dec)
Min_bcd = Makebcd(min_dec)
Godz_bcd = Makebcd(godz_dec)
I2cstart
I2cwbyte 162
I2cwbyte 2
I2cwbyte Sec_bcd
I2cwbyte Min_bcd
I2cwbyte Godz_bcd
I2cstop
End Sub
Sub Zapis_daty
Dzien_bcd = Makebcd(dzien_dec)
Msc_bcd = Makebcd(msc_dec)
Rok_bcd = Makebcd(rok_dec)
I2cstart
I2cwbyte 162
I2cwbyte 5
I2cwbyte Dzien_bcd
I2cwbyte 0
I2cwbyte Msc_bcd
I2cwbyte Rok_bcd
I2cstop
End Sub[/syntax]
Kod C dla tego samego układu sprzętowego [main.c] :
[syntax=c]#include <avr/io.h>
#include <util/delay.h>
#include "i2c_twi.h"
#define PCF8563_ADDR 0xA2
#define set_strobe PORTD|=(1<<PD7)
#define reset_strobe PORTD&=~(1<<PD7)
#define set_clk PORTD|=(1<<PD6)
#define reset_clk PORTD&=~(1<<PD6)
#define set_dane PORTD|=(1<<PD5)
#define reset_dane PORTD&=~(1<<PD5)
void sendto_4794(int znak);
uint8_t dec2bcd(uint8_t dec);
uint8_t bcd2dec(uint8_t bcd);
int main(void)
{
PORTB = 0xFF; //-----------------------------------------------//
PORTC = 0xFF; // Globalna polityka wszystkich portów //
PORTD = 0xFF;//-----------------------------------------------//
DDRD|=(1<<DDD5)|(1<<DDD6)|(1<<DDD7); //porty PD5,PD6,PD7 jako wyjscia
uint8_t bufor[3];
i2cSetBitrate(100);
bufor[0] = dec2bcd(10);// sekundy
bufor[1] = dec2bcd(11);// minuty
bufor[2] = dec2bcd(12);// godziny
// zapis 3 bajtów z bufora pod adres 0x02 w pamięci RTC
TWI_write_buf(PCF8563_ADDR , 0x02, 3, bufor );
while(1){
reset_strobe;
sendto_4974(0b11111110); //zapal na wyświetlaczach "8:
set_strobe;
}
return 0;
}
void sendto_4974(int znak){
int nrb,maska;
for (nrb=0 ; nrb<8 ; nrb++)
{
reset_clk;
maska = znak & (1<<nrb);
maska = maska >> nrb;
if (maska==0) reset_dane;
if (maska==1) set_dane;
set_clk;
}
}
// konwersja liczby dziesiętnej na BCD
uint8_t dec2bcd(uint8_t dec) {
return ((dec / 10)<<4) | (dec % 10);
}
// konwersja liczby BCD na dziesiętną
uint8_t bcd2dec(uint8_t bcd) {
return ((((bcd) >> 4) & 0x0F) * 10) + ((bcd) & 0x0F);
}[/syntax]
i2c_twi.c
[syntax=c]/*
* i2c_twi.c
*
* Created on: 14 sty 2014
* Author: root
*/
#include <avr/io.h>
#include "i2c_twi.h"
void TWI_init()
{
TWBR = (F_CPU / 100000 - 16) / 2 + 1;
}
void i2cSetBitrate(uint16_t bitrateKHz) {
uint8_t bitrate_div;
bitrate_div = ((F_CPU/1000l)/bitrateKHz);
if(bitrate_div >= 16)
bitrate_div = (bitrate_div-16)/2;
TWBR = bitrate_div;
}
void TWI_start(void) {
TWCR = (1<<TWINT)|(1<<TWEN)|(1<<TWSTA);
while (!(TWCR&(1<<TWINT)));
}
void TWI_stop(void) {
TWCR = (1<<TWINT)|(1<<TWEN)|(1<<TWSTO);
while ( (TWCR&(1<<TWSTO)) );
}
void TWI_write(uint8_t bajt) {
TWDR = bajt;
TWCR = (1<<TWINT)|(1<<TWEN);
while ( !(TWCR&(1<<TWINT)));
}
uint8_t TWI_read(uint8_t ack) {
TWCR = (1<<TWINT)|(ack<<TWEA)|(1<<TWEN);
while ( !(TWCR & (1<<TWINT)));
return TWDR;
}
void TWI_write_buf( uint8_t SLA, uint8_t adr, uint8_t len, uint8_t *buf ) {
TWI_start();
TWI_write(SLA);
TWI_write(adr);
while (len--) TWI_write(*buf++);
TWI_stop();
}
void TWI_read_buf(uint8_t SLA, uint8_t adr, uint8_t len, uint8_t *buf) {
TWI_start();
TWI_write(SLA);
TWI_write(adr);
TWI_start();
TWI_write(SLA + 1);
while (len--) *buf++ = TWI_read( len ? ACK : NACK );
TWI_stop();
}[/syntax]
i2c_twi.h:
[syntax=c]/*
* i2c_twi.h
*
* Created on: 14 sty 2014
* Author: root
*/
#ifndef I2C_TWI_H_
#define I2C_TWI_H_
#define ACK 1
#define NACK 0
// funkcje
void TWI_init();
void i2cSetBitrate(uint16_t bitrateKHz);
void TWI_start(void);
void TWI_stop(void);
void TWI_write(uint8_t bajt);
uint8_t TWI_read(uint8_t ack);
void TWI_write_buf( uint8_t SLA, uint8_t adr, uint8_t len, uint8_t *buf );
void TWI_read_buf(uint8_t SLA, uint8_t adr, uint8_t len, uint8_t *buf);
#endif /* I2C_TWI_H_ */[/syntax]
Program jest w trakcie budowy i zdaję sobie sprawę , że nie ma jeszcze pełnej obsługi RTC, ale chcę uzyskać na tym etapie
zapisanie do PCFa godziny 12:11:10 w programie napisanym w C.
Następnie wgrać poprzedni program w BASCOM do mega8 i odczytać tę godzinę.
Program się kompiluje, wgrywa do uC, ale do RTC nie wpisuje.
Sprawdzałem na Oscyloskopie i zarówno na SCL jak i na SDA przebiegi są generowane przez sprzętowy TWI zarówno przy BASCOM jak przy C.
Rożnica jest taka, że te przebiegi na oko się różnią, jak będzie potrzeba to załączę zrzuty z oscyloskopu.
dziękuje za pomoc, pozdrawiamStatystyki: Napisane przez pawel — 15 sty 2014, o 20:46
]]>
