You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
21 lines
312 B
21 lines
312 B
13 years ago
|
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
|