home *** CD-ROM | disk | FTP | other *** search
/ Nebula / nebula.bin / SourceCode / Plotter / drawingFuncs.c < prev    next >
C/C++ Source or Header  |  1991-02-25  |  25KB  |  713 lines
  1. /* drawingFuncs.c generated from drawingFuncs.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 "drawingFuncs.psw"
  9. #line 10 "drawingFuncs.c"
  10. void loadPSProcedures( 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.     DPSBinObjGeneric obj24;
  42.     DPSBinObjGeneric obj25;
  43.     DPSBinObjGeneric obj26;
  44.     DPSBinObjGeneric obj27;
  45.     DPSBinObjGeneric obj28;
  46.     DPSBinObjGeneric obj29;
  47.     DPSBinObjGeneric obj30;
  48.     DPSBinObjGeneric obj31;
  49.     DPSBinObjGeneric obj32;
  50.     DPSBinObjGeneric obj33;
  51.     DPSBinObjGeneric obj34;
  52.     DPSBinObjGeneric obj35;
  53.     DPSBinObjGeneric obj36;
  54.     DPSBinObjGeneric obj37;
  55.     DPSBinObjGeneric obj38;
  56.     DPSBinObjGeneric obj39;
  57.     DPSBinObjGeneric obj40;
  58.     DPSBinObjGeneric obj41;
  59.     DPSBinObjGeneric obj42;
  60.     DPSBinObjGeneric obj43;
  61.     DPSBinObjGeneric obj44;
  62.     DPSBinObjGeneric obj45;
  63.     DPSBinObjGeneric obj46;
  64.     DPSBinObjGeneric obj47;
  65.     DPSBinObjGeneric obj48;
  66.     DPSBinObjGeneric obj49;
  67.     DPSBinObjGeneric obj50;
  68.     DPSBinObjGeneric obj51;
  69.     DPSBinObjGeneric obj52;
  70.     DPSBinObjGeneric obj53;
  71.     DPSBinObjGeneric obj54;
  72.     DPSBinObjGeneric obj55;
  73.     DPSBinObjGeneric obj56;
  74.     DPSBinObjGeneric obj57;
  75.     DPSBinObjGeneric obj58;
  76.     DPSBinObjGeneric obj59;
  77.     DPSBinObjGeneric obj60;
  78.     DPSBinObjGeneric obj61;
  79.     DPSBinObjGeneric obj62;
  80.     DPSBinObjGeneric obj63;
  81.     DPSBinObjGeneric obj64;
  82.     DPSBinObjGeneric obj65;
  83.     DPSBinObjGeneric obj66;
  84.     DPSBinObjGeneric obj67;
  85.     DPSBinObjGeneric obj68;
  86.     DPSBinObjGeneric obj69;
  87.     DPSBinObjGeneric obj70;
  88.     DPSBinObjGeneric obj71;
  89.     DPSBinObjGeneric obj72;
  90.     DPSBinObjGeneric obj73;
  91.     DPSBinObjGeneric obj74;
  92.     DPSBinObjGeneric obj75;
  93.     DPSBinObjGeneric obj76;
  94.     } _dpsQ;
  95.   static const _dpsQ _dpsStat = {
  96.     DPS_DEF_TOKENTYPE, 30, 620,
  97.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* xpos */
  98.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  99.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  100.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* ypos */
  101.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  102.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  103.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* ticklength */
  104.     {DPS_LITERAL|DPS_ARRAY, 0, 10, 536},
  105.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  106.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* getticklength */
  107.     {DPS_EXEC|DPS_ARRAY, 0, 8, 472},
  108.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  109.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* vtick */
  110.     {DPS_EXEC|DPS_ARRAY, 0, 5, 432},
  111.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  112.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* htick */
  113.     {DPS_EXEC|DPS_ARRAY, 0, 4, 400},
  114.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  115.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* increase-x */
  116.     {DPS_EXEC|DPS_ARRAY, 0, 5, 360},
  117.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  118.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* decrease-x */
  119.     {DPS_EXEC|DPS_ARRAY, 0, 5, 320},
  120.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  121.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* increase-y */
  122.     {DPS_EXEC|DPS_ARRAY, 0, 5, 280},
  123.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  124.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* decrease-y */
  125.     {DPS_EXEC|DPS_ARRAY, 0, 5, 240},
  126.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  127.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* ypos */
  128.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ypos */
  129.     {DPS_LITERAL|DPS_INT, 0, 0, 10},
  130.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},    /* sub */
  131.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  132.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* ypos */
  133.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ypos */
  134.     {DPS_LITERAL|DPS_INT, 0, 0, 10},
  135.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  136.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  137.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* xpos */
  138.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xpos */
  139.     {DPS_LITERAL|DPS_INT, 0, 0, 10},
  140.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},    /* sub */
  141.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  142.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* xpos */
  143.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xpos */
  144.     {DPS_LITERAL|DPS_INT, 0, 0, 10},
  145.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  146.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  147.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  148.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  149.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 133},    /* rlineto */
  150.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167},    /* stroke */
  151.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  152.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  153.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},    /* exch */
  154.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 133},    /* rlineto */
  155.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167},    /* stroke */
  156.     {DPS_LITERAL|DPS_INT, 0, 0, 10},
  157.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 82},    /* idiv */
  158.     {DPS_LITERAL|DPS_INT, 0, 0, 10},
  159.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 106},    /* mod */
  160.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 0},    /* abs */
  161.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ticklength */
  162.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},    /* exch */
  163.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 75},    /* get */
  164.     {DPS_LITERAL|DPS_INT, 0, 0, 8},
  165.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  166.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  167.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  168.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  169.     {DPS_LITERAL|DPS_INT, 0, 0, 5},
  170.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  171.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  172.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  173.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  174.     }; /* _dpsQ */
  175.   _dpsQ _dpsF;    /* local copy  */
  176.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  177.   register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  178.   static long int _dpsCodes[19] = {-1};
  179.   {
  180. if (_dpsCodes[0] < 0) {
  181.     static const char * const _dps_names[] = {
  182.     "xpos",
  183.     (char *) 0 ,
  184.     (char *) 0 ,
  185.     (char *) 0 ,
  186.     (char *) 0 ,
  187.     "ypos",
  188.     (char *) 0 ,
  189.     (char *) 0 ,
  190.     (char *) 0 ,
  191.     (char *) 0 ,
  192.     "ticklength",
  193.     (char *) 0 ,
  194.     "getticklength",
  195.     "vtick",
  196.     "htick",
  197.     "increase-x",
  198.     "decrease-x",
  199.     "increase-y",
  200.     "decrease-y"};
  201.     long int *_dps_nameVals[19];
  202.     _dps_nameVals[0] = &_dpsCodes[0];
  203.     _dps_nameVals[1] = &_dpsCodes[1];
  204.     _dps_nameVals[2] = &_dpsCodes[2];
  205.     _dps_nameVals[3] = &_dpsCodes[3];
  206.     _dps_nameVals[4] = &_dpsCodes[4];
  207.     _dps_nameVals[5] = &_dpsCodes[5];
  208.     _dps_nameVals[6] = &_dpsCodes[6];
  209.     _dps_nameVals[7] = &_dpsCodes[7];
  210.     _dps_nameVals[8] = &_dpsCodes[8];
  211.     _dps_nameVals[9] = &_dpsCodes[9];
  212.     _dps_nameVals[10] = &_dpsCodes[10];
  213.     _dps_nameVals[11] = &_dpsCodes[11];
  214.     _dps_nameVals[12] = &_dpsCodes[12];
  215.     _dps_nameVals[13] = &_dpsCodes[13];
  216.     _dps_nameVals[14] = &_dpsCodes[14];
  217.     _dps_nameVals[15] = &_dpsCodes[15];
  218.     _dps_nameVals[16] = &_dpsCodes[16];
  219.     _dps_nameVals[17] = &_dpsCodes[17];
  220.     _dps_nameVals[18] = &_dpsCodes[18];
  221.  
  222.     DPSMapNames(_dpsCurCtxt, 19, _dps_names, _dps_nameVals);
  223.     }
  224.   }
  225.  
  226.   _dpsF = _dpsStat;    /* assign automatic variable */
  227.  
  228.   _dpsP[0].val.nameVal = _dpsCodes[0];
  229.   _dpsP[46].val.nameVal = _dpsCodes[1];
  230.   _dpsP[45].val.nameVal = _dpsCodes[2];
  231.   _dpsP[41].val.nameVal = _dpsCodes[3];
  232.   _dpsP[40].val.nameVal = _dpsCodes[4];
  233.   _dpsP[3].val.nameVal = _dpsCodes[5];
  234.   _dpsP[36].val.nameVal = _dpsCodes[6];
  235.   _dpsP[35].val.nameVal = _dpsCodes[7];
  236.   _dpsP[31].val.nameVal = _dpsCodes[8];
  237.   _dpsP[30].val.nameVal = _dpsCodes[9];
  238.   _dpsP[6].val.nameVal = _dpsCodes[10];
  239.   _dpsP[64].val.nameVal = _dpsCodes[11];
  240.   _dpsP[9].val.nameVal = _dpsCodes[12];
  241.   _dpsP[12].val.nameVal = _dpsCodes[13];
  242.   _dpsP[15].val.nameVal = _dpsCodes[14];
  243.   _dpsP[18].val.nameVal = _dpsCodes[15];
  244.   _dpsP[21].val.nameVal = _dpsCodes[16];
  245.   _dpsP[24].val.nameVal = _dpsCodes[17];
  246.   _dpsP[27].val.nameVal = _dpsCodes[18];
  247.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,620);
  248. }
  249. #line 21 "drawingFuncs.psw"
  250.  
  251. #line 252 "drawingFuncs.c"
  252. void drawCircle(float x, float y, float radius)
  253. {
  254.   typedef struct {
  255.     unsigned char tokenType;
  256.     unsigned char topLevelCount;
  257.     unsigned short nBytes;
  258.  
  259.     DPSBinObjGeneric obj0;
  260.     DPSBinObjReal obj1;
  261.     DPSBinObjReal obj2;
  262.     DPSBinObjReal obj3;
  263.     DPSBinObjGeneric obj4;
  264.     DPSBinObjGeneric obj5;
  265.     DPSBinObjGeneric obj6;
  266.     DPSBinObjGeneric obj7;
  267.     DPSBinObjGeneric obj8;
  268.     } _dpsQ;
  269.   static const _dpsQ _dpsStat = {
  270.     DPS_DEF_TOKENTYPE, 9, 76,
  271.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 111},    /* newpath */
  272.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  273.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  274.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: radius */
  275.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  276.     {DPS_LITERAL|DPS_INT, 0, 0, 360},
  277.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 5},    /* arc */
  278.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 22},    /* closepath */
  279.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167},    /* stroke */
  280.     }; /* _dpsQ */
  281.   _dpsQ _dpsF;    /* local copy  */
  282.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  283.   register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  284.   _dpsF = _dpsStat;    /* assign automatic variable */
  285.  
  286.   _dpsP[1].val.realVal = x;
  287.   _dpsP[2].val.realVal = y;
  288.   _dpsP[3].val.realVal = radius;
  289.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,76);
  290. }
  291. #line 29 "drawingFuncs.psw"
  292.  
  293. #line 294 "drawingFuncs.c"
  294. void drawAxes(float x, float y, float width, float height)
  295. {
  296.   typedef struct {
  297.     unsigned char tokenType;
  298.     unsigned char topLevelCount;
  299.     unsigned short nBytes;
  300.  
  301.     DPSBinObjGeneric obj0;
  302.     DPSBinObjGeneric obj1;
  303.     DPSBinObjReal obj2;
  304.     DPSBinObjReal obj3;
  305.     DPSBinObjGeneric obj4;
  306.     DPSBinObjGeneric obj5;
  307.     DPSBinObjGeneric obj6;
  308.     DPSBinObjGeneric obj7;
  309.     DPSBinObjGeneric obj8;
  310.     DPSBinObjReal obj9;
  311.     DPSBinObjReal obj10;
  312.     DPSBinObjGeneric obj11;
  313.     DPSBinObjGeneric obj12;
  314.     DPSBinObjGeneric obj13;
  315.     DPSBinObjReal obj14;
  316.     DPSBinObjGeneric obj15;
  317.     DPSBinObjGeneric obj16;
  318.     DPSBinObjGeneric obj17;
  319.     DPSBinObjGeneric obj18;
  320.     DPSBinObjGeneric obj19;
  321.     DPSBinObjGeneric obj20;
  322.     DPSBinObjGeneric obj21;
  323.     DPSBinObjGeneric obj22;
  324.     DPSBinObjGeneric obj23;
  325.     DPSBinObjReal obj24;
  326.     DPSBinObjGeneric obj25;
  327.     DPSBinObjGeneric obj26;
  328.     DPSBinObjReal obj27;
  329.     DPSBinObjGeneric obj28;
  330.     DPSBinObjGeneric obj29;
  331.     DPSBinObjGeneric obj30;
  332.     DPSBinObjGeneric obj31;
  333.     DPSBinObjGeneric obj32;
  334.     DPSBinObjGeneric obj33;
  335.     DPSBinObjGeneric obj34;
  336.     DPSBinObjGeneric obj35;
  337.     DPSBinObjGeneric obj36;
  338.     DPSBinObjGeneric obj37;
  339.     DPSBinObjReal obj38;
  340.     DPSBinObjGeneric obj39;
  341.     DPSBinObjGeneric obj40;
  342.     DPSBinObjGeneric obj41;
  343.     DPSBinObjGeneric obj42;
  344.     DPSBinObjGeneric obj43;
  345.     DPSBinObjGeneric obj44;
  346.     DPSBinObjGeneric obj45;
  347.     DPSBinObjGeneric obj46;
  348.     DPSBinObjGeneric obj47;
  349.     DPSBinObjGeneric obj48;
  350.     DPSBinObjGeneric obj49;
  351.     DPSBinObjGeneric obj50;
  352.     DPSBinObjGeneric obj51;
  353.     DPSBinObjGeneric obj52;
  354.     DPSBinObjGeneric obj53;
  355.     DPSBinObjGeneric obj54;
  356.     DPSBinObjGeneric obj55;
  357.     DPSBinObjGeneric obj56;
  358.     DPSBinObjGeneric obj57;
  359.     DPSBinObjGeneric obj58;
  360.     DPSBinObjGeneric obj59;
  361.     DPSBinObjGeneric obj60;
  362.     DPSBinObjGeneric obj61;
  363.     DPSBinObjGeneric obj62;
  364.     DPSBinObjGeneric obj63;
  365.     DPSBinObjGeneric obj64;
  366.     DPSBinObjGeneric obj65;
  367.     DPSBinObjGeneric obj66;
  368.     DPSBinObjGeneric obj67;
  369.     DPSBinObjGeneric obj68;
  370.     DPSBinObjGeneric obj69;
  371.     DPSBinObjGeneric obj70;
  372.     DPSBinObjGeneric obj71;
  373.     DPSBinObjGeneric obj72;
  374.     DPSBinObjGeneric obj73;
  375.     DPSBinObjGeneric obj74;
  376.     DPSBinObjGeneric obj75;
  377.     DPSBinObjGeneric obj76;
  378.     DPSBinObjGeneric obj77;
  379.     DPSBinObjGeneric obj78;
  380.     DPSBinObjGeneric obj79;
  381.     DPSBinObjGeneric obj80;
  382.     DPSBinObjGeneric obj81;
  383.     DPSBinObjGeneric obj82;
  384.     DPSBinObjGeneric obj83;
  385.     DPSBinObjGeneric obj84;
  386.     DPSBinObjGeneric obj85;
  387.     DPSBinObjGeneric obj86;
  388.     DPSBinObjGeneric obj87;
  389.     DPSBinObjGeneric obj88;
  390.     DPSBinObjGeneric obj89;
  391.     DPSBinObjGeneric obj90;
  392.     DPSBinObjGeneric obj91;
  393.     DPSBinObjGeneric obj92;
  394.     DPSBinObjGeneric obj93;
  395.     DPSBinObjGeneric obj94;
  396.     DPSBinObjGeneric obj95;
  397.     DPSBinObjGeneric obj96;
  398.     DPSBinObjGeneric obj97;
  399.     DPSBinObjGeneric obj98;
  400.     DPSBinObjGeneric obj99;
  401.     DPSBinObjGeneric obj100;
  402.     DPSBinObjGeneric obj101;
  403.     DPSBinObjReal obj102;
  404.     DPSBinObjGeneric obj103;
  405.     DPSBinObjGeneric obj104;
  406.     DPSBinObjGeneric obj105;
  407.     DPSBinObjGeneric obj106;
  408.     DPSBinObjGeneric obj107;
  409.     DPSBinObjGeneric obj108;
  410.     DPSBinObjGeneric obj109;
  411.     DPSBinObjGeneric obj110;
  412.     DPSBinObjGeneric obj111;
  413.     DPSBinObjGeneric obj112;
  414.     DPSBinObjGeneric obj113;
  415.     DPSBinObjGeneric obj114;
  416.     DPSBinObjGeneric obj115;
  417.     DPSBinObjGeneric obj116;
  418.     DPSBinObjGeneric obj117;
  419.     DPSBinObjGeneric obj118;
  420.     DPSBinObjGeneric obj119;
  421.     DPSBinObjGeneric obj120;
  422.     DPSBinObjGeneric obj121;
  423.     DPSBinObjGeneric obj122;
  424.     DPSBinObjGeneric obj123;
  425.     DPSBinObjGeneric obj124;
  426.     DPSBinObjGeneric obj125;
  427.     DPSBinObjGeneric obj126;
  428.     DPSBinObjGeneric obj127;
  429.     DPSBinObjGeneric obj128;
  430.     } _dpsQ;
  431.   static const _dpsQ _dpsStat = {
  432.     DPS_DEF_TOKENTYPE, 73, 1036,
  433.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 78},    /* gsave */
  434.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* xmax */
  435.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  436.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: width */
  437.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  438.     {DPS_LITERAL|DPS_INT, 0, 0, 1},
  439.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},    /* sub */
  440.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  441.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* ymax */
  442.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  443.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: height */
  444.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  445.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  446.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* ymin */
  447.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  448.     {DPS_LITERAL|DPS_INT, 0, 0, 1},
  449.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  450.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  451.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* xpos */
  452.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  453.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  454.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* ypos */
  455.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  456.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  457.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  458.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ymin */
  459.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  460.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  461.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ymax */
  462.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  463.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xmax */
  464.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ymax */
  465.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  466.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xmax */
  467.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ymin */
  468.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  469.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 22},    /* closepath */
  470.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167},    /* stroke */
  471.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  472.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  473.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  474.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xmax */
  475.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  476.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  477.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167},    /* stroke */
  478.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  479.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ymin */
  480.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  481.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  482.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ymax */
  483.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  484.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167},    /* stroke */
  485.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  486.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  487.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  488.     {DPS_EXEC|DPS_ARRAY, 0, 6, 920},
  489.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 101},    /* loop */
  490.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  491.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  492.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  493.     {DPS_EXEC|DPS_ARRAY, 0, 6, 808},
  494.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 101},    /* loop */
  495.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  496.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  497.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  498.     {DPS_EXEC|DPS_ARRAY, 0, 6, 696},
  499.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 101},    /* loop */
  500.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  501.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  502.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  503.     {DPS_EXEC|DPS_ARRAY, 0, 6, 584},
  504.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 101},    /* loop */
  505.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 77},    /* grestore */
  506.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ypos */
  507.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ymin */
  508.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 74},    /* ge */
  509.     {DPS_EXEC|DPS_ARRAY, 0, 7, 640},
  510.     {DPS_EXEC|DPS_ARRAY, 0, 1, 632},
  511.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 85},    /* ifelse */
  512.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 64},    /* exit */
  513.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ypos */
  514.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* getticklength */
  515.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  516.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  517.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ypos */
  518.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* htick */
  519.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* decrease-y */
  520.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ypos */
  521.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ymax */
  522.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 97},    /* le */
  523.     {DPS_EXEC|DPS_ARRAY, 0, 7, 752},
  524.     {DPS_EXEC|DPS_ARRAY, 0, 1, 744},
  525.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 85},    /* ifelse */
  526.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 64},    /* exit */
  527.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ypos */
  528.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* getticklength */
  529.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  530.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  531.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ypos */
  532.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* htick */
  533.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* increase-y */
  534.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xpos */
  535.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  536.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 74},    /* ge */
  537.     {DPS_EXEC|DPS_ARRAY, 0, 7, 864},
  538.     {DPS_EXEC|DPS_ARRAY, 0, 1, 856},
  539.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 85},    /* ifelse */
  540.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 64},    /* exit */
  541.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xpos */
  542.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* getticklength */
  543.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  544.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xpos */
  545.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  546.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* vtick */
  547.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* decrease-x */
  548.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xpos */
  549.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xmax */
  550.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 97},    /* le */
  551.     {DPS_EXEC|DPS_ARRAY, 0, 7, 976},
  552.     {DPS_EXEC|DPS_ARRAY, 0, 1, 968},
  553.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 85},    /* ifelse */
  554.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 64},    /* exit */
  555.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xpos */
  556.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* getticklength */
  557.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  558.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xpos */
  559.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  560.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* vtick */
  561.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* increase-x */
  562.     }; /* _dpsQ */
  563.   _dpsQ _dpsF;    /* local copy  */
  564.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  565.   register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  566.   static long int _dpsCodes[41] = {-1};
  567.   {
  568. if (_dpsCodes[0] < 0) {
  569.     static const char * const _dps_names[] = {
  570.     "xmax",
  571.     (char *) 0 ,
  572.     (char *) 0 ,
  573.     (char *) 0 ,
  574.     (char *) 0 ,
  575.     "ymax",
  576.     (char *) 0 ,
  577.     (char *) 0 ,
  578.     (char *) 0 ,
  579.     (char *) 0 ,
  580.     "ymin",
  581.     (char *) 0 ,
  582.     (char *) 0 ,
  583.     (char *) 0 ,
  584.     (char *) 0 ,
  585.     "xpos",
  586.     (char *) 0 ,
  587.     (char *) 0 ,
  588.     (char *) 0 ,
  589.     (char *) 0 ,
  590.     (char *) 0 ,
  591.     (char *) 0 ,
  592.     "ypos",
  593.     (char *) 0 ,
  594.     (char *) 0 ,
  595.     (char *) 0 ,
  596.     (char *) 0 ,
  597.     (char *) 0 ,
  598.     (char *) 0 ,
  599.     "getticklength",
  600.     (char *) 0 ,
  601.     (char *) 0 ,
  602.     (char *) 0 ,
  603.     "htick",
  604.     (char *) 0 ,
  605.     "decrease-y",
  606.     "increase-y",
  607.     "vtick",
  608.     (char *) 0 ,
  609.     "decrease-x",
  610.     "increase-x"};
  611.     long int *_dps_nameVals[41];
  612.     _dps_nameVals[0] = &_dpsCodes[0];
  613.     _dps_nameVals[1] = &_dpsCodes[1];
  614.     _dps_nameVals[2] = &_dpsCodes[2];
  615.     _dps_nameVals[3] = &_dpsCodes[3];
  616.     _dps_nameVals[4] = &_dpsCodes[4];
  617.     _dps_nameVals[5] = &_dpsCodes[5];
  618.     _dps_nameVals[6] = &_dpsCodes[6];
  619.     _dps_nameVals[7] = &_dpsCodes[7];
  620.     _dps_nameVals[8] = &_dpsCodes[8];
  621.     _dps_nameVals[9] = &_dpsCodes[9];
  622.     _dps_nameVals[10] = &_dpsCodes[10];
  623.     _dps_nameVals[11] = &_dpsCodes[11];
  624.     _dps_nameVals[12] = &_dpsCodes[12];
  625.     _dps_nameVals[13] = &_dpsCodes[13];
  626.     _dps_nameVals[14] = &_dpsCodes[14];
  627.     _dps_nameVals[15] = &_dpsCodes[15];
  628.     _dps_nameVals[16] = &_dpsCodes[16];
  629.     _dps_nameVals[17] = &_dpsCodes[17];
  630.     _dps_nameVals[18] = &_dpsCodes[18];
  631.     _dps_nameVals[19] = &_dpsCodes[19];
  632.     _dps_nameVals[20] = &_dpsCodes[20];
  633.     _dps_nameVals[21] = &_dpsCodes[21];
  634.     _dps_nameVals[22] = &_dpsCodes[22];
  635.     _dps_nameVals[23] = &_dpsCodes[23];
  636.     _dps_nameVals[24] = &_dpsCodes[24];
  637.     _dps_nameVals[25] = &_dpsCodes[25];
  638.     _dps_nameVals[26] = &_dpsCodes[26];
  639.     _dps_nameVals[27] = &_dpsCodes[27];
  640.     _dps_nameVals[28] = &_dpsCodes[28];
  641.     _dps_nameVals[29] = &_dpsCodes[29];
  642.     _dps_nameVals[30] = &_dpsCodes[30];
  643.     _dps_nameVals[31] = &_dpsCodes[31];
  644.     _dps_nameVals[32] = &_dpsCodes[32];
  645.     _dps_nameVals[33] = &_dpsCodes[33];
  646.     _dps_nameVals[34] = &_dpsCodes[34];
  647.     _dps_nameVals[35] = &_dpsCodes[35];
  648.     _dps_nameVals[36] = &_dpsCodes[36];
  649.     _dps_nameVals[37] = &_dpsCodes[37];
  650.     _dps_nameVals[38] = &_dpsCodes[38];
  651.     _dps_nameVals[39] = &_dpsCodes[39];
  652.     _dps_nameVals[40] = &_dpsCodes[40];
  653.  
  654.     DPSMapNames(_dpsCurCtxt, 41, _dps_names, _dps_nameVals);
  655.     }
  656.   }
  657.  
  658.   _dpsF = _dpsStat;    /* assign automatic variable */
  659.  
  660.   _dpsP[2].val.realVal =
  661.   _dpsP[24].val.realVal =
  662.   _dpsP[27].val.realVal =
  663.   _dpsP[38].val.realVal =
  664.   _dpsP[102].val.realVal = x;
  665.   _dpsP[9].val.realVal =
  666.   _dpsP[14].val.realVal = y;
  667.   _dpsP[3].val.realVal = width;
  668.   _dpsP[10].val.realVal = height;
  669.   _dpsP[1].val.nameVal = _dpsCodes[0];
  670.   _dpsP[116].val.nameVal = _dpsCodes[1];
  671.   _dpsP[41].val.nameVal = _dpsCodes[2];
  672.   _dpsP[33].val.nameVal = _dpsCodes[3];
  673.   _dpsP[30].val.nameVal = _dpsCodes[4];
  674.   _dpsP[8].val.nameVal = _dpsCodes[5];
  675.   _dpsP[88].val.nameVal = _dpsCodes[6];
  676.   _dpsP[49].val.nameVal = _dpsCodes[7];
  677.   _dpsP[31].val.nameVal = _dpsCodes[8];
  678.   _dpsP[28].val.nameVal = _dpsCodes[9];
  679.   _dpsP[13].val.nameVal = _dpsCodes[10];
  680.   _dpsP[74].val.nameVal = _dpsCodes[11];
  681.   _dpsP[46].val.nameVal = _dpsCodes[12];
  682.   _dpsP[34].val.nameVal = _dpsCodes[13];
  683.   _dpsP[25].val.nameVal = _dpsCodes[14];
  684.   _dpsP[18].val.nameVal = _dpsCodes[15];
  685.   _dpsP[125].val.nameVal = _dpsCodes[16];
  686.   _dpsP[122].val.nameVal = _dpsCodes[17];
  687.   _dpsP[115].val.nameVal = _dpsCodes[18];
  688.   _dpsP[111].val.nameVal = _dpsCodes[19];
  689.   _dpsP[108].val.nameVal = _dpsCodes[20];
  690.   _dpsP[101].val.nameVal = _dpsCodes[21];
  691.   _dpsP[21].val.nameVal = _dpsCodes[22];
  692.   _dpsP[98].val.nameVal = _dpsCodes[23];
  693.   _dpsP[94].val.nameVal = _dpsCodes[24];
  694.   _dpsP[87].val.nameVal = _dpsCodes[25];
  695.   _dpsP[84].val.nameVal = _dpsCodes[26];
  696.   _dpsP[80].val.nameVal = _dpsCodes[27];
  697.   _dpsP[73].val.nameVal = _dpsCodes[28];
  698.   _dpsP[81].val.nameVal = _dpsCodes[29];
  699.   _dpsP[123].val.nameVal = _dpsCodes[30];
  700.   _dpsP[109].val.nameVal = _dpsCodes[31];
  701.   _dpsP[95].val.nameVal = _dpsCodes[32];
  702.   _dpsP[85].val.nameVal = _dpsCodes[33];
  703.   _dpsP[99].val.nameVal = _dpsCodes[34];
  704.   _dpsP[86].val.nameVal = _dpsCodes[35];
  705.   _dpsP[100].val.nameVal = _dpsCodes[36];
  706.   _dpsP[113].val.nameVal = _dpsCodes[37];
  707.   _dpsP[127].val.nameVal = _dpsCodes[38];
  708.   _dpsP[114].val.nameVal = _dpsCodes[39];
  709.   _dpsP[128].val.nameVal = _dpsCodes[40];
  710.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,1036);
  711. }
  712. #line 76 "drawingFuncs.psw"
  713.