Use Basic4ppc to send serial data from a PDA to a BlueSMiRF Bluetooth module.

pdablue

Active Member

Licensed User

Longtime User

• Sep 15, 2007

• #1

Use Basic4ppc to send serial data from a Bluetooth Pocket PC PDA to a
BlueSMiRF Bluetooth module. To view the Basic4ppc program code listing
visit the webpage:

http://www.stormpages.com/microbox/index.html

 

taximania

Well-Known Member

Licensed User

Longtime User

• Sep 15, 2007

• #2

Nice work
Pity I don't have bluetooth on my device, I'm still struggling to get IR to work with a Microchip.

My personal opinion, not a pull down :sign0188:
The text on your web site is a bit big though.

 

Erel

B4X founder

Staff member

Licensed User

Longtime User

• Sep 15, 2007

• #3

Looks great!
Two tips:
1. Users with WM6 devices should use the Serial2 library instead (no nead for any other dll).
2. Instead of all the Button??_Click subs you could do something like:

B4X:

Sub App_Start
 ...
 For i = 3 to 75
   AddEvent("Button" & i,Click,"KeyPad")
 Next
End Sub
Sub KeyPad
 [SIZE=2][COLOR=black]serial.Output (sender.Text)
 label1.Text = strlabeltemp & sender.Text
End Sub
[/COLOR][/SIZE]

 

W

willisgt

Active Member

Licensed User

• Nov 19, 2007

• #4

Detecting bluetooth

Is there an effective way to determine if the phone the program is running on has bluetooth?

If I open a serial connection on say, port 8, is there an effective way to determine if the bluetooth module is responding?

Gary