home *** CD-ROM | disk | FTP | other *** search
/ Nebula 1995 August / NEBULA.mdf / SourceCode / Tutorial / Cookbook / 17.plot / plotview.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-01-18  |  43.3 KB  |  1,236 lines
  1. /* plotview.c generated from plotview.psw
  2.    by unix pswrap V1.009  Wed Apr 19 17:50:24 PDT 1989
  3.  */
  4.  
  5. #include <dpsclient/dpsfriends.h>
  6. #include <string.h>
  7.  
  8. #line 1 "plotview.psw"
  9. #line 10 "plotview.c"
  10. void createPSDefs( void )
  11. {
  12.   typedef struct {
  13.     unsigned char tokenType;
  14.     unsigned char topLevelCount;
  15.     unsigned short nBytes;
  16.  
  17.     DPSBinObjGeneric obj0;
  18.     DPSBinObjGeneric obj1;
  19.     DPSBinObjGeneric obj2;
  20.     DPSBinObjGeneric obj3;
  21.     DPSBinObjGeneric obj4;
  22.     DPSBinObjGeneric obj5;
  23.     DPSBinObjGeneric obj6;
  24.     DPSBinObjGeneric obj7;
  25.     DPSBinObjGeneric obj8;
  26.     DPSBinObjGeneric obj9;
  27.     DPSBinObjGeneric obj10;
  28.     DPSBinObjGeneric obj11;
  29.     DPSBinObjGeneric obj12;
  30.     DPSBinObjGeneric obj13;
  31.     DPSBinObjGeneric obj14;
  32.     DPSBinObjGeneric obj15;
  33.     DPSBinObjGeneric obj16;
  34.     DPSBinObjGeneric obj17;
  35.     DPSBinObjGeneric obj18;
  36.     DPSBinObjGeneric obj19;
  37.     DPSBinObjGeneric obj20;
  38.     DPSBinObjGeneric obj21;
  39.     DPSBinObjGeneric obj22;
  40.     DPSBinObjGeneric obj23;
  41.     DPSBinObjReal obj24;
  42.     DPSBinObjGeneric obj25;
  43.     DPSBinObjGeneric obj26;
  44.     char obj27[8];
  45.     char obj28[18];
  46.     char obj29[4];
  47.     char obj30[20];
  48.     char obj31[4];
  49.     char obj32[3];
  50.     char obj33[4];
  51.     char obj34[4];
  52.     } _dpsQ;
  53.   static const _dpsQ _dpsF = {
  54.     DPS_DEF_TOKENTYPE, 21, 285,
  55.     {DPS_LITERAL|DPS_NAME, 0, 4, 277},    /* strx */
  56.     {DPS_LITERAL|DPS_INT, 0, 0, 20},
  57.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 165},    /* string */
  58.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  59.     {DPS_LITERAL|DPS_NAME, 0, 4, 273},    /* stry */
  60.     {DPS_LITERAL|DPS_INT, 0, 0, 20},
  61.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 165},    /* string */
  62.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  63.     {DPS_LITERAL|DPS_NAME, 0, 3, 270},    /* str */
  64.     {DPS_LITERAL|DPS_INT, 0, 0, 20},
  65.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 165},    /* string */
  66.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  67.     {DPS_LITERAL|DPS_NAME, 0, 4, 266},    /* divx */
  68.     {DPS_LITERAL|DPS_STRING, 0, 20, 246},
  69.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  70.     {DPS_LITERAL|DPS_NAME, 0, 4, 242},    /* divy */
  71.     {DPS_LITERAL|DPS_STRING, 0, 18, 224},
  72.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  73.     {DPS_LITERAL|DPS_NAME, 0, 8, 216},    /* plotfont */
  74.     {DPS_EXEC|DPS_ARRAY, 0, 6, 168},
  75.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  76.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 139},    /* scale */
  77.     {DPS_LITERAL|DPS_NAME, 0, DPSSYSNAME, 211},    /* Times-Roman */
  78.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 67},    /* findfont */
  79.     {DPS_LITERAL|DPS_REAL, 0, 0, 0.03},
  80.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 140},    /* scalefont */
  81.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 149},    /* setfont */
  82.     {'p','l','o','t','f','o','n','t'},
  83.     {' ','p','e','r',' ','d','i','v','i','s','i','o','n',' ','o','n',' ','y'},
  84.     {'d','i','v','y'},
  85.     {' ','p','e','r',' ','d','i','v','i','s','i','o','n',' ','o','n',' ','x',',',' '},
  86.     {'d','i','v','x'},
  87.     {'s','t','r'},
  88.     {'s','t','r','y'},
  89.     {'s','t','r','x'},
  90.     }; /* _dpsQ */
  91.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  92.   char pad[3];
  93.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,285);
  94.   if (0) *pad = 0;    /* quiets compiler warnings */
  95. }
  96. #line 16 "plotview.psw"
  97.  
  98. #line 99 "plotview.c"
  99. void PSDrawAxis(float ac, float x, float y, float w, float h)
  100. {
  101.   typedef struct {
  102.     unsigned char tokenType;
  103.     unsigned char topLevelCount;
  104.     unsigned short nBytes;
  105.  
  106.     DPSBinObjReal obj0;
  107.     DPSBinObjGeneric obj1;
  108.     DPSBinObjReal obj2;
  109.     DPSBinObjGeneric obj3;
  110.     DPSBinObjReal obj4;
  111.     DPSBinObjReal obj5;
  112.     DPSBinObjGeneric obj6;
  113.     DPSBinObjReal obj7;
  114.     DPSBinObjGeneric obj8;
  115.     DPSBinObjReal obj9;
  116.     DPSBinObjReal obj10;
  117.     DPSBinObjGeneric obj11;
  118.     DPSBinObjReal obj12;
  119.     DPSBinObjReal obj13;
  120.     DPSBinObjReal obj14;
  121.     DPSBinObjGeneric obj15;
  122.     DPSBinObjGeneric obj16;
  123.     DPSBinObjGeneric obj17;
  124.     DPSBinObjReal obj18;
  125.     DPSBinObjReal obj19;
  126.     DPSBinObjReal obj20;
  127.     DPSBinObjReal obj21;
  128.     DPSBinObjGeneric obj22;
  129.     DPSBinObjGeneric obj23;
  130.     DPSBinObjGeneric obj24;
  131.     DPSBinObjGeneric obj25;
  132.     DPSBinObjReal obj26;
  133.     DPSBinObjReal obj27;
  134.     DPSBinObjGeneric obj28;
  135.     DPSBinObjReal obj29;
  136.     DPSBinObjGeneric obj30;
  137.     DPSBinObjGeneric obj31;
  138.     DPSBinObjGeneric obj32;
  139.     DPSBinObjGeneric obj33;
  140.     DPSBinObjReal obj34;
  141.     DPSBinObjReal obj35;
  142.     DPSBinObjGeneric obj36;
  143.     DPSBinObjReal obj37;
  144.     DPSBinObjReal obj38;
  145.     DPSBinObjReal obj39;
  146.     DPSBinObjGeneric obj40;
  147.     DPSBinObjGeneric obj41;
  148.     DPSBinObjGeneric obj42;
  149.     DPSBinObjGeneric obj43;
  150.     DPSBinObjReal obj44;
  151.     DPSBinObjReal obj45;
  152.     DPSBinObjGeneric obj46;
  153.     DPSBinObjReal obj47;
  154.     DPSBinObjReal obj48;
  155.     DPSBinObjGeneric obj49;
  156.     DPSBinObjGeneric obj50;
  157.     DPSBinObjGeneric obj51;
  158.     DPSBinObjGeneric obj52;
  159.     DPSBinObjGeneric obj53;
  160.     DPSBinObjGeneric obj54;
  161.     DPSBinObjGeneric obj55;
  162.     DPSBinObjGeneric obj56;
  163.     DPSBinObjGeneric obj57;
  164.     DPSBinObjGeneric obj58;
  165.     DPSBinObjGeneric obj59;
  166.     DPSBinObjGeneric obj60;
  167.     DPSBinObjReal obj61;
  168.     DPSBinObjReal obj62;
  169.     DPSBinObjReal obj63;
  170.     DPSBinObjGeneric obj64;
  171.     DPSBinObjGeneric obj65;
  172.     DPSBinObjReal obj66;
  173.     DPSBinObjGeneric obj67;
  174.     DPSBinObjGeneric obj68;
  175.     DPSBinObjReal obj69;
  176.     DPSBinObjGeneric obj70;
  177.     DPSBinObjReal obj71;
  178.     DPSBinObjReal obj72;
  179.     DPSBinObjGeneric obj73;
  180.     DPSBinObjReal obj74;
  181.     DPSBinObjGeneric obj75;
  182.     DPSBinObjGeneric obj76;
  183.     DPSBinObjGeneric obj77;
  184.     DPSBinObjGeneric obj78;
  185.     DPSBinObjReal obj79;
  186.     DPSBinObjReal obj80;
  187.     DPSBinObjReal obj81;
  188.     DPSBinObjGeneric obj82;
  189.     DPSBinObjGeneric obj83;
  190.     DPSBinObjReal obj84;
  191.     DPSBinObjReal obj85;
  192.     DPSBinObjGeneric obj86;
  193.     DPSBinObjGeneric obj87;
  194.     DPSBinObjGeneric obj88;
  195.     DPSBinObjGeneric obj89;
  196.     DPSBinObjGeneric obj90;
  197.     DPSBinObjReal obj91;
  198.     DPSBinObjReal obj92;
  199.     DPSBinObjGeneric obj93;
  200.     DPSBinObjReal obj94;
  201.     DPSBinObjReal obj95;
  202.     DPSBinObjGeneric obj96;
  203.     DPSBinObjGeneric obj97;
  204.     DPSBinObjGeneric obj98;
  205.     DPSBinObjGeneric obj99;
  206.     DPSBinObjGeneric obj100;
  207.     DPSBinObjGeneric obj101;
  208.     DPSBinObjGeneric obj102;
  209.     DPSBinObjGeneric obj103;
  210.     DPSBinObjGeneric obj104;
  211.     DPSBinObjGeneric obj105;
  212.     DPSBinObjGeneric obj106;
  213.     DPSBinObjGeneric obj107;
  214.     char obj108[3];
  215.     char obj109[8];
  216.     } _dpsQ;
  217.   static const _dpsQ _dpsStat = {
  218.     DPS_DEF_TOKENTYPE, 108, 879,
  219.     {DPS_LITERAL|DPS_REAL, 0, 0, 0.0},
  220.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 155},    /* setlinewidth */
  221.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: ac */
  222.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 150},    /* setgray */
  223.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: w */
  224.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  225.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  226.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  227.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  228.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  229.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  230.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  231.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  232.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  233.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: h */
  234.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  235.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  236.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167},    /* stroke */
  237.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  238.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  239.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: h */
  240.     {DPS_LITERAL|DPS_REAL, 0, 0, 0.04},
  241.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 108},    /* mul */
  242.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},    /* sub */
  243.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  244.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 78},    /* gsave */
  245.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: w */
  246.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: h */
  247.     {DPS_EXEC|DPS_NAME, 0, 8, 867},    /* plotfont */
  248.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  249.     {DPS_EXEC|DPS_NAME, 0, 3, 864},    /* str */
  250.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 49},    /* cvs */
  251.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 160},    /* show */
  252.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 77},    /* grestore */
  253.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  254.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: w */
  255.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  256.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  257.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: h */
  258.     {DPS_LITERAL|DPS_REAL, 0, 0, 0.04},
  259.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 108},    /* mul */
  260.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},    /* sub */
  261.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  262.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 78},    /* gsave */
  263.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: w */
  264.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: h */
  265.     {DPS_EXEC|DPS_NAME, 0, 8, 867},    /* plotfont */
  266.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  267.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: w */
  268.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  269.     {DPS_EXEC|DPS_NAME, 0, 3, 864},    /* str */
  270.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 49},    /* cvs */
  271.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 56},    /* dup */
  272.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 166},    /* stringwidth */
  273.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  274.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},    /* exch */
  275.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  276.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},    /* exch */
  277.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 134},    /* rmoveto */
  278.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 160},    /* show */
  279.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 77},    /* grestore */
  280.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  281.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: w */
  282.     {DPS_LITERAL|DPS_REAL, 0, 0, 0.01},
  283.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 108},    /* mul */
  284.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},    /* sub */
  285.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  286.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  287.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 78},    /* gsave */
  288.     {DPS_LITERAL|DPS_REAL, 0, 0, 90.0},
  289.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 136},    /* rotate */
  290.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: h */
  291.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: w */
  292.     {DPS_EXEC|DPS_NAME, 0, 8, 867},    /* plotfont */
  293.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  294.     {DPS_EXEC|DPS_NAME, 0, 3, 864},    /* str */
  295.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 49},    /* cvs */
  296.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 160},    /* show */
  297.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 77},    /* grestore */
  298.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  299.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: w */
  300.     {DPS_LITERAL|DPS_REAL, 0, 0, 0.01},
  301.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 108},    /* mul */
  302.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},    /* sub */
  303.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  304.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: h */
  305.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  306.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  307.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 78},    /* gsave */
  308.     {DPS_LITERAL|DPS_INT, 0, 0, 90},
  309.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 136},    /* rotate */
  310.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: h */
  311.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: w */
  312.     {DPS_EXEC|DPS_NAME, 0, 8, 867},    /* plotfont */
  313.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  314.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: h */
  315.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  316.     {DPS_EXEC|DPS_NAME, 0, 3, 864},    /* str */
  317.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 49},    /* cvs */
  318.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 56},    /* dup */
  319.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 166},    /* stringwidth */
  320.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  321.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},    /* exch */
  322.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  323.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},    /* exch */
  324.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 134},    /* rmoveto */
  325.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 160},    /* show */
  326.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 77},    /* grestore */
  327.     {'s','t','r'},
  328.     {'p','l','o','t','f','o','n','t'},
  329.     }; /* _dpsQ */
  330.   _dpsQ _dpsF;    /* local copy  */
  331.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  332.   char pad[3];
  333.   register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  334.   _dpsF = _dpsStat;    /* assign automatic variable */
  335.  
  336.   _dpsP[2].val.realVal = ac;
  337.   _dpsP[5].val.realVal =
  338.   _dpsP[9].val.realVal =
  339.   _dpsP[12].val.realVal =
  340.   _dpsP[18].val.realVal =
  341.   _dpsP[29].val.realVal =
  342.   _dpsP[34].val.realVal =
  343.   _dpsP[47].val.realVal =
  344.   _dpsP[61].val.realVal =
  345.   _dpsP[79].val.realVal = x;
  346.   _dpsP[7].val.realVal =
  347.   _dpsP[10].val.realVal =
  348.   _dpsP[13].val.realVal =
  349.   _dpsP[19].val.realVal =
  350.   _dpsP[37].val.realVal =
  351.   _dpsP[66].val.realVal =
  352.   _dpsP[74].val.realVal =
  353.   _dpsP[84].val.realVal =
  354.   _dpsP[94].val.realVal = y;
  355.   _dpsP[4].val.realVal =
  356.   _dpsP[26].val.realVal =
  357.   _dpsP[35].val.realVal =
  358.   _dpsP[44].val.realVal =
  359.   _dpsP[48].val.realVal =
  360.   _dpsP[62].val.realVal =
  361.   _dpsP[72].val.realVal =
  362.   _dpsP[80].val.realVal =
  363.   _dpsP[92].val.realVal = w;
  364.   _dpsP[14].val.realVal =
  365.   _dpsP[20].val.realVal =
  366.   _dpsP[27].val.realVal =
  367.   _dpsP[38].val.realVal =
  368.   _dpsP[45].val.realVal =
  369.   _dpsP[71].val.realVal =
  370.   _dpsP[85].val.realVal =
  371.   _dpsP[91].val.realVal =
  372.   _dpsP[95].val.realVal = h;
  373.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,879);
  374.   if (0) *pad = 0;    /* quiets compiler warnings */
  375. }
  376. #line 53 "plotview.psw"
  377.  
  378. #line 379 "plotview.c"
  379. void PSWriteXLabel(float gray, float x, float y, float w, float h, const char *lab)
  380. {
  381.   typedef struct {
  382.     unsigned char tokenType;
  383.     unsigned char sizeFlag;
  384.     unsigned short topLevelCount;
  385.     unsigned long nBytes;
  386.  
  387.     DPSBinObjGeneric obj0;
  388.     DPSBinObjReal obj1;
  389.     DPSBinObjGeneric obj2;
  390.     DPSBinObjReal obj3;
  391.     DPSBinObjReal obj4;
  392.     DPSBinObjReal obj5;
  393.     DPSBinObjGeneric obj6;
  394.     DPSBinObjGeneric obj7;
  395.     DPSBinObjReal obj8;
  396.     DPSBinObjReal obj9;
  397.     DPSBinObjReal obj10;
  398.     DPSBinObjGeneric obj11;
  399.     DPSBinObjGeneric obj12;
  400.     DPSBinObjGeneric obj13;
  401.     DPSBinObjReal obj14;
  402.     DPSBinObjReal obj15;
  403.     DPSBinObjGeneric obj16;
  404.     DPSBinObjGeneric obj17;
  405.     DPSBinObjGeneric obj18;
  406.     DPSBinObjReal obj19;
  407.     DPSBinObjGeneric obj20;
  408.     DPSBinObjGeneric obj21;
  409.     DPSBinObjGeneric obj22;
  410.     DPSBinObjGeneric obj23;
  411.     DPSBinObjGeneric obj24;
  412.     DPSBinObjGeneric obj25;
  413.     DPSBinObjGeneric obj26;
  414.     char obj27[8];
  415.     } _dpsQ;
  416.   static const _dpsQ _dpsStat = {
  417.     DPS_DEF_TOKENTYPE, 0, 27, 232,
  418.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 78},    /* gsave */
  419.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: gray */
  420.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 150},    /* setgray */
  421.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  422.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: w */
  423.     {DPS_LITERAL|DPS_REAL, 0, 0, 2.0},
  424.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 54},    /* div */
  425.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  426.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  427.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: h */
  428.     {DPS_LITERAL|DPS_REAL, 0, 0, 0.04},
  429.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 108},    /* mul */
  430.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},    /* sub */
  431.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  432.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: w */
  433.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: h */
  434.     {DPS_EXEC|DPS_NAME, 0, 8, 216},    /* plotfont */
  435.     {DPS_LITERAL|DPS_STRING, 0, 0, 224},    /* param lab */
  436.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 166},    /* stringwidth */
  437.     {DPS_LITERAL|DPS_REAL, 0, 0, 2.0},
  438.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 54},    /* div */
  439.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  440.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  441.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 134},    /* rmoveto */
  442.     {DPS_LITERAL|DPS_STRING, 0, 0, 224},    /* param lab */
  443.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 160},    /* show */
  444.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 77},    /* grestore */
  445.     {'p','l','o','t','f','o','n','t'},
  446.     }; /* _dpsQ */
  447.   _dpsQ _dpsF;    /* local copy  */
  448.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  449.   char pad[3];
  450.   register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  451.   register int _dps_offset = 224;
  452.   _dpsF = _dpsStat;    /* assign automatic variable */
  453.  
  454.   _dpsP[1].val.realVal = gray;
  455.   _dpsP[3].val.realVal = x;
  456.   _dpsP[8].val.realVal = y;
  457.   _dpsP[4].val.realVal =
  458.   _dpsP[14].val.realVal = w;
  459.   _dpsP[9].val.realVal =
  460.   _dpsP[15].val.realVal = h;
  461.   _dpsP[17].length =
  462.   _dpsP[24].length = strlen(lab);
  463.   _dpsP[24].val.stringVal = _dps_offset;
  464.   _dps_offset += (_dpsP[24].length + 3) & ~3;
  465.   _dpsP[17].val.stringVal = _dps_offset;
  466.   _dps_offset += (_dpsP[17].length + 3) & ~3;
  467.  
  468.   _dpsF.nBytes = _dps_offset+8;
  469.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,232);
  470.   DPSWriteStringChars(_dpsCurCtxt, (char *)lab, _dpsP[24].length);
  471.   DPSWriteStringChars(_dpsCurCtxt, (char *)pad, ~(_dpsP[24].length + 3) & 3);
  472.   DPSWriteStringChars(_dpsCurCtxt, (char *)lab, _dpsP[17].length);
  473.   DPSWriteStringChars(_dpsCurCtxt, (char *)pad, ~(_dpsP[17].length + 3) & 3);
  474.   if (0) *pad = 0;    /* quiets compiler warnings */
  475. }
  476. #line 67 "plotview.psw"
  477.  
  478. #line 479 "plotview.c"
  479. void PSWriteYLabel(float gray, float x, float y, float w, float h, const char *lab)
  480. {
  481.   typedef struct {
  482.     unsigned char tokenType;
  483.     unsigned char sizeFlag;
  484.     unsigned short topLevelCount;
  485.     unsigned long nBytes;
  486.  
  487.     DPSBinObjGeneric obj0;
  488.     DPSBinObjReal obj1;
  489.     DPSBinObjGeneric obj2;
  490.     DPSBinObjReal obj3;
  491.     DPSBinObjReal obj4;
  492.     DPSBinObjReal obj5;
  493.     DPSBinObjGeneric obj6;
  494.     DPSBinObjGeneric obj7;
  495.     DPSBinObjReal obj8;
  496.     DPSBinObjReal obj9;
  497.     DPSBinObjReal obj10;
  498.     DPSBinObjGeneric obj11;
  499.     DPSBinObjGeneric obj12;
  500.     DPSBinObjGeneric obj13;
  501.     DPSBinObjReal obj14;
  502.     DPSBinObjGeneric obj15;
  503.     DPSBinObjReal obj16;
  504.     DPSBinObjReal obj17;
  505.     DPSBinObjGeneric obj18;
  506.     DPSBinObjGeneric obj19;
  507.     DPSBinObjGeneric obj20;
  508.     DPSBinObjReal obj21;
  509.     DPSBinObjGeneric obj22;
  510.     DPSBinObjGeneric obj23;
  511.     DPSBinObjGeneric obj24;
  512.     DPSBinObjGeneric obj25;
  513.     DPSBinObjGeneric obj26;
  514.     DPSBinObjGeneric obj27;
  515.     DPSBinObjGeneric obj28;
  516.     DPSBinObjGeneric obj29;
  517.     char obj30[8];
  518.     } _dpsQ;
  519.   static const _dpsQ _dpsStat = {
  520.     DPS_DEF_TOKENTYPE, 0, 30, 256,
  521.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 78},    /* gsave */
  522.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: gray */
  523.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 150},    /* setgray */
  524.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  525.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: w */
  526.     {DPS_LITERAL|DPS_REAL, 0, 0, 0.01},
  527.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 108},    /* mul */
  528.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},    /* sub */
  529.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  530.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: h */
  531.     {DPS_LITERAL|DPS_REAL, 0, 0, 2.0},
  532.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 54},    /* div */
  533.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  534.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  535.     {DPS_LITERAL|DPS_REAL, 0, 0, 90.0},
  536.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 136},    /* rotate */
  537.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: h */
  538.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: w */
  539.     {DPS_EXEC|DPS_NAME, 0, 8, 240},    /* plotfont */
  540.     {DPS_LITERAL|DPS_STRING, 0, 0, 248},    /* param lab */
  541.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 166},    /* stringwidth */
  542.     {DPS_LITERAL|DPS_REAL, 0, 0, 2.0},
  543.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 54},    /* div */
  544.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  545.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  546.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},    /* exch */
  547.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 134},    /* rmoveto */
  548.     {DPS_LITERAL|DPS_STRING, 0, 0, 248},    /* param lab */
  549.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 160},    /* show */
  550.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 77},    /* grestore */
  551.     {'p','l','o','t','f','o','n','t'},
  552.     }; /* _dpsQ */
  553.   _dpsQ _dpsF;    /* local copy  */
  554.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  555.   char pad[3];
  556.   register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  557.   register int _dps_offset = 248;
  558.   _dpsF = _dpsStat;    /* assign automatic variable */
  559.  
  560.   _dpsP[1].val.realVal = gray;
  561.   _dpsP[3].val.realVal = x;
  562.   _dpsP[8].val.realVal = y;
  563.   _dpsP[4].val.realVal =
  564.   _dpsP[17].val.realVal = w;
  565.   _dpsP[9].val.realVal =
  566.   _dpsP[16].val.realVal = h;
  567.   _dpsP[19].length =
  568.   _dpsP[27].length = strlen(lab);
  569.   _dpsP[27].val.stringVal = _dps_offset;
  570.   _dps_offset += (_dpsP[27].length + 3) & ~3;
  571.   _dpsP[19].val.stringVal = _dps_offset;
  572.   _dps_offset += (_dpsP[19].length + 3) & ~3;
  573.  
  574.   _dpsF.nBytes = _dps_offset+8;
  575.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,256);
  576.   DPSWriteStringChars(_dpsCurCtxt, (char *)lab, _dpsP[27].length);
  577.   DPSWriteStringChars(_dpsCurCtxt, (char *)pad, ~(_dpsP[27].length + 3) & 3);
  578.   DPSWriteStringChars(_dpsCurCtxt, (char *)lab, _dpsP[19].length);
  579.   DPSWriteStringChars(_dpsCurCtxt, (char *)pad, ~(_dpsP[19].length + 3) & 3);
  580.   if (0) *pad = 0;    /* quiets compiler warnings */
  581. }
  582. #line 82 "plotview.psw"
  583.  
  584. #line 585 "plotview.c"
  585. void PSEnableInstance(float instcol)
  586. {
  587.   typedef struct {
  588.     unsigned char tokenType;
  589.     unsigned char topLevelCount;
  590.     unsigned short nBytes;
  591.  
  592.     DPSBinObjGeneric obj0;
  593.     DPSBinObjGeneric obj1;
  594.     DPSBinObjGeneric obj2;
  595.     DPSBinObjReal obj3;
  596.     DPSBinObjGeneric obj4;
  597.     DPSBinObjReal obj5;
  598.     DPSBinObjGeneric obj6;
  599.     char obj7[11];
  600.     } _dpsQ;
  601.   static const _dpsQ _dpsStat = {
  602.     DPS_DEF_TOKENTYPE, 7, 71,
  603.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 78},    /* gsave */
  604.     {DPS_LITERAL|DPS_BOOL, 0, 0, 1},
  605.     {DPS_EXEC|DPS_NAME, 0, 11, 56},    /* setinstance */
  606.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: instcol */
  607.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 150},    /* setgray */
  608.     {DPS_LITERAL|DPS_REAL, 0, 0, 0.0},
  609.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 155},    /* setlinewidth */
  610.     {'s','e','t','i','n','s','t','a','n','c','e'},
  611.     }; /* _dpsQ */
  612.   _dpsQ _dpsF;    /* local copy  */
  613.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  614.   char pad[3];
  615.   register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  616.   _dpsF = _dpsStat;    /* assign automatic variable */
  617.  
  618.   _dpsP[3].val.realVal = instcol;
  619.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,71);
  620.   if (0) *pad = 0;    /* quiets compiler warnings */
  621. }
  622. #line 89 "plotview.psw"
  623.  
  624. #line 625 "plotview.c"
  625. void PSDisableInstance( void )
  626. {
  627.   typedef struct {
  628.     unsigned char tokenType;
  629.     unsigned char topLevelCount;
  630.     unsigned short nBytes;
  631.  
  632.     DPSBinObjGeneric obj0;
  633.     DPSBinObjGeneric obj1;
  634.     DPSBinObjGeneric obj2;
  635.     char obj3[11];
  636.     } _dpsQ;
  637.   static const _dpsQ _dpsF = {
  638.     DPS_DEF_TOKENTYPE, 3, 39,
  639.     {DPS_LITERAL|DPS_BOOL, 0, 0, 0},
  640.     {DPS_EXEC|DPS_NAME, 0, 11, 24},    /* setinstance */
  641.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 77},    /* grestore */
  642.     {'s','e','t','i','n','s','t','a','n','c','e'},
  643.     }; /* _dpsQ */
  644.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  645.   char pad[3];
  646.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,39);
  647.   if (0) *pad = 0;    /* quiets compiler warnings */
  648. }
  649. #line 95 "plotview.psw"
  650.  
  651. #line 652 "plotview.c"
  652. void PSDrawCrossHair(float startx, float starty, float minx, float maxx, float miny, float maxy)
  653. {
  654.   typedef struct {
  655.     unsigned char tokenType;
  656.     unsigned char topLevelCount;
  657.     unsigned short nBytes;
  658.  
  659.     DPSBinObjGeneric obj0;
  660.     DPSBinObjGeneric obj1;
  661.     DPSBinObjGeneric obj2;
  662.     DPSBinObjGeneric obj3;
  663.     DPSBinObjGeneric obj4;
  664.     DPSBinObjGeneric obj5;
  665.     DPSBinObjReal obj6;
  666.     DPSBinObjReal obj7;
  667.     DPSBinObjGeneric obj8;
  668.     DPSBinObjReal obj9;
  669.     DPSBinObjReal obj10;
  670.     DPSBinObjGeneric obj11;
  671.     DPSBinObjReal obj12;
  672.     DPSBinObjReal obj13;
  673.     DPSBinObjGeneric obj14;
  674.     DPSBinObjReal obj15;
  675.     DPSBinObjReal obj16;
  676.     DPSBinObjGeneric obj17;
  677.     DPSBinObjGeneric obj18;
  678.     DPSBinObjReal obj19;
  679.     DPSBinObjReal obj20;
  680.     DPSBinObjGeneric obj21;
  681.     DPSBinObjReal obj22;
  682.     DPSBinObjGeneric obj23;
  683.     DPSBinObjGeneric obj24;
  684.     DPSBinObjGeneric obj25;
  685.     DPSBinObjGeneric obj26;
  686.     DPSBinObjGeneric obj27;
  687.     DPSBinObjGeneric obj28;
  688.     DPSBinObjReal obj29;
  689.     DPSBinObjReal obj30;
  690.     DPSBinObjGeneric obj31;
  691.     DPSBinObjReal obj32;
  692.     DPSBinObjReal obj33;
  693.     DPSBinObjGeneric obj34;
  694.     DPSBinObjGeneric obj35;
  695.     DPSBinObjReal obj36;
  696.     DPSBinObjGeneric obj37;
  697.     DPSBinObjGeneric obj38;
  698.     DPSBinObjReal obj39;
  699.     DPSBinObjReal obj40;
  700.     DPSBinObjGeneric obj41;
  701.     DPSBinObjReal obj42;
  702.     DPSBinObjGeneric obj43;
  703.     DPSBinObjReal obj44;
  704.     DPSBinObjGeneric obj45;
  705.     DPSBinObjGeneric obj46;
  706.     DPSBinObjGeneric obj47;
  707.     DPSBinObjGeneric obj48;
  708.     DPSBinObjGeneric obj49;
  709.     DPSBinObjGeneric obj50;
  710.     DPSBinObjGeneric obj51;
  711.     DPSBinObjReal obj52;
  712.     DPSBinObjGeneric obj53;
  713.     DPSBinObjGeneric obj54;
  714.     DPSBinObjGeneric obj55;
  715.     DPSBinObjGeneric obj56;
  716.     DPSBinObjGeneric obj57;
  717.     DPSBinObjGeneric obj58;
  718.     DPSBinObjGeneric obj59;
  719.     DPSBinObjGeneric obj60;
  720.     DPSBinObjGeneric obj61;
  721.     DPSBinObjGeneric obj62;
  722.     DPSBinObjGeneric obj63;
  723.     DPSBinObjGeneric obj64;
  724.     DPSBinObjGeneric obj65;
  725.     DPSBinObjGeneric obj66;
  726.     DPSBinObjGeneric obj67;
  727.     DPSBinObjGeneric obj68;
  728.     DPSBinObjGeneric obj69;
  729.     DPSBinObjReal obj70;
  730.     DPSBinObjGeneric obj71;
  731.     DPSBinObjGeneric obj72;
  732.     DPSBinObjGeneric obj73;
  733.     DPSBinObjGeneric obj74;
  734.     DPSBinObjGeneric obj75;
  735.     DPSBinObjGeneric obj76;
  736.     DPSBinObjGeneric obj77;
  737.     DPSBinObjGeneric obj78;
  738.     DPSBinObjGeneric obj79;
  739.     DPSBinObjGeneric obj80;
  740.     DPSBinObjGeneric obj81;
  741.     DPSBinObjGeneric obj82;
  742.     DPSBinObjReal obj83;
  743.     DPSBinObjGeneric obj84;
  744.     DPSBinObjGeneric obj85;
  745.     DPSBinObjGeneric obj86;
  746.     DPSBinObjGeneric obj87;
  747.     DPSBinObjGeneric obj88;
  748.     DPSBinObjReal obj89;
  749.     DPSBinObjGeneric obj90;
  750.     DPSBinObjGeneric obj91;
  751.     DPSBinObjGeneric obj92;
  752.     char obj93[4];
  753.     char obj94[1];
  754.     char obj95[4];
  755.     char obj96[6];
  756.     char obj97[7];
  757.     } _dpsQ;
  758.   static const _dpsQ _dpsStat = {
  759.     DPS_DEF_TOKENTYPE, 50, 770,
  760.     {DPS_LITERAL|DPS_NAME, 0, 7, 759},    /* doright */
  761.     {DPS_EXEC|DPS_ARRAY, 0, 10, 664},
  762.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  763.     {DPS_LITERAL|DPS_NAME, 0, 6, 753},    /* doleft */
  764.     {DPS_EXEC|DPS_ARRAY, 0, 31, 416},
  765.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  766.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: startx */
  767.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: miny */
  768.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  769.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: startx */
  770.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: maxy */
  771.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  772.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: minx */
  773.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: starty */
  774.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  775.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: maxx */
  776.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: starty */
  777.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  778.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167},    /* stroke */
  779.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: startx */
  780.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: starty */
  781.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 56},    /* dup */
  782.     {DPS_LITERAL|DPS_REAL, 0, 0, .01},
  783.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 108},    /* mul */
  784.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  785.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  786.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 78},    /* gsave */
  787.     {DPS_LITERAL|DPS_NAME, 0, DPSSYSNAME, 199},    /* Courier */
  788.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 67},    /* findfont */
  789.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: maxx */
  790.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: minx */
  791.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},    /* sub */
  792.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: maxy */
  793.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: miny */
  794.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},    /* sub */
  795.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 139},    /* scale */
  796.     {DPS_LITERAL|DPS_REAL, 0, 0, 0.05},
  797.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 140},    /* scalefont */
  798.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 149},    /* setfont */
  799.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: maxx */
  800.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: minx */
  801.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},    /* sub */
  802.     {DPS_LITERAL|DPS_REAL, 0, 0, 2.0},
  803.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 54},    /* div */
  804.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: startx */
  805.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 102},    /* lt */
  806.     {DPS_EXEC|DPS_ARRAY, 0, 1, 408},
  807.     {DPS_EXEC|DPS_ARRAY, 0, 1, 400},
  808.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 85},    /* ifelse */
  809.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 77},    /* grestore */
  810.     {DPS_EXEC|DPS_NAME, 0, 7, 759},    /* doright */
  811.     {DPS_EXEC|DPS_NAME, 0, 6, 753},    /* doleft */
  812.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: starty */
  813.     {DPS_EXEC|DPS_NAME, 0, 4, 744},    /* stry */
  814.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 49},    /* cvs */
  815.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 56},    /* dup */
  816.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 166},    /* stringwidth */
  817.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  818.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},    /* exch */
  819.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  820.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},    /* exch */
  821.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 134},    /* rmoveto */
  822.     {DPS_LITERAL|DPS_STRING, 0, 1, 748},
  823.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 56},    /* dup */
  824.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 166},    /* stringwidth */
  825.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  826.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},    /* exch */
  827.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  828.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},    /* exch */
  829.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 134},    /* rmoveto */
  830.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: startx */
  831.     {DPS_EXEC|DPS_NAME, 0, 4, 749},    /* strx */
  832.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 49},    /* cvs */
  833.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 56},    /* dup */
  834.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 166},    /* stringwidth */
  835.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  836.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},    /* exch */
  837.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  838.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},    /* exch */
  839.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 134},    /* rmoveto */
  840.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 160},    /* show */
  841.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 160},    /* show */
  842.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 160},    /* show */
  843.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: startx */
  844.     {DPS_EXEC|DPS_NAME, 0, 4, 749},    /* strx */
  845.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 49},    /* cvs */
  846.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 160},    /* show */
  847.     {DPS_LITERAL|DPS_STRING, 0, 1, 748},
  848.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 160},    /* show */
  849.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: starty */
  850.     {DPS_EXEC|DPS_NAME, 0, 4, 744},    /* stry */
  851.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 49},    /* cvs */
  852.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 160},    /* show */
  853.     {'s','t','r','y'},
  854.     {','},
  855.     {'s','t','r','x'},
  856.     {'d','o','l','e','f','t'},
  857.     {'d','o','r','i','g','h','t'},
  858.     }; /* _dpsQ */
  859.   _dpsQ _dpsF;    /* local copy  */
  860.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  861.   char pad[3];
  862.   register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  863.   _dpsF = _dpsStat;    /* assign automatic variable */
  864.  
  865.   _dpsP[83].val.realVal =
  866.   _dpsP[70].val.realVal =
  867.   _dpsP[6].val.realVal =
  868.   _dpsP[9].val.realVal =
  869.   _dpsP[19].val.realVal =
  870.   _dpsP[44].val.realVal = startx;
  871.   _dpsP[89].val.realVal =
  872.   _dpsP[52].val.realVal =
  873.   _dpsP[13].val.realVal =
  874.   _dpsP[16].val.realVal =
  875.   _dpsP[20].val.realVal = starty;
  876.   _dpsP[12].val.realVal =
  877.   _dpsP[30].val.realVal =
  878.   _dpsP[40].val.realVal = minx;
  879.   _dpsP[15].val.realVal =
  880.   _dpsP[29].val.realVal =
  881.   _dpsP[39].val.realVal = maxx;
  882.   _dpsP[7].val.realVal =
  883.   _dpsP[33].val.realVal = miny;
  884.   _dpsP[10].val.realVal =
  885.   _dpsP[32].val.realVal = maxy;
  886.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,770);
  887.   if (0) *pad = 0;    /* quiets compiler warnings */
  888. }
  889. #line 139 "plotview.psw"
  890.  
  891. #line 892 "plotview.c"
  892. void PSOverlayBox(float minx, float maxx, float miny, float maxy)
  893. {
  894.   typedef struct {
  895.     unsigned char tokenType;
  896.     unsigned char topLevelCount;
  897.     unsigned short nBytes;
  898.  
  899.     DPSBinObjGeneric obj0;
  900.     DPSBinObjGeneric obj1;
  901.     DPSBinObjGeneric obj2;
  902.     DPSBinObjReal obj3;
  903.     DPSBinObjReal obj4;
  904.     DPSBinObjGeneric obj5;
  905.     DPSBinObjReal obj6;
  906.     DPSBinObjReal obj7;
  907.     DPSBinObjGeneric obj8;
  908.     DPSBinObjReal obj9;
  909.     DPSBinObjReal obj10;
  910.     DPSBinObjGeneric obj11;
  911.     DPSBinObjReal obj12;
  912.     DPSBinObjReal obj13;
  913.     DPSBinObjGeneric obj14;
  914.     DPSBinObjGeneric obj15;
  915.     DPSBinObjGeneric obj16;
  916.     } _dpsQ;
  917.   static const _dpsQ _dpsStat = {
  918.     DPS_DEF_TOKENTYPE, 17, 140,
  919.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 78},    /* gsave */
  920.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  921.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 155},    /* setlinewidth */
  922.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: minx */
  923.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: miny */
  924.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  925.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: minx */
  926.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: maxy */
  927.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  928.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: maxx */
  929.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: miny */
  930.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  931.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: maxx */
  932.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: maxy */
  933.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  934.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167},    /* stroke */
  935.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 77},    /* grestore */
  936.     }; /* _dpsQ */
  937.   _dpsQ _dpsF;    /* local copy  */
  938.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  939.   char pad[3];
  940.   register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  941.   _dpsF = _dpsStat;    /* assign automatic variable */
  942.  
  943.   _dpsP[3].val.realVal =
  944.   _dpsP[6].val.realVal = minx;
  945.   _dpsP[9].val.realVal =
  946.   _dpsP[12].val.realVal = maxx;
  947.   _dpsP[4].val.realVal =
  948.   _dpsP[10].val.realVal = miny;
  949.   _dpsP[7].val.realVal =
  950.   _dpsP[13].val.realVal = maxy;
  951.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,140);
  952.   if (0) *pad = 0;    /* quiets compiler warnings */
  953. }
  954. #line 151 "plotview.psw"
  955.  
  956. #line 957 "plotview.c"
  957. void PSGridWrite(float textcol, float gx, float gy, float minx, float maxx, float miny, float maxy)
  958. {
  959.   typedef struct {
  960.     unsigned char tokenType;
  961.     unsigned char topLevelCount;
  962.     unsigned short nBytes;
  963.  
  964.     DPSBinObjGeneric obj0;
  965.     DPSBinObjReal obj1;
  966.     DPSBinObjGeneric obj2;
  967.     DPSBinObjReal obj3;
  968.     DPSBinObjReal obj4;
  969.     DPSBinObjGeneric obj5;
  970.     DPSBinObjReal obj6;
  971.     DPSBinObjGeneric obj7;
  972.     DPSBinObjReal obj8;
  973.     DPSBinObjGeneric obj9;
  974.     DPSBinObjReal obj10;
  975.     DPSBinObjReal obj11;
  976.     DPSBinObjGeneric obj12;
  977.     DPSBinObjReal obj13;
  978.     DPSBinObjGeneric obj14;
  979.     DPSBinObjReal obj15;
  980.     DPSBinObjGeneric obj16;
  981.     DPSBinObjGeneric obj17;
  982.     DPSBinObjReal obj18;
  983.     DPSBinObjReal obj19;
  984.     DPSBinObjGeneric obj20;
  985.     DPSBinObjReal obj21;
  986.     DPSBinObjReal obj22;
  987.     DPSBinObjGeneric obj23;
  988.     DPSBinObjGeneric obj24;
  989.     DPSBinObjReal obj25;
  990.     DPSBinObjGeneric obj26;
  991.     DPSBinObjGeneric obj27;
  992.     DPSBinObjGeneric obj28;
  993.     DPSBinObjGeneric obj29;
  994.     DPSBinObjGeneric obj30;
  995.     DPSBinObjReal obj31;
  996.     DPSBinObjGeneric obj32;
  997.     DPSBinObjGeneric obj33;
  998.     DPSBinObjGeneric obj34;
  999.     DPSBinObjGeneric obj35;
  1000.     DPSBinObjGeneric obj36;
  1001.     DPSBinObjGeneric obj37;
  1002.     char obj38[4];
  1003.     char obj39[3];
  1004.     char obj40[4];
  1005.     char obj41[8];
  1006.     } _dpsQ;
  1007.   static const _dpsQ _dpsStat = {
  1008.     DPS_DEF_TOKENTYPE, 38, 327,
  1009.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 78},    /* gsave */
  1010.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: textcol */
  1011.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 150},    /* setgray */
  1012.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: maxx */
  1013.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: minx */
  1014.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},    /* sub */
  1015.     {DPS_LITERAL|DPS_REAL, 0, 0, 0.15},
  1016.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 108},    /* mul */
  1017.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: minx */
  1018.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  1019.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: maxy */
  1020.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: miny */
  1021.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},    /* sub */
  1022.     {DPS_LITERAL|DPS_REAL, 0, 0, 1.01},
  1023.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 108},    /* mul */
  1024.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: miny */
  1025.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  1026.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  1027.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: maxx */
  1028.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: minx */
  1029.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},    /* sub */
  1030.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: maxy */
  1031.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: miny */
  1032.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},    /* sub */
  1033.     {DPS_EXEC|DPS_NAME, 0, 8, 315},    /* plotfont */
  1034.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: gx */
  1035.     {DPS_EXEC|DPS_NAME, 0, 3, 308},    /* str */
  1036.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 49},    /* cvs */
  1037.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 160},    /* show */
  1038.     {DPS_EXEC|DPS_NAME, 0, 4, 311},    /* divx */
  1039.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 160},    /* show */
  1040.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: gy */
  1041.     {DPS_EXEC|DPS_NAME, 0, 3, 308},    /* str */
  1042.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 49},    /* cvs */
  1043.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 160},    /* show */
  1044.     {DPS_EXEC|DPS_NAME, 0, 4, 304},    /* divy */
  1045.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 160},    /* show */
  1046.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 77},    /* grestore */
  1047.     {'d','i','v','y'},
  1048.     {'s','t','r'},
  1049.     {'d','i','v','x'},
  1050.     {'p','l','o','t','f','o','n','t'},
  1051.     }; /* _dpsQ */
  1052.   _dpsQ _dpsF;    /* local copy  */
  1053.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  1054.   char pad[3];
  1055.   register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  1056.   _dpsF = _dpsStat;    /* assign automatic variable */
  1057.  
  1058.   _dpsP[1].val.realVal = textcol;
  1059.   _dpsP[25].val.realVal = gx;
  1060.   _dpsP[31].val.realVal = gy;
  1061.   _dpsP[4].val.realVal =
  1062.   _dpsP[8].val.realVal =
  1063.   _dpsP[19].val.realVal = minx;
  1064.   _dpsP[3].val.realVal =
  1065.   _dpsP[18].val.realVal = maxx;
  1066.   _dpsP[11].val.realVal =
  1067.   _dpsP[15].val.realVal =
  1068.   _dpsP[22].val.realVal = miny;
  1069.   _dpsP[10].val.realVal =
  1070.   _dpsP[21].val.realVal = maxy;
  1071.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,327);
  1072.   if (0) *pad = 0;    /* quiets compiler warnings */
  1073. }
  1074. #line 171 "plotview.psw"
  1075.  
  1076. #line 1077 "plotview.c"
  1077. void PSBox(float lc, float lw, float x, float y, float w, float h)
  1078. {
  1079.   typedef struct {
  1080.     unsigned char tokenType;
  1081.     unsigned char topLevelCount;
  1082.     unsigned short nBytes;
  1083.  
  1084.     DPSBinObjReal obj0;
  1085.     DPSBinObjGeneric obj1;
  1086.     DPSBinObjReal obj2;
  1087.     DPSBinObjGeneric obj3;
  1088.     DPSBinObjReal obj4;
  1089.     DPSBinObjReal obj5;
  1090.     DPSBinObjGeneric obj6;
  1091.     DPSBinObjReal obj7;
  1092.     DPSBinObjReal obj8;
  1093.     DPSBinObjReal obj9;
  1094.     DPSBinObjGeneric obj10;
  1095.     DPSBinObjGeneric obj11;
  1096.     DPSBinObjReal obj12;
  1097.     DPSBinObjReal obj13;
  1098.     DPSBinObjGeneric obj14;
  1099.     DPSBinObjReal obj15;
  1100.     DPSBinObjReal obj16;
  1101.     DPSBinObjGeneric obj17;
  1102.     DPSBinObjGeneric obj18;
  1103.     DPSBinObjReal obj19;
  1104.     DPSBinObjReal obj20;
  1105.     DPSBinObjGeneric obj21;
  1106.     DPSBinObjReal obj22;
  1107.     DPSBinObjGeneric obj23;
  1108.     DPSBinObjReal obj24;
  1109.     DPSBinObjReal obj25;
  1110.     DPSBinObjGeneric obj26;
  1111.     DPSBinObjGeneric obj27;
  1112.     } _dpsQ;
  1113.   static const _dpsQ _dpsStat = {
  1114.     DPS_DEF_TOKENTYPE, 28, 228,
  1115.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: lc */
  1116.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 150},    /* setgray */
  1117.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: lw */
  1118.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 155},    /* setlinewidth */
  1119.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  1120.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  1121.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  1122.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  1123.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  1124.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: h */
  1125.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  1126.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  1127.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  1128.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: w */
  1129.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  1130.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  1131.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: h */
  1132.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  1133.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  1134.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  1135.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: w */
  1136.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  1137.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  1138.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  1139.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  1140.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  1141.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  1142.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167},    /* stroke */
  1143.     }; /* _dpsQ */
  1144.   _dpsQ _dpsF;    /* local copy  */
  1145.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  1146.   char pad[3];
  1147.   register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  1148.   _dpsF = _dpsStat;    /* assign automatic variable */
  1149.  
  1150.   _dpsP[0].val.realVal = lc;
  1151.   _dpsP[2].val.realVal = lw;
  1152.   _dpsP[4].val.realVal =
  1153.   _dpsP[7].val.realVal =
  1154.   _dpsP[12].val.realVal =
  1155.   _dpsP[19].val.realVal =
  1156.   _dpsP[24].val.realVal = x;
  1157.   _dpsP[5].val.realVal =
  1158.   _dpsP[8].val.realVal =
  1159.   _dpsP[15].val.realVal =
  1160.   _dpsP[22].val.realVal =
  1161.   _dpsP[25].val.realVal = y;
  1162.   _dpsP[13].val.realVal =
  1163.   _dpsP[20].val.realVal = w;
  1164.   _dpsP[9].val.realVal =
  1165.   _dpsP[16].val.realVal = h;
  1166.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,228);
  1167.   if (0) *pad = 0;    /* quiets compiler warnings */
  1168. }
  1169. #line 184 "plotview.psw"
  1170.  
  1171. #line 1172 "plotview.c"
  1172. void PSfillrect(float x, float y, float xn, float yn)
  1173. {
  1174.   typedef struct {
  1175.     unsigned char tokenType;
  1176.     unsigned char topLevelCount;
  1177.     unsigned short nBytes;
  1178.  
  1179.     DPSBinObjReal obj0;
  1180.     DPSBinObjReal obj1;
  1181.     DPSBinObjGeneric obj2;
  1182.     DPSBinObjReal obj3;
  1183.     DPSBinObjReal obj4;
  1184.     DPSBinObjGeneric obj5;
  1185.     DPSBinObjReal obj6;
  1186.     DPSBinObjReal obj7;
  1187.     DPSBinObjGeneric obj8;
  1188.     DPSBinObjReal obj9;
  1189.     DPSBinObjReal obj10;
  1190.     DPSBinObjGeneric obj11;
  1191.     DPSBinObjReal obj12;
  1192.     DPSBinObjReal obj13;
  1193.     DPSBinObjGeneric obj14;
  1194.     DPSBinObjGeneric obj15;
  1195.     } _dpsQ;
  1196.   static const _dpsQ _dpsStat = {
  1197.     DPS_DEF_TOKENTYPE, 16, 132,
  1198.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  1199.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  1200.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  1201.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  1202.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: yn */
  1203.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  1204.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: xn */
  1205.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: yn */
  1206.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  1207.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: xn */
  1208.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  1209.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  1210.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  1211.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  1212.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  1213.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 66},    /* fill */
  1214.     }; /* _dpsQ */
  1215.   _dpsQ _dpsF;    /* local copy  */
  1216.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  1217.   char pad[3];
  1218.   register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  1219.   _dpsF = _dpsStat;    /* assign automatic variable */
  1220.  
  1221.   _dpsP[0].val.realVal =
  1222.   _dpsP[3].val.realVal =
  1223.   _dpsP[12].val.realVal = x;
  1224.   _dpsP[1].val.realVal =
  1225.   _dpsP[10].val.realVal =
  1226.   _dpsP[13].val.realVal = y;
  1227.   _dpsP[6].val.realVal =
  1228.   _dpsP[9].val.realVal = xn;
  1229.   _dpsP[4].val.realVal =
  1230.   _dpsP[7].val.realVal = yn;
  1231.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,132);
  1232.   if (0) *pad = 0;    /* quiets compiler warnings */
  1233. }
  1234. #line 194 "plotview.psw"
  1235.  
  1236.