24h購物| | PChome| 登入
2011-01-20 14:21:31 | 人氣309| 回應0 | 上一篇 | 下一篇

VB.NET 結合紅外線或超音波對周邊地圖的測繪

推薦 0 收藏 0 轉貼0 訂閱站台

前面已經談過PWM規格, 也談過PWM如何控制了

然後我就組裝出這個可以上下左右移動的結構

若是把紅外線或是超音波架到他上面呢!?

然後在令其上下左右旋轉

 

左右旋轉每10度測試一次距離, 那就變成這樣了

我是使用5m測量範圍的超音波作的, 這只是室內一個簡單的地型

程式使用VB.net 如下

        Dim G As Graphics = Me.PictureBox1.CreateGraphics
        Dim P As New Pen(Color.LightGreen)
        Dim a As Integer

        G.Clear(Color.Black)

        For a = 0 To 距離.Length - 1
            G.RotateTransform(-10)
            G.DrawLine(P, 0, 0, 距離(a), 0)
        Next


       稍稍做些修改

        Dim G As Graphics = Me.PictureBox1.CreateGraphics
        Dim P As New Pen(Color.LightGreen)
        Dim a As Integer

        P.Width = 15
        P.EndCap = Drawing2D.LineCap.Round
        G.Clear(Color.Black)

        For a = 0 To 距離.Length - 1
            G.RotateTransform(-10)
            G.DrawLine(P, 0, 0, 距離(a), 0)
        Next



看, 網路上常看到的雷達圖是不是很容易就作出來了

若把這些線的頂點連接起來就會更像了, 甚至使用掃描連續繪製, 就會和真的雷達一模一樣動作

當然這只是極簡單的範例, 所以每十度才量一次距離,

實際作不太可能這麼不精密, 且掃描的速度也要快才行

所以一般這種應用都是分成兩種

窮人版就像我這樣使用超音波或是紅外線, 幾百就有了

有經費的單位就會選用雷射, 至少都三五萬起跳

鯨魚還幫研究單位做過3D空間立體即時測繪系統

不過那已經過於深入了

 

台長: 小鯨魚
人氣(309) | 回應(0)| 推薦 (0)| 收藏 (0)| 轉寄
全站分類: 數位資訊(科技、網路、通訊、家電) | 個人分類: 程式設計和嵌入系統 |
此分類下一篇:Roboard 對於A/D週邊的控制
此分類上一篇:超級蓋世無敵小的RB50

是 (本台目前設定為強制悄悄話)
* 請輸入識別碼:
請輸入圖片中算式的結果(可能為0) 
(有*為必填)
TOP
詳全文