📄 mypro.c
字号:
#include <reg52.H>
#include <absacc.h>
#include <string.h>
#include <intrins.h>
#include <math.h>
#define uint unsigned int
#define uchar unsigned char
#define ulong unsigned long
#define ulong unsigned long
#define LCD12864DataPort P0 // LCD192*64 数据线
//sbit BUSY = P3^0;
// LCD192*64 I/O 信号管脚 定义区
sbit di = P2^7; // 数据\指令 选择
sbit rw = P2^6; // 读\写 选择
sbit en = P2^5; // 读\写使能
sbit cs1 = P2^4; // 片选1,低有效(前64列)
sbit cs2 = P2^3; // 片选2,低有效(中64列)
sbit cs3 = P2^2; // 片选3,低有效(后64列)
//I2C定义位
sbit SDA=P2^1; //模拟I2C数据传送位
sbit SCL=P2^0; //模拟I2C时钟控制位
bit ack; //应答标志位
//电池管理定义位
sbit batt1=P3^7; //半格电判定，batt1=0
sbit batt2=P3^6; //1/3格电判定，batt2=0
//变量定义区
uchar jstime=0; //定时器0中断
uchar uiTimeCout=100; //定时器0设定10ms定时，中断100次，定时1s
uchar BattCount =0; //电池电量标志位
uchar KeyCount=0; //确定主菜单上下光标移动位置标志：0-首行、1-中行、2-下行
//时钟数位定义
uchar year10=0; //年_十位
uchar year1=8; //年_个位
uchar month10=1; //月_十位
uchar month1=1; //月_个位
uchar day10=2; //日_十位
uchar day1=1; //日_个位
uchar hour10=1; //时_十位
uchar hour1=5; //时_个位
uchar minute10=2; //分_十位
uchar minute1=9; //分_个位
uchar code hz[ ],zf[ ],xz[ ],tu[ ];
//TLC5615 D/A 程序段
sbit DA_CS = P1^7 ;
sbit DA_CLK = P1^6;
sbit DA_DIN = P1^5;
//2543控制引脚宏定义
sbit AD_CLOCK = P1^1; /*2543时钟*/
sbit AD_D_IN = P1^2; /*2543输入*/
sbit AD_D_OUT = P1^3; /*2543输出*/
sbit AD_CS = P1^4; /*2543片选*/
sbit u75 = P3^4;
uchar ucDianya =0,ucDianliu=0;
//时钟设定界面定义
uchar Yp[]={16,24,48,56,80,88,112,120,144,152};//时钟设置界面时间列号
uchar utime[10];
uchar P8563_Store[54]; /*时间交换区,全局变量声明*/
//显示缓冲区
uchar TmpBuf[7] = {0,0,0,0,0,0,0};//前三位是电压，后四位电流
bit daFlag = 0;
uint daCount = 0; // 10位D/A缓冲区基数， 最大值为1024
/*************************************************************************
液晶屏初始化，清屏等底层程序
1、忙判别——lcd_busy(void)；2、设置xy——set_xy(uchar x,uchar y)
3、写显示数据——lw(uchar x,uchar y,uchar dd)；4、显示初始化——lcd_init()
*************************************************************************/
/*忙判别*/
void lcd_busy(void);
/*设置xy*/
void set_xy(uchar x,uchar y);
/*写显示数据*/
void lw(uchar x,uchar y,uchar dd);
/*显示初始化*/
void lcd_init();
/****************************************************************************************
显示底层程序：显示16*16点阵汉字、8*16点阵字符、8*8小字符、16*8点阵图形
***********************************************************************************/
//显示汉字，fb==1:反白显示,16*16点阵
void dh(uchar x,uchar y,uchar n,uchar fb);
//显示字符，fb==1:反白显示，8*16点阵
void df(unsigned char x,unsigned char y,unsigned char n,unsigned char fb);
//8*8点阵显示，fb==1:反白显示
void dxz(uchar x,uchar y,uchar n,uchar fb);
//16*8 电池图形点阵，fb==1:反白显示
void dtx(uchar x,uchar y,uchar n,uchar fb);
void delay1ms(uint ui); /* 延时函数,晶振为11.0592m*/
//第一屏，产品厂家信息
void diyiping();
//扫描键盘，读键值，key=0(no)、1(up)、2(down)、3(right)、4(home)、5(member)、6(print)、7(enter)
uchar namekey(void);
// 第二屏，主菜单显示
void dierping() ; //主菜单
//主菜单下读取键值1（上）、2（下）、7（确定键）
void key_chuli_1(uchar key); //按键处理1，键值为3、4、5、6均不起作用
//主菜单上下键处理程序
void program_1();
//主菜单下按确定键处理程序
void program_7();
//进入时钟设置
void Dis_settime();
//显示设定前初始值
void disset();
//修改时间函数
void time_mod();
//将年、月、日、时、分各位数字显示缓存区的数合并，并保存
void Time_Dispose_Set();
//写时间修改值
void P8563_settime();
//刷新时间
void time();
//读出的数据分离赋值给各显示缓冲区
void Time_Dispose_Read();
//读入时间到内部缓冲区----外部调用
void P8563_gettime();
//内部函数,读入时间到内部缓冲区
void P8563_Read();
//启动进入测试程序
void test();
//测试界面
void disanping() ;
//测试过程显示电压电流
void xianshi();
//测试结果
void disiping();
//进入历史查询
void history();
//历史查询界面
void Dis_history();
//功能：Read2543延时模块 输入参数：n要延时的周期数
void delayy(uchar n);
//TLC2543驱动模块,port为通道号,输出ad转换值
uint read2543(uchar port);
// tlc5615送数程序
void tlc5615(uint daTmp);
//处理电流电压读数 显示
void Shipin_UI_dispose();
//分离电流数字
void div_i_shuzi(uint ucTmp) ;
//分离电压数字
void div_u_shuzi(uint ucTmp);
//分离出千位数并返回，保留余下的部分
uchar mod_1000( uint* ulTmp);
//分离出百位数并返回，保留余下的部分
uchar mod_100( uint* ulTmp);
//分离出十位数并返回,保留余下的部分
uchar mod_10( uint* ulTmp);
//电压到30KV 电流未达1ＭＡ 处理程序
void shipin_error_dispose();
//试品异常处理程序
void shipin_error() ;
//电池电量管理
void battery();
/********************************************************************************
I2C总线协议
********************************************************************************/
/*******************************************************************
（1） 起动总线函数
函数原型: void Start_I2c();
功能: 启动I2C总线,即发送I2C起始条件.
********************************************************************/
void Start_I2c()
{
SDA=1; //发送起始条件的数据信号
_nop_();
SCL=1;
_nop_(); //起始条件建立时间大于4.7us,延时
_nop_();
_nop_();
_nop_();
_nop_();
SDA=0; //发送起始信号
_nop_(); // 起始条件锁定时间大于4μs
_nop_();
_nop_();
_nop_();
_nop_();
SCL=0; //钳住I2C总线，准备发送或接收数据
_nop_();
_nop_();
}
/*******************************************************************
（2）结束总线函数
函数原型: void Stop_I2c();
功能: 结束I2C总线,即发送I2C结束条件.
********************************************************************/
void Stop_I2c()
{
SDA=0; //发送结束条件的数据信号
_nop_(); //发送结束条件的时钟信号
SCL=1; //结束条件建立时间大于4μs
_nop_();
_nop_();
_nop_();
_nop_();
_nop_();
SDA=1; //发送I2C总线结束信号
_nop_();
_nop_();
_nop_();
_nop_();
}
/*******************************************************************
（3）字节数据发送函数
函数原型: void SendByte(uchar c);
功能: 将数据c发送出去,可以是地址,也可以是数据,发完后等待应答,并对
此状态位进行操作.(不应答或非应答都使ack=0 假)
发送数据正常，ack=1; ack=0表示被控器无应答或损坏。
********************************************************************/
void SendByte(uchar c)
{
uchar BitCnt;
for(BitCnt=0;BitCnt<8;BitCnt++) //要传送的数据长度为8位
{
if((c<<BitCnt)&0x80)SDA=1; //判断发送位
else SDA=0;
_nop_();
SCL=1; //置时钟线为高，通知被控器开始接收数据位
_nop_();
_nop_(); //保证时钟高电平周期大于4μs
_nop_();
_nop_();
_nop_();
SCL=0;
}
_nop_();
_nop_();
SDA=1; //8位发送完后释放数据线，准备接收应答位
_nop_();
_nop_();
SCL=1;
_nop_();
_nop_();
_nop_();
if(SDA==1)ack=0;
else ack=1; //判断是否接收到应答信号
SCL=0;
_nop_();
_nop_();
}
/*******************************************************************
（4）字节数据接收函数
函数原型: uchar RcvByte();
功能: 用来接收从器件传来的数据,并判断总线错误(不发应答信号)，
发完后请用应答函数。
********************************************************************/
uchar RcvByte()
{
uchar retc;
uchar BitCnt;
retc=0;
SDA=1; //置数据线为输入方式
for(BitCnt=0;BitCnt<8;BitCnt++)
{
_nop_();
SCL=0; //置时钟线为低，准备接收数据位
_nop_();
_nop_(); //时钟低电平周期大于4.7μs
_nop_();
_nop_();
_nop_();
SCL=1; //置时钟线为高使数据线上数据有效
_nop_();
_nop_();
retc=retc<<1;
if(SDA==1)retc=retc+1; //读数据位,接收的数据位放入retc中
_nop_();
_nop_();
}
SCL=0;
_nop_();
_nop_();
return(retc);
}
/********************************************************************
（5）应答子函数
原型: void Ack_I2c(bit a);
功能:主控器进行应答信号,(可以是应答或非应答信号)
********************************************************************/
void Ack_I2c(bit a)
{
if(a==0)SDA=0; //在此发出应答或非应答信号
else SDA=1;
_nop_();
_nop_();
_nop_();
SCL=1;
_nop_();
_nop_(); //时钟低电平周期大于4μs
_nop_();
_nop_();
_nop_();
SCL=0; //清时钟线，钳住I2C总线以便继续接收
_nop_();
_nop_();
}
/*******************************************************************
（6）向无子地址器件发送字节数据函数
函数原型: bit ISendByte(uchar sla,ucahr c);
功能: 从启动总线到发送地址，数据，结束总线的全过程,从器件地址sla.
如果返回1表示操作成功，否则操作有误。
注意： 使用前必须已结束总线。
********************************************************************/
bit ISendByte(uchar sla,uchar c)
{
Start_I2c(); //启动总线
SendByte(sla); //发送器件地址
if(ack==0)return(0);
SendByte(c); //发送数据
if(ack==0)return(0);
Stop_I2c(); //结束总线
return(1);
}
/*******************************************************************
（7）向有子地址器件发送多字节数据函数
函数原型: bit ISendStr(uchar sla,uchar suba,ucahr *s,uchar no);
功能: 从启动总线到发送地址，子地址,数据，结束总线的全过程,从器件
地址sla，子地址suba，发送内容是s指向的内容，发送no个字节。
如果返回1表示操作成功，否则操作有误。
注意： 使用前必须已结束总线。
********************************************************************/
bit ISendStr(uchar sla,uchar suba,uchar *s,uchar no)
{
uchar i;
Start_I2c(); //启动总线
SendByte(sla); //发送器件地址
if(ack==0)return(0);
SendByte(suba); //发送器件子地址
if(ack==0)return(0);
for(i=0;i<no;i++)
{
SendByte(*s); //发送数据
if(ack==0)return(0);
s++;
}
Stop_I2c(); //结束总线
return(1);
}
/*******************************************************************
（8）向无子地址器件读字节数据函数
函数原型: bit IRcvByte(uchar sla,ucahr *c);
功能: 从启动总线到发送地址，读数据，结束总线的全过程,从器件地
址sla，返回值在c.
如果返回1表示操作成功，否则操作有误。
注意： 使用前必须已结束总线。
********************************************************************/
bit IRcvByte(uchar sla,uchar *c)
{
Start_I2c(); //启动总线
SendByte(sla+1); //发送器件地址
if(ack==0)return(0);
*c=RcvByte(); //读取数据
Ack_I2c(1); //发送非就答位
Stop_I2c(); //结束总线
return(1);
}
/*******************************************************************
（9）向有子地址器件读取多字节数据函数
函数原型: bit ISendStr(uchar sla,uchar suba,ucahr *s,uchar no);
功能: 从启动总线到发送地址，子地址,读数据，结束总线的全过程,从器件
地址sla，子地址suba，读出的内容放入s指向的存储区，读no个字节。
如果返回1表示操作成功，否则操作有误。
注意： 使用前必须已结束总线。
********************************************************************/
bit IRcvStr(uchar sla,uchar suba,uchar *s,uchar no)
{
uchar i;
Start_I2c(); //启动总线
SendByte(sla); //发送器件地址
if(ack==0)return(0);
SendByte(suba); //发送器件子地址
if(ack==0)return(0);
Start_I2c();
SendByte(sla+1);
if(ack==0)return(0);
for(i=0;i<no-1;i++)
{
*s=RcvByte(); //发送数据
Ack_I2c(0); //发送就答位
s++;
}
*s=RcvByte();
Ack_I2c(1); //发送非应位
Stop_I2c(); //结束总线
return(1);
}
/*******************************************************************
向有子地址器件发送字节数据函数
函数原型: bit ISendByte(uchar sla,uchar suba,uchar c);
功能: 从启动总线到发送地址，数据，结束总线的全过程,从器件地址sla，
子地址suba,如果返回1表示操作成功，否则操作有误。
注意： 使用前必须已结束总线。
********************************************************************/
bit ISendByte3(uchar sla,uchar suba,uchar c)
{
Start_I2c(); /*启动总线*/
SendByte(sla); /*发送器件地址*/
if(ack==0)return(0);
SendByte(suba); /*发送器件地址*/
if(ack==0)return(0);
SendByte(c); /*发送数据*/
if(ack==0)return(0);
Stop_I2c(); /*结束总线*/
return(1);
}
/*******************************************************************
向有子地址器件读字节数据函数
函数原型: bit IRcvByte(uchar sla,ucahr *c);
功能: 从启动总线到发送地址，读数据，结束总线的全过程,从器件地
址sla，返回值在c.
如果返回1表示操作成功，否则操作有误。
注意： 使用前必须已结束总线。
********************************************************************/
uchar IRcvByte2(uchar sla,uchar suba)
{
uchar c;
Start_I2c(); /*启动总线*/
SendByte(sla); /*发送器件地址*/
if(ack==0)return(0);
SendByte(suba); /*发送子器件地址*/
if(ack==0)return(0);
Start_I2c();
SendByte(sla+1); /*发读器件地址*/
if(ack==0)return(0);
c=RcvByte(); /*读取数据*/
Ack_I2c(1); /*发送非就答位*/
Stop_I2c(); /*结束总线*/
return c;
}
/****************************************************************************************
主 函 数
****************************************************************************************/
void main()
{
uchar key = 0;
P1=0XFF;
P3=0XFF;
EA = 0; //关总中断
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -