17 lines
256 B
Text
17 lines
256 B
Text
|
opengt
|
||
|
|
set com 115200n81
|
||
|
|
set comecho off
|
||
|
|
set senddelay 0.05
|
||
|
|
waitquiet 1 0.2
|
||
|
|
|
||
|
|
:start
|
||
|
|
send "AT!SCACT=0,3^m"
|
||
|
|
waitfor 5 "OK"
|
||
|
|
if % = 0 goto hangupok
|
||
|
|
print "WWAN error. Hangup failed.\r\n"
|
||
|
|
exit 1
|
||
|
|
|
||
|
|
:hangupok
|
||
|
|
print "WWAN connection established.\r\n"
|
||
|
|
exit 0
|