找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 1295|回复: 1
收起左侧

单片机简易计算器程序

[复制链接]
ID:864715 发表于 2020-12-21 15:06 | 显示全部楼层 |阅读模式
  1. #include<reg52.h>        //声明包含51头文件
  2. #include<stdio.h>  //声明包含输入输出函数
  3. #include<intrins.h>         //声明包含位移函数
  4. #define uchar  unsigned char  //  宏定义
  5. #define uint  unsigned int                // 宏定义
  6. #define CHECK_BUSY
  7. sbit RS = P3^5;        //液晶引脚定义
  8. sbit RW = P3^6;
  9. sbit EN = P3^4;
  10. sbit wela=P2^7;//数码管引脚定义
  11. sbit dula=P2^6;
  12. void DelayMs(int z)// 1ms延时函数
  13. {
  14. int x,y;
  15. for (x=z;x>0;x--)
  16.    for(y=110;y>0;y--);
  17. }
  18. /***********LED判忙函数***********/
  19. bit LCD_Check_Busy()
  20. {
  21. #ifdef CHECK_BUSY
  22. P0= 0xFF;
  23. RS=0;
  24. RW=1;
  25. EN=0;
  26. _nop_();
  27. EN=1;
  28. return (bit)(P0 & 0x80);
  29. #else
  30. return 0;
  31. #endif
  32. }
  33. /***********LED写入命令函数***********/
  34. void write_com(uchar com)
  35. {
  36. while(LCD_Check_Busy()); //忙则等待
  37. RS=0;
  38. RW=0;
  39. EN=1;
  40. P0= com;
  41. _nop_();
  42. EN=0;
  43. }
  44. /**********LED写入数据函数**********/
  45. void write_dat(uchar dat)
  46. {
  47. while(LCD_Check_Busy()); //忙则等待
  48. RS=1;
  49. RW=0;
  50. EN=1;
  51. P0= dat;
  52. _nop_();
  53. EN=0;
  54. }
  55. /*******LED写入字符函数***********/
  56. void LCD_Write_Char(uchar x,uchar y,uchar dat)
  57. {   
  58. if (y == 0)
  59.   {   
  60.   write_com(0x80 + x);   
  61.   }   
  62. else
  63.   {   
  64.   write_com(0xC0 + x);   
  65.   }      
  66. write_dat( dat);
  67. }
  68. /******写入字符串函数***********/
  69. void Write_String(uchar x,uchar y,uchar *s)
  70. {   

  71. while (*s)
  72.   {   
  73.   LCD_Write_Char(x,y,*s);   
  74.   s++;
  75.   x++;   
  76.   }
  77. }
  78. /*****LED初始化函数******/
  79. void LCD_Init()
  80. {
  81.            RW=0;
  82.         dula=0;         //关闭数码管显示
  83.         wela=0;         //关闭数码管显示
  84.    write_com(0x38); /*显示模式设置*/
  85.    DelayMs(5);
  86.    write_com(0x06);/*显示光标移动设置*/
  87.    DelayMs(5);
  88.    write_com(0x0C); /*显示开及光标设置*/
  89.    write_com(0x01);  /*显示清屏*/
  90.    }

  91. /*按键扫描函数,返回扫描键值*/
  92. uchar KeyScan()  //键盘扫描函数,使用行列反转扫描法
  93. {
  94. unsigned char cord_h,cord_l;//行列值中间变量
  95. P3=0x0f;            //行线输出全为0
  96. cord_h=P3&0x0f;     //读入列线值
  97. if(cord_h!=0x0f)    //先检测有无按键按下
  98. {
  99.   DelayMs(10);        //去抖
  100.   if((P3&0x0f)!=0x0f)
  101.   {
  102.     cord_h=P3&0x0f;  //读入列线值
  103.     P3=cord_h|0xf0;  //输出当前列线值
  104.     cord_l=P3&0xf0;  //读入行线值
  105.     while((P3&0xf0)!=0xf0);//等待松开并输出
  106.     return(cord_h+cord_l);//键盘最后组合码值
  107.    }
  108.   }
  109.   return(0xff);  //返回该值
  110. }

  111. unsigned char KeyPro()
  112. {
  113. switch(KeyScan())
  114. {
  115.   case 0xee:return '1';break;//0 按下相应的键显示相对应的码值
  116.   case 0xed:return '2';break;//1
  117.   case 0xeb:return '3';break;//2
  118.   case 0x7e:return '+';break;//3
  119.   case 0xe7:return '4';break;//4
  120.   case 0xde:return '5';break;//5
  121.   case 0xdd:return '6';break;//6
  122.   case 0x7d:return '-';break;//7
  123.   case 0xdb:return '7';break;//8
  124.   case 0xd7:return '8';break;//9
  125.   case 0xbe:return '9';break;//a
  126.   case 0x7b:return 'x';break;//b
  127.   case 0xbd:return '0';break;//c
  128.   case 0xbb:return '.';break;//d
  129.   case 0xb7:return '=';break;//e
  130.   case 0x77:return '/';break;//f
  131.   default:return 0xff;break;
  132. }
  133. }
  134. main()
  135. {
  136. unsigned char num,i,sign;                 
  137. unsigned char temp[16];   //最大输入16个
  138. bit firstflag;
  139. float a=0,b=0;
  140. unsigned char s;
  141. LCD_Init(); //初始化液晶屏
  142. DelayMs(10);//延时用于稳定,可以去掉
  143. write_com(0x01); //清屏
  144. Write_String(0,0,"I LIKE MCU");    //写入第一行信息,主循环中不再更改此信息,所以在while之前写入
  145. Write_String(0,1,"QXMCU");    //写入第二行信息,提示输入密码
  146. for(s=0;s<25;s++)//延时5s
  147.     DelayMs(200);
  148. write_com(0x01);
  149. while (1)         //主循环
  150.   {

  151. num=KeyPro();  //扫描键盘
  152. if(num!=0xff)  //如果扫描是按键有效值则进行处理
  153.    {
  154.     if(i==0)    //输入是第一个字符的时候需要把改行清空,方便观看
  155.    write_com(0x01);
  156. if(('+'==num)|| (i==16) || ('-'==num) || ('x'==num)|| ('/'==num) || ('='==num))//输入数字最大值16,输入符号表示输入结束
  157.    {
  158.    i=0;  //计数器复位
  159.   if(firstflag==0)  //如果是输入的第一个数据,赋值给a,并把标志位置1,到下一个数据输入时可以跳转赋值给b
  160.       {
  161.       sscanf(temp,"%f",&a);
  162.          firstflag=1;
  163.    }
  164.    else
  165.       sscanf(temp,"%f",&b);
  166.    for(s=0;s<16;s++) //赋值完成后把缓冲区清零,防止下次输入影响结果
  167.       temp[s]=0;
  168.       LCD_Write_Char(0,1,num);
  169.    ///////////////////////
  170.    if(num!='=')      //判断当前符号位并做相应处理
  171.       sign=num;      //如果不是等号记下标志位
  172.    else
  173.       {
  174.    firstflag=0;   //检测到输入=号,判断上次读入的符合
  175.          switch(sign)
  176.         {
  177.       case '+':a=a+b;
  178.    break;
  179.    case '-':a=a-b;
  180.    break;
  181.    case 'x':a=a*b;
  182.    break;
  183.    case '/':a=a/b;
  184.    break;
  185.    default:break;
  186.      }
  187.    sprintf(temp,"%g",a);    //输出浮点型,无用的0不输出
  188.          Write_String(1,1,temp);//显示到液晶屏
  189.    sign=0;a=b=0;            //用完后所有数据清零
  190.    for(s=0;s<16;s++)
  191.       temp[s]=0;
  192.    }
  193.    }
  194.   else if(i<16)
  195.    {
  196.     if((1==i)&& (temp[0]=='0') )//如果第一个字符是0,判读第二个字符
  197.       {
  198.     if(num=='.')  //如果是小数点则正常输入,光标位置加1
  199.       {
  200.       temp[1]='.';
  201.    LCD_Write_Char(1,0,num);//输出数据
  202.    i++;
  203.             } //这里没有判断连续按小数点,如0.0.0
  204.    else
  205.     {
  206.      temp[0]=num; //如果是1-9数字,说明0没有用,则直接替换第一位0
  207.      LCD_Write_Char(0,0,num);//输出数据
  208.      }
  209.    }
  210.     else
  211.       {
  212.          temp[i]=num;
  213.          LCD_Write_Char(i,0,num);//输出数据
  214.       i++;   //输入数值累加
  215.    }
  216.     }

  217.     }
  218.   }
  219. }
复制代码
回复

使用道具 举报

ID:1 发表于 2020-12-22 03:00 | 显示全部楼层
本帖需要重新编辑补全电路原理图,源码,详细说明与图片即可获得100+黑币(帖子下方有编辑按钮)
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表