專(zhuān)注差異化嵌入式產(chǎn)品解決方案 給智能產(chǎn)品定制注入靈魂給予生命
提供開(kāi)發(fā)工具、應(yīng)用測(cè)試 完善的開(kāi)發(fā)代碼案例庫(kù)分享
從全面的產(chǎn)品導(dǎo)入到強(qiáng)大技術(shù)支援服務(wù) 全程貼心伴隨服務(wù),創(chuàng)造無(wú)限潛能!
提供新的芯片及解決方案,提升客戶產(chǎn)品競(jìng)爭(zhēng)力
提供最新的單片機(jī)資訊,行業(yè)消息以及公司新聞動(dòng)態(tài)
十年專(zhuān)注單片機(jī)方案開(kāi)發(fā)的方案公司英銳恩,分享F72+24C01+LED+按鍵。英銳恩現(xiàn)提供服務(wù)產(chǎn)品涉及主控芯片:8位單片機(jī)、16位單片機(jī)、32位單片機(jī)及各類(lèi)運(yùn)算放大器等。
#include
#include
#define uchar unsigned char
#define uint unsigned int
#define bitset(var,bitno)((var)|=1<<(bitno))
#define bitclr(var,bitno)((var)&=~(1<<(bitno)))
static volatile unsigned char acc @ 0x20;
static volatile bit acc0 @ (unsigned)&acc*8+0;
static volatile bit acc7 @ (unsigned)&acc*8+7;
static volatile unsigned char err @ 0x21;
static volatile bit err0 @ (unsigned)&err*8+0;
static volatile bit err3 @ (unsigned)&err*8+3;
static volatile bit err6 @ (unsigned)&err*8+6;
static volatile bit err7 @ (unsigned)&err*8+7;
#define SCL RA1 //1 ;24C01-6
#define SDA RA2 //2 ;24C01-5
#define SCLIO TRISA1 //1
#define SDAIO TRISA2 //2
#define SLAW 0x0A0//尋址字節(jié)寫(xiě)
#define SLAR 0x0A1//尋址字節(jié)讀
#define KS1 RA3
#define KS2 RA4
#define KS3 RA5
#define Ksec RC0
#define Kmin RC1
const unsigned char table[11]={ 0x0C0, 0x0F9, 0x0A4,0x0B0, 0x99, 0x92,0x82, 0x0F8,0x80,0x90,0x0ff};
unsigned char y,Tsmh, sec, min,hour ;
uchar BCD[4];//數(shù)據(jù)送LED的數(shù)據(jù) 暫存區(qū)
uchar Reeprom[5];
/////中斷//////////////////
void interrupt adint( )
{ uchar x,y,z;
TMR0=39;
OPTION =0x87;// B'10000111' //取消B口上拉電阻 1:256 預(yù)分頻器分配給定時(shí)器0,分頻比1:64
//ADIF=0;//清/AD中斷標(biāo)志位
T0IF=0;// ;清定時(shí)器0溢出中斷標(biāo)志位
x++;// 記 數(shù)器
if(x==18)
{
x=0;
sec--; //秒-1
y++; //秒 記 數(shù)器
if(y==60)
{
y=0;
min--;//分-1
z++; // 記 數(shù)器
if(z==60)
{
z=0;
hour--; //時(shí)-1
}
}
}
}
//延時(shí)子程序
void delay()
{
unsigned int i=300;
while(i--); //for(i=300;0<i;>}
//十六進(jìn)制轉(zhuǎn)十進(jìn)制程序
void H_BCD (uchar x,uchar i)
{
BCD [1]=x%10;
BCD [0]=x/10;
BCD [3]=i%10;
BCD [2]=i/10; // BCD [0]=x/100;
}
void display()//顯示程序
{
unsigned char b,c;
b=0x10;
for(c=0;c<4;c++)
{
PORTB=table[BCD[c]] ;
PORTC=(PORTC&8)|b;
CLRWDT();
delay();
b=b<<1;
} PORTB=err;
PORTC=(PORTC&8)|4;
CLRWDT();
delay();
PORTC=PORTC&8;
}
//系統(tǒng) 各I/O初始化子程序
void initial ()
{ TRISB=0;
TRISC=3;
ADCON1=7;;//設(shè)置RA為IO口
TRISA=0x0ff;
OPTION=135;//取消B口上拉電阻 B'10000111'; 1:256 B'10000101'1:64
// 預(yù)分頻器分配給定時(shí)器0,
T0IF= 0; // 清溢出中斷標(biāo)志位
T0IE=1; //定時(shí)器0溢出中斷允許
// GIE=1; //總中斷允許
TMR0=39;
}
//////////////24C01/////////////////
//--------應(yīng)答位檢查---------
void Cack()
{ SCL=1;
SDAIO=1;//輸入1
SCLIO=0;
err7=SDA;//c=1錯(cuò)誤ERR
SCL=0;
}
///--------發(fā)送非應(yīng)答位----------
void Mnack()
{
SDA=1;
SCLIO=0;
SDAIO=0;//輸出
SCL=1;
NOP();
NOP();
SCL=0;
SDA=0;
}
//-------發(fā)送應(yīng)答位---------------
void Mack()
{
SDA=0;
SCLIO=0;
SDAIO=0;//輸出
SCL=1;
NOP();
NOP();
SCL=0;
SDA=1;
}
//--------停止IC總線---------------
void Stop()
{
SDA=0;
SCLIO=0;
SDAIO=0;//輸出
SCL=1;
NOP();
NOP();
SDA=1;
NOP();
NOP();
}
//--------;啟動(dòng)IC總線-------------
void Sta()
{
SDAIO=0;//輸出
SCLIO=0;
SDA=1;
SCL=1;
NOP();
NOP();
SDA=0;
NOP();
NOP();
SCL=0;
}
//--------寫(xiě)一字節(jié)------------------------
void Wrbyt(uchar x)
{
uchar i;
acc=x;
SCLIO=0;
SDAIO=0;
for(i=8;i>0;i--)
{
SDA=acc7;
SCL=1;
NOP();
NOP();
SCL=0;
SDA=0;
acc=acc<<1;
}
}
//---------讀一字節(jié)-----------------
uchar Rdbyt( )
{
uchar i;
SCLIO=0;
SDAIO=1;//;輸入
for(i=8;i>0;i--)
{
acc=acc<<1;//接收數(shù)據(jù)左移寄存器
SCL=1;
acc0=SDA;
SCL=0;
NOP();
}
return(acc);
}
////---------讀n個(gè)數(shù)據(jù)----------------
void Rdnbyt (uchar SLARtemp ,uchar Repromn,uchar temp2) //Repromn傳送數(shù)據(jù)個(gè)數(shù)
{
uchar i;
i= temp2;
do{
Sta(); //啟動(dòng)IC總線-//
Wrbyt(SLARtemp); //寫(xiě)一字節(jié)
Cack(); //應(yīng)答位檢查-
} while(err7==1);
while(Repromn--)
{
Reeprom[i]=Rdbyt(); //讀一字節(jié)
i++;
Mack(); //發(fā)送應(yīng)答位
}
Mnack(); // 發(fā)送非應(yīng)答位
Stop(); //停止IC總線
}
//---------寫(xiě)n個(gè)數(shù)據(jù)---------------
void Wrnbyt(uchar SLAwtemp , uchar Wepromn,uchar temp1)
{ uchar i;
i= temp1;
err7=1;
while(Wepromn--)
{
if(err7==1) //c=1E0,ERR
{ i=temp1;
Sta(); //啟動(dòng)IC總線
Wrbyt(SLAwtemp); //寫(xiě)一字節(jié)
Cack(); //應(yīng)答位檢查-
}
Wrbyt( Reeprom[i]);// Reeprom[t]);//寫(xiě)一字節(jié)
i++;
Cack();//應(yīng)答位檢查
}
Stop(); //停止IC總線
}
//////////按鍵掃描/////////////////////////////////////////////////
void Key()
{
uchar a,b,i,c,d;
if( KS3==0)
{ a=20;
while(a--) display();
if(56!=(PORTA&56))
{
while( KS3==0) display(); di();
if (Ksec ){b=1;i=3;c=1;}//是秒???
else {b=3;i=5;c=3;}//
d=0;
while (b<i&&d<20)> {
uchar z,x;
for(z=50;z>0&&b<i;z--)> { z--;
H_BCD (Reeprom[c],Reeprom[c+1] ); //十六進(jìn)制轉(zhuǎn)十進(jìn)制程序
display();
a=PORTA&56 ;
switch(a)
{
case 48 : if(Reeprom[b]!=99) //110 ks1=0
Reeprom[b]++;
for(x=10;x>0&&56!=(PORTA&56);x--)
display();d=0; break;
case 40 : if(Reeprom[b]!=0) //101 ks2=0
Reeprom[b]--;
for(x=10;x>0&&56!=(PORTA&56);x--)
display(); d=0; break;
case 24 : b++; while( KS3==0) display();d=0; break; //011 ks3=0
}
}
if (b<i)
{
for(z=50; z>0&&56==(PORTA&56);z--)//被調(diào)整數(shù)閃爍程序
{
if (b==1||b==3) { BCD[0]=10; BCD[1]=10;}
else { BCD[2]=10; BCD[3]=10;}
display( );
//z--;
} d++;
}
}
while( KS3==0)display( );
Wrnbyt( SLAW ,5,0); //寫(xiě)2個(gè)數(shù)據(jù)
Tsmh=0;
err3=1; //開(kāi)機(jī)結(jié)束
}
}
}
void main()
{
initial (); //系統(tǒng) 各I/O初始化子程序
Wrnbyt ( SLAW ,1,0); //寫(xiě)1個(gè)數(shù)據(jù)=0
Rdnbyt ( SLAR ,4,1); //尋址字節(jié)讀#0A1
sec= Reeprom[1];
min= Reeprom[3];
err3=0;
bitclr( err,0);
Tsmh=1;
while(1)
{
while (Tsmh)
{ ei();
if(err3==0){ if (Ksec ){H_BCD (sec,Reeprom[2]);Tsmh=sec;}//秒
else {H_BCD (min,Reeprom[4]);Tsmh=min;}//分
RC3=0; bitclr( err,1); bitset( err,2);
} //關(guān)機(jī)
else { if (Ksec ){H_BCD (Reeprom[1],sec);Tsmh=sec;}//秒
else {H_BCD (Reeprom[3],min);Tsmh=min;}//分
RC3=1; bitset( err,1); bitclr( err,2);
} //開(kāi)機(jī)
display(); //顯示程序
Key(); //按鍵掃描
if(err6!=Ksec){Tsmh=0;err6=Ksec; err3=1;} //判斷是否轉(zhuǎn)換//開(kāi)機(jī)結(jié)束
}
if(err3==0) {err3=1;sec=Reeprom[2];min=Reeprom[4];} //送開(kāi)機(jī) 數(shù)據(jù)
else {err3=0;sec=Reeprom[1];min=Reeprom[3];} //送關(guān)機(jī) 數(shù)據(jù)
if (Ksec ) Tsmh=sec;
else Tsmh=min;
}
}
(文源網(wǎng)絡(luò),侵刪)