51单片机——PM2.5检测_gp2y1014au 51单片机程序

#include <reg52.h>
#include <intrins.h>
#define uint unsigned int
#define uchar unsigned char

/*单片机型号STC12C5A60S2、传感器GP2Y1014AU*/

/*接口定义详见我上传的资源，下载后可见*/

uchar set_st;
uchar tab[5];
uint DUST_SET=150; //固体颗粒的阈值

//bit shanshuo_st; //闪烁间隔标志
bit beep_st; //蜂鸣器间隔标志
uchar x=4; //计数器
//定义标识
uchar FlagStart = 0;
float DUST_Value;
uint DUST;
uchar num=0;
uchar mm;
uchar abc;
uchar ADC_Get[10]={0}; //定义AD采样数组
uchar str[5]={0};

/*****初始化定时器0*****/
void InitTimer(void)
{
	TMOD = 0x01;
	TL0 = (65536-10000)/256; //定时10ms
	TH0 = (65536-10000)%256;
	TR0 = 1;
	ET0 = 1;
	EA = 1;
}
/*****lcd1602程序*****/
void delay1ms(uint ms)//延时1ms
{ 
    uint i,j;
	for(i=0;i<ms;i++)
	for(j=0;j<100;j++);
}

void wr_com(uchar com)//写指令
{ 
    delay1ms(1);
	RS=0;
//	RW=0;
	EN=0;
	P0=com;
	delay1ms(1);
	EN=1;
	delay1ms(1);
	EN=0;
}
void wr_dat(uchar dat)//写数据
{ 
    delay1ms(1);;
	RS=1;
//	RW=0;
	EN=0;
	P0=dat;
	delay1ms(1);
	EN=1;
	delay1ms(1);
	EN=0;
}
/*****液晶初始化*****/
void lcd_init()//初始化设置
{ 
	delay1ms(15);
	wr_com(0x38);
	delay1ms(5);
	wr_com(0x01);
	delay1ms(5);
	wr_com(0x06);
	delay1ms(5);
	wr_com(0x0c);
	delay1ms(5);

	wr_com(0x80);
	wr_dat('P');//
	wr_com(0x81);
	wr_dat('M');//:
	wr_com(0x82);
	wr_dat('2');//
	wr_com(0x83);
	wr_dat('.');//:
	wr_com(0x84);
	wr_dat('5');//:
	wr_com(0x85);
	wr_dat(':');


	wr_com(0x8b);
	wr_dat('m');
	wr_com(0x8c);
	wr_dat('g');
	wr_com(0x8d);
	wr_dat('/');
	wr_com(0x8e);
	wr_dat('m');
	wr_com(0x8f);
	wr_dat('3');

	wr_com(0xc0);
	wr_dat('A');
	wr_com(0xc1);
	wr_dat('l');
	wr_com(0xc2);
	wr_dat('a');
	wr_com(0xc3);
	wr_dat('r');
	wr_com(0xc4);
	wr_dat('m');
	wr_com(0xc5);
	wr_dat(':');

	wr_com(0xcb);
	wr_dat('m');
	wr_com(0xcc);
	wr_dat('g');
	wr_com(0xcd);
	wr_dat('/');
	wr_com(0xce);
	wr_dat('m');
	wr_com(0xcf);
	wr_dat('3');
}
/*****显示函数*****/
void disp(unsigned int Data)//PM2.5值显示
{
	uint Temp;
	Temp=Data%10000;
	str[0]=Temp/1000+0x30; //千位
	Temp%=1000;
	str[1]='.';
	str[2]=Temp/100+0x30; //百位
	Temp%=100;
	str[3]=Temp/10+0x30; //十位
	str[4]=Temp%10+0x30; //个位
	wr_com(0x86);
	wr_dat(str[0]);
	wr_com(0x87);
	wr_dat(str[1]);
	wr_com(0x88);
	wr_dat(str[2]);
	wr_com(0x89);
	wr_dat(str[3]);
	wr_com(0x8a);
	wr_dat(str[4]);

}
/*****报警值显示*****/ 
void baojing()
{
	wr_com(0xc6);
	wr_dat(tab[0]+0x30);
	wr_com(0xc7);
	wr_dat(tab[1]);
	wr_com(0xc8);
	wr_dat(tab[2]+0x30);
	wr_com(0xc9);
	wr_dat(tab[3]+0x30);
	wr_com(0xca);
	wr_dat(tab[4]+0x30);
}
/*****延时子程序*****/
void Delay(uint num)
{
while( --num );
}
/*****按键检测*****/
void checkkey()
{
	if(SET==0)
	{
	Delay(2000);
	do{}while(SET==0);
	set_st++;
	if(set_st>1)set_st=0;
	}
	if(set_st==0)
	{
	}
	else if(set_st==1)
	{
	if(DEC==0)
	{
	Delay(2000);
	do{}while(DEC==0);
	if(DUST_SET>0)DUST_SET--;
	if(DUST_SET==0)DUST_SET=0;
	}
	if(ADD==0)
	{
	Delay(2000);
	do{}while(ADD==0);
	DUST_SET++;
	if(DUST_SET>800)DUST_SET=800;
	}
	}
	tab[0]=DUST_SET/1000;
	tab[1]='.';
	tab[2]=DUST_SET%1000/100;
	tab[3]=DUST_SET%100/10;
	tab[4]=DUST_SET%10;
}
/*****报警子程序*****/
void Alarm()
{
	if(x>=10){beep_st=~beep_st;x=0;}
	if(DUST>DUST_SET&&beep_st==1)BEEP=0;
	else BEEP=1;
//	if(DUST>0&&DUST<100){LED2=0;LED3=1;LED4=1;}
//	if(DUST>=10&&DUST<300){LED2=1;LED3=0;LED4=1;}
//	if(DUST>=300){LED2=1;LED3=1;LED4=0;}
	}
/*****AD0832转换程序*****/
uchar ADC0832(bit mode,bit channel) //AD转换，返回结果
{
	uchar i,dat,ndat;
	ADCS = 0;//拉低CS端
	_nop_();
	_nop_();
	ADDI = 1; //第一个下降沿为高电平
	ADCLK = 1;//拉高CLK端
	_nop_();
	_nop_();
	ADCLK = 0;//拉低CLK端，形成下降沿1
	_nop_();
	_nop_();
	ADDI = mode; //低电平为差分模式，高电平为单通道模式
	ADCLK = 1;//拉高CLK端
	_nop_();
	_nop_();
	ADCLK = 0;//拉低CLK端，形成下降沿2
	_nop_();
	_nop_();
	ADDI = channel; //低电平为CH0，高电平为CH1
	ADCLK = 1;//拉高CLK端
	_nop_();
	_nop_();
	ADCLK = 0;//拉低CLK端，形成下降沿3
	ADDI = 1;//控制命令结束
	dat = 0;
	//读取转换后的数据，从最高位依次输出（D7~D0）
	for(i = 0;i < 8;i++)
	{
	dat <<= 1;
	ADCLK=1;//拉高CLK端
	_nop_();
	_nop_();
	ADCLK=0;//拉低CLK端形成一次时钟脉冲
	_nop_();
	_nop_();
	dat |= ADDO;
	}
	//以下代码详细注释详见我的资源
	ndat = 0; 
	if(ADDO == 1)
	ndat |= 0x80;
	
	for(i = 0;i < 7;i++)
	{
	ndat >>= 1;
	ADCLK = 1;
	_nop_();
	_nop_();
	ADCLK=0;
	_nop_();
	_nop_();
	if(ADDO==1)
	ndat |= 0x80;
	}
	ADCS=1;
	ADCLK=0;
	ADDI=1;
	if(dat==ndat)
	return(dat);
	else
	return 0;
}

void timer0(void) interrupt 1
{
	uint j;
	TL0 = (65536-10000)/256; 
	TH0 = (65536-10000)%256;
	LED=1; 
	x++;
	for (j=0;j<30;j++); //0.28ms 
	abc=ADC0832(1,0); 
	FlagStart=1;
	TR0 = 0; 
	EA = 0;
	LED=0;
}

uchar Error_Correct(uchar *str,uchar num)
{
	unsigned char i=0;
	unsigned char j=0;
	unsigned char Temp=0;
	//ÅÅÐò
	for(i=0;i<num-1;i++)
	{
	for(j=i+1;j<num;j++)
	{
	   if(str[i]<str[j])
		{
		Temp=str[i];
		str[i]=str[j];
		str[j]=Temp;
		}
	}
}

	
	return str[num/2];
}

void main(void)
{
	InitTimer(); 
	BEEP=1;
	lcd_init();
	delay1ms(500);
	while(1)
	{

	 checkkey();
	if(set_st==0)
	{
		//wr_com(0x0c);
		if(FlagStart==1) 
		{
		num++;
		ADC_Get[num]=abc;
		if(num>9)
		{
		num=0;
//		DUST=Error_Correct(ADC_Get,10); 
//		DUST_Value=(DUST/256.0)*5000; 
//		DUST_Value=DUST_Value*0.17-100; 
	
		DUST=Error_Correct(ADC_Get,10);
	    DUST_Value=(DUST/256.0)*5;
	    DUST_Value=(DUST_Value*0.17-0.1)*1000;
	
		if(DUST_Value<0) DUST_Value=0;
		if(DUST_Value>760) DUST_Value=760; 
		DUST=(uint)DUST_Value;
		}
		TL0 = (65536-10000)/256;
		TH0 = (65536-10000)%256;
		TR0 = 1; 
		EA = 1;
		FlagStart=0;
		}
		Alarm(); 
	}
	disp(DUST);
	baojing();

		if(set_st==1)
		{
		wr_com(0xca);
		wr_com(0x0d);
		delay1ms(150);
		}
	}
}
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374