getstrength.gcom 160 B

1234567891011121314
  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. :start
  8. send "AT+CSQ^m"
  9. get 1 "" $s
  10. print $s
  11. :continue
  12. exit 0