STC12C4052AD，4位数据总线驱动1602 LCD液晶屏，8位ADC功能，0--255级别

/**
编写时间：　　2015年10月4日
硬件支持：　　LCD1602液晶屏  STC12C4052AD　外部12MHZ晶振
说明备注：    使用1602液晶屏程序，
功能：4位数据总线驱动1602 LCD液晶屏
8位ADC功能，0--255级别
接线定义：   DB7 --> P1^7
DB6 --> P1^6
DB5 --> P1^5
DB4 --> P1^5
RS  --> P3^2;
RW  --> P3^3;
E   --> P3^4;
ADC --> P1^0; 给0--5V的电位器调电压
*/

#include <STC12C2052AD.H> //单片机头文件
#include <intrins.h>	//51基本运算（包括_nop_空函数）
typedef unsigned char      uint8;          // 无符号8位整型变量 //
#define		LCD1602_DB0_DB7		P1			// 定义LCD1602的数据总线
sbit LCD1602_RS   = P3 ^ 2;					// 定义LCD1602的RS控制线
sbit LCD1602_RW   = P3 ^ 3;					// 定义LCD1602的RW控制线
sbit LCD1602_E    = P3 ^ 4;					// 定义LCD1602的E控制线
sbit LCD1602_Busy = P1 ^ 7;					// 定义LCD1602的测忙线（与LCD1602_DB0_DB7关联）
data unsigned char TIME_DD,TIME_MO,TIME_YY,TIME_WW,TIME_HH,TIME_MM,TIME_SS;//设置日、月、年、周、时、分、秒和温度存放区
data bit DAY_BIT = 0;//天数增加标志位（用于日期进位的启动）
data unsigned char DIS_BIT = 0; //多种信息的切换显示
data unsigned char cou  = 0;     // 软计数器,对10ms时基信号累加到1s

// 定义LCD1602指令集 // （详细请见技术手册）
#define			CMD_clear		0x01             // 清除屏幕
#define			CMD_back		0x02             // DDRAM回零位
#define			CMD_dec1		0x04             // 读入后AC（指针）减1，向左写
#define			CMD_add1		0x06             // 读入后AC（指针）加1，向右写
#define			CMD_dis_gb1		0x0f             // 开显示_开光标_开光标闪烁
#define			CMD_dis_gb2		0x0e             // 开显示_开光标_关光标闪烁
#define			CMD_dis_gb3		0x0c             // 开显示_关光标_关光标闪烁
#define			CMD_OFF_dis		0x08             // 关显示_关光标_关光标闪烁
#define			CMD_set82		0x38             // 8位总线_2行显示
#define			CMD_set81		0x30             // 8位总线_1行显示（上边行）
#define			CMD_set42		0x28             // 4位总线_2行显示
#define			CMD_set41		0x20             // 4位总线_1行显示（上边行）
#define			lin_1			0x80             // 4位总线_1行显示（上边行）
#define			lin_2			0xc0             // 4位总线_1行显示（上边行）

// ########################################################################
// 模块
void DELAY_MS (unsigned int a){
unsigned int i;
while( --a != 0){
for(i = 0; i < 600; i++);
}
}

/*
函数名：8位A/D转换【初始化】函数
调  用：Read_init (?);
参  数：输入的端口（0000 0XXX 其中XXX是设置输入端口号，可用十进制0~7表示，0表示P1.0，7表示P1.7）
返回值：无
结  果：开启ADC功能并设置ADC的输入端口
备  注：适用于STC12C2052AD系列单片机（必须使用STC12C2052AD.h头文件）
*/
void Read_init (unsigned char CHA){
unsigned char AD_FIN=0; //存储A/D转换标志
CHA &= 0x07;            //选择ADC的8个接口中的一个（0000 0111 清0高5位）
ADC_CONTR = 0x40;		//ADC转换的速度（0XX0 0000 其中XX控制速度，请根据数据手册设置）
_nop_();
ADC_CONTR |= CHA;       //选择A/D当前通道
_nop_();
ADC_CONTR |= 0x80;      //启动A/D电源
DELAY_MS(1);            //使输入电压达到稳定（1ms即可）
}

/*
函数名：8位A/D转换函数
调  用：? = Read ();
参  数：无
返回值：8位的ADC数据
结  果：读出指定ADC接口的A/D转换值，并返回数值
备  注：适用于STC12C2052AD系列单片机（必须使用STC12C2052AD.h头文件）
/**/
unsigned char Read (void){
unsigned char AD_FIN=0; //存储A/D转换标志
ADC_CONTR |= 0x08;      //启动A/D转换（0000 1000 令ADCS = 1）
_nop_();
_nop_();
_nop_();
_nop_();
while (AD_FIN ==0){     //等待A/D转换结束
AD_FIN = (ADC_CONTR & 0x10); //0001 0000测试A/D转换结束否
}
ADC_CONTR &= 0xE7;      //1111 0111 清ADC_FLAG位, 关闭A/D转换,
return (ADC_DATA);          //返回A/D转换结果（8位），来自头文件sfr ADC_DATA = 0xc6;
}
//##################################################################################

// LCD1602测忙，若LCD1602处于忙状态，本函数将等待至非忙状态 //
void LCD1602_TestBusy(void){
LCD1602_DB0_DB7 = 0xff;		//设备读状态
LCD1602_RS = 0;
LCD1602_RW = 1;
LCD1602_E = 1;
while(LCD1602_Busy);		//等待LCD不忙
LCD1602_E = 0;
}

// 写指令程序  向LCD1602写命令 本函数需要1个指令集的入口参数 //
void LCD1602_WriteCMD(uint8 LCD1602_command) {
LCD1602_TestBusy();
LCD1602_RS = 0;
LCD1602_RW = 0;
LCD1602_DB0_DB7 = (LCD1602_command/16)<<4;//0x45 0x40
LCD1602_E = 1;
DELAY_MS(5);
LCD1602_E = 0;
LCD1602_DB0_DB7 = (LCD1602_command%16)<<4;//0x45 0x50
LCD1602_E = 1;
DELAY_MS(5);
LCD1602_E = 0;
}

// 写数据程序 向LCD1602写数据 //
void LCD1602_WriteData(uint8 LCD1602_data){
LCD1602_TestBusy();
LCD1602_RS = 1;
LCD1602_RW = 0;
LCD1602_DB0_DB7 = (LCD1602_data/16)<<4;
LCD1602_E = 1;
DELAY_MS(5);
LCD1602_E = 0;
LCD1602_DB0_DB7 = (LCD1602_data%16)<<4;
LCD1602_E = 1;
DELAY_MS(5);
LCD1602_E = 0;
}
// 向LCD发送一个字符串,长度48字符之内
void print(uint8 a,uint8 *str){
LCD1602_WriteCMD(a | 0x80);
while(*str != '\0'){
LCD1602_WriteData(*str++);
}
*str = 0;
}

// 向LCD发送一个字符,以十六进制（0x00）表示
void print2(uint8 a,uint8 t){
LCD1602_WriteCMD(a | 0x80);
LCD1602_WriteData(t);
}
// 定义小汉字 可写入16个自字义字符，写入后可用其CGRAM代码直接提取显示。
uint8 code Xword[]={
0x18,0x18,0x07,0x08,0x08,0x08,0x07,0x00,        //℃，代码 0x00
0x00,0x00,0x00,0x00,0xff,0x00,0x00,0x00,        //一，代码 0x01
0x00,0x00,0x00,0x0e,0x00,0xff,0x00,0x00,        //二，代码 0x02
0x00,0x00,0xff,0x00,0x0e,0x00,0xff,0x00,        //三，代码 0x03
0x00,0x00,0xff,0xf5,0xfb,0xf1,0xff,0x00,        //四，代码 0x04
0x00,0xfe,0x08,0xfe,0x0a,0x0a,0xff,0x00,        //五，代码 0x05
0x00,0x04,0x00,0xff,0x00,0x0a,0x11,0x00,        //六，代码 0x06
0x00,0x1f,0x11,0x1f,0x11,0x11,0x1f,0x00,        //日，代码 0x07
};

void CgramWrite(void) {	// 装入CGRAM //
uint8 i;
LCD1602_WriteCMD(0x06);			// CGRAM地址自动加1
LCD1602_WriteCMD(0x40);			// CGRAM地址设为00处
for(i=0;i<64;i++) {
LCD1602_WriteData(Xword[i]);// 按数组写入数据
}
}

// LCD1602初始化 //（使用者可自定义，加 * 号程序行必须保留但可修改）
void LCD1602_Init(void){
LCD1602_WriteCMD(CMD_set42);	//* 显示模式设置：显示2行，每个字符为5*7个像素
LCD1602_WriteCMD(CMD_set42);	//* 显示模式设置：显示2行，每个字符为5*7个像素
LCD1602_WriteCMD(CMD_clear);	//  显示清屏
LCD1602_WriteCMD(CMD_back);		//* 数据指针指向第1行第1个字符位置
LCD1602_WriteCMD(CMD_add1);		//  显示光标移动设置：文字不动，光标右移
LCD1602_WriteCMD(CMD_dis_gb3); 	//  显示开及光标设置：显示开，光标开，闪烁开
CgramWrite();					//  向CGRAM写入自定义字符
}

bit IsLeapYear(void){    //计算本年是否是润年
unsigned int a;
a = 2000+TIME_YY;//加2000表示成完整的年
if((a%4==0 && a%100!=0)||(a%400==0)){ //润年的计算公式
return 1;//是润年返回1
}else{
return 0;//不是润年返回0
}
}

void month_day(void){
unsigned char mon_day[]={31,28,31,30,31,30,31,31,30,31,30,31};
TIME_DD++;//天加1
TIME_WW++;//星期值加1
if(TIME_WW > 7){
TIME_WW = 1;//时期值限定
}
if(TIME_DD > mon_day[TIME_MO-1]){//检查天是否大于当月的最大值
if(IsLeapYear()&&TIME_MO==2){ //计算本月是否是润年的2月份
TIME_DD = 29;//如果是润年又是2月，则天为29
}else{
TIME_DD = 1; //否则就等于1
TIME_MO++;//月加1
if(TIME_MO > 12){
TIME_MO = 1; //如果月大于12则月等于1
TIME_YY++;//年加1 （公历年无限积加）
}
}
}
}

void init (void){ //上电初始化
TMOD = 0x11;         // 定时/计数器0,1工作于方式1
TH0 = 0x3c;          // 预置产生50ms时基信号
TL0 = 0xb0;
EA = 1;              // 开总中断
ET0 = 1;             // 定时/计数器0允许中断
TR0 = 1;             // 开闭定时/计数器0
////
TIME_DD = 4; //时间在首次使用的值，之后会在EEPROM自动记录上一天的值
TIME_MO	= 10; //初始时间：2009年5月18日周一，20时13分40秒
TIME_YY = 15;
TIME_WW = 1;
TIME_HH	= 0;
TIME_MM = 0;
TIME_SS = 0;
}

//显示项目 时间部分 在第一行全行显示时间
void RealTime_Display(void){
print(0x80,"20");
print2(0x82,TIME_YY/10+0x30);
print2(0x83,TIME_YY%10+0x30);
print(0x84,"-");            // 显示年

print2(0x85,TIME_MO/10+0x30);
print2(0x86,TIME_MO%10+0x30);
print(0x87,"-");            // 显示月

print2(0x88,TIME_DD/10+0x30);
print2(0x89,TIME_DD%10+0x30);

print(0x8b,"[");            // 显示[
//		print2(0x8c,TIME_WW%10); //星期
print2(0x8c,0x04); //星期
print(0x8d,"]");            // 显示]

print2(0x40,TIME_HH/10+0x30);//小时
print2(0x41,TIME_HH%10+0x30);
print(0x42,":");            // 显示cgram第一个字模"："

print2(0x43,TIME_MM/10+0x30);//分钟
print2(0x44,TIME_MM%10+0x30);
print(0x45,":");            // 显示cgram第一个字模"."

print2(0x46,TIME_SS/10+0x30);//秒
print2(0x47,TIME_SS%10+0x30);
}

void main (void){
unsigned char m;
init();//初始化
LCD1602_Init();//LCD1602初始化
P1M0 = 0x01;//  高阻会有感应,用哪一个就开启哪一个
Read_init (0);  // 选取P1^0引脚
while(1){ //主线程//

RealTime_Display();
m =Read ();

print2(0x4A,m/100+0x30);//1011 0101
print2(0x4B,(m%100)/10+0x30);//1011 0101
print2(0x4C,m%10+0x30);//1011 0101

if(DAY_BIT == 1){ //检查天数是否更新，是则计算公历
month_day();//计算公历日期
DAY_BIT = 0;//计算完成后将日期变更标志位置0
}
}
}

void tiem0(void) interrupt 1{   // T/C0中断服务程序(产生50ms时基信号)
cou++;                      // 软计数器加1
if(cou > 19){                 // 计数值到100(1s)
cou = 0;               // 软计数器清零
TIME_SS++;                 // 秒计数器加1(进位10ms*100=1s)
if(TIME_SS > 59){          // 秒计数值到60

TIME_SS = 0;           // 秒计数器清零
TIME_MM++;             // 分计数器加1(进位60s=1m)
if(TIME_MM > 59){      // 分计数到60
TIME_MM = 0;       // 分计数器清零
TIME_HH++;         // 时计数器加1(进位60m=1h)
if(TIME_HH > 23){  // 时计数到23
TIME_HH = 0;   // 时计数器清零
DAY_BIT = 1;	//天增加标志位
}
}
}
}
TH0 = 0x3c;                // 重置定时常数
TL0 = 0xb0;
}