blob: c9a77aac00931131335bcfd1b55d8195199e70dc (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
|
source base.tcl
set w .bar
set graph [bltBarGraph $w]
echo "Testing Bar Graph..."
bltCmd $graph configure
# Graph
bltTest $graph -aspect 2 $dops
bltTest $graph -background red $dops
bltTest $graph -barmode stacked $dops
bltTest $graph -barmode aligned $dops
bltTest $graph -barmode overlap $dops
bltTest $graph -barwidth .15 $dops
#bltTest $graph -baseline $dops
bltTest $graph -bd 50 $dops
bltTest $graph -bg green $dops
bltTest $graph -bm 50 $dops
bltTest $graph -borderwidth 50 $dops
bltTest $graph -bottommargin 50 $dops
#bltTest $graph -bufferelements $dops
#bltTest $graph -buffergraph $dops
bltTest $graph -cursor cross $dops
bltTest $graph -fg blue $dops
bltTest $graph -font {times 36 bold italic} $dops
bltTest $graph -foreground cyan $dops
#bltTest $graph -halo $dops
bltTest $graph -height 300 $dops
#bltTest $graph -highlightbackground $dops
#bltTest $graph -highlightcolor $dops
#bltTest $graph -highlightthickness $dops
bltTest $graph -invertxy yes $dops
bltTest $graph -justify left $dops
bltTest $graph -leftmargin 50 $dops
bltTest $graph -lm 50 $dops
bltTest $graph -plotbackground cyan $dops
bltTest $graph -plotborderwidth 50 $dops
bltTest $graph -plotpadx 50 $dops
bltTest $graph -plotpady 50 $dops
bltTest $graph -plotrelief groove $dops
bltTest $graph -relief groove $dops
bltTest $graph -rightmargin 50 $dops
bltTest $graph -rm 50 $dops
#bltTest $graph -searchhalo $dops
#bltTest $graph -searchmode $dops
#bltTest $graph -searchalong $dops
#bltTest $graph -stackaxes $dops
#bltTest $graph -takefocus $dops
bltTest $graph -title "This is a Title" $dops
bltTest $graph -tm 50 $dops
bltTest $graph -topmargin 50 $dops
bltTest $graph -width 300 $dops
bltTest $graph -plotwidth 300 $dops
bltTest $graph -plotheight 300 $dops
##bltCmd $graph axis
bltCmd $graph cget -background
bltCmd $graph configure
bltCmd $graph configure
bltCmd $graph configure -background cyan
##bltCmd $graph crosshairs
##bltCmd $graph element
#bltCmd $graph extents
#bltCmd $graph inside
#bltCmd $graph invtransform
##bltCmd $graph legend
##bltCmd $graph marker
##bltCmd $graph pen
##bltCmd $graph postscript
#bltCmd $graph transform
##bltCmd $graph x2axis
##bltCmd $graph xaxis
##bltCmd $graph y2axis
##bltCmd $graph yaxis
echo "done"
bltPlotDestroy $w
|