51单片机做计算器代码
发布时间：2024-10-12
1602 ds18b20 矩阵键盘
#include<reg52.h>
#include<intrins.h>
#define uint unsigned int
#define uchar unsigned char
#define temp P3
unsigned char code table[]={"/c0=*321-654+987."};
sbit lcden=P2^7;//液晶的引脚
sbit lcdrw=P2^5;
sbit lcdrs=P2^6;
sbit DSIO=P3^4;//DS1302的引脚
sbit RST=P3^5;
sbit SCLK=P3^6;
sbit key1=P1^0;
sbit key2=P1^1;
sbit DSPORT=P3^7;//温度的单线
uchar Key;//按键数据
uchar p=0x00;//起始地址
uchar length;//数据长度
uint K1[9]={0};//用于储存从键盘输入的数字
uint K2[9];//用于储存组合完毕的数字
uchar display[9]={0};//最终用于显示的数组
char i=0;//输入计数
char j; //输出计数
int W1;//第一个结果
int W2;
uchar mode=0;//加减乘除模式选择
uchar symbol=0;//政府号指示器
int final;//计算结果
int after;//小数点后一位的数字
int Temp = 0;
uchar code READ_RTC_ADDR[7] = {0x81, 0x83, 0x85, 0x87, 0x89, 0x8b, 0x8d}; //---DS1302写入和读取时分秒的地址命令
uchar code WRITE_RTC_ADDR[7] = {0x80, 0x82, 0x84, 0x86, 0x88, 0x8a, 0x8c}; //---秒分时日月周年 最低位读写位
//---DS1302时钟初始化2016年2月19日星期二12点00分00秒。---//
uchar TIME[7] = {0, 0, 0x12, 0x19, 0x02, 0x05, 0x16};
//延时函数
void delay(unsigned int z)
{
unsigned int x,y;
for(x=z;x>0;x--)
for(y=110;y>0;y--);
}
//以下是液晶部分函数
void writeorder(unsigned char com)//命令模式（命令代码）
{
lcdrs=0;
P0=com;//让P0口输出16进制命令代码
delay(5);
lcden=1;
delay(5);
lcden=0;
}
void writedata(unsigned char date)//写入数据函数
{
lcdrs=1;
P0=date;
delay(5);
lcden=1;
delay(5);
lcden=0;
}
void initial()//液晶初始化函数
{
lcden=0;
lcdrw=0;
writeorder(0x38);
writeorder(0x0c);
writeorder(0x06);
writeorder(0x01);
}
//矩阵键盘输入
void matrixkeyscan()
{
temp=0xf0;
if(temp!=0xf0)
{
delay(10);
if(temp!=0xf0)
{
temp=0xf0;
switch(temp)
{
case(0x70):Key=0;break;
case(0xb0):Key=1;break;
case(0xd0): Key=2;break;
case(0xe0):Key=3;break;
}
temp=0x0f;
switch(temp)
{
case(0x07):Key=Key;break;
case(0x0b):Key=Key+4;break;
case(0x0d): Key=Key+8;break;
case(0x0e):Key=Key+12;break;
}
while(temp!=0x0f); //检测按键松手检测
writedata(table[Key]);
}
}
}
//将数据整合 ok
int combine()
{
char s=1,m=0,j;
for(j=i-1;j>=0;j--)
{
m=K1[j]*s+m;
s=s*10;
}
if(symbol==1)
m=m*(-1);
return m;
}
//计算结果
void consequence()
{
if(mode==0)
{
final=W1+W2;
}
if(mode==1)
{
final=W1-W2;
}
if(mode==2)
{
final=W1*W2;
}
if(mode==3)
{
final=W1/W2;
W1=W1*10;
after=W1/W2;
after=after%1
0;
mode=4;
}
}
//拆分并输出 ok负数结果可以输出
void divide(int final)
{
length=0;
if(final<0)
{
writedata(table[8]);
final=final*(-1);
}
1602 ds18b20 矩阵键盘
if(final==0)
writedata(0+0x30);
while(final>0)
{
display[length]=final%10;
length++;
final=final/10;
}
for(j=length-1;j>=0;j--)
{
writedata(display[j]+0x30);
delay(5);
}
}
//以下是DS1302时钟部分
//写命令函数
void Ds1302Write(uchar addr, uchar dat)
{
uchar n;
RST = 0;
_nop_();
SCLK = 0;//先将SCLK置低电平。
_nop_();
RST = 1; //然后将RST(CE)置高电平。
_nop_();
for (n=0; n<8; n++)//开始传送八位地址命令
{
DSIO = addr & 0x01;//数据从低位开始传送
addr >>= 1;
SCLK = 1;//数据在上升沿时，DS1302读取数据
_nop_();
SCLK = 0;
_nop_();
}
for (n=0; n<8; n++)//写入8位数据
{
DSIO = dat & 0x01;
dat >>= 1;
SCLK = 1;//数据在上升沿时，DS1302读取数据
_nop_();
SCLK = 0;
_nop_();
}
RST = 0;//传送数据结束
_nop_();
}
//读数据函数
uchar Ds1302Read(uchar addr)
{
uchar n,dat,dat1;
RST = 0;
_nop_();
SCLK = 0;//先将SCLK置低电平。
_nop_();
RST = 1;//然后将RST(CE)置高电平。
_nop_();
for(n=0; n<8; n++)//开始传送八位地址命令
{
DSIO = addr & 0x01;//数据从低位开始传送
addr >>= 1;
SCLK = 1;//数据在上升沿时，DS1302读取数据
_nop_();
SCLK = 0;//DS1302下降沿时，放置数据
_nop_();
}
_nop_();
for(n=0; n<8; n++)//读取8位数据
{
dat1 = DSIO;//从最低位开始接收
dat = (dat>>1) | (dat1<<7);
SCLK = 1;
_nop_();
SCLK = 0;//DS1302下降沿时，放置数据
_nop_();
}
RST = 0;
_nop_();//以下为DS1302复位的稳定时间,必须的。
SCLK = 1;
_nop_();
DSIO = 0;
_nop_();
DSIO = 1;
_nop_();
return dat;
}
//初始化
void Ds1302Init()
{
uchar n;
Ds1302Write(0x8E,0X00); //关闭写保护功能
for (n=0; n<7; n++)//写入时钟信息
{
Ds1302Write(WRITE_RTC_ADDR[n],TIME[n]);
}
Ds1302Write(0x8E,0x80); //打开写保护功能
}
//读取时间
void Ds1302ReadTime()
{
uchar n;
for (n=0; n<7; n++)//读取7个字节的时钟信息
{
TIME[n] = Ds1302Read(READ_RTC_ADDR[n]);
}
}
//显示时间
void TIMEDisplay()
{
writeorder(0x80+0X40);
writedata('0'+TIME[2]/16);//时
writedata('0'+(TIME[2]&0x0f));
writedata('-');
writedata('0'+TIME[1]/16);//分
writedata('0'+(TIME[1]&0x0f));
writedata('-');
writedata('0'+TIME[0]/16);//秒
writedata('0'+(TIME[0]&0x0f));
writeorder(0x80);
writedata('2');
writedata('0');
writedata('0'+TIME[6]/16);//年
writedata('0'+(TIME[6]&0x0f));
writedata('-');
writedata('0'+TIME[4]/16);//月
writedata('0'+(TIME[4]&0x0f));
writedata('-');
writedata('0'+TIME[3]/16);//日
writedata('0'+(TIME[3]&0x0f));
writeorder(0x8D);
writedata('0'+(TIME[5]&0
x07));//星期
}
//以下是DS18B20部分
//初始化函数
uchar DS18B20_initial()
{
uchar i;
DSPORT = 0; //将总线拉低480us~960us
i = 70;
while(i--
1602 ds18b20 矩阵键盘
);//延时642us
DSPORT = 1;//然后拉高总线，如果DS18B20做出反应会将在15us~60us后总线拉低
i = 0;
while(DSPORT)//等待DS18B20拉低总线
{
i++;
if(i>5)//等待>5MS
{
return 0;//初始化失败
}
delay(1);
}
return 1;//初始化成功
}
//写入函数
void DS18B20_write(uchar dat)
{
uint i, j;
for(j=0; j<8; j++)
{
DSPORT = 0; //每写入一位数据之前先把总线拉低1us
i++;
DSPORT = dat & 0x01; //然后写入一个数据，从最低位开始
i=6;
while(i--); //延时68us，持续时间最少60us
DSPORT = 1;//释放总线，1us总线恢复时间
dat >>= 1;
}
}
//读取函数
uchar DS18B20_read()
{
uchar byte, bi;
uint i, j;
for(j=8; j>0; j--)
{
DSPORT = 0;//先将总线拉低1us
i++;
DSPORT = 1;//然后释放总线
i++;
i++;//延时6us等待数据稳定
bi = DSPORT; //读取数据，从最低位开始读取
byte = (byte >> 1) | (bi << 7);
i = 4;//读取完之后等待48us再接着读取下一个数
while(i--);
}
return byte;
}
//转换温度命令函数
void DS18B20_changetemp()
{
DS18B20_initial();
delay(1);
DS18B20_write(0xcc);//跳过ROM操作命令
DS18B20_write(0x44); //温度转换命令
}
//读取温度命令函数
void DS18B20_readtempcom()
{
DS18B20_initial();
delay(1);
DS18B20_write(0xcc); //跳过ROM操作命令
DS18B20_write(0xbe); //发送读取温度命令
}
//读取温度函数
int DS18B20_readtemp()
{
uchar tmh, tml; //高字节与低字节
DS18B20_changetemp(); //先写入转换命令
DS18B20_readtempcom();//然后等待转换完后发送读取温度命令
tml = DS18B20_read();//读取温度值共16位，先读低字节
tmh = DS18B20_read();//再读高字节
Temp = tmh;
Temp <<= 8;
Temp |= tml;
return Temp;
}
//显示温度函数
void LcdDisplay(int temp)
{
unsigned char datas[] = {0, 0, 0, 0, 0}; //定义数组
float tp;
if(Temp< 0)//当温度值为负数
{
writeorder(0x80);//写地址 80初始地址
writedata('-'); //显示负
Temp=Temp-1; //因为读取的温度是实际温度的补码，所以减1，再取反求出原码
Temp=~Temp;
tp=Temp;
Temp=tp*0.0625*100+0.5;
}
else
{
writeorder(0x80);//写地址 80初始地址
writedata('+'); //显示正
tp=Temp;//因为数据处理有小数点所以将温度赋给一个浮点型变量
Temp=tp*0.0625*100+0.5;
}
datas[0] = temp / 10000;
datas[1] = temp % 10000 / 1000;
datas[2] = temp % 1000 / 100;
datas[3] = temp % 100 / 10;
datas[4] = temp % 10;
writeorder(0x82); //写地址 80初始地址
writedata('0'+datas[0]); //百位
writeorder(0x83);
//写地址
writedata('0'+datas[1]); //十位
writeorder(0x84);//写地址
writedata('0'+datas[2]); //个位
writeorder(0x85);//写地址
writedata('.')
1602 ds18b20 矩阵键盘
; //显示 ‘.’
writeorder(0x86); //写地址
writedata('0'+datas[3]); //显示小数点
writeorder(0x87); //写地址
writedata('0'+datas[4]); //显示小数点
}
//主函数
void main()
{
initial();
while(1)
{
Key=17;
matrixkeyscan();
switch(Key)
{
case 3: //等于
W2=combine();
consequence();
divide(final);
if(mode==4)
{
writedata(table[16]);
divide(after);
}
i=0;break;
case 12: //加法
mode=0;
W1=combine();
i=0;break;
case 8: //减法
mode=1;
W1=combine();
i=0;break;
case 4: //乘法
mode=2;
W1=combine();
i=0;break;
case 0:
mode=3;
W1=combine();
i=0;break;
case 1: //清屏
initial();break;
case 2:K1[i]=0;i++;break; //所有数字
case 5: K1[i]=3;i++;break;
case 6: K1[i]=2;i++;break;
case 7: K1[i]=1;i++;break;
case 9: K1[i]=6;i++;break;
case 10: K1[i]=5;i++;break;
case 11: K1[i]=4;i++;break;
case 13: K1[i]=9;i++;break;
case 14: K1[i]=8;i++;break;
case 15: K1[i]=7;i++;break;
default:break;
}
if(key1==0)//按下显示时间松手恢复
{
delay(10);
if(key1==0)
{
initial();
Ds1302Init();
while(!key1)
{
Ds1302ReadTime();
TIMEDisplay();
}
initial();
}
}
if(key2==0)//按下显示温度松手恢复
{
delay(1
0);
if(key2==0)
{
initial();
writeorder(0x88);
writedata('C');
while(!key2)
{
LcdDisplay(DS18B20_readtemp());
}
initial();
}
}
}
51单片机做计算器代码.doc
将本文的Word文档下载到电脑
上一篇：数码管流动显示12345678
下一篇：机关节能降耗管理制度
