1
0
mirror of git://projects.qi-hardware.com/openwrt-xburst.git synced 2024-11-27 22:21:51 +02:00
openwrt-xburst/package/comgt/files/getcarrier.gcom
nbd f2b25b5e18 comgt: add missing file (fixes #10301)
git-svn-id: svn://svn.openwrt.org/openwrt/trunk@28648 3c298f89-4303-0410-b956-a3cf2f4a3e73
2011-10-28 11:30:21 +00:00

21 lines
312 B
Plaintext

opengt
set senddelay 0.05
waitquiet 1 0.2
let c=1
:loop
inc c
send "AT+CGATT?^m"
waitfor 5 "+CGATT: 1","+CGATT: 0"
print "\n."
if % = -1 goto error
if c > 10 goto toolong
if % = 0 goto out
sleep 2
if % = 1 goto loop
:toolong
exit 1
:error
exit 0
:out
exit 0