lcd.h

主要是关于A/D转换的程序

////////LCD.h   此为LCD显示子系统/////////
#include "C8051F040.h"	// Register definition file.
#include "intrins.h"
#include "math.h"
#include "string.h"
#include "stdlib.h"
typedef unsigned char uchar;
typedef unsigned int uint;
typedef unsigned long ulong;
enum {menulenth=16};//定义LCD一行显示长度
#define toup sendc(0x14)  //lcd光标右移
#define todown sendc(0x10)//lcd光标左移
#define curshow sendc(0x0f)//显示光标
#define curshut sendc(0x0c)//隐藏光标
#define home sendc(0x02)//移到首行
#define DISROW 2
sbit lcdrs=P5^2;//硬件控制接口
sbit lcdrw=P5^1;
sbit lcdcs=P5^0;
xdata uchar keybuf[16];//输入缓冲区
code uchar disdata[3][16]={"0123456789.+-012","ABCDEFGHIJKLMNOP","QRSTUVWXYZ@#$%&*"};
xdata uchar intbuf[16];//显示int型数据缓冲区
void delay1ms(uint time);//延时ms函数
void delay50us(uint time);//延时50us函数
void showpage(uchar *str,uchar *show);//显示整个lcd屏
void sendc(uchar c);//给lcd发送命令
uchar readd();//读LCD数据
void showline(uchar  *str,bit page);//显示lcd单行字符串
void showint(long idata num,bit line);//显示lcd单行int型数据
void showintmes(long idata num,uchar *str,bit,page);//显示lcd单行int+字符串
void puti(long  idata inum);//将inum变成字符串并放到intbuf[]中
void sendd(uchar c);//发送数据到lcd
void dispini();//LCD初始化
uchar menu_sec(uchar *menuname,uchar code  *menu,uchar menu_num);//菜单选择
uchar scankey();//返回0表示串键或无键按下，12345分别表示5个键值
void  getdata();//字符输入，若转换成数字需要调用相应函数
int   getint();//整型int数字输入
float getfloat();//浮点数字输入
void showf(long idata num,uchar fbit,bit line);//显示浮点数(long型数据显示，并控制小数点所在位)
void putf(uchar fbit);//将long型数据字符串插入小数点成浮点数据字符串
void delay1ms(uint time){//延迟1ms*time,这不是一个精确值
	uint i;
	uint j;
	for (i=0;i<time;i++){
		for(j=0;j<300;j++);
	}
}	
void delay50us(uchar time){//延时50us*time，不是精确值
	uchar i,j;
	for (i=0;i<time;i++){
		for(j=0;j<12;j++);
	}
}	
void sendc(uchar c){//给lcd送命令
	SFRPAGE = 0x0f;//以下为lcd发送命令虚拟时序
	P4=c;
	lcdrs=0;
	lcdrw=0;
	EA=0;
	lcdcs=1;
	lcdcs=0;
	lcdcs=1;
	lcdrw=1;
	P4=0xff;//先置1，后读取
	lcdrs=0;
	while(P4>=0x80);
	lcdcs=0;
	lcdcs=1;
	EA=1;
	if(c==1)
		delay1ms(2);
                
}
void sendd(uchar c){//给lcd送数据
	SFRPAGE = 0x0f;
	EA=0;
	P4=c;
	lcdrs=1;
	lcdrw=0;
	lcdcs=1;
	lcdcs=0;
	lcdcs=1;
	lcdrw=1;
	P4=0xff;//先置1，后读取
	lcdrs=0;
	while(P4>=0x80);
	lcdcs=0;
	lcdcs=1;
	EA=1;
}	
uchar readd(){//读LCD数据
	uchar k;
	SFRPAGE = 0x0f;
	EA=0;
	lcdrw=1;
	P4=0xff;
	lcdrs=1;
	k=P4;
	lcdcs=0;
	lcdcs=1;
	P4=0xff;//先置1，后读取，否则所读数据可能有误
	lcdrs=0;
	while(P4>=0x80);
	/*读LCD是否为忙，此代码不可省略，否则连续读时若LCD为忙，所读数据是上一周期的数据*/
	lcdcs=0;
	lcdcs=1;
	EA=1;
	return k;
}	
void dispini(){	//lcd显示初始化
	delay1ms(100);
	SFRPAGE=0xf;
	lcdcs=0;         
	lcdrs=1;
	lcdrw=1;
	delay1ms(30);
	sendc(0x38);//8位,2行,5*7字体
	delay1ms(100);
	sendc(0x0c);//显示开,光标关;不闪烁字符
	delay1ms(100);
	sendc(0x06);//增量方式,现不移动
	delay1ms(100);
	sendc(0x01);//清屏
	delay1ms(100);
}
void puti(long  data inum){    
/*将一个int型数据转化成ascii码字符串,结尾以'\0'结束,并将结果存于intbuf(全局变量数组,可在任何地方被调用)*/
	long data t;
 	uchar data c=0;
	bit flag=1;
	t=100000000L;
	for(;c<16;c++)
		intbuf[c]='\0';
	c=0;
	if(inum<0){
		intbuf[0]='-';
		c++;
		inum=-inum;
	}
	for(;t>=10;t/=10){//此为将int型转化成字符串算法
		if(t==10){
			intbuf[c]=inum/t+'0';
			intbuf[++c]=inum%t+'0';
			intbuf[++c]='\0';
			break;
		}
		if(inum<t&flag)
			continue;
		else	{
			flag=0;
			intbuf[c]=inum/t;
			inum-=(long)(intbuf[c]) * t;
			intbuf[c]+='0';
			c++;
		}
	}
}
void putf(uchar fbit){
/*将intbuf数组由后向前数第fbit位插入小数点'.',在系统避免用浮点数运算场合下,用long型数据的乘除得到运算结果,再在结果中取小数位
比如,32/456结果的显示处理可以如此:将32乘10000,再除以456,将结果(int型数据)用puti()处理,此时是整数,再调用putf(4),保留四位小数即可,这样处理比调用浮点运算+浮点显示要快得多*/
	char idata  t0;
	char idata  pf;
	pf=strlen(intbuf)-fbit;
	if(intbuf[0]!='-'){
		if(pf>0){
			t0=strlen(intbuf);
			for(pf=t0;pf>t0-fbit;pf--){
				intbuf[pf]=intbuf[pf-1];
			
			}
			intbuf[pf]='.';
		}
		else{
			pf=strlen(intbuf)-1;
			for(t0=fbit+1;t0>=0;t0--,pf--){
				if(pf>=0)
					intbuf[t0]=intbuf[pf];
				else
					intbuf[t0]='0';
				}
			intbuf[1]='.';
		}
		
	}
	else{
		if(pf>1){
			t0=strlen(intbuf);
			for(pf=t0;pf>t0-fbit;pf--){
				intbuf[pf]=intbuf[pf-1];
			
			}
			intbuf[pf]='.';
		}
		else{
			pf=strlen(intbuf)-1;
			for(t0=fbit+2;t0>=1;t0--,pf--){
				if(pf>=1)
					intbuf[t0]=intbuf[pf];
				else
					intbuf[t0]='0';
				}
			intbuf[0]='-';
			intbuf[2]='.';
		}
	}
}
void showf(long idata num,uchar fbit,bit line){
	puti(num);
	putf(fbit);
	showline(intbuf,line);
}
void showint(long idata num,bit line){
	puti(num);
	showline(intbuf,line);
}
void showintmes(long idata inum,uchar *str,bit page){//事实上是重新调用puti()再在结尾加上*str
	idata uchar k;
	long idata t;
 	uchar idata c=0;
	bit flag=1;
	t=100000000;
	for(;c<16;c++)
		intbuf[c]='\0';
	c=0;
	if(inum<0){
		intbuf[0]='-';
		c++;
		inum=-inum;
	}
	for(;t>=10;t/=10){
		if(t==10){
			intbuf[c]=inum/t+'0';
			intbuf[++c]=inum%t+'0';
			intbuf[++c]=' ';
			goto putmes;
		}
		if(inum<t&flag)
			continue;
		else	{
			flag=0;
			intbuf[c]=inum/t;
			inum-=(long)(intbuf[c]) * t;
			intbuf[c]+='0';
			c++;
		}
	}//以上部分是将puti()函数重新写一次，但不给数组加结束符
	putmes:
	for(k=c;*str!='\0';k++){//以下为数组复制的算法
     intbuf[k]=*str;
	     str++;                                         
	    if(*str==' '){
			intbuf[++c]='\0';
			break;
		}
	}
	intbuf[k]='\0';//intbuf数组复制完毕
	showline(intbuf,page);//显示行控制
}
void showline(uchar  *str,bit page){//page值为0,显示第一行,page为1,显示第二行
	uchar idata  k;
	if(page==0){//控制显示在第几行是通过k的地址不同来实现的
		for(k=0x80;k<0x90;k++){
           	if(*str=='\0'){//*str的指针不下移，会执行到k=0x8f为止
				sendc(k);
				sendd(' ');//显示空格清掉上次显示部分
			}
			else{
				sendc(k); 
				sendd(*str);
				str++;
			}
		}
	}
	if(page==1){
		for(k=0xc0;k<0xd0;k++){
			if(*str=='\0'){
				sendc(k);
				sendd(' ');
			}
			else	{
				sendc(k); 
				sendd(*str);
				str++;
			}
		}
	}
}
void showpage(uchar *str,uchar *show){//显示整屏
	showline(str,0);//str显示在第一行
	showline(show,1);//show显示在第二行
 }
uchar scankey(){//扫描键值函数
	uchar  c;
	SFRPAGE=0X0F;
	c=P5;
	c=c&0xf8;//电路中有按键按下是低电平
	if(c==0x0f8)
		return(0);
	delay1ms(20);
	switch(c){
	case 0xd8:
		return 4;
	case 0xe8:
		return 2;
	case 0xf0:
		return 3;
	case 0xb8:
		return 1;
	case 0x78:
		return 5;
	default: return 0;//此行事实上包含了对串键的处理
	}
}
uchar menu_sec(uchar *menuname,uchar code  *menu,uchar menu_num){
/*菜单选择控制,菜单可在code数组中定义,menu_num为菜单项数,menulenth为菜单一项的长度*/
	char idata c,i=0;
	showline(menuname,0);//菜单翻页中menumame是不随着翻动的
	showline(&(menu[i*menulenth]),1);
	for(;;){
		c=scankey();
		if(c==0)
			continue;
		if(c==1){//下翻页操作
			i++;
			if(i>=menu_num)//i值上溢处理
				i=0;
				showline(&(menu[i*menulenth]),1);
		  }
	     if(c==3){//上翻页操作
		     i--;
		     if(i<0)//i值下溢处理
		     	i=menu_num-1;
		     showline(&(menu[i*menulenth]),1);	
		  }
		 if(c==4)
			return -1;//作为exit键
		 if(c==5)
			return -2;//预想作为快捷键
	     if(c==2){//确定键处理		
		 	 	//此程序有待用户改进
		     	return i;
		 }    
		for(c=0;c<3;c++)//完成一次扫描后给一定的延时
			delay1ms(100);	 
	}
}
int   getint(){
		getdata();
		return (atoi(keybuf));//调用的是系统函数，将字符串转化成int型数据
}
float getfloat(){
		getdata();
		return (atof(keybuf));//调用的是系统函数，将字符串转化成float型数据
}
void  getdata(){//取键盘+LCD输入值,可取16个字节长度的字符串
			char xdata  i,j,t,flag;
			uchar k,c;
		keystart:
			flag=0;
			for (k=0;k<16;k++){//先将缓冲区清零，以免把历史数据当成目前数据
				keybuf[k]='\0';
			}
			showline(keybuf,1);//将输入值回显在第二行，以方便即时矫正
			i=0;
			j=0;
			showline(disdata[i],0);//显示供选择输入的字符
			curshow;//显示光标
			home;//回首位，作为初始状态
			for(;;){
				do{	
					k=scankey();
					if(k==0)
					t=-1;
				}while(!k);//有按键按下时判断是否为有效按键，若不是，一直等待
				if(k==1){//下翻页键使之光标下移
					j++;
					toup;
					t=-1;
					if(j>15){//按键按过头后要翻到下一页显示，且使光标显示在首位
						j=0;
						i++;
						if(i>DISROW)	
							i=0;
						showline(disdata[i],0);
						curshow;	
						home;
					}
				}
				if(k==2){
	//确定键，使光标所在位置的字符为有效输入,若为按长键表示结束输入
					while(scankey()==2){
						t++;
						if(t>20)
							goto getdatacon; 
					}
					if(flag>=16)
							goto keystart;//输入值过多，控制其回到首位矫正
		
					keybuf[flag]=disdata[i][j];
					showline(keybuf,1);//将输入值回显
					home;
					delay1ms(3);//回显完毕后要控制其光标恢复到首行输入状态
					flag++;
					for(c=0;c<j;c++){
						toup;
						delay1ms(1);
					}
					goto firstout;
					getdatacon:
					showline("Has inputed:  ",0);
					showline(keybuf,1);//需长按键
					while(scankey()==2);
					curshut;//隐藏光标
					goto KEYEND;
				}
				if(k==3){//上翻页键控制光标上移
					j--;
					t=-1;
					if(j<0)	{//同样存在过头处理，但是不是回到首位，而是末位
						j=15;
						i--;
						if(i<0)
							i=DISROW;
						showline(disdata[i],0);
						curshow;
						home;
						delay1ms(3);
						for(c=0;c<j;c++){
								toup;
								delay1ms(1);
						}
					}
					else{
							todown;
					}
				
			}
			if(k==5){//delete 键，使输入缓冲区的最后一位删掉
				flag--;
				if(flag<1)
					flag=0;
				keybuf[flag]='\0';
				showline(keybuf,1);
				curshow;
				home;
				delay1ms(3);
				for(c=0;c<j;c++){
						toup;
						delay1ms(1);
				}
			}	
		firstout:	//每个循环必要的延时
			for(k=0;k<2;k++)
			delay1ms(100);
		}
	KEYEND:	
		_nop_();
}