CRBasic Example 3: CELL200 series settings configuration and status retrieval using terminal
functionality
SetSetting
(
"CellDiversity"
, 0)
SetSetting
(
"CELLBIllingDay"
, 10)
SetSetting
(
"PPPInterface"
, COMSDC8)
'Set PPP Interface to COMSDC8
'Open a serial connection to the modem using the SDC address listed in the
modem's
'Terminal Port CS I/O SDC Address: setting.
SerialOpen
(ComSDC11, 460800, 0, 0, 500)
#Else
modem_reset_needed = FALSE
'Open a serial connection to the modem using the SDC address listed in the
modem's
'Terminal Port CS I/O SDC Address: setting.
SerialOpen
(ComSDC11, 460800, 0, 0, 500)
SerialOut
(ComSDC11, CRLF ,
"CELL2xx>"
, 1, 200)
SerialOut
(ComSDC11,
"set apn ****.****"
& CRLF, CRLF, 1, 200)
'Replace *s with APN assigned by cellular provider
SerialIn
(returned_value, ComSDC11, 100,
CHR
(13), 1000)
If
(returned_value =
"APN saved. Cellular module reset required!"
& _
CHR
(13))
Then
modem_reset_needed = TRUE
EndIf
SerialOut
(ComSDC11, "set div 0" & CRLF, CRLF, 1, 200)
'Tell the modem not to use the diversity antenna on the cellular
'modem (default). 0 = off 1 = on
SerialIn
(returned_value, ComSDC11, 100,
CHR
(13), 1000)
If
(returned_value =
"Diversity saved. Cellular module reset required!"
& _
CHR
(13))
Then
modem_reset_needed = TRUE
EndIf
SerialOut
(ComSDC11,
"set baud 115200"
& CRLF, CRLF, 1, 200)
'Set the baud rate on the RS-232 port of the cellular modem
SerialIn
(returned_value, ComSDC11, 100,
CHR
(13), 1000)
If
(returned_value =
"Baud rate saved. Cellular module reset required!"
& _
CHR
(13))
Then
modem_reset_needed = TRUE
EndIf
SerialOut
(ComSDC11,
"set mode PPP"
& CRLF, CRLF, 1, 200)
'Set the mode the modem operates in PPP or SERIAL
SerialIn
(returned_value, ComSDC11, 100,
CHR
(13), 1000)
If
(returned_value =
"Mode set to PPP mode. Reboot required!"
& _
CHR
(13))
Then
modem_reset_needed = TRUE
CELL200-Series 4G LTE Cellular Module
67