Initial commit
This commit is contained in:
20
package/network/utils/comgt/files/getcnum.gcom
Normal file
20
package/network/utils/comgt/files/getcnum.gcom
Normal file
@@ -0,0 +1,20 @@
|
||||
opengt
|
||||
set com 115200n81
|
||||
set comecho off
|
||||
set senddelay 0.02
|
||||
waitquiet 0.2 0.2
|
||||
flash 0.1
|
||||
|
||||
:start
|
||||
send "AT+CNUM^m"
|
||||
get 1 "^m" $n
|
||||
get 1 ":" $n
|
||||
get 1 "\"" $n
|
||||
get 1 "\"" $n
|
||||
get 1 "\"" $n
|
||||
get 1 "\"" $n
|
||||
let n = len($n)
|
||||
if n<1 goto continue
|
||||
print $n
|
||||
:continue
|
||||
exit 0
|
||||
Reference in New Issue
Block a user