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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 基于51单片机的可控硅调压调光源程序-带过零检测
返回列表 发新帖
查看: 2834|回复: 1
收起左侧

基于51单片机的可控硅调压调光源程序-带过零检测

[复制链接]
ID:338053 发表于 2018-5-25 14:35 | 显示全部楼层 |阅读模式
基于51单片机的可控硅调压调光程序-带过零检测

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

  3. #include<intrins.h>
  4. sbitledRS=P1^0;
  5. sbitledRW=P1^1;
  6. sbit ledE=P1^2;
  7. sbit keyjia=P2^7;
  8. sbitkeyjian=P2^6;
  9. sbitcontrolLD=P1^3;
  10. bitflag1=1;
  11. bitflag2=1;
  12. unsigned
  13. char code table[]=" guang liangdu
  14. ";
  15. unsignedchar code table1[]=" 00 ";
  16. intnum,flag=0,count=0;
  17. charliangdu=3;
  18. voiddelaykt(void) //导通延时
  19. {
  20. unsigned char a;
  21. for(a=2;a>0;a--);
  22. }
  23. voiddelay(int z) //可调延时
  24. {
  25. unsigned x,y;
  26. for(x=z;x>0;x--)
  27. for(y=110;y>0;y--);
  28. }
  29. void
  30. delay9ms(void) //误差
  31. -0.43402777778us 延时9ms
  32. {
  33. unsigned char a,b,c;
  34. for(c=1;c>0;c--)
  35. for(b=224;b>0;b--)
  36. for(a=17;a>0;a--);
  37. }
  38. voidwrite_com(unsigned com) //写指令
  39. {
  40. ledRS=0;
  41. P0=com;
  42. delay(10);
  43. ledE=1;
  44. delay(20);
  45. ledE=0;
  46. }
  47. voidwrite_date(unsigned date) //写数据
  48. {
  49. ledRS=1;
  50. P0=date;
  51. delay(10);
  52. ledE=1;
  53. delay(20);
  54. ledE=0;
  55. }
  56. voidwrite_liangdu(unsigned liangdu) //写亮度
  57. {
  58. int shi,ge;
  59. shi=(liangdu-3)/10;
  60. ge=(liangdu-3)%10;
  61. write_com(0x80+0x40+7);
  62. write_date(0x30+shi);
  63. write_date(0x30+ge);
  64. }
  65. voidinit() //初始化
  66. {
  67. controlLD=1; //触发控制初始化
  68. ledRW=0; //液晶初始化
  69. ledE=0;
  70. write_com(0x38);
  71. write_com(0x0c);
  72. write_com(0x06);
  73. write_com(0x80);
  74. for(num=0;num<15;num++)
  75. {
  76. write_date(table[num]);
  77. delaykt();
  78. }
  79. write_com(0x80+0x40);
  80. for(num=0;num<15;num++)
  81. {
  82. write_date(table1[num]);
  83. delaykt();
  84. }
  85. EA=1; //外部中断设置
  86. EX0=1;
  87. IT0=1;
  88. }
  89. voidkeyscanf() //键盘判断
  90. {
  91. if(keyjia==0) //加键判断
  92. {
  93. delaykt();
  94. if(keyjia==0)
  95. {
  96. if(flag1==1)
  97. {
  98. flag1=0;
  99. liangdu++;
  100. if(liangdu==10)
  101. liangdu=3;
  102. write_com(0x80+0x40+7);
  103. write_liangdu(liangdu);
  104. }
  105. }
  106. }
  107. else if(keyjia!=0)
  108. {
  109. delaykt();
  110. if(keyjia!=0)
  111. flag1=1;
  112. }
  113. if(keyjian==0) //减键判断
  114. {
  115. delaykt();
  116. if(keyjian==0)
  117. {
  118. if(flag2==1)
  119. {
  120. flag2=0;
  121. liangdu--;
  122. if(liangdu==2)
  123. liangdu=9;
  124. write_com(0x80+0x40+7);
  125. write_liangdu(liangdu);
  126. }
  127. }
  128. }
  129. else if(keyjian!=0)
  130. {
  131. delaykt();
  132. if(keyjian!=0)
  133. flag2=1;
  134. }
  135. }
  136. voidzhongduan() interrupt 0 //外部中断
  137. {
  138. flag=1;
  139. }
  140. voidtimepd() //同步标志判断与定时器设置
  141. {
  142. if(flag==1)
  143. {
  144. flag=0;
  145. TMOD=0x01;
  146. TH0=(65536-1000*(10-liangdu))/256;
  147. TL0=(65536-1000*(10-liangdu))%256;
  148. ET0=1;
  149. TR0=1;
  150. }
  151. }
  152. voidtime0() interrupt 1 //定时中断程序
  153. {
  154. count=1;
  155. }
  156. voidchufa() //MOS3020触发
  157. {
  158. if(count==1)
  159. {
  160. count=0;
  161. controlLD=0;
  162. delaykt();
  163. controlLD=1;
  164. delay9ms();
  165. controlLD=0;
  166. delaykt();
  167. controlLD=1;
  168. }
  169. }
  170. voidmain()
  171. {
  172. init();
  173. while(1)
  174. {
  175. keyscanf();
  176. timepd();
  177. chufa();
  178. }
  179. }
复制代码

所有资料51hei提供下载:
基于51单片机的可控硅调压调光程序-带过零检测.rar (1.16 KB, 下载次数: 91)
回复

使用道具 举报

ID:416820 发表于 2018-12-28 19:18 | 显示全部楼层
顶顶，支持楼主
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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