1
0
mirror of git://projects.qi-hardware.com/openwrt-xburst.git synced 2024-11-10 03:02:28 +02:00
openwrt-xburst/package/network/utils/comgt/files/getcarrier.gcom
nbd 9c8997d54d packages: sort network related packages into package/network/
git-svn-id: svn://svn.openwrt.org/openwrt/trunk@33688 3c298f89-4303-0410-b956-a3cf2f4a3e73
2012-10-10 12:32:29 +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