Panel: Screen layout for easy-update of numeric, text, and graphics output

• PaNeL is an optional keyword of HicEst"s WINDOW() function, e.g.
  • WINDOW(WINdowhandle=wh, PaNeL="test", PoinT=pt)
  • Window layout is defined in a template (APPENDIX section of the script).
  • Template placeholders define the output types
  • To display output variable changes, call:
    • WINDOW(WIN=wh, UPDAtepanel)

• size of panel

  is automatic:
  • the window will exactly display the template from the APPENDIX section
  • The font used for text output is "fixed font" and can be set as font nr 4 from the options section

• initialize panel

  : display a template as defined in the scripts APPENDIX section. This requires to
  • define the variables to be displayed in the template, e.g.:
    • CHARACTER name*60, text*60
    • DIMENSION vector(10)
    • name = "numeric and text"
    • text = "scalar has value pi"
    • scalar = 4*ATAN(1) ! == pi
    • vector = $ ^ 0.5 ! the square roots of 1, 2, 3, ...

  • template definition

    (e.g. "Num+Text") for screen output:
    The template name must start in column 1 of the script"s APPENDIX section.
  • choose arbitrary placeholders for the variables, like ?, $, and @.
  • placeholder=variable expressions follow the template name.
  • The number following the placeholder is for strings the character position to start with. For arrays the number is the array element, for numeric scalars the number must be 0.
  • The printed width is defined by the number of digits following the placeholder.

    Num+Text ?=scalar $=vector @=text
     text( 1:10) = @000000001  scalar = ?000
     text(11:19) = @00000011
       vector(2) = $0002, vector(5) = $0005
          scalar = ?00000  6 chars wide
          scalar = ?000000 7 chars wide
    the nextchapter starts in column 1 again

  • The xy-graph hides any text below it. Commands may be anywhere within the graph (no spaces allowed).

• open panel

  with its initial values by a call to WINDOW with the template name

   WINDOW(WIN=wh, PaNeL="Num+Text", TItle=name, PoinT=8)

  This writes an image of the template to window wh and fills the placeholders defined in template (numbers, strings and graphs). The font size determines the window size. It can be set by the PoinT option. Panel always uses a fixed font.

• update panel

  with changed variables is by subsequent calls to WINDOW(WINdowhandle=wh, UPDAtepanel):
  • text = "scalar has value e"
  • scalar = EXP(1)
  • vector = $ ^ 2 ! the squares of 1, 2, 3, ...
  • WINDOW(WIN=wh, UPDAtepanel)
  

• mark selected variable

  by changing its foreground and/or background color: Colors 0...31 are predefined, but 32-bit RGB() values can be used instead.
  • WINDOW(WIN=wh, UPDAtepanel=variable, ForeColor=15, BaCkColor=1)
  

• graphics

  is added to a template by defining an arbitrary placeholder in the 1st line of the template (# in the example below) for every xy-system.

  Options as in AXIS(...)	# stands here for any character i is integer f is float	examples
  #i	i = number of xy system 1...8. Must be noted in the template definition line	#7 = xy graph number 7
  ##	Double placeholders mark the corners of graphs Upper left and right corners suffice for a graph to extend over the full height of the panel. Diagonal corners are needed for a partial window graph	Test #1 ## #XB79 #Xx0 #XX4 #YB96 #Yy1 #YY100 #x more in Tutorial.hic(Panel) # #y try it # ##
  #XBi (use to set foreground colors ) and #YBi (use to set background colors ) (see also AXIS)	i is a sum of color and scale properties: 0=black 1=blue 2=green 4=red 8=bright 16=soft 32=LoG 64=Grid 128=FixmiN 256=FixmaX 512=TiMe 1024=Scroll 2048=noAxis	WINDOW(WIN=wh, PaNeL="Test", TItle="Profile") #XB79 = 1 + 64 = blue+grid #YB96 = black + log + grid #Xx0 = Xmin=0 #Yy1 Ymin=1 #XX4 = Xmax=4 #YY100 = Ymax=100 #x abscissa text# #y ordinate text#
  #Xxf	set abscissa minimum to f	#Xx0 = Xmin=0
  #XXf	set abscissa maximum to f	#XX1.5 = Xmax=1.5
  #Yyf	set ordinate minimum to f	#Yy-1 = Ymin=-1
  #YYf	set ordinate maximum to f	#YY2 = Ymax=2
  #xtext#	set abscissa text	#x more in Demo = Tutorial.dem(Panel) #
  #ytext#	set ordinate text	#y try it #

• profile graph

  is added to a template by defining arbitrary placeholders for x-vector (~ in the table below) and for the y-vectors (? in the table below) in the 1st line of the template.

  Options as in LINE(...)	# stands again for the xy system ~ is placeholder for x-vector ? stands for y-vector i is an integer number
  ~=xvec	assign xvec to ~, xvec is defined in the script and is noted in the template definition line. To plot e.g. yvec versus xvec in graph 3 the first line of this APPENDIX chapter may look like: Profile #3 ~=xvec ?=yvec
  ?=yvec	assign yvec to ?, yvec defined in script and noted in template definition line
  #X~0	assign ~ (xvec) to abscissa of xy-system #
  #Y?0	assign ? (yvec) to ordinate of xy-system #
  #Y?Bi	i is the sum of properties for curve ?: 0=black, 1=blue, 2=green, 4=red, 8=bright, 16=soft, 32=STeps, 64=NoLine, 256=NoZero.
  #Y?Si	i is the symbol number for curve ?: 1=square, 2=diamond, 3=octagon, 4=Xsquare, 5=+diamond, 6=+octagon, 7=triangle up, 8=triangle down, 9=arrow up, 10=arrow down, 11=/, 12=\, 13=X, 14=-, 15=l, 16=+, 17=*
  #Y?Di	i is the symbol diameter for curve ?
  #Y?Wi	i is the line width for curve ?

  • DIMENSION xvec(30), sin(30), cos(30)
  • xvec = ($ - 1) / 3 ! make xvec = 0, 1/3, 2/3, ...
  • sin = SIN(xvec)
  • cos = COS(xvec)
  • WINDOW(PaNeL="Profile", TItle="Profile", WIN=wh)

  Profile %3 ~=xvec $=sin ?=cos xvec(3)=~0003, cos(3)=?0003 %% %XB66G3 the scales are B66 green(2)+Xgrid(64) G3 Xgrid 3"s-steps %YB6 dark yellow backgr(B6) %X~0 is the x-vector %Y$0B32D0W1 the sin-vector B32 black(0)+ steps(32) D0 symbol diameter 0 W1 line width 1 %Y?0B9D1S1W3 the cos-vector B9 is bright(8)+blue(1) D1 symbol diameter 1 S1 symbol 1 square W2 line width 2 %xup to 32 curves/8 graphs% ~00000003 ?00000003 %%

• history graph

  works like "panel profile graph" above.
  • past profiles are shown with decreasing color intensity.
  • Useful to visualize small changes without cluttering the graph.
  • If the length of the y-vector is N times the length of the x-vector, a total of N history values of y-vector are plotted.
  • Maximum N is 255.
  • DIMENSION xH(30), sinH(300), cosH(300)
  • xH = ($ - 1) / 3 ! make xH = 0, 1/3, 2/3, ...
  • WINDOW(PaNeL="History", TItle="History plot", WIN=wh)
  • DO i = 0, 10
  • sinH = SIN(xH) * i/10
  • cosH = COS(xH) * i/10
  • WINDOW(WIN=wh, UPDAtepanel)
  • ENDDO

  History #1 %2 ~=xH $=sinH ?=cosH ## %% #YB10 %YB2062 #X~0 %X~0 #Y$0B1D0 %Y?0B2D0 #xthe most recent# %xcurves are darkest% #yno y-axis for graph 2# ## %%

• scrolling axes

  allow automatic updates of up to 8 graphs. Both axes can be made to scroll. Input y-data must be bundled in a vector, the x-value may be a scalar or it may an element of the data vector.

  Options as in AXIS and LINE	# stands again for the xy system " is placeholder for the current x-value * stands for a vector of y-values i is an integer number
  "=xvalue	assign xvalue to the placeholder ", xvalue must be defined in the script and is noted in the template definition line along with the vector of y-values (and possibly definitions of other axes, variables, and vectors to display)
  *=yvector	assign yvector to the placeholder *, yvector is defined in the script and noted in the template. To plot x-value sec and yvector infoVec to xy-graph 1 in chapter TimeSeries this is: TimeSeries #1 "=sec *=infoVec

  • infoVec = ALIAS(sec, y1, y2) ! VECTOR needed at least for y-values
  • WINDOW(PaNeL="TimeSeries", Ti="200 msec updates", WIN=wh)
  • DO i = 1, 1E6 ! loop 1 million times
  • sec = TIME() ! seconds since midnight
  • y1 = SIN(sec)
  • y2 = COS(sec) * RAN(0.3) ! 0 <= RAN(0.3) <= 0.3 random values
  • WINDOW(WIN=wh, UPDAtepanel)
  • SYSTEM(WAIT=200) ! wait for 200 msec
  • ENDDO

  TimeSeries #1 "=sec *=infoVec ## The AXIS options are: #XB1088 #Xx0 #XX20 B1088=scroll(1024)+grid(64) Xx0 = xmin(0) XX20 xmax(20) #xX-axis scrolls with sec# The LINE options are: #X"0 assigns sec to x-Axis #Y*2W2D0 y1 is 2 wide #Y*3W2D1B12 y2 is red Di i = symbol diameter ## "0000000 sec since midnight

• flow lines

  add horizontal and/or vertical lines to a graph.
  • Line placeholders in the same row or same column are connected by lines of color c, dash d, and width w.
  • in the chapter definition line a set of lines for a placeholder * is defined by the sequence *Line=c.sw, e.g. *Line=12.09 for bright red, solid , 9 pixels wide
  • It is sufficient to write L for Line.
  • Placeholders are blanked out for display.
  • text = "comes handy for charts"
  • WINDOW(PaNeL="Lines", Title="Lines", WIN=wh)

  Lines *Line=12.29 +L=17.09 "=Text + +* * "0001 "00006 + * * "13 "00017 * *+ +

  

• rectangles

  : add all kinds of rectangles to a graph. The syntax in the panel definition line for rectangle placeholder * is *Display:RA=color.

  Rectangles +D:RA=1.05,BC=3.24,W=4,H=3 *D:RA=-1,BC=14 + *1 a *2 b *3 c *4 d *5 e

• geometrical shapes

  all use the same syntax:

  *D:XY=c.sw,BC=c.sh,W=4,H=3

  • * is the placeholder of the shape
  • XY is the shape (PO, EL, or BE)
  • c=color
  • s=outline-style
  • w=outline-width
  • BC=background with c=color, s=style, h=hatch
  • W=outline-width
  • H=outline-height

  • polygons

    :

    x,y coordinates in the form x1,y2;x2,y2;... are scaled to width W=.. and height H=.. as noted in the definition line for missing W and/or H the shapes extend over the full window W and/or H

    Po .D:RA=4 #D:PO=0,0;1,1;0,1;W=8,H=3,BC=12,FC=0.03
     .............................
     .#         #         #
     .
     .
     .
     .     #         #
     .
     .
     .

  • ellipses

    :

    Ellipses have 2 extra options to display arcs: A1=Angle1 (0...360) A2=Angle2, default angles are 0 for x,y see polygons

    El #D:EL=11.05,W=9,H=4,BC=17 +D:EL=9.09,A1=0,A2=180,W=8,H=5,BC=14
     #         #         #               .
                                 +
         A#        B#        C
    
              D         E
    
    

  • cubic Beziers

    :

    Cubic Beziers fit cubic curves to 4 points. interpolation starts at P0 toward P1 and ends at P3 subsequent curves (3 points) use the end point of the previous interpolation as a start point for x,y see polygons

    PB .D:RA=0 $D:BE=0,0;0,1;1,1;1,0;W=8,H=4,FC=4.09
     ..................
     .$       $
     .
     .
     .

How your donation will be used, and how to get a HicEst key code in return ©2000-2010 Georg Petrich, HicEst Instant Prototype Computing. All rights reserved. Impressum