How do I advertise custom name in smartBasic(BLE)?

Answer

dim rc ???????????????????????????????? //result code '//***BleGapSvcInit(Parameters)*** dim dvcNme$, nmeWrtble, apprnce, MinConnInt, MaxConnInt, ConnSupTO, sL ??? //Variables for BleGapSvcInit() dvcNme$ = "Mark's BL600" nmeWrtble = 0 apprnce = 768 MinConnInt = 500000 MaxConnInt = 1000000 ConnSupTO = 4000000 sL = 0 '//***BleGapSvcInit(Parameters)*** '//***BleAdvRptInit(Parameters)*** dim advRpt$, discoverMode, advAppearance, MaxDevName advRpt$ = "" discoverMode = 0 advAppearance = 1 MaxDevName = 20 '//***BleScanRptInit(Parameters)*** '//***BleAdvertStart(Parameters)*** dim peerAddr$ '//***BleAdvertStart(Parameters)*** '//***BleAdvRptsCommit(advRpt$, scRpt$)*** dim scRpt$: scRpt$ = "" '//***BleAdvRptsCommit(Parameters)*** '//****************************************************************************** '// Function and Subroutine definitions '//****************************************************************************** Sub DeviceNameChanger() ? rc = BleGapSvcInit(dvcNme$, nmeWrtble, apprnce, MinConnInt, MaxConnInt, ConnSupTO, sL) ? rc = BleAdvRptInit(advRpt$, discoverMode, advAppearance, MaxDevName) ? rc = BleAdvRptsCommit(advRpt$, scRpt$) ? rc = BleAdvertStart(0,peerAddr$,25,60000,0) ? print "Advert Started" Endsub '//****************************************************************************** '// Handler definitions '//****************************************************************************** '//****************************************************************************** '// Equivalent to main() in C '//****************************************************************************** DeviceNameChanger() WAITEVENT User should open/run scan using BT BLE app on smartphone.