1602液晶显示计算器电路图及程序.doc

#include #include #include #include unsigned char code Error=error;unsigned char code Systemerror=system error;unsigned char code Lcd=lcd calculate;char str16;sbit RS=P20;sbit RW=P21;sbit E=P22;sbit BF=P07;/*函数功能：延时1ms*/void delay1ms()unsigned char i,j;for (i=0;i10;i+)for (j=0;j33;j+); /*函数功能：延时n毫秒入口参数：n*/void delaynms(unsigned char n)unsigned char i;for (i=0;in;i+)delay1ms();/*函数功能：判断液晶模块的忙碌状态返回值：result。result=1，忙碌；result=0，不忙。*/bit BusyTest(void) bit result; RS=0; /根据规定，RS为低电平、RW为高电平时，可以读状态 RW=1; E=1; /E=1，才允许读/写 _nop_(); _nop_(); _nop_(); _nop_(); result=BF; /将忙碌标志电平赋给result E=0; return result;/*函数功能：将模式设置指令或显示地址写入液晶模块入口参数:dictate*/void WriteInstruction(unsigned char dictate) while(BusyTest()=1); /如果忙就等待 RS=0; /根据规定，RS和R/W同为低电平时，可以写入指令 RW=0; E=0; _nop_(); _nop_(); P0=dictate; /将数据送入P0口，即写入指令或地址 _nop_(); _nop_(); _nop_(); _nop_(); E=1; /E置高电平 _nop_(); _nop_(); _nop_(); _nop_(); E=0;/*函数功能：指定字符显示的实际地址入口参数:x,y */void WriteAddress(unsigned char x,unsigned char y)unsigned char temp;if(x=0)switch(y)case 0:temp=0x00; break;case 1:temp=0x01; break;case 2:temp=0x02;break;case 3:temp=0x03;break;case 4:temp=0x04;break;case 5:temp=0x05;break;case 6:temp=0x06;break;case 7:temp=0x07;break;case 8:temp=0x08;break;case 9:temp=0x09;break;case 10:temp=0x0a;break;case 11:temp=0x0b;break;case 12:temp=0x0c;break;case 13:temp=0x0d;break;case 14:temp=0x0e;break;case 15:temp=0x0f;break;if(x=1)switch(y)case 0:temp=0x40;break;case 1:temp=0x41;break;case 2:temp=0x42;break;case 3:temp=0x43;break;case 4:temp=0x44;break;case 5:temp=0x45;break;case 6:temp=0x46;break;case 7:temp=0x47;break;case 8:temp=0x48;break;case 9:temp=0x49;break;case 10:temp=0x4a;break;case 11:temp=0x4b;break;case 12:temp=0x4c;break;case 13:temp=0x4d;break;case 14:temp=0x4e;break;case 15:temp=0x4f;break; WriteInstruction(temp|0x80); /显示位置的确定方法规定为“80H+地址码x”/*函数功能：将数据（字符的标准ASCII码）写入液晶模块入口参数：y*/void WriteData (unsigned char y) while(BusyTest()=1); RS=1; /RS为高电平，RW为低电平时，可以写入数据 RW=0; E=0; P0=y; /将数据送入P0口，即将数据写入液晶模块 _nop_(); _nop_(); _nop_(); _nop_(); E=1; _nop_(); _nop_(); _nop_(); _nop_(); E=0; /当E由高电平跳变成低电平时，液晶模块开始执行指令/*函数功能：对LCD的显示模式进行初始化设置*/void LcdInitiate(void) delaynms(15); /延时15ms，首次写指令时应给LCD一段较长的反应时间 WriteInstruction(0x38); /显示模式设置 delaynms(5); WriteInstruction(0x38); delaynms(5); WriteInstruction(0x38); delaynms(5); WriteInstruction(0x0c); /显示模式设置：显示开，无光标，光标不闪烁 delaynms(5); WriteInstruction(0x06); /显示模式设置：光标右移，字符不移 delaynms(5); WriteInstruction(0x01); /清屏幕指令，将以前的显示内容清除 delaynms(5);/*函数功能：显示字符串*/void display_error()unsigned char i;WriteAddress(0,0);i=0;while(Errori!=0)WriteData(Errori);i+;delaynms(100);void display_systemerror()unsigned char i;WriteAddress(0,0);i=0;while(Systemerrori!=0)WriteData(Systemerrori);i+;delaynms(100);void display_lcd()unsigned char i;WriteAddress(0,0);i=0;while(Lcdi!=0)WriteData(Lcdi);i+;delaynms(100);/*函数功能：按键判断*/bit judge()unsigned char keycode;P1=0x0f;keycode=P1;if(keycode=0x0f)return(0);elsereturn(1);/*函数功能：键盘扫描*/unsigned char scan()unsigned char keycode,keyscan;keyscan=0xef;while(keyscan!=0xff)P1=keyscan;keycode=P1;if(keycode&0x0f)!=0x0f)break;keyscan=(keycode16)display_systemerror();for(j=0;j=L;j+)strj=tempi;i-; return(L);/*函数功能：主函数*/void main()long int a;long int b;unsigned char flag;unsigned char sign;unsigned char i,j,s,x;unsigned char num;unsigned char fgh; unsigned char temp16;LcdInitiate();display_lcd();delaynms(20);WriteInstruction(0x01);flag=1;while(1)num=Key_Num();if(num!=0xff)if(fgh=1)WriteInstruction(0x01);fgh=0;if(num!=+)&(num!=-)&(num!=*)&(num!=/)&(num!=.)&(num!=)if(flag=1)a=a*10+num-48;elseb=num-48+b*10;if(num=0)i=0;flag=1;a=0;b=0;WriteInstruction(0x01);if(num=+)|(num=-)|(num=*)|(num=/)flag=0;switch(sign)case +:a=a+b;break;case -:a=a-b;break;case *:a=a*b;break;case /: if(b!=0) a=a/b;break; else WriteInstruction(0x01);flag=1;WriteAddress(0,1);display_error();delaynms(40);WriteInstruction(0x01);break;default:break; sign=num;b=0; if(num=) flag=1;switch(sign) case +:a=a+b; break; case -:a=a-b; break; case *:a=a*b; break; case /:a=a/b; break; default:break; tempi=num; WriteAddress(0,i); WriteData(num); for(s=0;s16;s+) temps=0; s=0; /WriteAddress(1,8); /WriteData(a+48); x=itoa(a); /函数转换 WriteAddress(1,1); while(s=x) WriteData(strs); s+; delaynms(100); sign=0;a=b=0;j=0; for(s=0;s16;s+) strs=0; s=0; fgh=1; i=0;if(i16) i