diff options
Diffstat (limited to 'tkblt/tests/ps.tcl')
| -rw-r--r-- | tkblt/tests/ps.tcl | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/tkblt/tests/ps.tcl b/tkblt/tests/ps.tcl new file mode 100644 index 0000000..7a9ce23 --- /dev/null +++ b/tkblt/tests/ps.tcl @@ -0,0 +1,29 @@ +source base.tcl + +set w .line +set graph [bltLineGraph $w] + +$graph axis configure x -title "X\nAxis" -limitsformat "%g" +$graph axis configure y -title "Y\nAxis" + +$graph element configure data1 -dash {8 3} -showvalues y -smooth step -symbol circle -outline yellow -outlinewidth 3 -pixels 10 -valuefont "times 14 italic" -valuerotate 45 + +$graph legend configure -relief raised +$graph xaxis configure -bg cyan -relief raised +$graph configure -relief raised +$graph configure -plotrelief raised + +$graph legend selection set data2 +$graph legend focus data1 +$graph legend configure -selectrelief groove + +$graph postscript configure -decorations yes +$graph postscript output foo.ps +$graph postscript configure -decorations no +$graph postscript output bar.ps + +#set graph [bltBarGraph $w] + +#puts stderr "done" +#bltPlotDestroy $w + |