基于51單片機的溫度測試系統有vb上位機-資料下載頁

【導讀】上位機是用VB語言寫的，只是一個模型，從。會更加完善其功能。下面是下位機程序和上位機程

　　

【正文】 2[min1])。 write_date(table2[min2])。 write_(0x80+0x40+0x07)。 write_date(table2[sec1])。 write_date(table2[sec2])。 } if(num2==2)//按下第二次設定秒 { write_(0x80+0x40+0x08)。 write_(0x0f)。 delay(100)。 temp=P2。 tempamp。=0x0f。 if(temp==0x0d) { delay(5)。 if(temp==0x0d) { while(temp==0x0d)//松手檢測 { temp=P2。 tempamp。=0x0f。 } sec++。 if(sec==60) sec=0。 } } else if(temp==0x0b) { delay(5)。 if(temp==0x0b) { while(temp==0x0b)//松手檢測 { temp=P2。 tempamp。=0x0f。 } sec。 if(sec==255) sec=59。 } } } sec1=sec/10。 sec2=sec%10。 write_(0x80+0x40+0x07)。 write_date(table2[sec1])。 write_date(table2[sec2])。 if(num2==3)//按下第三次設定分 { write_(0x80+0x40+0x05)。 write_(0x0f)。 delay(100)。 temp=P2。 tempamp。=0x0f。 if(temp==0x0d) { delay(5)。 if(temp==0x0d) { while(temp==0x0d)//松手檢測 { temp=P2。 tempamp。=0x0f。 } min++。 if(min==60) min=0。 } } else if(temp==0x0b) { delay(5)。 if(temp==0x0b) { while(temp==0x0b)//松手檢測 { temp=P2。 tempamp。=0x0f。 } min。 if(min==255) min=59。 } } } min1=min/10。 min2=min%10。 write_(0x80+0x40+0x04)。 write_date(table2[min1])。 write_date(table2[min2])。 if(num2==4)//按下第四次設定時 { write_(0x80+0x40+0x02)。 write_(0x0f)。 delay(100)。 temp=P2。 tempamp。=0x0f。 if(temp==0x0d) { delay(5)。 if(temp==0x0d) { while(temp==0x0d)//松手檢測 { temp=P2。 tempamp。=0x0f。 } hour++。 if(hour==24) hour=0。 } } else if(temp==0x0b) { delay(5)。 if(temp==0x0b) { while(temp==0x0b)//松手檢測 { temp=P2。 tempamp。=0x0f。 } hour。 if(hour==255) hour=23。 } } } hour1=hour/10。 hour2=hour%10。 write_(0x80+0x40+0x01)。 write_date(table2[hour1])。 write_date(table2[hour2])。 if(num2==5) //按下第五次向 eeprom中寫入時分（秒省略），并退出循環 { write_add(7,min)。 delay(10)。 write_add(1,hour)。 write_(0x80)。 for(i=0。i16。i++) { write_date(table[i])。 delay(10)。 } write_(0x80+0x40+0x0e)。 write_date(0xdf)。 write_date(39。c39。)。 break。 } } } } } } } } /*********************************************************************************************** 主函數部分 **************************************************************************************************/ void main() { uchar temp。 init()。 init_1602()。 init_ds()。 temp=read_temp()。 delay(100)。 while(1)//循環檢測 { read_all()。 keyscan()。 write_(0x80+0x40+0x01)。 write_date(table2[h1])。 write_date(table2[h2])。 write_(0x80+0x40+0x04)。 write_date(table2[m1])。 write_date(table2[m2])。 write_(0x80+0x40+0x07)。 write_date(table2[s1])。 write_date(table2[s2])。 write_(0x80+0x02)。 write_date(table2[year1])。 write_date(table2[year2])。 write_(0x80+0x05)。 write_date(table2[mon1])。 write_date(table2[mon2])。 write_(0x80+0x08)。 write_date(table2[date1])。 write_date(table2[date2])。 write_(0x80+0x0f)。 write_date(table2[day])。 temp=read_temp()。 th=read_th()。 tl=read_tl()。 //*********************************************************************************溫度上限先檢測及報警 write_(0x80+0x40+0x0b)。 if(temp128) //查看溫度是否超過上下限 { if((th128)||(th128amp。amp。temp=th)||(tl128amp。amp。temp=tl)) { P34=0。 delay(1000)。 P34=1。 } } if(temp128) //temp128時溫度取反后加一，查看溫度是否超過上下限 { if((th128amp。amp。temp=th)||(tl128amp。amp。temp=tl)||(tl128)) { P34=0。 delay(1000)。 P34=1。 } write_date(39。39。)。 temp=~temp+1。 } else write_date(39。 39。)。 write_date(table2[temp/10])。 write_date(table2[temp%10])。 min=read_add(7)。 delay(5)。 hour=read_add(1)。 delay(5)。 //***********************************************************************************鬧鐘檢測及報警 if((min==m1*10+m2)amp。amp。stop_alarm) { } else if((min==m1*10+m2)amp。amp。(hour==h1*10+h2)amp。amp。(!stop_alarm)) //鬧鐘 { alarm=1。 } if((min!=m1*10+m2)amp。amp。stop_alarm) { stop_alarm=0。 } if(alarm==1) { P34=0。 delay(30)。 P34=1。 delay(100)。 P34=0。 delay(30)。 P34=1。 delay(100)。 P34=0。 delay(30)。 P34=1。 delay(100)。 P34=0。 delay(30)。 P34=1。 delay(100)。 } //*************************************************************************************************** } }