找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 1791|回复: 0
收起左侧

单片机蓝桥杯基础功能练习程序

[复制链接]
ID:764947 发表于 2020-5-30 12:22 | 显示全部楼层 |阅读模式
蓝桥杯基础功能练习程序
51hei.png

单片机源程序如下:
  1. #include "reg52.h"

  2. sbit L0=P0^0;
  3. sbit S7=P3^0;
  4. unsigned char count=0,fun=0,PWM;

  5. void SelectHC573(unsigned char n)
  6. {
  7.         switch(n)
  8.         {
  9.                 case 4:P2=P2&0x1f|0x80;break;
  10.                 case 5:P2=P2&0x1f|0xa0;break;
  11.                 case 6:P2=P2&0x1f|0xc0;break;
  12.                 case 7:P2=P2&0x1f|0xe0;break;
  13.         }
  14. }

  15. void ZDsurvice_timer0()
  16. {
  17.         TMOD=0x01;
  18.         ET0=1;
  19.         EA=1;
  20.         TH0=(65536-100)/256;
  21.         TL0=(65536-100)%256;

  22. }

  23. void ZD_timer0() interrupt 1
  24. {
  25.         TH0=(65536-100)/256;
  26.         TL0=(65536-100)%256;
  27.         count++;
  28.         if(count==PWM)
  29.         {
  30.                 L0=1;
  31.         }
  32.         if(count==100)
  33.         {
  34.                 count=0;
  35.                 L0=0;
  36.         }
  37. }

  38. void delay(unsigned char t)
  39. {
  40.         while(t--);
  41. }

  42. void scan_key()
  43. {
  44.         if(S7==0)
  45.         {
  46.                 delay(100);
  47.                 if(S7==0)
  48.                 {
  49.                         while(S7==0);
  50.                         switch(fun)
  51.                         {
  52.                                 case 0:PWM=10;TR0=1;fun=1;break;
  53.                                 case 1:PWM=50;fun=2;break;
  54.                                 case 2:PWM=90;fun=3;break;
  55.                                 case 3:L0=1;TR0=0;fun=0;break;

  56.                         }
  57.                 }
  58.         }
  59. }

  60. ……………………

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

所有资料51hei提供下载:
蓝桥杯练习程序.rar (10.58 KB, 下载次数: 15)
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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