紅外測距課程設計-資料下載頁
2025-06-01 22:02本頁面
【正文】 if(cy==1) value++。//value 是 dout 的高八位 } advalue=value。 advalue=advalue4。 //高四位與低四位互換 得出輸出值 value=0x00。 for(i=4。i0。i) //dout 高四位的值賦給 value { cy=dout。 value=value1。 if(cy==1) { value++。 } clk=1。 clk=0。 } advalue=advalue+value。 cs=1。 return advalue。 // TLC 轉換出的 advalue=U(顯示的電壓值 )*4096/5 。 } main() { uint ad,l。 init()。 while(1) { 16 delay(100)。 ad=readad(0x00)。 ad=ad**1000。// 將 ad 轉換為與輸入的電壓值相等 ad*5/4096 在擴大1000 if(ad0amp。amp。ad55) l=0。 if(ad=55amp。amp。ad70) l=40。 if(ad=70amp。amp。ad80) l=35。 if(ad=80amp。amp。ad100) l=30。 if(ad=100amp。amp。ad120) l=27。 if(ad=120amp。amp。ad150) l=25。 if(ad=150amp。amp。ad185) l=22。 if(ad=185amp。amp。ad230) l=20。 if(ad=230amp。amp。ad320) l=17。 if(ad=320amp。amp。ad420) l=15。 if(ad=420amp。amp。ad590) l=12。 if(ad=590amp。amp。ad660) l=10。 if(ad=660) l=0。 17 write_sfm(7,l)。 write_sfm1(7,ad)。 } } 四．測試 測試方法： 先寫入電壓采集程序 ,接入電源 ,將對應距離的電壓值標定出來。再將標定的值與對應距離寫入程序中，接入電源，便可測量距離。 測試設備： 直尺 ，直 流穩(wěn)壓電源， 擋板 。 整理 數(shù)據(jù)： 標定電壓值 實際距離 顯示距離 5570mv 3540mm 40mm 7080mv 3035mm 35mm 80100mv 2730mm 30mm 100120mv 2527mm 27mm 120150mv 2225mm 25mm 150185mv 2022mm 22mm 185230mv 1720mm 20mm 230320mv 1517mm 17mm 320420mv 1215mm 15mm 420590mv 1012mm 12mm 590660mv 8 10mm 10mm 系統(tǒng)指標： 由于此系統(tǒng)反應不太穩(wěn)定 ，因此此作品只適合作為研究對象，不適合用于實際的測距。 備注： 由于紅外對管的性能不高，在測試一段時間過后，紅外接收管的信號會衰減，因此可能會造成很大的誤差。這也是此次實驗的最大失敗之處。 五．總結 18 參考文獻 : 劉坤 《 51 單片機典型應用開發(fā)范例大全 》 中國鐵道出版社 彭偉《 單片機 C 語言程序設計實訓 — 基于 8051+Proteus 仿真 》 電子工業(yè)出版社
試題試卷相關推薦
鄂ICP備17016276號-1