【導(dǎo)讀】計算器始終在不斷發(fā)展及完善之中，功能必將更加強大。理念，本設(shè)計采用AT89C51單片機作為主控芯片，使用C語言為系統(tǒng)進行編程，顯示原理進行簡單的闡述。劃分，及所選用的元器件性能參數(shù)進行詳細說明。

　　

【正文】 include include define uchar unsigned char define uint unsigned int sbit pinRS = P2^0。 //數(shù)據(jù)命令選擇端 sbit pinRW= P2^1。 //讀 寫數(shù)據(jù)端 sbit pinE= P2^2。 //使能端 //include void shortdelay(uchar i)//短延時 { for(。i0。i)。 } //長延時 void longdelay(uint i) { uint j。 for(。i0。i) {for(j=100。j0。j)。} } //延時程序 void delay(int i) {int j。 for(。i0。i) for(j=0。j100。j++)。 } //初試狀態(tài) void io_init() 攀枝花學(xué)院本科畢業(yè)設(shè)計（論文） 附錄 A：源程序 25 {P1=0xff。 } //鍵盤掃描部分 // unsigned char key_scan() { unsigned char key。 unsigned char temp。 uint flag。 io_init()。 //初始化 P1=0xf0。 //高四位輸入 行為高電平 列為低電平 flag=0。 loop: temp=P1^0xf0。 //屏蔽低四位 while(temp) { P1=0xfe。 delay(1)。 if((P1amp。0xfe)!=0xfe) switch(P1) { case 0xee: key=0x11。flag=1。break。 case 0xde: key=0x12。flag=1。break。 case 0xbe: key=0x13。flag=1。break。 case 0x7e: key=0x14。flag=1。break。 } if(flag) goto exit。 else P1=0xfd。 delay(1)。 if((P1amp。0xfd)!=0xfd) switch(P1) { case 0xed: key=0x21。flag=1。break。 case 0xdd: key=0x22。flag=1。break。 case 0xbd: key=0x23。flag=1。break。 攀枝花學(xué)院本科畢業(yè)設(shè)計（論文） 附錄 A：源程序 26 case 0x7d: key=0x24。flag=1。break。 } if(flag) goto exit。 else P1=0xfb。 delay(1)。 if((P1amp。0xfb)!=0xfb) switch(P1) { case 0xeb: key=0x31。flag=1。break。 case 0xdb: key=0x32。flag=1。break。 case 0xbb: key=0x33。flag=1。break。 case 0x7b: key=0x34。flag=1。break。 } if(flag) goto exit。 else P1=0xf7。 delay(1)。 if((P1amp。0xf7)!=0xf7) switch(P1) { case 0xe7: key=0x41。flag=1。break。 case 0xd7: key=0x42。flag=1。break。 case 0xb7: key=0x43。flag=1。break。 case 0x77: key=0x44。flag=1。break。 } exit: return key。 } if(temp==0) goto loop。 } // 鍵盤掃描完 攀枝花學(xué)院本科畢業(yè)設(shè)計（論文） 附錄 A：源程序 27 // 顯示初始化 //P0 口初始化 void initpindata(bit i) { //uchar pindata,pinRS,pinRW,pinE。 if(i==1) P0=0xff。 else P0=0X00。 } //數(shù)據(jù)命令選擇設(shè)置 void setRS(bit i) { if(i==1) pinRS=1。 //RS 高電平選擇數(shù)據(jù)寄存器 else pinRS=0。 //RS 低電平選擇指令寄存器 } //讀寫操作控制 void setRW(bit i) { if(i==1) pinRW=1。 //RW 高電平選擇讀 else pinRW=0。 //RW 低電 平選擇寫 } //使能信號 void setE(bit i) { if(i==1) pinE=1。 else pinE=0。 // 下降沿執(zhí)行 } //讀 BF 以及 AC 的值 uint read_BF_AC() //忙標(biāo)志位和地址計數(shù)器 AC 命令 BF 為 1 表示忙 { uint temp。 initpindata(1)。 //初始化 setRS(0)。 //數(shù)據(jù)命令選擇設(shè)置 setRW(1)。 //讀寫操作控制設(shè)置 setE(1)。 //以上是忙標(biāo)志設(shè)置 攀枝花學(xué)院本科畢業(yè)設(shè)計（論文） 附錄 A：源程序 28 shortdelay(1)。 temp=P0。 shortdelay(10)。 setE(0)。 //E 下降沿開始執(zhí)行 return(temp)。 } //判忙 bit statuscheck() { return((bit)(read_BF_AC()amp。0x80))。 // 判最高位是否為 1 } //寫指令函數(shù) void writeinstruc(uint instruc) { while(statuscheck())。 initpindata(0)。 setRS(0)。 setRW(0)。 //00 寫指令 setE(0)。 P0=instruc。 //short delay(1)。 setE(1)。 shortdelay(10)。 setE(0)。 //下降沿開始執(zhí)行 } //寫數(shù)據(jù)到 RAM void writedata(uint data1) { initpindata(0)。 setRS(1)。 setRW(0)。 //10 寫數(shù)據(jù) setE(0)。 P0=data1。 setE(1)。 攀枝花學(xué)院本科畢業(yè)設(shè)計（論文） 附錄 A：源程序 29 shortdelay(10)。 setE(0)。 //下降沿開 始執(zhí)行 } //從 RAM 中讀數(shù)據(jù)函數(shù) uint readdata(void) { uint temp。 initpindata(1)。 setRS(1)。 setRW(1)。 //數(shù)據(jù)寄存器讀出 setE(1)。 shortdelay(1)。 temp=P0。 shortdelay(10)。 setE(0)。 //下降沿開始執(zhí)行 return(temp)。 } //顯示程序 X 為行號， Y 為列號， date 為要顯示的數(shù)據(jù) void dispcharacter(int x,uint y,uint data1) { uint temp。 while(statuscheck())。 //判忙 temp=yamp。0x0f。 //不忙此語句執(zhí)行 高四位被置 0 xamp。=0x01。 //高七位被置 0 if(x) temp|=0x40。 writedata( data1)。 //setDDRAM_Add(temp)。 } //LCD 初始化 void initLCD() { writeinstruc(0x01)。 //LCD 復(fù)位函數(shù) 攀枝花學(xué)院本科畢業(yè)設(shè)計（論文） 附錄 A：源程序 30 writeinstruc(0x06)。//增量方式，不 移位 writeinstruc(0x0c)。//顯示開，光標(biāo)關(guān)，閃爍關(guān) writeinstruc(0x38)。//8 位， 2 行， 5*7 } //準(zhǔn)備工作完成 //計算器 pute(char key1,i) { signed char m,n,c,act。 long int num1,num2,result。 signed char str[4][4]={{39。739。,39。839。,39。939。,39。/39。}, {39。439。,39。539。,39。639。,39。*39。}, {39。139。,39。239。,39。339。,39。39。}, {39。c39。,39。039。,39。=39。,39。+39。}}。 signed char str1[11],string1[2]。 m=(key1amp。0xf0)。 //屏蔽低四位 m=m/16。 m=m1。 n=key1amp。0x0f。 //屏蔽高四位 n=n1。 c=str[m][n]。 sprintf(string1,%c,c)。 strcat(str1,string1)。 if((c==39。+39。)||(c==39。39。)||(c==39。*39。)||(c==39。/39。)) { act=c。 num1=atoi(str1)。 memset(str1,0,11)。 memset(string1,0,2)。 } if(c==39。=39。) { num2=atoi(str1)。 switch(act) 攀枝花學(xué)院本科畢業(yè)設(shè)計（論文） 附錄 A：源程序 31 { case39。+39。:result=num1+num2。break。 case39。39。:result=num1num2。break。 case39。*39。:result=num1*num2。break。 case39。/39。:result=num1/num2。break。 } } if(c==39。c39。) { act=0。 num1=str1[0]。 num1=str1[8]。 memset(str1,0,11)。 memset(string1,0,2)。 num1=str1[0]。 num1=str1[8]。 } longdelay(350)。 switch(key1) {case 0x11: dispcharacter(0,i,39。739。)。i++。break。 case 0x12: dispcharacter(0,i,39。839。)。i++。 break。 case 0x13: dispcharacter(0,i,39。939。)。i++。 break。 case 0x14: dispcharacter(0,i,39。/39。)。i++。break。 case 0x21: dispcharacter(0,i,39。439。)。i++。break。 case 0x22: dispcharacter(0,i,39。539。)。i++。break。 case 0x23: dispcharacter(0,i,39。639。)。i++。break。 case 0x24: dispcharacter(0,i,39。*39。)。i++。break。 case 0x31: dispcharacter(0,i,39。139。)。i++。break。 case 0x32: dispcharacter(0,i,39。239。)。i++。break。 case 0x33: dispcharacter(0,i,39。339。)。i++。break。 case 0x34: dispcharacter(0,i,39。39。)。i++。break。 case 0x41: writeinstruc(0x01)。 break。 case 0x42: dispcharacter(0,i,39。039。)。i++。break。 case 0x44: d