Root/package/comgt/files/setmode.gcom

1# set wwan mode from environment
2opengt
3 set com 115200n81
4 set senddelay 0.02
5 waitquiet 1 0.2
6 flash 0.1
7
8:start
9 print "Trying to set mode\n"
10 send $env("MODE")
11 send "^m"
12
13 waitfor 15 "OK","ERR","ERROR"
14 if % = 0 goto continue
15 if % = 1 goto modeerror
16 if % = 2 goto modeerror
17
18 print "Timeout setting WWAN mode!\n"
19 exit 1
20
21:modeerror
22 print "Error setting WWAN mode!\n"
23 exit 1
24
25:continue
26 exit 0
27

Archive Download this file



interactive