| PlotOutlines | TCL UTILITIES USER MANUAL | PlotOutlines |
|---|
| PlotOutlines  |
|
| pID | - | The plot iD which is set in the DefinePlot procedure. | ||||||||||||||||||||||||||||||
| LabOps | - | A list which specifies the options
used when generating the plot text labeling. The list
has a maximum of 8 elements which are defined in the table
below. Elements not specified are defaulted to the values
given.
|
||||||||||||||||||||||||||||||
| NumOps | - | A list which specifies options
used in the numerical labeling of the plot axes. The list
has a maximum of 4 elements which are defined in the table
below. Elements not specified are defaulted to the values
given.
|
||||||||||||||||||||||||||||||
| ShowAxes | - | This is an optional input variable which is used to indicate whether to draw the X and Y axes in the plot. The default value is 1 which is to show the axes. Set to zero if the axes are not to be shown. | ||||||||||||||||||||||||||||||
# READ the GUI preference settings
GUIprefsRead
# SET a window size
set GphInfo(xsScrL) 600
set GphInfo(ysScrL) 500
set GphInfo(xScrL) 600
set GphInfo(yScrL) 500
# START graphics
GraphicsOn TK RainBow
# ESTABLISH a graphics windows in lower left of canvas
GenWindow 0 0.1 0.1 0.0 0.45 0.45 0.0 -6.0 -6.0 0.0 6.0 6.0 0.0
# IDENTIFY Window 0 with plot 0
DefinePlot 0 0 -1 -1
# SET labels and number to 10 pt
PLTinfoChg 0 ALL NUMBERS NSIZE 10
PLTinfoChg 0 ALL NUMBERS TSIZE 10
# PUT up the plot annotation.
PlotOutlines 0 [list "X" 1.0 "Y" 1.0] [list BOT BOT BOTH BOTH]
# ESTABLISH a graphics windows in lower right of canvas
GenWindow 1 0.55 0.1 0.0 0.90 0.45 0.0 -6.0 1.0 0.0 6.0 6.0e7 0.0
# LEFT Y-axis is set to LOG scaling
SetAxis 1 PRIMARY HOLD HOLD HOLD HOLD HOLD HOLD HOLD LOG HOLD
# IDENTIFY Window 1 with plot 1
DefinePlot 1 1 -1 -1
# SET labels and number to 10 pt
PLTinfoChg 1 ALL NUMBERS NSIZE 10
PLTinfoChg 1 ALL NUMBERS TSIZE 10
# PUT up the plot annotation.
PlotOutlines 1 [list "X" 1.0 "Y" 1.0] [list BOT BOT BOTH BOTH]
# SET beginning and ending time across the X axis in next plot.
set bT [list 2007 312 7 15 0 0]
set eT [list 2007 312 8 45 0 0]
# ESTABLISH a graphics windows across top of canvas
GenWindow 2 0.1 0.60 0.0 0.9 0.97 0.0 -6.0 1.0 0.0 6.0 10.0 0.0 X
# IDENTIFY Window 2 with plot 2 and X axis is time based.
DefinePlot 2 2 -1 -1 X $bT $eT
# SET labels and number to 10 pt
PLTinfoChg 2 ALL NUMBERS NSIZE 10
PLTinfoChg 2 ALL NUMBERS TSIZE 10
# PUT up the plot annotation.
PlotOutlines 2 [list "X" 1.0 "Y" 1.0] [list BOT BOT BOTH BOTH]
# READ the GUI preference settings
GUIprefsRead
# SET a window size
set GphInfo(xsScrL) 600
set GphInfo(ysScrL) 500
set GphInfo(xScrL) 600
set GphInfo(yScrL) 500
# START graphics
GraphicsOn TK RainBow
# ESTABLISH a graphics windows in lower right of canvas
GenWindow 1 0.15 0.15 0.0 0.85 0.85 0.0 -6.0 1.0 0.0 6.0 10 0.0
# LEFT Y-axis is set to LOG scaling
SetAxis 1 SECONDARY 10.0 10.0 HOLD -5 1.0e5 HOLD HOLD LOG HOLD
# IDENTIFY Window 1 with plot 1
DefinePlot 1 1 -1 -1
# SET labels and number to 10 pt
PLTinfoChg 1 ALL NUMBERS NSIZE 10
PLTinfoChg 1 ALL NUMBERS TSIZE 10
# PUT up the plot annotation with axes not drawn.
PlotOutlines 1 [list "X" 1.0 "Y" 1.0] [list BOTH BOTH BOTH BOTH] 0
| Mar 29, 2007 |
|---|