单片机实现计算器.docVIP

单片机实现计算器 #includereg51.h #includeabsacc.h #includeintrins.h #define unit unsigned int #define unchar unsigned char unchar dat; unit ss[8],b=0, result,A,H; unchar e; //sfr P4SW = 0xbb; sbit E=P2^6; sbit RW=P2^5; sbit RS=P2^4; //unchar bflag; void delay10ms() {unchar i,j,k; for(i=5;i0;i--) for(j=4;j0;j--) for(k=248;k0;k--); } unchar keyscan(void) //键盘扫描函数，使用行列反转扫描法 { unchar cord_h,cord_l,key;//行列值中间变量 P1=0x0f; //行线输出全为0 cord_h=P10x0f; //读入列线值 if(cord_h!=0x0f) //先检测有无按键按下 { delay10ms(); //去抖 if(cord_h!=0x0f) { cord_h=P10x0f; //读入列线值 P1=cord_h|0xf0; //输出当前列线值 cord_l=P10xf0; //读入行线值 key= cord_l+cord_h; P1=0x0f; while(P1!=0x0f); switch(key) { case 0x7e:dat=13;break; case 0x7d:dat=3;break;//1 case 0x7b:dat=2;break;//2 case 0x77:dat=1;break;//3 case 0xbe:dat=10;break;//4 case 0xbd:dat=6;break;//5 case 0xbb:dat=5;break;//6 case 0xb7:dat=4;break;//7 case 0xde:dat=12;break;//8 case 0xdd:dat=9;break;//9 case 0xdb:dat=8;break;//a case 0xd7:dat=7;break;//b case 0xed:dat=14;break;//d case 0xee:dat=11;break;//c case 0xeb:dat=0;break;//e case 0xe7:dat=15;break;//f default : dat=16;break; } return(dat); } } return(0xff); //返回该值 } unchar busy_1602() { P0=0xff; RS=0; RW=1; E=0; _nop_(); E=1; return (bit)(P00x80); } void wreg_1602(unchar com) { while(busy_1602()); RS=0; RW=0; E=1; P0=com; _nop_(); E=0; } void wdata_1602(unchar dat) {while(busy_1602()); RS=1; RW = 0; E=1; P0=dat; _nop_(); E=0; } void init_1602() { wreg_1602(0x38); delay10ms(); wreg_1602(0x38); wreg_1602(0x0c); wreg_1602(0x06); wreg_1602(0x01); delay10ms(); } unit length_z(unit z) {unit n=1 ; while(z10) { z=z/10; n++; } return n; } unit exp(unit m) {unit n=1; while(m) {n=10*n; --m; }