summaryrefslogtreecommitdiffstats
path: root/tkblt/tests/ps.tcl
diff options
context:
space:
mode:
authorWilliam Joye <wjoye@cfa.harvard.edu>2016-10-17 15:23:43 (GMT)
committerWilliam Joye <wjoye@cfa.harvard.edu>2016-10-17 15:23:43 (GMT)
commita7a663ff3862b39b49a7b8930a4fa79629dddd4d (patch)
treebd18e083d7b40e52c51313ecffcffa71fd8a2cff /tkblt/tests/ps.tcl
parent7dd9b970cec6832b8f6118dc2dd91a08d2836648 (diff)
parent39c6355e46a21c8ccdf7b4e7c24bb7f3259fa3d7 (diff)
downloadblt-a7a663ff3862b39b49a7b8930a4fa79629dddd4d.zip
blt-a7a663ff3862b39b49a7b8930a4fa79629dddd4d.tar.gz
blt-a7a663ff3862b39b49a7b8930a4fa79629dddd4d.tar.bz2
Merge commit '39c6355e46a21c8ccdf7b4e7c24bb7f3259fa3d7' as 'tkblt'
Diffstat (limited to 'tkblt/tests/ps.tcl')
-rw-r--r--tkblt/tests/ps.tcl29
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
+