package/comgt/files/getstrength.gcom

   1 opengt
   2  set com 115200n81
   3  set comecho off
   4  set senddelay 0.02
   5  waitquiet 0.2 0.2
   6  flash 0.1
   7
   8 :start
   9  send "AT+CSQ^m"
  10  get 1 "" $s
  11  print $s
  12
  13 :continue
  14  exit 0