mirror of https://github.com/OpenIPC/firmware.git
23 lines
470 B
Plaintext
23 lines
470 B
Plaintext
####################################################
|
|
#
|
|
# dump - comgt script to dump modem settings
|
|
#
|
|
# Copyright (C) 2006 Paul Hardwick <paul@peck.org>
|
|
#
|
|
###################################################
|
|
print "\nDumping Modem Settings\n\n"
|
|
print "#################\n"
|
|
opengt
|
|
set com 115200n81
|
|
set senddelay 0.05
|
|
waitquiet 1 0.2
|
|
send "AT&VE1^m"
|
|
|
|
get 1 "^m" $a
|
|
:loop
|
|
print $a
|
|
get 1 "^m" $a
|
|
let a=len($a)
|
|
if a > 0 goto loop
|
|
print "#################\n"
|