beautypg.com

Argox PA-20 Basic Programming Manual User Manual

Page 98

background image

PT-Basic Programming Manual Ver. 1.00

97/143

Purpose: Write characters to Bluetooth module.

Syntax: N1%=BT_WRITE(A$,N2%)

Example:

BT_START

BT_OPEN

IF GET_BT_ERROR=1 THEN

CLS

PRINT " BlueTooth test"

WHILE 1

A$=INKEY$

IF A$<>"" THEN

IF(ASC(A$)=27) THEN EXIT

N1%=0

N1%=BT_WRITE(A$,1)

IF N1%=1 THEN PRINT A$;

END IF

STR1$=BT_READ$(1)

IF LEN(STR1$)<>0 THEN PRINT STR1$;

WEND

BT_CLOSE

ELSE

PRINT "Link error!!!"

WHILE INKEY$=""

WEND

END IF

BT_STOP

Description: If Bluetooth is connected, this command can write characters to

other Bluetooth device.

N1% is an integer variable.It

will tell you how many characters send to

other Bluetooth device.

A$ is a string variable indicating the data is to be sent.

N2% is an integer variable indicating number of bytes to be writen

to other Bluetooth device.

You can use the “GET_BT_ERROR” command to get the error