Hi,
I have a board of education kit + easy bluetooth module.
I am using Basic4ppc + Bluetooth dongle on the com.
Now, i compile my code like this.
Basic Stamp:
RX PIN 2 ' RX of the Easy Bluetooth
TX PIN 0 ' TX of the Easy Bluetooth
Baud CON 84 ' Baud set at 9600
Sig_IN VAR Byte ' variable, input from user
valdata VAR Byte
DIRA = %1111
OUTA=%1111 'all off initial
Main:
DO
SERIN RX, Baud, [Sig_IN] ' receive input from user
LOOKDOWN Sig_IN,[65,66],valdata
BRANCH valdata,[c1,c2]
GOTO jumpend
c1:
'Character A was received.
OUT1=0
GOTO jumpend
c2:
'Character B was received.
OUT1=1
GOTO jumpend
jumpend:
LOOP
END
Basic4ppc: (complied with serial2.dll)
Sub Globals
End Sub
Sub App_Start
Form1.show
Serial.New2 (7,9600,"N",8,1) 'com port 7, baud 9600
Serial.PortOpen=True
Serial.EnableOnComm=True
End Sub
Sub serial_OnCom
TextBox1.Text=TextBox1.Text & Serial.Inputstring
End Sub
Sub Button1_Click
Serial.Output ("A")
textBox1.Text= "A"
End Sub
Sub Button2_Click
Serial.Output ("B")
textBox1.Text="B"
End Sub
I have detected and connected the easy bluetooth module via com7, but when i run the program, i cant get a response.