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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 16年山东电赛电子称程序
返回列表 发新帖
查看: 2269|回复: 0
打印 上一主题 下一主题
收起左侧

16年山东电赛电子称程序

[复制链接]
跳转到指定楼层
楼主
ID:225587 发表于 2017-8-7 21:07 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
这是16年山东电赛电子称的程序，各方面功能都已经齐全，希望能帮助到大家

所有资料51hei提供下载:
电赛电子称.zip (2.43 KB, 下载次数: 43)

单片机源程序如下:
  1. #include<reg52.h>
  2. #define uchar unsigned char
  3. #define uint unsigned int

  5. sbit ADDO=P3^0;    //51CPU 准双向I/0 输入使能(DOUT)  / 串行数据输出
  6. sbit ADSK=P3^1;    // 使能AD（PD_SCK）   /  串行时钟输入
  7.     sbit RS=P1^1;     //寄存器选择引脚，搞电平选择数据寄存器，低电平选择指令寄存器
  8.     sbit RW=P1^2;    //读写操作使能引脚，高电平使能读操作，低电平使能写操作
  9.     sbit E=P1^3;     //总使能引脚
  10. sbit FMQ=P1^0;           //蜂鸣器

  12. //----------------------AD转换程序--//
  13. unsigned long ReadCount(void)  //无参数，返回长整形变量
  14. {
  15.   unsigned long Count;      //声明长整形变量Count
  16.   unsigned char i;       //声明字符型变量i
  17.   ADSK=0;         //串行输入拉低
  18.   Count=0;       //变量Count置零
  19.   while(ADDO);      //等待串行输出拉高
  20.   for(i=0;i<24;i++)      //接收24个数据和发送24个脉冲
  21.   {         
  22.    ADSK=1;         //发送脉冲
  23.    Count=Count<<1;        //变量左移
  24.    ADSK=0;          //拉低
  25.    if(ADDO)Count++;       //读入数据（高>>低）
  26.   }
  27.   ADSK=1;          //发送第25个脉冲（选择A通道、128增益。）
  28.   Count=Count^0x800000;    //按位相异或
  29.   ADSK=0;       //串行拉低
  30.      return Count; //返回
  31. }  
  32. //--------------------延时子函数--------//
  33. void delay(unsigned char delayata)
  34. {
  35.   uchar i,j;
  36.   for(i=0;i<delayata;i++)
  37.   {
  38.    for(j=0;j<121;j++)
  39.    {;}
  40.   }
  41. }
  42. //-------------------------------------单键扫描子函数-----//
  43. unsigned char JP()
  44. {
  45. unsigned char x=0x00;
  46.   bit i=0;
  47.   x=P2;   //扫描Y坐标
  48.   FMQ=0;    //响起蜂鸣器
  49.   delay(125);  //延时去抖动
  50.   P2=0x0f;
  51.   delay(2);
  52.   x+=P2;    //扫描X坐标
  53.   switch(x)
  54.   {
  55.    case 0xee:x=0x31;break;    //按下1
  56.    case 0xed:x=0x34;break;    //按下4
  57.    case 0xeb:x=0x37;break;    //按下7
  58.    case 0xe7:x=0x46;break;    //按下F         8888
  59.    case 0xde:x=0x32;break;       //按下2/.
  60.    case 0xdd:x=0x35;break;    //按下5
  61.       case 0xdb:x=0x38;break;    //按下8
  62.    case 0xd7:x=0x30;break;    //按下0         
  63.    case 0xbe:x=0x33;break;    //按下3
  64.    case 0xbd:x=0x36;break;    //按下6
  65.    case 0xbb:x=0x39;break;    //按下9
  66.    case 0xb7:x=0x45;break;    //按下E         88888
  67.    case 0x7e:x=0x44;break;    //按下D
  68.    case 0x7d:x=0x43;break;    //按下C
  69.    case 0x7b:x=0x42;break;    //按下B
  70.    case 0x77:x=0x41;break;    //按下A
  71.    default:x=0xff;break;
  72.    }
  73.   FMQ=1;       //关闭蜂鸣器
  74.    while(i==0)    //等待按键松开
  75.    {
  76.     P2=0xf0;
  77.     delay(150);
  78.     if(P2==0xf0)
  79.     {
  80.      i=1;
  81.     }
  82.     else{i=0;}
  83.    }
  84.   return x;    //返回x(ASCII码)
  85. }
  86. //------------------12864写指令子函数-----//
  87. void write_12864com(unsigned char com)
  88. {
  89. RS=0;
  90. RW=0;
  91. delay(1);
  92. E=1;
  93. P0=com;
  94. delay(2);
  95. E=0;
  96. delay(1);
  97. }
  98. //------------------12864写数据子函数-----//
  99. void write_12864dat(unsigned char dat)
  100. {
  101. RS=1;
  102. RW=0;
  103. delay(1);
  104. E=1;
  105. P0=dat;
  106. delay(2);
  107. E=0;
  108. delay(1);
  109. }
  110. //------------------------------LCD初始化-----//
  111. void initinal(void)
  112. {
  113.   delay(100);
  114.   write_12864com(0x30);   //8位并行通信
  115.   delay(1);
  116.   write_12864com(0x30);   //8位并行通信
  117.   delay(1);
  118.   write_12864com(0x02);  
  119.   delay(2);
  120.   write_12864com(0x06);  
  121.   delay(2);
  122.   write_12864com(0x0c);  
  123.   delay(2);
  124.   write_12864com(0x01);  
  125.   delay(2);
  126.   write_12864com(0x80);  
  127.   delay(2);
  128. }
  129. //--------------------主函数-------------//
  130. void main(void)
  131. {
  132.    uchar  LCD[16]={"0123456789ABCDEF"};
  133.    code uchar JM1[]={"地表最强战队"};
  134.    code uchar JM2[]={"单价: 0.0 元    "};
  135.    code uchar JM3[]={"重量: 0000.0克  "};
  136.    code uchar JM4[]={"总价: 0000.0元  "};
  137.    uchar DJ[2];       //单价
  138.    uchar ZL[5];       //重量
  139.    uchar QPZL[5];   //去皮时的重量
  140.    uchar ZJ[5];       //总价
  141.    unsigned long J1;
  142.    uint J2,J3,J6=0;
  143.    bit J5=1;
  144.    uint J7;
  145.    uchar i;
  146.    uchar JM5[]={5679};
  147.    initinal();  //初始化
  148.   for(i=0;i<3;i++)  //填值
  149.   {
  150.    DJ[i]=0;
  151.   }
  152.   for(i=0;i<5;i++)   //填值
  153.   {
  154.    ZL[i]=0;
  155.   }
  156.   for(i=0;i<5;i++)   //填值
  157.   {
  158.    QPZL[i]=0;
  159.   }
  160.   for(i=0;i<5;i++)   //填值
  161.   {
  162.    ZJ[i]=0;
  163.   }
  164.     write_12864com(0x81);  //定位
  165.   for(i=0;i<12;i++)
  166. {
  167.   write_12864dat(JM1[i]);  //显示 第三组电子称
  168. }
  169. write_12864com(0x90);  //定位
  170. for(i=0;i<14;i++)
  171. {
  172.   write_12864dat(JM2[i]);    //显示 单价：00.0元
  173. }
  174. write_12864com(0x88);  //定位
  175. for(i=0;JM3[i]!='\0';i++)
  176. {
  177.   write_12864dat(JM3[i]);  //显示 重量： 00.000KG
  178. }
  179. write_12864com(0x98);    //定位
  180. for(i=0;JM4[i]!='\0';i++)
  181. {
  182.   write_12864dat(JM4[i]);   //显示 总价： 0000.0元
  183. }
  184. P2=0xf0;
  185. while(1)
  186. {
  187.    while(P2==0xf0)      //但没有按键按下的时候进入,有按键按下的时候跳出来
  188.    {
  189.    J1=ReadCount();
  190.      //读AD值
  191.    
  192.    J3=(unsigned int)((float)(J1/43.10+0.05)/1.0288);  //取值

  194.    
  195.      //重量十位，一般为零
  196.    ZL[0]=(J3/10000)%10;       //重量个位 一                                         
  197.    ZL[1]=(J3/1000)%10;     //计算位  百科为
  198.    ZL[2]=(J3/100)%10;                           //市科委
  199.    ZL[3]=(J3/10)%10;                                                //各位
  200.    ZL[4]=J3%10;                                        //小数点后以为

  202.    J7=ZL[4];
  203.    J7+=ZL[3]*10;
  204.    J7+=ZL[2]*100;
  205.    J7+=ZL[1]*1000;
  206.    J7+=ZL[0]*10000;
  207.    
  208.    J3=QPZL[4];
  209.    J3+=QPZL[3]*10;
  210.    J3+=QPZL[2]*100;
  211.    J3+=QPZL[1]*1000;
  212.    J3+=QPZL[0]*10000;
  213.    
  214.    J7-=J3;
  215.    
  216.    ZL[0]=J7/10000;
  217.    J7%=10000;
  218.    ZL[1]=J7/1000;
  219.    J7%=1000;
  220.    ZL[2]=J7/100;
  221.    J7%=100;
  222.    ZL[3]=J7/10;
  223.    J7%=10;
  224.    ZL[4]=J7;
  225.    write_12864com(0x8b); //定位
  226.    
  227.    write_12864dat(LCD[ZL[0]]);    //送显示
  228.    write_12864dat(LCD[ZL[1]]);    //送显示
  229.    write_12864dat(LCD[ZL[2]]);    //送显示
  230.    write_12864dat(LCD[ZL[3]]);    //送显示
  231.    write_12864dat(0x2e);    //送显示
  232.    write_12864dat(LCD[ZL[4]]);    //送显示
  233.    

  235.    J7=DJ[1]*ZL[4];
  236.    J7+=DJ[1]*ZL[3]*10;
  237.    J7+=DJ[1]*ZL[2]*100;
  238.    J7+=DJ[1]*ZL[1]*1000;
  239.    J7+=DJ[1]*ZL[0]*10000;

  241.   

  243.    J7+=DJ[0]*ZL[4]*10;
  244.    J7+=DJ[0]*ZL[3]*100;   
  245.    J7+=DJ[0]*ZL[2]*1000;
  246.    J7+=DJ[0]*ZL[1]*10000;
  247.    J7+=DJ[0]*ZL[0]*100000;

  249. ZJ[0]=J7/10000;
  250. J7%=10000;
  251. ZJ[1]=J7/1000;
  252. J7%=1000;
  253. ZJ[2]=J7/100;
  254. J7%=100;
  255. ZJ[3]=J7/10;
  256. J7%=10;
  257. ZJ[4]=J7;

  259.   write_12864com(0x9b); //定位
  260.   i=ZJ[0];
  261.   i=LCD[i];
  262.   write_12864dat(i);    //送显示
  263.    i=ZJ[1];
  264.   i=LCD[i];
  265.   write_12864dat(i);    //送显示
  266.   
  267.    i=ZJ[2];
  268.   i=LCD[i];
  269.   write_12864dat(i);    //送显示
  270.    write_12864dat(0x2e);   //显示点
  271.    i=ZJ[3];
  272.   i=LCD[i];
  273.   write_12864dat(i);    //送显示

  275.     i=ZJ[4];
  276.   i=LCD[i];
  277.   write_12864dat(i);    //送显示
  278.    P2=0xf0;
  279.    delay(1);
  280.    }
  281.    J2=JP();
  282.    if(J6>1){J6=0;}
  283.    if(J2<0x40)
  284.    {
  285.    J2-=0x30;
  286.    DJ[J6]=J2;
  287.    J2=0xff;
  288.    J6++;
  289.    }
  290.    else
  291.    {
  292. ……………………

  294. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码



评分

参与人数 1黑币 +50 收起 理由
admin + 50 绝世好帖！

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 顶顶 踩踩
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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