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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 工业生产节能时控器单片机程序
返回列表 发新帖
查看: 3051|回复: 2
打印 上一主题 下一主题
收起左侧

工业生产节能时控器单片机程序

[复制链接]
跳转到指定楼层
楼主
ID:112317 发表于 2016-4-6 18:25 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

节能时控器，根据每日供电波峰，波谷，定时用电。节能，降低用电成本。C51-AT89C2051 程序
源码： 569417381jsnk.rar (2.29 KB, 下载次数: 15)

  1. #include <AT89x051.H>                //器件配置文件
  2. #define uchar unsigned char                //变量类型的宏定义
  3. #define uint unsigned int
  4. uchar DATA_7SEG[10]={0xfc,0x60,0xda,0xf2,0x66,
  5.                     0xb6,0xbe,0xe0,0xfe,0xf6};        /*0~9的数码管段码*/
  6. uchar x[4];                                        /* 存放走时的数组*/
  7. uchar y[4]={0,0,0,0};                        /* 存放定时1的数组*/
  8. uchar z[4]={0,0,0,0};                        /* 存放定时2的数组*/
  9. uchar act[4]={0xfe,0xfd,0xfb,0xf7};        /*四位数码管的位选码*/
  10. void delay(uint k);                                //延时子函数声明
  11. void conv();                                                //走时转换子函数声明
  12. void p_out();                                                //判别定时到否子函数声明
  13. void p_out1();                                                //判别定时到否子函数1声明
  14. void t_adj();                                                //走时调整子函数声明
  15. uchar deda=0;           /*100mS计数单元清零*/
  16. bit d_05s=0;            /*0.5秒标志*/
  17. bit o_f1=0;                 /*定时1启/停标志*/
  18. bit o_f2=0;                 /*定时2启/停标志*/
  19. uchar set=0;                /*功能键标志*/
  20. uchar h=0;
  21. uchar n=0;
  22. uchar m=0;
  23. uchar flag;
  24. uchar left=0;
  25. uchar sec=0;
  26. uchar min=0;
  27. uchar hour=0;
  28. uchar min1=0;
  29. uchar hour1=0;
  30. uchar min2=0;
  31. uchar hour2=0;
  32. uchar up=0;
  33. bit flag1=0;
  34. bit flag2=0;

  36. /*显示走时*/
  37. void time()
  38. {
  39. for(h=0;h<4;h++)                       
  40.         {P1=DATA_7SEG[x[h]];        //输出数码管的字形码
  41.                 P3=act[h];p_out();                //输出数码管的位码。判断输出
  42. if(P3_2==0){if(d_05s==1)P1_0=1;else P1_0=0;}                /* 百位数码管点亮时，控制小数点
  43. （秒点）闪烁*/
  44.                 delay(2);}                         //每位数码管点亮2ms
  45. if(o_f1==1){P1=0x01;P3_3=1;P3_2=1;P3_1=0;P3_0=1;}/* 若定时1启动，
  46. 点亮十位数码管小数点*/
  47.         else{P1=0x00;P3_3=1;P3_2=1;P3_1=1;P3_0=1;}p_out();/*否则十位数码管
  48. 小数点不亮*/
  49. delay(2);
  50. if(o_f2==1){P1=0x01;P3_3=1;P3_2=1;P3_1=1;P3_0=0;} /* 若定时2启动，
  51. 点亮个位数码管小数点*/
  52.         else{P1=0x00;P3_3=1;P3_2=1;P3_1=1;P3_0=1;}p_out();/*否则个位数码管
  53. 小数点不亮*/
  54. delay(2);
  55. }

  57. /*定时器T0初始化*/
  58. void init_timer0()
  59. {
  60. TMOD=0x11;
  61. TH0=-(50235/256);
  62. TL0=-(50235%256);
  63. IE=0x8a;
  64. TR0=1;
  65. }

  67. /*定时器T1初始化*/
  68. void init_timer1()
  69. {
  70. TH1=-(5000/256);
  71. TL1=-(5000%256);
  72. }


  75. /*延时k*1ms子函数*/
  76. void delay(uint k)
  77. {
  78. uint i,j;
  79. for(i=0;i<k;i++){
  80. for(j=0;j<60;j++)
  81. {;}}
  82. }

  84. /*100mS定时中断服务子函数*/
  85. void zd0(void) interrupt 1
  86. {
  87. TH0=-(50235/256);                //重装100ms定时初值
  88. TL0=-(50235%256);
  89. deda++;                                        //100ms计时单元递增
  90. }

  92. /*10mS定时中断服务子函数*/
  93. void zd1(void) interrupt 3
  94. {uchar i,j;i=P1;j=P3;
  95.         TH1=-(5000/256);
  96.         TL1=-(5000%256);
  97. if(m==1)n++;
  98. if(n>=30){n=0;m=0;}
  99. P3_7=0;
  100. P1=0xff;
  101. if(P1!=0xff)
  102. {
  103. if(n==0)m=1;
  104. {if(n==1)
  105. {
  106. if(P1_0==0){set++;left=0;}
  107. if(set>=4)set=0;
  108. if(set==1)flag=0x55;
  109. if(P1_1==0)left++;
  110. if(left>=4)left=0;
  111. if(P1_2==0){up++;
  112. switch(left)
  113. {
  114. case 0:{if(up>=10)up=0;}break;
  115. case 1:{if(up>=6)up=0;}break;
  116. case 2:{if(up>=10)up=0;}break;
  117. case 3:{if(up>=3)up=0;}break;
  118. default:break;
  119. }
  120. }
  121. if(P1_2==0){
  122. switch(set)
  123. {case 0:break;
  124. case 1:x[left]=up;break;
  125. case 2:{y[left]=up;if(P1_3==0)o_f1=!o_f1;}break;
  126. case 3:{z[left]=up;if(P1_3==0)o_f2=!o_f2;}break;
  127. default:break;}
  128.                         }
  129. else {
  130. switch(set)
  131. {case 0:break;
  132. case 1:up=x[left];break;
  133. case 2:{up=y[left];if(P1_3==0)o_f1=!o_f1;}break;
  134. case 3:{up=z[left];if(P1_3==0)o_f2=!o_f2;}break;
  135. default:break;}
  136.         }}
  137. }}
  138. P1=i;P3=j;
  139. }

  141. /*显示调整走时*/
  142. void t_adj()
  143. {p_out1();
  144. for(h=0;h<4;h++)        //四位数码管每位点亮3ms
  145.         {if(h==left)P1=0x00;
  146.         else {P1=DATA_7SEG[x[h]];
  147.         P3=act[h];p_out();
  148.         delay(3);}}
  149.         P1=DATA_7SEG[up];P3=act[left];
  150.         hour=x[3]*10+x[2];min=x[1]*10+x[0];
  151.         p_out();
  152.         delay(12);        //需调整的数码管点亮12ms
  153. if(o_f1==1){P1=0x01;P3_3=1;P3_2=1;P3_1=0;P3_0=1;} /*若定时1启动，
  154. 点亮十位数码管小数点*/
  155.         else{P1=0x00;P3_3=1;P3_2=1;P3_1=1;P3_0=1;}p_out();/*否则十位数码管
  156. 小数点不亮*/
  157. delay(12);                //需调整的数码管点亮12ms
  158. if(o_f2==1){P1=0x01;P3_3=1;P3_2=1;P3_1=1;P3_0=0;} /*若定时2启动，
  159. 点亮个位数码管小数点*/
  160.         else{P1=0x00;P3_3=1;P3_2=1;P3_1=1;P3_0=1;}p_out();/*否则个位数码管
  161. 小数点不亮*/
  162. delay(12);                //需调整的数码管点亮12ms
  163. }

  165. /*显示调整定时1*/
  166. void t1_adj()
  167. {p_out1();
  168. for(h=0;h<4;h++)                //四位数码管每位点亮3ms
  169.         {if(h==left)P1=0x00;
  170.         else {P1=DATA_7SEG[y[h]];
  171.         P3=act[h];p_out();
  172.         delay(3);}}
  173.         P1=DATA_7SEG[up];P3=act[left];        //需调整的数码管点亮18ms
  174.         hour1=y[3]*10+y[2];min1=y[1]*10+y[0];
  175.         p_out();
  176. delay(18);
  177. if(o_f1==1){P1=0x01;P3_3=0;P3_2=1;P3_1=0;P3_0=1;} /*若定时1启动，
  178. 点亮十位数码管小数点*/
  179.         else{P1=0x01;P3_3=0;P3_2=1;P3_1=1;P3_0=1;} /*否则十位数码管
  180. 小数点不亮*/
  181.         p_out();
  182.         delay(18);                                                //需调整的数码管点亮18ms
  183. }


  186. /*显示调整定时2*/
  187. void t2_adj()
  188. {p_out1();
  189. for(h=0;h<4;h++)                                //四位数码管每位点亮3ms
  190.         {if(h==left)P1=0x00;
  191.         else {P1=DATA_7SEG[z[h]];                //需调整的数码管点亮18ms
  192.         P3=act[h];p_out();
  193.         delay(3);}}
  194.         P1=DATA_7SEG[up];P3=act[left];
  195. hour2=z[3]*10+z[2];min2=z[1]*10+z[0];
  196.         p_out();
  197. delay(18);
  198. if(o_f2==1){P1=0x01;P3_3=1;P3_2=0;P3_1=1;P3_0=0;} /*若定时2启动，
  199. 点亮个位数码管小数点*/
  200.         else{P1=0x01;P3_3=1;P3_2=0;P3_1=1;P3_0=1;} /*否则个位数码管
  201. 小数点不亮*/
  202.         p_out();
  203.         delay(18);                                //需调整的数码管点亮18ms
  204. }


  207. /*时、分、秒计时单元转换*/
  208. void conv()
  209. {
  210. if(deda<=5)d_05s=0;                //每500ms，秒点取反
  211.         else d_05s=1;
  212. if(deda>=10){sec++;deda=0;}        //每1000ms，秒单元递增
  213. if(sec>=60){min++;sec=0;}                //每60s，分单元递增
  214. if(min>=60){hour++;min=0;}        //每60m，时单元递增
  215. if(hour>=24){hour=0;}                        //每24h，时单元清零
  216. }

  218. /*判别定时到否子函数*/
  219. void p_out()
  220. {
  221. if(o_f1==1)                        //若定时1启动
  222. {if(hour==hour1)                //定时1时间到
  223. {if(min==min1)
  224. {flag1=1;if(d_05s==1)P3_4=0;else P3_4=1;}}}        //继电器输出标志置1，蜂鸣器间断鸣响
  225. if(flag1==1) P3_5=0;                        //若输出标志为1，继电器吸合

  227. if(o_f2==1)                        //若定时2启动
  228. {if(hour==hour2)                //定时2时间到
  229. {if(min==min2)
  230. {flag1=0;if(d_05s==1)P3_4=0;else P3_4=1;}}} //继电器输出标志置0，蜂鸣器间断鸣响
  231. if(flag1==0) P3_5=1;                        //若输出标志为0，继电器释放
  232. }

  234. /*判别定时到否子函数1*/
  235. void p_out1()
  236. {
  237. if(o_f1==1)                        //若定时1启动
  238. {if(hour==hour1)                //定时1时间到
  239. {if(min==min1)
  240. {flag1=1;}}}                        //继电器输出标志置1
  241. if(flag1==1) P3_5=0;        //若输出标志为1，继电器吸合

  243. if(o_f2==1)                        //若定时2启动
  244. {if(hour==hour2)                //定时2时间到
  245. {if(min==min2)
  246. {flag1=0;}}}                        //继电器输出标志置0
  247. if(flag1==0) P3_5=1;        //若输出标志为0，继电器释放
  248. }


  251. /*主函数*/
  252. void main()
  253. {
  254.         init_timer0();            /*定时器T0初始化*/
  255.         init_timer1();            /*定时器T1初始化*/
  256.        
  257.         while(1)
  258.         {
  259. /*将显示缓冲数组内容移到时、分计时单元*/
  260. hour=x[3]*10+x[2];min=x[1]*10+x[0];
  261. hour1=y[3]*10+y[2];min1=y[1]*10+y[0];
  262. hour2=z[3]*10+z[2];min2=z[1]*10+z[0];
  263. conv();                                        /*时、分、秒及100mS单元转换*/
  264. /*将转换后的时、分计时单元内容移到显示缓冲数组*/
  265. x[3]=hour/10;x[2]=hour%10;x[1]=min/10;x[0]=min%10;
  266. y[3]=hour1/10;y[2]=hour1%10;y[1]=min1/10;y[0]=min1%10;
  267. z[3]=hour2/10;z[2]=hour2%10;z[1]=min2/10;z[0]=min2%10;
  268. switch(set)
  269. {
  270. case 0:time();break;/*显示走时*/
  271. case 1:t_adj();break;/*显示调整走时*/
  272. case 2:t1_adj();break;/*显示调整定时1*/
  273. case 3:t2_adj();break;/*显示调整定时2*/
  274. default:break;
  275. }
  276. if(flag!=0x55)                                        /*判断RAM受干扰标志，若受干扰，
  277. 则显示器闪烁告警*/
  278.         {uchar i;P3_4=1;P3_5=1;
  279.                 for(i=0;i<100;i++)                /*点亮显示器200mS*/
  280.                 {
  281.                 P1=DATA_7SEG[x[3]];P3=0xf7;delay(1);
  282.                 P1=DATA_7SEG[x[2]];P3=0xfb;delay(1);
  283.                 P1=DATA_7SEG[x[1]];P3=0xfd;delay(1);
  284.                 P1=DATA_7SEG[x[0]];P3=0xfe;delay(1);
  285.                 }
  286.                
  287.                 P1=0xff;P3=0xff;delay(400);        /*熄灭显示器200mS*/
  288.                 P3_7=0;
  289. /*如有键按下达0.5S则退出闪烁状态同时掉电标志置55H。*/
  290. if(P1!=0xff){
  291. delay(10);if(P1_0==0)flag=0x55;F0:if(P1!=0xff)goto F0;
  292.                         }P3_7=1;
  293.         }
  294. else TR1=1;/*启动定时器1*/
  295. }}
复制代码



单片机程序, 工业
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 顶顶 踩踩

相关帖子
回复

使用道具 举报

沙发
ID:109053 发表于 2016-4-7 00:23 | 只看该作者
有没有电路图参考一下..
回复

使用道具 举报

板凳
ID:99341 发表于 2016-5-3 21:48 | 只看该作者
楼主应该把电路图发一个让大家看看
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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