紅外線模組值問題
我使用 範例程式Sub main() '此程式利用PulseIn指令回傳感測器資訊(配合A2P Converter)
Dim temp as Word
Do
PulseIn 2,1,temp '將感測器的訊號讀回(請將Pulse Output接至Pin 0)
'‘''請參考Basic Commander 中文使用手冊 P.154
Debug "Input Signal =", Temp,CR '‘將感測器訊號顯示出來
Pause 100 '‘暫停100mS
Loop '‘迴圈
End Sub
可是旁邊所顯現出來的值 都是 2052 ~ 2055 在跳
拿東西上去擋的時候 一樣都是 2052 ~ 2055在跳
是不是有問題 ? 請檢查。。
1。是否有外在的光源干擾,如白熾燈,斜射陽光等。
2。紅外線的感測器的型號,因為長距離的紅外線的感測器,
在物體過近時,無法測出正確數據。而短距離的紅外線的
感測器,在物體過遠時,也無法測出正確數據。
3。給我看接線圖。
頁:
[1]