diff options
Diffstat (limited to 'package/comgt/files/hsoauth.comgt')
| -rw-r--r-- | package/comgt/files/hsoauth.comgt | 34 |
1 files changed, 34 insertions, 0 deletions
diff --git a/package/comgt/files/hsoauth.comgt b/package/comgt/files/hsoauth.comgt new file mode 100644 index 000000000..ea81ee3ca --- /dev/null +++ b/package/comgt/files/hsoauth.comgt @@ -0,0 +1,34 @@ +opengt + set com 115200n81 + set senddelay 0.02 + waitquiet 1 0.2 + +:start + flash 0.1 + +:getuser + let $u=$env("USER") + let a=len($u) + if a=0 goto continue + +:getpass + let $p=$env("PASS") + +:auth + print "User: ",$u,"\n" + print "Pass: ",$p,"\n" + send "AT$QCPDPP=1,1,\"" + send $p + send "\",\"" + send $u + send "\"^m" + waitfor 2 "OK" + if % = -1 goto error + if % = 0 goto continue + +:error + exit 1 + +:continue + exit 0 + |