單片機課程設計-基于89C51的輪胎自動充氣壓力控制器設計_第1頁
單片機課程設計-基于89C51的輪胎自動充氣壓力控制器設計_第2頁
單片機課程設計-基于89C51的輪胎自動充氣壓力控制器設計_第3頁
單片機課程設計-基于89C51的輪胎自動充氣壓力控制器設計_第4頁
單片機課程設計-基于89C51的輪胎自動充氣壓力控制器設計_第5頁
已閱讀5頁,還剩27頁未讀, 繼續(xù)免費閱讀

下載本文檔

版權說明:本文檔由用戶提供并上傳,收益歸屬內容提供方,若內容存在侵權,請進行舉報或認領

文檔簡介

1、單片機系統課程設計成績評定表設計課題基于89C51的輪胎自動充氣控制器設計學院名稱:電氣工程學院專業(yè)班級:學生姓名:學號:指導教師:設計地點:設計時間:課程設計課程設計單片機系統課程設計課程設計名稱:基于89C51的輪胎自動充氣控制器設計專業(yè)班級:學生姓名:學號:指導教師:課程設計地點:課程設計時間: 課程設計附錄B源程序清單#include#defineucharunsignedchar#defineuintunsignedintsbitdula=P2A0;sbitwela=P2Al;sbitadc_out=P2A2;sbitenable=P2A3;sbitstart=P2A4;sbitpu

2、mp=P2A7;uintnum=0,temp=0,t=0,k;uinthigh,mid,low;/共陰極數碼管編碼ucharcodetable=0 x3f,0 x06,0 x5b,0 x4f,0 x66,0 x6d,0 x7d,0 x07,0 x7f,0 x6f,0 x77,0 x7c,0 x39,0 x5e,0 x79,0 x7l,0;/子程序聲明voiddelay(uintz);延時函數ucharkeyscan();/鍵盤掃描程序display(ucharbai,ucharshi,ucharge);數碼管顯示程序/主程序voidmain()uchara,b,c,d,e;e=keyscan(

3、);while(e!=11)e=keyscan();/獲取設定值t=keyscan();while(t=0)t=keyscan();if(t!=0)a=t;t=0;t=keyscan();while(t=0)t=keyscan();b=t;t=0;t=keyscan();t=keyscan();c=t;t=0;t=a*100+b*10+c;設定值/顯示設定值d=50;while(d-)display(a,b,c);/等待啟動氣泵開始工作pump=1;/啟動AD轉換EA=1;IT0=1;EX0=1;start=0;start=1;start=0;delay(10);while(1)delay(1

4、0);/中斷服務程序voidINT_0()interrupt0using1EA=0;enable=1;adc_out=1;adc_out=0;k=P0;if(k0;x-)for(y=110;y0;y-);/鍵盤掃描函數ucharkeyscan()/檢測第一行是否有鍵按下P1=0 xfe;temp=P1;temp=temp&0 xf0;while(temp!=0 xf0)delay(10);temp=P1;temp=temp&0 xf0;while(temp!=0 xf0)temp=P1;switch(temp)break;case0 xde:num=2;break;case0 xbe:num=

5、3;break;case0 x7e:num=4;break;while(temp!=0 xf0)/松手檢測temp=P1;temp=temp&0 xf0;/檢測第二行是否有鍵按下P1=0 xfd;temp=P1;temp=temp&0 xf0;while(temp!=0 xf0)delay(10);temp=P1;temp=temp&0 xf0;while(temp!=0 xf0)temp=P1;case0 xed:num=5;break;case0 xdd:num=6;break;case0 xbd:num=7;break;case0 x7d:num=8;break;while(temp!=

6、0 xf0)temp=P1;temp=temp&0 xf0;/檢測第三行是否有鍵按下P1=0 xfb;temp=P1;temp=temp&0 xf0;while(temp!=0 xf0)delay(10);temp=P1;temp=temp&0 xf0;temp=P1;switch(temp)case0 xeb:num=9;break;case0 xdb:num=10;break;case0 xbb:num=11;break;case0 x7b:num=12;break;while(temp!=0 xf0)temp=P1;temp=temp&0 xf0;returnnum;/數碼管顯示函數display(ucharbai,ucharshi,ucharge)/顯示最高位P0=tablebai-1;dula=0;P0=0 xfe;wela=1;wela=0;delay(1);/顯示第二位P0=tableshi-1;dula=1;dul

溫馨提示

  • 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯系上傳者。文件的所有權益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網頁內容里面會有圖紙預覽,若沒有圖紙預覽就沒有圖紙。
  • 4. 未經權益所有人同意不得將文件中的內容挪作商業(yè)或盈利用途。
  • 5. 人人文庫網僅提供信息存儲空間,僅對用戶上傳內容的表現方式做保護處理,對用戶上傳分享的文檔內容本身不做任何修改或編輯,并不能對任何下載內容負責。
  • 6. 下載文件中如有侵權或不適當內容,請與我們聯系,我們立即糾正。
  • 7. 本站不保證下載資源的準確性、安全性和完整性, 同時也不承擔用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

評論

0/150

提交評論