设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 基于51单片机计算器源程序 可发送给上位机 可红外
返回列表 发新帖
查看: 1810|回复: 3
收起左侧

基于51单片机计算器源程序 可发送给上位机 可红外

[复制链接]
ID:817736 发表于 2020-9-19 16:25 | 显示全部楼层 |阅读模式
基于51计算器可发送给上位机可红外

单片机源程序如下:
  1. #include"lcd12864.h"
  2. #include"reg52.h"
  3. #include"i2c.h"
  4. #include"math.h"
  5. sbit IRIN=P3^2;
  6. int app=0;
  7. unsigned char IrValue[6];
  8. unsigned char Time;
  9. unsigned char code smgduan[17]={
  10. 0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,
  11. 0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71,0X76};
  12. void chuan()
  13. {
  14. TMOD=0X20;
  15. TH1=0XFD;
  16. TL1=0XFD;
  17. TR1=1;
  18. REN=1;
  19. SM0=1;
  20. SM1=1;
  21. }
  22. void delay(unsigned int i)
  23. {
  24.         while(i--);       
  25. }
  26. void IrInit()
  27. {
  28.         IT0=1;//下降沿触发
  29.         EX0=1;//打开中断0允许
  30.         EA=1;        //打开总中断

  32.         IRIN=1;//初始化端口
  33. }  
  34. char hongwai()
  35. {
  36.   if((smgduan[IrValue[2]/16]==0x06)&&(smgduan[IrValue[2]%16]==0x7d))
  37.   return '0';
  38.   if((smgduan[IrValue[2]/16]==0x3f)&&(smgduan[IrValue[2]%16]==0x39))
  39.   return '1';
  40.   if((smgduan[IrValue[2]/16]==0x06)&&(smgduan[IrValue[2]%16]==0x7f))
  41.   return '2';
  42.   if((smgduan[IrValue[2]/16]==0x6d)&&(smgduan[IrValue[2]%16]==0x79))
  43.   return '3';
  44.   if((smgduan[IrValue[2]/16]==0x3f)&&(smgduan[IrValue[2]%16]==0x7f))
  45.   return '4';
  46.   if((smgduan[IrValue[2]/16]==0x06)&&(smgduan[IrValue[2]%16]==0x39))
  47.   return '5';
  48.   if((smgduan[IrValue[2]/16]==0x6d)&&(smgduan[IrValue[2]%16]==0x77))
  49.   return '6';
  50.   if((smgduan[IrValue[2]/16]==0x66)&&(smgduan[IrValue[2]%16]==0x5b))
  51.   return '7';
  52.   if((smgduan[IrValue[2]/16]==0x6d)&&(smgduan[IrValue[2]%16]==0x5b))
  53.   return '8';
  54.   if((smgduan[IrValue[2]/16]==0x66)&&(smgduan[IrValue[2]%16]==0x77))
  55.   return '9';
  56.   if((smgduan[IrValue[2]/16]==0x3f)&&(smgduan[IrValue[2]%16]==0x6f))
  57.   return '+';
  58.   if((smgduan[IrValue[2]/16]==0x06)&&(smgduan[IrValue[2]%16]==0x6d))
  59.   return '-';
  60.   if((smgduan[IrValue[2]/16]==0x66)&&(smgduan[IrValue[2]%16]==0x4f))
  61.   return '/';
  62.   if((smgduan[IrValue[2]/16]==0x66)&&(smgduan[IrValue[2]%16]==0x3f))
  63.   return 'x';
  64.   if((smgduan[IrValue[2]/16]==0x3f)&&(smgduan[IrValue[2]%16]==0x07))
  65.   return '=';
  66.   if((smgduan[IrValue[2]/16]==0x66)&&(smgduan[IrValue[2]%16]==0x07))
  67.   return '.';
  68.    if((smgduan[IrValue[2]/16]==0x66)&&(smgduan[IrValue[2]%16]==0x7d))
  69.    return 'p';
  70.    if((smgduan[IrValue[2]/16]==0x66)&&(smgduan[IrValue[2]%16]==0x6d))
  71.    return '|';
  72.   else return 0xff;
  73. }
  74. main()
  75. {

  77.         char i,sign,s,j,k,h=0;
  78.        unsigned char num;                 
  79.   char temp[16];   //最大输入16个
  80.      bit firstflag;

  82.      double a=0,b=0;
  83.          chuan();
  84.      IrInit();
  85.      LCD_Init();

  87. //    LCD_Write_com(0x01); //清屏
  88.    
  89.     while(1)

  91.     {    if(app==1)
  92.              {num=hongwai();
  93.                  app=0;
  94.              }
  95.          else
  96.                   num = KeyPro();

  98.         if(num!=0xff)
  99.         {
  100.             if(j == 0)
  101.                 LCD_Write_com(0x01);
  102.                                 j=1;
  103.              if(num=='|')
  104.                          {
  105.                            a=At24c02Read(1);
  106.                            firstflag = 1;
  107.                          }
  108.             if(('+' == num) || ('-' == num) || ('x' == num) || ('/' == num) || ('=' == num)|| ('p' == num))
  109.             {
  110.                              if(num=='p')
  111.                          {
  112.                            LCD_Write_Char(i,0,num);
  113.                            i++;
  114.                            h=1;
  115.                          }
  116.                             else
  117.                                 {k=0;
  118.                 if(firstflag==0)     //flag=1为第一个数，0为第二个数
  119.                 {
  120.                     sscanf(temp,"%f " ,&a);
  121.                     firstflag = 1;
  122.                                         if(h==1)
  123.                                         a=a*a;
  124.                 }        
  125.                 else
  126.                     {sscanf(temp," %f " ,&b);
  127.                                         if(h==1)
  128.                                         b=b*b;}

  130.                 for(s = 0;s<16;s++)
  131.                     temp[s] = 0;
  132.                                         LCD_Write_Char(i,0,num);
  133.                                         i++        ;
  134.              //////////////////
  135.                 if(num != '=')
  136.                     sign = num;
  137.                 else
  138.                 {        j=0;
  139.                                     i=0;
  140.                     firstflag = 0;
  141.                     switch(sign)
  142.                     {
  143.                         case '+' :a = a+b;break;
  144.                         case '-' :a = a-b;break;
  145.                         case 'x' :a = a*b;break;
  146.                         case '/' :a = a/b;break;
  147.                         default:break;
  148.                     }
  149.                     //LCD_Write_Char(1,1,answer);
  150.                                         At24c02Write(1,a);   //在地址1内写入数据num
  151.                     sprintf(temp,"%.2f",a);    //输出浮点型，无用的0不输出
  152.                      Write_String(0,3,temp);//显示到液晶屏
  153.                                          for(s=0;temp[s]!='\0';s++)
  154.                                          {SBUF=temp[s];
  155.                                          while(!TI);
  156.                                          TI=0;
  157.                                          }
  158.                                           SBUF=' ';
  159.                                          while(!TI);
  160.                                          TI=0;
  161.                     sign = 0;
  162.                     a = 0;
  163.                     b = 0;
  164.                     for(s=0;s<16;s++)
  165.                           temp[s]=0;

  167.                 }
  168.                                 }
  169.             }
  170.             else if((i<24)&&(num!='s')&&(num!='p')&&(num!='k'))
  171.             {
  172.                 if((1==i)&&(temp[0]=='0'))
  173.                 {
  174.                     if(num == '.')
  175.                     {
  176.                         temp[k]=num;
  177.                          LCD_Write_Char(1,0,num);//输出数据
  178.                           i++;
  179.                                                   k++;
  180.                     }
  181.                     else
  182.                     {
  183.                         temp[0] = num;
  184.                         LCD_Write_Char(0,0,num);
  185.                     }

  187.                 }
  188.                 else
  189.                 {
  190.                     temp[k] = num;
  191.                                         LCD_Write_Char(i,0,num);
  192.                     i++;
  193.                                         k++;
  194.                 }                    
  195.             }
  196.         }
  197.     }
  198. }
  199. void ReadIr() interrupt 0
  200. {
  201.         unsigned char j,k;
  202.         unsigned  err;
  203.         Time=0;                                         
  204.         delay(700);        //7ms
  205.         if(IRIN==0)                //确认是否真的接收到正确的信号
  206.         {         
  207.                
  208.                 err=1000;                                //1000*10us=10ms,超过说明接收到错误的信号
  209.                 /*当两个条件都为真是循环，如果有一个条件为假的时候跳出循环，免得程序出错的时
  210.                 侯，程序死在这里*/       
  211.                 while((IRIN==0)&&(err>0))        //等待前面9ms的低电平过去                 
  212.                 {                       
  213.                         delay(1);
  214.                         err--;
  215.                 }
  216.                 if(IRIN==1)                        //如果正确等到9ms低电平
  217.                 {
  218.                         err=500;
  219.                         while((IRIN==1)&&(err>0))                 //等待4.5ms的起始高电平过去
  220.                         {
  221.                                 delay(1);
  222.                                 err--;
  223.                         }
  224.                         for(k=0;k<4;k++)                //共有4组数据
  225.                         {                               
  226.                                 for(j=0;j<8;j++)        //接收一组数据
  227.                                 {

  229.                                         err=60;               
  230.                                         while((IRIN==0)&&(err>0))//等待信号前面的560us低电平过去
  231.                                         {
  232.                                                 delay(1);
  233.                                                 err--;
  234.                                         }
  235.                                         err=500;
  236.                                         while((IRIN==1)&&(err>0))         //计算高电平的时间长度。
  237.                                         {
  238.                                                 delay(10);         //0.1ms
  239.                                                 Time++;
  240.                                                 err--;
  241.                                                 if(Time>30)
  242.                                                 {
  243.                                                         return;
  244.                                                 }
  245.                                         }
  246.                                         IrValue[k]>>=1;         //k表示第几组数据
  247.                                         if(Time>=8)                        //如果高电平出现大于565us，那么是1
  248.                                         {
  249.                                                 IrValue[k]|=0x80;
  250.                                         }
  251.                                         Time=0;                //用完时间要重新赋值                                                       
  252.                                 }
  253.                         }
  254.                 }
  255.                 if(IrValue[2]!=~IrValue[3])
  256.                 {
  257.                         return;
  258.                 }
  259.                 app=1;
  260.         }                       
  261. }  
复制代码

所有程序51hei提供下载:
计算机.7z (29.38 KB, 下载次数: 15)

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励！

查看全部评分

回复

使用道具 举报

ID:817736 发表于 2020-9-19 16:26 | 显示全部楼层
欢迎提问
回复

使用道具 举报

ID:328014 发表于 2020-9-20 18:07 | 显示全部楼层
能分享一下原理图吗?
回复

使用道具 举报

ID:817736 发表于 2020-9-26 02:22 | 显示全部楼层
51hei团团 发表于 2020-9-20 18:07
能分享一下原理图吗?

原理图照着单片机的焊就行
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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