| 1234567891011121314151617181920212223242526 |
- # set wwan mode from environment
- opengt
- set com 115200n81
- set senddelay 0.02
- waitquiet 1 0.2
- flash 0.1
- :start
- print "Trying to set mode\n"
- send $env("MODE")
- send "^m"
- waitfor 15 "OK","ERR","ERROR"
- if % = 0 goto continue
- if % = 1 goto modeerror
- if % = 2 goto modeerror
- print "Timeout setting WWAN mode!\n"
- exit 1
- :modeerror
- print "Error setting WWAN mode!\n"
- exit 1
- :continue
- exit 0
|
