劉香伶 發表於 2010-8-5 15:05:40

BS2的zx-bluetooth!!!

想請問有人懂ZX-bluetooth嗎?

用Stamp BS2用ZX-bluetooth 藍芽跟 筆電的藍芽連接,而且有配對成功了

可是超級終端機收不到資料。

ZX-bluetooth 附的說明書跟網路上找的文件都沒有能解決的辦法

請各位前輩幫幫忙~!!感謝!!

playrobot 發表於 2010-8-9 10:03:42

' {$STAMP BS2}
' {$PBASIC 2.5}
RX   CON   0                     ' HomeWork Board PIN腳對應EasyBT藍芽RX腳位
TX   CON   2                     ' HomeWork Board PIN腳對應EasyBT藍芽RX腳位
a    VAR   Byte                  '變數函數
b    VAR   Word                  '變數函數
remote_handling:                     '----藍芽模式
DO
SERIN RX,84,            ' SERIN <= 接收指令   84為藍芽鮑率   STR為顯示一個字元
DEBUG "a=",DEC a,CR            ' DEBUG顯示指令"a="顯示a=DECa <= 顯示十進位 aCR跳行
                                 '向前
IF a=49 THEN                      '要是 a=8 時
FOR b = 0 TO 20                  '迴圈
PULSOUT 15, 900                  '產生一個850ms脈衝波形PIN15腳輸出,伺服馬達接PIN15腳
PULSOUT 14, 600                  '產生一個650ms脈衝波形PIN14腳輸出,伺服馬達接PIN14腳
NEXT
GOTO remote_handling             '跳回remote_handling
                                 '向後
ELSEIF a=50 THEN                  '否則 a=2 時
FOR b = 0 TO 20                  '迴圈
PULSOUT 15, 600                  '產生一個650ms脈衝波形PIN15腳輸出,伺服馬達接PIN15腳
PULSOUT 14, 900                  '產生一個850ms脈衝波形PIN14腳輸出,伺服馬達接PIN14腳
NEXT
GOTO remote_handling             '跳回remote_handling
                                 '向右
ELSEIF a=51 THEN                  '否則 a=3 時
FOR b = 0 TO 20                  '迴圈
PULSOUT 15, 900                  '產生一個850ms脈衝波形PIN15腳輸出,伺服馬達接PIN15腳
PULSOUT 14, 900                  '產生一個850ms脈衝波形PIN14腳輸出,伺服馬達接PIN14腳
NEXT
GOTO remote_handling             '跳回remote_handling
                                 '向左
ELSEIF a=52 THEN                  '否則 a=4 時
FOR b = 0 TO 20                  '迴圈
PULSOUT 15, 600                  '產生一個650ms脈衝波形PIN15腳輸出,伺服馬達接PIN15腳
PULSOUT 14, 600                  '產生一個650ms脈衝波形PIN14腳輸出,伺服馬達接PIN14腳
NEXT
ENDIF                            '結束
GOTO remote_handling             '跳回remote_handling
LOOP

頁: [1]
查看完整版本: BS2的zx-bluetooth!!!