Code: Alles auswählen
#
# Zeigt die gesamte Ausgabe von getParamset
# =================================================
# auf Basis von setparam.tcl von Oliver Wagner <owagner@vapor.com>
#
# tclsh getparam <addresse> <MASTER|VALUES|LINK>
# z.B.
# tclsh getparam IEQ0123456:2 MASTER
#
# Diese Version ist fuer Funk. Fuer Wired muss unten der Port von 2001 auf 2000 geaendert werden.
#
load tclrpc.so
set ausgabe [xmlrpc http://127.0.0.1:2001/ getParamset [list string [lindex $argv 0]] [list string [lindex $argv 1]] ]
puts $ausgabe