Giao Tiếp DS1337 + PIC Viết bằng CCS (DEMO)

by **hoangnhanpro** 28th November 2011, 16:18

Dùng để tham khảo...

Code:: #include <16F877A.h> #include <def_877a.h> #FUSES NOWDT, HS, NOPUT, NOPROTECT, NODEBUG, NOBROWNOUT, NOLVP, NOCPD, NOWRT #use delay(clock=20000000) #use rs232(baud=4800,parity=N,xmit=PIN_C6,rcv=PIN_C7,bi ts=9) #use i2c(Master,Slow,sda=PIN_C4,scl=PIN_C3) int8 sec,min,hour,dow,date,month,year; int8 const maled7[10] = {0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xF8,0x80,0x90 }; int8 so[13]; //sec,min,hour,dow,date,month,year #bit key = 0x06.7 void display() { int8 led1,led2,led3,led4,led5,led6,led7,led8,led9,led10 ,led11,led12; int8 temp1,temp2; i2c_start(); i2c_write(0xD0); i2c_write(0x00); //set register pointer I2C_start(); I2C_write(0xD1); /* write slave address + read */ sec = i2c_read(1); /* starts w/last address stored in register pointer */ min = i2c_read(1); hour = i2c_read(1) & 0x3F; dow = i2c_read(1); date = i2c_read(1); month = i2c_read(1) & 0x7F; year = i2c_read(0); i2c_stop(); led1=sec & 0x0F; led2=(sec & 0xF0)>>4; //convert to BCD SEC led3=min & 0x0F; led4=(min & 0xF0)>>4; //convert to BCD MIN led5=hour & 0x0F; led6=(hour & 0xF0)>>4; //convert to BCD HOUR led7=date & 0x0F; led8=(date & 0xF0)>>4; //convert to BCD DATE led9=month & 0x0F; led10=(month & 0xF0)>>4; //convert to BCD MONTH led11=year & 0x0F; led12=(year & 0xF0)>>4; //convert to BCD YEAR // Sec - Min - Hour PortB=maled7[led1]; RD0=0;//LED1 delay_us(200); if(key) RC2=0; RD0=1; PortB=maled7[led2]; RD1=0; //LED2 delay_us(200); if(key) RC2=1; RD1=1; PortB=maled7[led3]; RD2=0;//Led3 delay_us(200); if(key) RC2=0; RD2=1; PortB=maled7[led4]; RD3=0;//led4 delay_us(200); if(key) RC2=1; RD3=1; PortB=maled7[led5]; RD4=0;//led5 delay_us(200); RD4=1; PortB=maled7[led6]; RD5=0;//led6 delay_us(200); RD5=1;//*/ /*/ Date - Month - Year PortB=maled7[led7]; RD0=0;//LED1 delay_us(200); RD0=1; PortB=maled7[led8]; RD1=0; //LED2 delay_us(200); RD1=1; PortB=maled7[led9]; RD2=0;//Led3 delay_us(200); RD2=1; PortB=maled7[led10]; RD3=0;//led4 delay_us(200); RD3=1; PortB=maled7[led11]; RD4=0;//led5 delay_us(200); RD4=1; PortB=maled7[led12]; RD5=0;//led6 delay_us(200); RD5=1; */ } void init_time() { int8 date,mth,year,dow,hour,min,sec; I2C_start(); /* The following Enables the Oscillator */ I2C_write(0xD0); /* address the part to write */ I2C_write(0x00); /* position the address pointer to 0 */ I2C_write(0); /* write 0 to the seconds register, clear the CH bit */ I2C_write(0x30); /* write slave address + write */ I2C_write(0x52); /* hour = 101 0010 12h mode - time =12 */ I2C_write(0x07); // Thoi gian ban dau la: 3/11/2005 - 12h/30ph/00sec I2C_write(0x03); I2C_write(0x11); I2C_write(0x05); I2C_stop(); I2C_start(); // Write control and status register I2C_write(0xD0); // write slave address + write */ I2C_write(0x0e); // write register address, control register */ I2C_write(0x20); /* enable osc, bbsqi */ I2C_write(0x00); I2C_stop(); } void keyscan() { } void main() { int8 temp; int8 i; #bit key = 0x08.7 setup_timer_0(RTCC_EXT_L_TO_H|RTCC_DIV_1); set_timer0(0xC4); TrisB=0x00;//output TrisD=0x00; TrisC=0x00; trisc0=1; //Set key input pin TMR0IF=0; RC2=1; if(key) { init_time(); //Thiet lap thoi gian ban dau sec=0;min=59;hour=19; } i2c_start(); i2c_write(0xD0); i2c_write(0x00); //set register pointer I2C_start(); I2C_write(0xD1); /* write slave address + read */ temp = i2c_read(1); /* starts w/last address stored in register pointer */ temp = i2c_read(1); temp = i2c_read(1); temp = i2c_read(1); temp = i2c_read(1); temp = i2c_read(1); temp = i2c_read(0); i2c_stop(); while(1) { display(); } }

(Sưu tầm)