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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 电子技术分类讨论区 › 资料共享 › 单片机蓝桥杯13年初赛程序
返回列表 发新帖
查看: 1774|回复: 0
收起左侧

单片机蓝桥杯13年初赛程序

[复制链接]
ID:265734 发表于 2018-7-12 22:30 | 显示全部楼层 |阅读模式
单片机蓝桥杯13年初赛程序

单片机源程序如下:
  1. #include <STC15F2K60S2.H>
  2. #include "iic.h"
  3. #include "ds1302.h"
  4. #include "sled.h"
  5. #include "key.h"
  6. unsigned char time[2]={8,30}, adc;
  7. unsigned char dat=50,datx,mark=0,PP=0,ex=0;
  8. unsigned char key1;

  10. void sled_da()
  11. {
  12.         sled_Show(time[0]/10,0);
  13.         sled_Show(time[0]%10,1);
  14.         sled_Show(17,2);
  15.         sled_Show(time[1]/10,3);
  16.         sled_Show(time[1]%10,4);
  17.         sled_Show(16,5);
  18.         sled_Show(adc/10,6);
  19.         sled_Show(adc%10,7);
  20. }

  22. void sled_da1()
  23. {
  24.         sled_Show(17,0);
  25.         sled_Show(17,1);
  26.         sled_Show(16,2);
  27.         sled_Show(16,3);
  28.         sled_Show(16,4);
  29.         sled_Show(16,5);
  30.         sled_Show(dat/10,6);
  31.         sled_Show(dat%10,7);
  32. }

  34. void automatic()
  35. {
  36.         P0 = 0xfe;
  37.         P2 = 0x80;
  38.         P2 = 0x00;
  39.         if(adc < dat)P0 = 0x10;
  40.         else P0 = 0x00;       
  41.         P2 = 0xa0;
  42.         P2 = 0x00;
  43.         mark = 0;
  44.         if(key1==6) mark=1;
  45.         while(mark)
  46.         {
  47.                 key1 = key_dat();
  48.                 sled_da1();
  49.                 if(key1==5)dat++;
  50.                 if(key1==4)dat--;
  51.                 if(dat>99) dat=1;
  52.                 if(dat<1) dat=99;       
  53.                 if(key1==6)
  54.                 {
  55.                         write_E2(0x00,dat);
  56.                         mark = 0;
  57.                 }       
  58.         }
  59. }

  61. void manual()
  62. {
  63.         P0 = 0xfd;
  64.         P2 = 0x80;
  65.         P2 = 0x00;
  66.         P0 = 0x00;
  67.         if(key1==5)PP=1;
  68.         else if(key1==4)PP=0;
  69.         P04 = PP;
  70.         P2 = 0xa0;
  71.         P2 = 0x00;
  72.         if(key1==6)mark=~mark;
  73.         if( mark)
  74.         {
  75.                 if(adc < dat)P06 = 1;
  76.                 else P06 = 0;       
  77.                 P2 = 0xa0;
  78.                 P2 = 0x00;
  79.         }
  80. }

  82. void rwE2()
  83. {
  84.         datx = red_E2(0x01);
  85.         if(datx==66)dat = red_E2(0x00);
  86.         if(datx!=66)write_E2(0x01,66);
  87. }

  89. void main()
  90. {
  91.         ds1302_init();
  92.         write_1302(time);
  93.         rwE2();
  94.         ADC_Init();
  95.         while(1)
  96.         {
  97.                 red_1302(time);       
  98.                 adc =  red_ADC()*99/255;
  99.                 sled_da();
  100.                 key1 = key_dat();
  101.                 if(key1==7)ex=~ex;
  102.                 if(ex) manual();
  103.                 else automatic();
  104.         }
  105. }
复制代码

所有资料51hei提供下载:
13年.rar (56.67 KB, 下载次数: 6)


回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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