15 lines
160 B
Plaintext
15 lines
160 B
Plaintext
opengt
|
|
set com 115200n81
|
|
set comecho off
|
|
set senddelay 0.02
|
|
waitquiet 0.2 0.2
|
|
flash 0.1
|
|
|
|
:start
|
|
send "AT+CSQ^m"
|
|
get 1 "" $s
|
|
print $s
|
|
|
|
:continue
|
|
exit 0
|