Posted to tcl by kbk at Tue Dec 01 12:39:48 GMT 2009view pretty

puts [package require Plotchart]
grid [canvas .c -width 800 -height 375]
set Aplot [Plotchart::createXYPlot .c [list 0 360 20] [list 0 1.0 0.2]]
set Bplot [Plotchart::createRightAxis .c [list -1.0 1.0 0.2]]
$Aplot xconfig -format %3.0f
$Aplot yconfig -format %5.2f
$Bplot yconfig -format %5.2f