熱釋紅外電子狗套件原理及制作說明(編輯修改稿)
2025-05-06 03:22 本頁面
【文章內(nèi)容簡介】 buf[8]={10,10,10,10,10,10,0,0}。unsigned char dispcount。unsigned char getdata。unsigned int temp。unsigned int temp1。 unsigned char i。sbit ST=P3^0。sbit OE=P3^1。sbit EOC=P3^4。sbit CLK=P3^5。sbit M1=P3^6。sbit M2=P3^7。sbit SPK=P2^6。sbit LA=P3^3。sbit LB=P3^2。sbit LC=P2^7。sbit K1=P2^4。sbit K2=P2^5。bit wd。bit yw。bit shuid。bit shuig。unsigned int ta。unsigned int tb。bit alarmflag。void delay10ms(void){ unsigned char i,j。 for(i=20。i0。i) for(j=248。j0。j)。}void main(void){ M1=0。 M2=0。 yw=1。 wd=0。 SPK=0。 ST=0。 OE=0。 TMOD=0x12。 TH0=0x216。 TL0=0x216。 TH1=(65536500)/256。 TL1=(65536500)%256。 TR1=1。 TR0=1。 ET0=1。 ET1=1。 EA=1。 ST=1。 ST=0。 while(1) { if(K1==0) { delay10ms()。 if(K1==0) { yw=1。 wd=0。 } }else if(K2==0) { delay10ms()。 if(K2==0) { wd=1。 yw=0。 } }else if(LC==1) { delay10ms()。 if(LC==1) { M1=0。 M2=1。 temp1=13。 shuid=0。 shuig=1。 LB=0。 } }else if((LC==0) amp。amp。 (LB==1)) { delay10ms()。 if((LC==0) amp。amp。 (LB==1)) { M1=0。 M2=0。 temp1=12。 shuig=0。 shuid=0。 LB=0。 } }else if ((LB==0) amp。amp。 (LA==1)) { delay10ms()。 if((LB==0) amp。amp。 (LA==1)) { M1=1。 M2=0。 temp1=11。 shuig=0。 shuid=0。 LB=0。 } }else if (LA==0) { delay10ms()。 if(LA==0) { M1=1。 M2=0。 temp1=0。 shuid=1。 shuig=0。 LB=0。 } } }} void t0(void) interrupt 1 using 0{ CLK=~CLK。}void t1(void) interrupt 3 using 0{ TH1=(65536500)/256。 TL1=(65536500)%256。 if(EOC==1) { OE=1。 getdata=P1。 OE=0。 temp=getdata*25。 temp=temp/64。 i=2。 dispbuf[0]=10。 dispbuf[1]=10。 dispbuf[2]=0。 dispbuf[3]=0。 if((yw==1)amp。amp。(wd==0)) { dispbuf[++i]=temp1。 } else if((yw==0)amp。amp。(wd==1)) {while(temp/10) { dispbuf[i]=temp/10。 temp=temp%10。 } dispbuf[++i]=temp。 } ST=1。 ST=0。 } P0=dispcode[dispbuf[di
公司管理相關(guān)推薦
鄂ICP備17016276號-1