27c9d80f51
Some checks failed
Build Kernel / Build all affected Kernels (push) Has been cancelled
Build all core packages / Build all core packages for selected target (push) Has been cancelled
Build and Push prebuilt tools container / Build and Push all prebuilt containers (push) Has been cancelled
Build Toolchains / Build Toolchains for each target (push) Has been cancelled
Build host tools / Build host tools for linux and macos based systems (push) Has been cancelled
Coverity scan build / Coverity x86/64 build (push) Has been cancelled
22 lines
304 B
Plaintext
22 lines
304 B
Plaintext
opengt
|
|
set com 115200n81
|
|
set comecho off
|
|
set senddelay 0.02
|
|
waitquiet 0.2 0.2
|
|
flash 0.1
|
|
|
|
:start
|
|
send "AT+CUSD=1,"
|
|
send $env("ussd")
|
|
send ",15"
|
|
send "^m"
|
|
waitfor 120 "+CUSD:"
|
|
if % = -1 goto timeout
|
|
get 1 "^m" $s
|
|
print $s
|
|
exit 0
|
|
|
|
:timeout
|
|
print "ERROR: no USSD response, timeout.\n"
|
|
exit 1
|