1) I'd like to know why scaling doesn't work. It's probably a simple
thing, but:
proc "Scale Selected Graphs" { list } {
set result [ined request "Set Scale Factor" \
[list [list "Scale factor:" 100 scale 1 10000] ] \
[list "set values" cancel] ]
if {[lindex $result 0] == "cancel"} return
set scalefactor [lindex $result 1]
foreach id $list {
puts "ID: $id"
puts "ScaleB4: [ined -noupdate scale $id]"
ined -noupdate scale $id $scalefactor
puts "ScaleNu: [ined -noupdate scale $id]"
}
}
prints out
ID: STRIPCHART stripchart0 >blah>
ScaleB4:
ScaleAF:
2) I'd like to make stripcharts display the line in a different color
above a certain height (cool multicolor stripcharts). Am I correct
in assuming that it would just take modifying DisplayStripchart() in
tkiStripChart.c (plus a new GC for the color)?
------
Dave Hayes - Altadena CA, USA - dave@jetcafe.org
Freedom Knight of Usenet - http://www.jetcafe.org/~dave/usenet
Nasrudin was stopped by a policemen. "This is a summons for driving through
the red light."
"When I go into court," the Mulla began, "I shall ask for it to be balanced
against all the times I have stopped at the green light and never been
credited for it."
-- !! This message is brought to you via the `tkined & scotty' mailing list. !! Please do not reply to this message to unsubscribe. To subscribe or !! unsubscribe, send a mail message to <tkined-request@ibr.cs.tu-bs.de>. !! See http://wwwsnmp.cs.utwente.nl/~schoenw/scotty/ for more information.