单片机智能灯控制系统源程序仿真原理图与论文全套资料下载

设计了一款智能控制系统。
AT89C51+LCD1602+DS1302+按键+LED组成了这样一个完整的设计。
P2.0-P2.3  4个LED等代表庭院内的4盏灯
P1.3-P1.7  5个开关，第一个代表光敏电阻传感器，后四个都是热释电红外传感器
P3.2、P3.4、P3.5、P3.6为四个按键开关，可设置万年历时间。
人性化地加入了时间和温度的LCD显示，并可以通过按键去设置时间日期等。
智能灯控制分为自动和手动控制。
逻辑功能：
当P3.0为0，也就是按下的时候为手动控制，反之则为自动控制。
手动：
按下开关P3.1，所有的灯都打开，按下开关P3.2，所有的灯都关闭。
自动：
一个光敏电阻传感器和四个红外热释电传感器，实现逻辑为：
当时间为晚上18点-早上6点之间或者光敏电阻传感器为0时，一旦有人，则点亮灯，一个灯附近安装一个红外热释电传感器，
当走进灯时，灯亮。

仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


参考论文：


单片机源程序如下:

1. #include<reg51.h>
   
2. #include<intrins.h>
   
3.   #include<string.h>
   
4. #define uchar unsigned char
   
5. #define uint unsigned int
   
6. #define delayNOP() {_nop_();_nop_();_nop_();_nop_();}
   
7. sbit SDA=P1^0;  // DS1302数据线
   
8. sbit CLK=P1^1;  //         DS1302时钟线
   
9. sbit RST=P1^2;  // DS1302复位线
   
10. //DS18B20数据端口定义
    
11. sbit DQ=P2^4;    //DS18B20数据端口
    
12. sbit LCD_RS=P2^5;   // LCD寄存器选择
    
13. sbit LCD_RW=P2^6;   //         LCD读写/写控制
    
14. sbit LCD_EN=P2^7;   //  LCD启用
    
15. sbit K1=P3^2;   //  选择
    
16. sbit K2=P3^3;   // 确定
    
17. sbit K3=P3^5;   // 加
    
18. sbit K4=P3^6;  // 减
    
19. 
    
20. 
    
21. sbit key_1=P3^0;        //自动手动切换
    
22. sbit key_2=P3^1;        //关灯，按一下，关一个
    
23. sbit key_3=P3^4;        //开灯，按一下，开一个
    
24. uchar code zz[]={0x08,0x0c,0x04,0x06,0x02,0x03,0x01,0x09};
    
25. uchar code fz[]={0x09,0x01,0x03,0x02,0x06,0x04,0x0c,0x08};  
    
26. sbit R_LED=P2^0;   //红灯
    
27. sbit Y_LED=P2^1;   //黄灯
    
28. sbit G_LED=P2^2;   //绿灯
    
29. sbit B_LED=P2^3;   //蓝灯
    
30. 
    
31. sbit guangmin=P1^3;          //光敏电阻传感器
    
32. sbit ren1=P1^4;                  //红外热释电传感器1
    
33. sbit ren2=P1^5;                  //红外热释电传感器2
    
34. sbit ren3=P1^6;                  //红外热释电传感器3
    
35. sbit ren4=P1^7;                  //红外热释电传感器4
    
36. 
    
37. 
    
38. 
    
39. //温度字符
    
40. uchar code Temperature_Char[8]={0x0c,0x12,0x12,0x0c,0x00,0x00,0x00,0x00};
    
41. //温度小数对照表
    
42. uchar code df_Table[]={0,1,1,2,3,3,4,4,5,6,6,7,8,8,9,9};
    
43. uchar CurrentT=0; //当前读取温度的整数部分
    
44. uchar Temp_Value[]={0x00,0x00};         //从DS18B20读取的温度值
    
45. uchar Display_Digit[]={0,0,0,0};//待显示的各温度数位
    
46. bit DS18B20_IS_OK=1;//传感器正常标志
    
47. 
    
48. uchar tCount=0;
    
49. //一年中每个月的天数，2月的天数由年份决定
    
50. uchar MonthsDays[]={0,31,0,31,30,31,30,31,31,30,31,30,31};
    
51. //周日，每周一到周六（0,1-6）【读取DS1302时分别是1-7】
    
52. uchar *WEEK[]={"SUN","MON","TUS","WEN","THU","FRI","SAT"};
    
53. 
    
54. //LCD显示缓冲
    
55. uchar LCD_DSY_BUFFER1[]={"00-00-00        "};
    
56. uchar LCD_DSY_BUFFER2[]={"00-00-00      "};
    
57. uchar DateTime[7];  //所读取的日期时间
    
58. uchar Adjust_flag=0; //当前调节的时间对像：秒，分，时，日，月，年（1,2,3,4,5,6）
    
59. uchar Change_Flag[]=" YMDHM";//(分，时，日，月，年)（不调节秒与周）
    
60. 
    
61. //延时
    
62. void DelayMS(uchar x)
    
63. {uchar i;
    
64. while(x--)
    
65. for(i=0;i<120;i++);
    
66. }
    
67. 
    
68. //向DS1302写入一个字节
    
69. void Write_A_Byte_TO_DS1302(uchar x)
    
70. {uchar i;
    
71. for(i=0;i<8;i++)
    
72. {SDA=x&1;  CLK=1;  CLK=0; x>>=1;
    
73. }
    
74. }
    
75. 
    
76. //从DS11302读取一个字节
    
77. uchar Get_A_Byte_FROM_DS1302()
    
78. {uchar i,b,t;
    
79. for(i=0;i<8;i++)
    
80. {b>>=1; t=SDA; b|=t<<7;  CLK=1;CLK=0;
    
81. }
    
82. //BCD码转换
    
83. return b/16*10+b%16;
    
84. }
    
85. //从DS1302指定位置读数据
    
86. uchar Read_Data(uchar addr)
    
87. {uchar dat;
    
88. RST=0; CLK=0; RST=1;
    
89. Write_A_Byte_TO_DS1302(addr);
    
90. dat=Get_A_Byte_FROM_DS1302();
    
91. CLK=1;RST=0;
    
92. return dat;
    
93. }
    
94. 
    
95. //向DS1302某地址写入数据
    
96. void Write_DS1302(uchar addr,uchar dat)
    
97. {CLK=0;RST=1;
    
98. Write_A_Byte_TO_DS1302(addr);
    
99. Write_A_Byte_TO_DS1302(dat);
    
100. CLK=0;RST=0;
     
101. }
     
102. 
     
103. //设置时间
     
104. void SET_DS1302()
     
105. { uchar i;
     
106. Write_DS1302(0x8e,0x00); //写控制字,取消写保护
     
107. //分时日月年依次写入
     
108. for(i=0;i<7;i++)
     
109. {
     
110. //分的起始地址10000010（0x82）,后面连续依次是时，日，月，周，年，写入 地址每次增2
     
111. Write_DS1302(0X80+2*i,(DateTime[i]/10<<4)|(DateTime[i]%10));
     
112. }
     
113. Write_DS1302(0x8e,0x80);//加保护
     
114. }
     
115. 
     
116. //读取当前的时间
     
117. void GetTime()
     
118. {
     
119.   uchar i;
     
120.   for(i=0;i<7;i++)
     
121.    {
     
122.      DateTime[i]=Read_Data(0x81+2*i);
     
123.    }
     
124. }
     
125. 
     
126. 
     
127. //LCD忙等待
     
128. bit LCD_Busy_Check()
     
129. {bit result;
     
130. LCD_RS=0;
     
131. LCD_RW=1;
     
132. LCD_EN=1;
     
133. delayNOP();
     
134. result=(bit)(P0&0x80);
     
135. LCD_EN=0;
     
136. return result;
     
137. }
     
138. 
     
139. //写指令
     
140. void Write_LCD_Command(uchar cmd)
     
141. {while(LCD_Busy_Check());
     
142. LCD_RS=0;LCD_RW=0;LCD_EN=0;        _nop_();         _nop_();
     
143. P0=cmd;
     
144. delayNOP();
     
145. LCD_EN=1;
     
146. delayNOP();
     
147. LCD_EN=0;
     
148. }
     
149. //写数据
     
150. void Write_LCD_Data(uchar dat)
     
151. {while(LCD_Busy_Check());
     
152. LCD_RS=1;LCD_RW=0;LCD_EN=0;
     
153. P0=dat;
     
154. delayNOP();
     
155. LCD_EN=1;
     
156. delayNOP();
     
157. LCD_EN=0;
     
158. }
     
159. 
     
160. //初始化
     
161. void Init_LCD()
     
162. {Write_LCD_Command(0x01);DelayMS(5);
     
163. Write_LCD_Command(0x38);DelayMS(5);
     
164. Write_LCD_Command(0x0c);DelayMS(5);
     
165. Write_LCD_Command(0x06);DelayMS(5);
     
166. }
     
167. //设置显示位置
     
168. void Set_LCD_POS(uchar pos)
     
169. {        Write_LCD_Command(pos|0x80);
     
170.   }
     
171. 
     
172. //在LCD上显示字符串
     
173. void Display_LCD_String(uchar p,uchar *s)
     
174. {uchar i;
     
175. Set_LCD_POS(p);
     
176. for(i=0;i<16;i++)
     
177. {Write_LCD_Data(s[i]);
     
178. DelayMS(1);
     
179. }
     
180. }
     
181. 
     
182. //日期与时间值转换为数字字符
     
183. void Format_DateTime(uchar d,uchar *a)
     
184. {a[0]=d/10+'0';
     
185. a[1]=d%10+'0';
     
186. }
     
187. 
     
188. //判断是否为闰年
     
189. uchar isLeapYear(uint y)
     
190. {return (y%4==0&&y%100!=0)||(y%400==0);
     
191. }
     
192. 
     
193. //求自2000.1.1开始的任何一天是星期几
     
194. void RefreshWeekDay()
     
195. {uint i,d,w=5; //已知1999.12.31是星期五
     
196. for(i=2000;i<2000+DateTime[6];i++)
     
197. { d=isLeapYear(i)?366:365;
     
198. w=(w+d)%7;
     
199. }
     
200. d=0;
     
201. for(i=1;i<DateTime[4];i++)
     
202. d+=MonthsDays[i];
     
203. d+=DateTime[3];
     
204. //保存星期，0~6表示星期日，星期一，二.....六，为了与DS1302的星期格式匹配，返回值需要加1
     
205. DateTime[5]=(w+d)%7+1;
     
206. }
     
207. 
     
208. //延时函数2
     
209. void Delay(uint x)
     
210. {while(--x);
     
211. }
     
212. /***************初始化18B20温度函数******************/
     
213. uchar Init_DS18B20()
     
214. {
     
215.    uchar status;
     
216.    DQ=1;
     
217.    Delay(8);
     
218.    DQ=0;
     
219.    Delay(90);
     
220.    DQ=1;
     
221.    Delay(8);
     
222.    status=DQ;
     
223.    Delay(100);
     
224.    DQ=1;
     
225.    return status;
     
226. }
     
227. 
     
228. //读一字节
     
229. uchar ReadOneByte()
     
230. {uchar i,dat=0;
     
231. DQ=1;_nop_();
     
232. for(i=0;i<8;i++)
     
233. {DQ=0;dat>>=1;DQ=1;_nop_();_nop_();
     
234. if(DQ)dat|=0x80;
     
235. Delay(30);
     
236. DQ=1;
     
237. }
     
238. return dat;
     
239. }
     
240. 
     
241. //写一字节
     
242. void WriteOneByte(uchar dat)
     
243. {uchar i;
     
244. for(i=0;i<8;i++)
     
245. { DQ=0;DQ=dat&0x01;Delay(5);DQ=1;dat>>=1;
     
246. }
     
247. }
     
248. 
     
249. //读取温度值
     
250. void Read_Temperature()
     
251. {
     
252. //延时值与负数标识
     
253. uchar t=150,ng=0;
     
254. //高5位全为1（0xf8）则为负数，为负数时取反加1，并设置负数标识
     
255. 
     
256. if(Init_DS18B20()==1)  //DS18B20故障
     
257. DS18B20_IS_OK=0;
     
258. else
     
259. {WriteOneByte(0xcc);   //跳过序列号
     
260. WriteOneByte(0x44);//启动温度转换
     
261. Init_DS18B20();
     
262. WriteOneByte(0xcc);   //跳过序列号
     
263. WriteOneByte(0xBE);//读取温度寄存器
     
264. Temp_Value[0]=ReadOneByte();  //温度低8位
     
265. Temp_Value[1]=ReadOneByte();  //温度高8位
     
266. DS18B20_IS_OK=1;
     
267. if((Temp_Value[1]&0xf8)==0xf8)
     
268. {
     
269. Temp_Value[1]=~Temp_Value[1];
     
270. Temp_Value[0]=~Temp_Value[0]+1;
     
271. if(Temp_Value[0]==0x00)
     
272. Temp_Value[1]++;
     
273. //负数标志置1
     
274. ng=1;
     
275. }
     
276. //查表得到温度的小数部分
     
277. Display_Digit[0]=df_Table[Temp_Value[0]&0x0f];
     
278. //获取温度整数部分（高字节中的低三位与低字节中的高4位，无符号）
     
279. CurrentT=((Temp_Value[0]&0xf0)>>4)|((Temp_Value[1]&0X07)<<4);
     
280. //将整数部分分解为3位待显示数字
     
281. Display_Digit[3]=CurrentT/100;
     
282. Display_Digit[2]=CurrentT%100/10;
     
283. Display_Digit[1]=CurrentT%10;
     
284. 
     
285. //刷新LCD显示缓冲
     
286. LCD_DSY_BUFFER2[13]= Display_Digit[0]+'0';
     
287. LCD_DSY_BUFFER2[12]='.'        ;
     
288. LCD_DSY_BUFFER2[11]=Display_Digit[1]+'0';
     
289. LCD_DSY_BUFFER2[10]=Display_Digit[2]+'0';
     
290. LCD_DSY_BUFFER2[9]=Display_Digit[3]+'0';
     
291. //高位为0时不显示
     
292. if(Display_Digit[3]==0)         LCD_DSY_BUFFER2[9]=' ';
     
293. //高位为0，且次高位为0时，次高位不显示
     
294. if(Display_Digit[2]==0&&Display_Digit[3]==0)
     
295. LCD_DSY_BUFFER2[10]=' ';
     
296. 
     
297. //负数符号显示在恰当的位置
     
298. if(ng)
     
299. {if(LCD_DSY_BUFFER2[10]==' ')
     
300. LCD_DSY_BUFFER2[10]='-';
     
301. else
     
302. if(LCD_DSY_BUFFER2[9]==' ')
     
303. LCD_DSY_BUFFER2[9]='-';
     
304. else
     
305.   LCD_DSY_BUFFER2[8]='-';
     
306. }
     
307. }
     
308. }
     
309. 
     
310. 
     
311. //键盘中断 0
     
312. void EX_INT0() interrupt 0
     
313. {if(K1==0)  //选择调整对象（Y M D H M）
     
314. { while(K1==0);
     
315. Adjust_flag++;
     
316. LCD_DSY_BUFFER1[13]='[';
     
317. LCD_DSY_BUFFER1[14]=Change_Flag[Adjust_flag];
     
318. LCD_DSY_BUFFER1[15]=']';
     
319. if(Adjust_flag==6)
     
320. {Adjust_flag=0;
     
321. LCD_DSY_BUFFER1[13]=' ';
     
322. LCD_DSY_BUFFER1[14]=' ';
     
323. LCD_DSY_BUFFER1[15]=' ';
     
324. 
     
325. }
     
326. }
     
327. }
     
328. 
     
329. //键盘中断1
     
330. void EX_INT1() interrupt 2
     
331. {
     
332. while(K2==0);
     
333. SET_DS1302();//将调整后的时间写入DS1302
     
334. LCD_DSY_BUFFER1[13]=' ';
     
335. LCD_DSY_BUFFER1[14]=' ';
     
336. LCD_DSY_BUFFER1[15]=' ';
     
337. Adjust_flag=0;//操作索引重设为-1，时间继续正常显示
     
338. }
     
339. 
     
340. 
     
341. //定时器0每秒刷新LCD显示
     
342. void T0_INT() interrupt 1
     
343. { uchar i;
     
344. TH0=-50000/256;
     
345. TL0=-50000%256;
     
346. Set_LCD_POS(0X4e);Write_LCD_Data(0Xdf);
     
347. Set_LCD_POS(0X4f);Write_LCD_Data('C');
     
348. if(++tCount!=2) return;
     
349. tCount=0;
     
350. Read_Temperature();
     
351. //按指定的格式生成待显示的日期时间串
     
352. Format_DateTime(DateTime[6],LCD_DSY_BUFFER1);
     
353. Format_DateTime(DateTime[4],LCD_DSY_BUFFER1+3);
     
354. Format_DateTime(DateTime[3],LCD_DSY_BUFFER1+6);
     
355. //星期
     
356. strcpy(LCD_DSY_BUFFER1+9,WEEK[DateTime[5]-1]);
     
357. //时分秒
     
358. Format_DateTime(DateTime[2],LCD_DSY_BUFFER2);
     
359. Format_DateTime(DateTime[1],LCD_DSY_BUFFER2+3);
     
360. Format_DateTime(DateTime[0],LCD_DSY_BUFFER2+6);
     
361. //显示年月日，星期，时分秒
     
362. Display_LCD_String(0x00,LCD_DSY_BUFFER1);
     
363. Set_LCD_POS(0x40);
     
364. for(i=0;i<14;i++)
     
365. {
     
366. Write_LCD_Data(LCD_DSY_BUFFER2[i]);
     
367. DelayMS(1);
     
368. }
     
369. }
     
370. 
     
371. //手动按键控制灯函数
     
372. void key_LED()
     
373. {
     
374.   R_LED=1;
     
375.   Y_LED=1;
     
376.   G_LED=1;
     
377.   B_LED=1;
     
378.   if(key_2==0)
     
379.    {
     
380.        R_LED=0;
     
381.        Y_LED=0;
     
382.        G_LED=0;
     
383.        B_LED=0;  
     
384.    }
     
385.   if(key_3==0)
     
386.    {
     
387.        R_LED=1;
     
388.        Y_LED=1;
     
389.        G_LED=1;
     
390.        B_LED=1;  
     
391.    }
     
392.   
     
393. }
     
394. 
     
395. 
     
396. //主程序
     
397. void main()
     
398. {
     
399. Init_LCD();//液晶初始化
     
400. IE=0X87;//允许INT0,T0中断
     
401. IP=0X05;
     
402. IT0=0X01;
     
403. IT1=0X01;
     
404. TMOD=0X01;
     
405. TH0=-50000/256;
     
406. TL0=-50000%256;
     
407. TR0=1;
     
408. while(1)
     
409. {  
     
410.   R_LED=Y_LED=G_LED=B_LED=1;
     
411.   if(key_1==0)        //手动模式
     
412.    {
     
413.             key_LED();         //按键控制灯函数
     
414.    }
     
415.   else
     
416.    {
     
417.             if(DateTime[2]>18||DateTime[2]<6||guangmin==0)
     
418.       {
     
419.             if(ren1==0)
     
420.                  {
     
421.                    R_LED=0;
     
422.                Y_LED=1;
     
423.                G_LED=1;
     
424.                B_LED=1;
     
425.                  }
     
426.                 if(ren2==0)
     
427.                  {
     
428.                    R_LED=0;
     
429.                Y_LED=0;
     
430.                G_LED=1;
     
431.                B_LED=1;
     
432.                  }
     
433.             if(ren3==0)
     
434.                  {
     
435.                    R_LED=0;
     
436.                Y_LED=0;
     
437.                G_LED=0;
     
438.                B_LED=1;
     
439.                  }
     
440.                 if(ren4==0)
     
441.                  {
     
442.                    R_LED=0;
     
443.                Y_LED=0;
     
444.                G_LED=0;
     
445.                B_LED=0;         
     
446.                  }
     
447.           }
     
448.    
     
449.    }
     
450. switch(Adjust_flag)
     
451. {
     
452. case 0:GetTime(); break;
     
453. case 1:
     
454. if(K3==0&&DateTime[6]<99)
     
455. {
     
456. while(K3==0);
     
457. DateTime[6]++;}
     
458. 
     
459. if(K4==0&&DateTime[6]>0)
     
460. {
     
461. while(K4==0);
     
462. DateTime[6]--;
     
463. }
     
464. MonthsDays[2]=isLeapYear(2000+DateTime[6])?29:28;
     
465. //如果年份变化后当前月份的天数大于上限则设为上限
     
466. if(DateTime[3]>MonthsDays[DateTime[4]])
     
467. DateTime[3]=MonthsDays[DateTime[4]];
     
468. RefreshWeekDay();//刷新星期
     
469. break;
     
470.       
     
471. case 2:
     
472. if(K3==0&&DateTime[4]<12)
     
473. {
     
474. while(K3==0);
     
475. DateTime[4]++;}
     
476. 
     
477. if(K4==0&&DateTime[4]>1)
     
478. {
     
479. while(K4==0);
     
480. DateTime[4]--;
     
481. }
     
482. //获取2月份天数
     
483. MonthsDays[2]=isLeapYear(2000+DateTime[6])?29:28;
     
484. //如果变化后当前月份的天数大于上限则设为上限
     
485. if(DateTime[3]>MonthsDays[DateTime[4]])
     
486. DateTime[3]=MonthsDays[DateTime[4]];
     
487. RefreshWeekDay();//刷新星期
     
488. break;
     
489. 
     
490. case 3://日00-28/29/30/31，调节之前首先根据年份得出该年中2月的天数
     
491. MonthsDays[2]=isLeapYear(2000+DateTime[6])?29:28;
     
492. //根据当前的月份决定调节日期的上限
     
493. if(K3==0&&DateTime[3]<MonthsDays[DateTime[4]])
     
494. {
     
495. while(K3==0);
     
496. ……………………
     
497. 
     
498. …………限于本文篇幅 余下代码请从51黑下载附件…………
     

复制代码

所有资料51hei提供下载:
智能灯控制系统.rar (1.28 MB, 下载次数: 212)

2018-3-28 20:37 上传

点击文件名下载附件
下载积分: 黑币 -5

谢谢贡献，学习了

论文刚好是这个，很有参考价值，谢谢了

求原理图

谢谢帮助

请问用的是keil4吗