BS2 控制 SSC-32 Johnny5 robot

Stanley14

Hi,
  話說這台Johnny5我買了近2年放在我的桌子下,因為當時太貪心買了太複雜的機器人,雖然當時他們的工程師有建議新手可以先從Boe-Bot
開始學,不過我想如果這台Johnny5到時候不會玩就把它當做靜態模型放在家裡觀賞好了 無論如何也不會想把它賣掉,因為這是小時候的機
器人夢想丫~~
  這兩天花了一些時間終於讓它動起來了,也K了它的許多SPEC (SSC-32, BS2),也爬了許多人的經驗,一切從頭學起,其實也沒什麼從頭啦,因為
根本就沒學過~~
  目前我能做到的是用BS2控制SSC-32讓Johnny5動,再加上超音波的偵測做一些簡單的動作......不過已經很開心了,看到Johnny5終於動起來了
,之前因為power不足燒了3顆servo後來去買5V / 20A的power才解決不用一些使用battery的困擾,每次準備要run的時候又沒電了真的讓人很急!也因為power穩定也不會再燒servo了,因為之前用了9V / 3A的變器壓由於壓降太大照成電壓不穩所以才燒servo,找時間再把目前的動作拍成
影片上傳上來,不知道超音波sensor各位是如何運用的?也給小弟一些意見~~Thanks!

回復 1# Stanley14
在超音波運用方面可以偵測範圍與避障,在我看來Johnny應該用避障比較好,因為Johnny在行走時,會碰到障礙物,而必須避開,你可以利用PING下的RC Servo左右擺動,達成左右都兼顧到避障功能

Stanley14

回復 2# playrobot


    目前我所做的功能也是如此, 在超音波運用上我寫了幾個判斷式例如: < 25公分或 < 15公分來做的一些反應,
附件是我做的判斷反應, 但還不打算讓Johnny5行走,因為還要用電池有點麻煩....哈!
不知道有什麼sensor可以運用讓Johnny5反應上可以豐富一點? 謝謝.

attach]5201[/attach]

max

想請問如何用加入判斷並將以下BS2程式碼=>VB的形式?

PingA           PIN      7
A:
    GOSUB Get_SonarA                             ' get sensor value
    cm = rawDist ** RawToCm                     ' convert to centimeters
    PUT 0,Word cm
    GOTO B
Get_SonarA:
    PingA = IsLow                                  ' make trigger 0-1-0
    PULSOUT PingA, Trigger                         ' activate sensor
    PULSIN  PingA, IsHigh, rawDist                 ' measure echo pulse
    rawDist = rawDist */ Scale                    ' convert to uS
    rawDist = rawDist / 2                         ' remove return trip
    RETURN

g921002

玩機器人電源系統真的是大問題，如果不從根本解決。一天到晚煩死人。

max

那想請問一下VB基本的傳送跟接收的函式的語法

@max
這裡有許多VB範例,
http://iccl.nkmu.edu.tw/playrobo ... mp;searchsubmit=yes