đồng hồ số dùng 8051

[dol2ph94in]

cam on ban. Dia chi mail toi la "www.dol2ph94in_cdt@yahoo.com"

[0973885865]

Đồng hồ này rất hay, nhưng mình có thắc mắc là Led 7 đoạn trong mô phỏng là loại 4 chân mình không hiểu, khi làm mạch thực tế thì led 7 đoạn 10 chân mà.
Nhóm của bạn đã làm mạch in của mạch này chưa? Nếu có thì chia sẻ cho mình với. Cảm ơn nhiều

bạn à con 7 đoạn đó là led mã BCD con này đã tích hợp IC giải mã ở trong rồi nên đầu vào của nó chỉ có 4 chân thôi còn con led mà bạn nói có 10 chân là đúng con này có 2 chân có chức năng là 1 chân com ấy mà 8 chân còn lại nối với mạch giải mã

[tranduythai]

Goi mail cho ban dophin ko dc? Minh post len day luon.Ai dung thi dung.Oke
#define SIG24C 0xA0
#include <REG51.H>
sbit SCL = P1^7;
sbit SDA = P1^6;
sbit D1 = P0^3;
sbit D2 = P0^2;
sbit D3 = P0^1;
sbit D4 = P0^0;
sbit C1 = P0^6;
sbit C2 = P0^7;
sbit oke = P3^0;
sbit up = P3^1;
sbit down = P3^2;
sbit mode = P3^3;

signed char second, day, date, month, year, gi,p;
void SetupI2C(void);
void ClockI2C(unsigned int loop);
unsigned char ReadRtc(unsigned char addr);
void WriteRtc(unsigned char addr, unsigned char ch);
void ShiftOut(unsigned char bytout);
void Delay(unsigned int n)
{
unsigned int j;
for(j=0;j<n;j++);
}
void ClockI2C(unsigned int loop)
{
while(loop--);
}
void BaseClock(void)
{
ClockI2C(4);
SCL = 1;
ClockI2C(4);
SCL = 0;
}
void Start(void)
{
SCL = 1;
SDA = 1;
ClockI2C(4);
SDA = 0;
ClockI2C(4);
SCL = 0;
}
void Stop(void)
{
SDA = 0;
SCL = 1;
ClockI2C(4);
SDA = 1;
ClockI2C(4);
SCL = 0;
}
void SetupI2C(void)
{
unsigned char i;

SCL = 1;
SDA = 1;
ClockI2C(2);
for(i=0;i<9;i++)
BaseClock();
Start();
}
void NoAck(void)
{
SDA = 1;
BaseClock();
}

bit GetAck(void)
{
unsigned int i;
bit bSda;
SDA = 1;
ClockI2C(2);
SCL = 1;
for(i=0;i<3000;i++)
{
ClockI2C(3);
bSda = SDA;
if(bSda == 0) break;
}
SCL = 0;
return(!bSda);
}
void ShiftOut(unsigned char bytout)
{
unsigned char i;
for(i=0;i<8;i++)
{
if((bytout & 0x80) == 0)
SDA = 0;
else
SDA = 1;
BaseClock();
bytout = bytout << 1;
}
}
unsigned char ShiftIn(void)
{
unsigned char i,bytin;
bytin = 0;
bytin = bytin | SDA;
for(i=0;i<7;i++)
{
BaseClock();
bytin = bytin << 1;
bytin = bytin | SDA;
}
return(bytin);
}
void WriteRtc(unsigned char addr, unsigned char ch)
{
Start();
ShiftOut(0xD0);
GetAck();
ShiftOut(addr);
GetAck();
ShiftOut(((ch/10)<<4)|(ch%10)); // ghi ma theo kieu BCD 1|9
GetAck();
Stop();
}
unsigned char ReadRtc(unsigned char addr)
{
unsigned char ch;
ch = 0xff;
Start();
ShiftOut(0xD0);
GetAck();
ShiftOut(addr);
GetAck();
Start();
ShiftOut(0xD1);
GetAck();
ch = ShiftIn();
NoAck();
Stop();
SDA =1;
SCL =1;
return((ch & 0x0f) + (ch>>4)*10);
}
void khoidongRTC(void)
{
SetupI2C();
WriteRtc(0x00,second);
WriteRtc(0x03,day);
WriteRtc(0x04,date);
WriteRtc(0x05,month);
WriteRtc(0x07,10);
}

void docRTC(void)
{
second = ReadRtc(0x00);
p = ReadRtc(0x01);
gi = ReadRtc(0x02);
hienthi(gi,p,110); // 140 khong co date va day hoat dong tot
}
void main (void)
{ D1=D2=D3=D4=1;
C1=C2=0;
khoidongRTC();
Delay(5000);
Delay(5000);


}
Minh cung lay chuong trinh may ban da viet thoi.
Cac ban xem roi chinh sua theo dung y do cua minh.
Note: khi cai dat cho DS, nho dung them led vao chan ra cua DS de xem DS da tiep nhan cai dat chua.
Neu led chop tat theo tan so dat thi DS da nhan cai dat roi.
Toi lam chay may mach roi, rat on dinh. Thich thi cac ban lam choi ahahah.
Chuc thanh cong.

[dol2ph94in]

bạn ơi bạn bạn phải cho mình sơ đồ mạch nữa chứ. Vậy thì mình mới kiểm tra được. Địa chỉ mail
"www.dol2ph94in_cdt@yahoo.com" hoặc "www.dol2ph94incdt@gmail.com" thanks

[tranduythai]

Ban kiem tra trong chuong trinh di. Phan dinh nghia bit do. Ban tu ve so do trong Protues de lam ma.Nen tu lam de tay nghe len ah.
Chuc thanh cong.

[tranduythai]

Ban kiem tra trong chuong trinh di. Phan dinh nghia bit do. Ban tu ve so do trong Protues de lam ma.Nen tu lam de tay nghe len ah.
Chuc thanh cong.

[tranpic]

mình đã thử file của tranpic, copy hai thư viện ds1307.c và i2c.c vào trong thư viện của protues rồi, lấy nguyên file dong_ho.C để dịch ra file .HEX nhưng báo lỗi "C:\KEIL\C51\INC\ATMEL\DS1307.C(21): error C202: 'I2C_START': undefined identifier" Vậy lỗi này là do đâu vậy. chỉ giúp mình với

tạo lại project mới và add soucre là dong_ho.c là dịch được liền

[dol2ph94in]

bác nào giải thích cho em đoạn code này được không. E lấy nó trong file ds1307.c
void RTC_Init(unsigned char day,unsigned char date,unsigned char mon,unsigned char year,unsigned char hour,unsigned char min,unsigned char sec)
{
I2C_START;
I2C_WR(0xd0);
I2C_WR(0x00); //vi tri con tro RTC
I2C_WR(0x00); // Write 00 to sec reg, clear CH bit
I2C_STOP;
I2C_START;
I2C_WR(0xd0);
I2C_WR(0x00); //vi tri con tro RTC
I2C_WR(sec); //giay
I2C_WR(min);
I2C_WR(hour);
I2C_WR(day);
I2C_WR(date);
I2C_WR(mon);
I2C_WR(year);
I2C_WR(0x10);
I2C_STOP;
}

[toshiba]

Code VDK nguoi ta con chua lam dc, keu lam RealTime, sao viet dc day .....

[toshiba]

bác nào giải thích cho em đoạn code này được không. E lấy nó trong file ds1307.c
void RTC_Init(unsigned char day,unsigned char date,unsigned char mon,unsigned char year,unsigned char hour,unsigned char min,unsigned char sec)
{
I2C_START;
I2C_WR(0xd0);
I2C_WR(0x00); //vi tri con tro RTC
I2C_WR(0x00); // Write 00 to sec reg, clear CH bit
I2C_STOP;
I2C_START;
I2C_WR(0xd0);
I2C_WR(0x00); //vi tri con tro RTC
I2C_WR(sec); //giay
I2C_WR(min);
I2C_WR(hour);
I2C_WR(day);
I2C_WR(date);
I2C_WR(mon);
I2C_WR(year);
I2C_WR(0x10);
I2C_STOP;
}

Hàm truyền giao tiep VDK qua I2C - not sure - Bỗng Dưng Nghĩ Vậy

[kaspersky]

đồng hồ của bác có chayl đúng không?

có phải tuyendt87 không nhỉ. Nếu phải thì mình đã gửi mail cho bạn rồi mà. nếu không phải thì gửi lại cho nè. Nếu giải nén ko được thì đổi nó lại thành .rar mà giải nén nhé

Xin hỏi bác tranpic là cái đồng hồ pác pót đấy chạy đúng thời gian thực chứ

[kaspersky]

có phải tuyendt87 không nhỉ. Nếu phải thì mình đã gửi mail cho bạn rồi mà. nếu không phải thì gửi lại cho nè. Nếu giải nén ko được thì đổi nó lại thành .rar mà giải nén nhé

ai đã làm cái đồng hồ mà bác tranpic gửi chưa tôi làm mà sao no không chạy thế.
ai đã làm có thể giúp tôi đựoc chú

[kaspersky]

File Type: zip dong_ho.zip (71.9 KB, 330 views)
ai làm cái đồng hồ này chưa tôi làm không chạy monh mọi người giúp đỡ

[kaspersky]

có phải tuyendt87 không nhỉ. Nếu phải thì mình đã gửi mail cho bạn rồi mà. nếu không phải thì gửi lại cho nè. Nếu giải nén ko được thì đổi nó lại thành .rar mà giải nén nhé

File Type: zip dong_ho.zip (71.9 KB, 330 views)
ai làm cái đồng hồ này chưa tôi làm không chạy monh mọi người giúp đỡ

[IloveMyjob]

sao các bác pro luôn viết bằng ASM vậy nhỉ ?
Em muốn tham khảo chương trình C mà chẳng ai viết cả