home *** CD-ROM | disk | FTP | other *** search
/ Nebula 1995 August / NEBULA.mdf / SourceCode / NeXTSTEPAdvantage / Plotter / drawingFuncs.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-01-18  |  19.7 KB  |  567 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. /*
  10.  * drawingFuncs.psw  
  11.  *
  12.  * You may freely copy, distribute, and reuse the code in this example.
  13.  * NeXT disclaims any warranty of any kind, expressed or implied, as to its
  14.  * fitness for any particular use.
  15.  *
  16.  */ 
  17. #line 18 "drawingFuncs.c"
  18. void loadPSProcedures( void )
  19. {
  20.   typedef struct {
  21.     unsigned char tokenType;
  22.     unsigned char topLevelCount;
  23.     unsigned short nBytes;
  24.  
  25.     DPSBinObjGeneric obj0;
  26.     DPSBinObjGeneric obj1;
  27.     DPSBinObjGeneric obj2;
  28.     DPSBinObjGeneric obj3;
  29.     DPSBinObjGeneric obj4;
  30.     DPSBinObjGeneric obj5;
  31.     DPSBinObjGeneric obj6;
  32.     DPSBinObjGeneric obj7;
  33.     DPSBinObjGeneric obj8;
  34.     DPSBinObjGeneric obj9;
  35.     DPSBinObjGeneric obj10;
  36.     DPSBinObjGeneric obj11;
  37.     DPSBinObjGeneric obj12;
  38.     DPSBinObjGeneric obj13;
  39.     DPSBinObjGeneric obj14;
  40.     DPSBinObjGeneric obj15;
  41.     DPSBinObjGeneric obj16;
  42.     DPSBinObjGeneric obj17;
  43.     DPSBinObjGeneric obj18;
  44.     DPSBinObjGeneric obj19;
  45.     DPSBinObjGeneric obj20;
  46.     DPSBinObjGeneric obj21;
  47.     DPSBinObjGeneric obj22;
  48.     DPSBinObjGeneric obj23;
  49.     DPSBinObjGeneric obj24;
  50.     DPSBinObjGeneric obj25;
  51.     DPSBinObjGeneric obj26;
  52.     DPSBinObjGeneric obj27;
  53.     DPSBinObjGeneric obj28;
  54.     DPSBinObjGeneric obj29;
  55.     DPSBinObjGeneric obj30;
  56.     DPSBinObjGeneric obj31;
  57.     DPSBinObjGeneric obj32;
  58.     DPSBinObjGeneric obj33;
  59.     DPSBinObjGeneric obj34;
  60.     DPSBinObjGeneric obj35;
  61.     DPSBinObjGeneric obj36;
  62.     DPSBinObjGeneric obj37;
  63.     DPSBinObjGeneric obj38;
  64.     DPSBinObjGeneric obj39;
  65.     DPSBinObjGeneric obj40;
  66.     DPSBinObjGeneric obj41;
  67.     DPSBinObjGeneric obj42;
  68.     DPSBinObjGeneric obj43;
  69.     DPSBinObjGeneric obj44;
  70.     DPSBinObjGeneric obj45;
  71.     DPSBinObjGeneric obj46;
  72.     DPSBinObjGeneric obj47;
  73.     DPSBinObjGeneric obj48;
  74.     DPSBinObjGeneric obj49;
  75.     DPSBinObjGeneric obj50;
  76.     DPSBinObjGeneric obj51;
  77.     DPSBinObjGeneric obj52;
  78.     DPSBinObjGeneric obj53;
  79.     DPSBinObjGeneric obj54;
  80.     DPSBinObjGeneric obj55;
  81.     DPSBinObjGeneric obj56;
  82.     DPSBinObjGeneric obj57;
  83.     DPSBinObjGeneric obj58;
  84.     DPSBinObjGeneric obj59;
  85.     DPSBinObjGeneric obj60;
  86.     DPSBinObjGeneric obj61;
  87.     DPSBinObjGeneric obj62;
  88.     DPSBinObjGeneric obj63;
  89.     DPSBinObjGeneric obj64;
  90.     DPSBinObjGeneric obj65;
  91.     DPSBinObjGeneric obj66;
  92.     DPSBinObjGeneric obj67;
  93.     DPSBinObjGeneric obj68;
  94.     DPSBinObjGeneric obj69;
  95.     DPSBinObjGeneric obj70;
  96.     DPSBinObjGeneric obj71;
  97.     DPSBinObjGeneric obj72;
  98.     DPSBinObjGeneric obj73;
  99.     DPSBinObjGeneric obj74;
  100.     DPSBinObjGeneric obj75;
  101.     DPSBinObjGeneric obj76;
  102.     char obj77[10];
  103.     char obj78[4];
  104.     char obj79[4];
  105.     char obj80[10];
  106.     char obj81[10];
  107.     char obj82[10];
  108.     char obj83[10];
  109.     char obj84[5];
  110.     char obj85[5];
  111.     char obj86[13];
  112.     } _dpsQ;
  113.   static const _dpsQ _dpsF = {
  114.     DPS_DEF_TOKENTYPE, 30, 701,
  115.     {DPS_LITERAL|DPS_NAME, 0, 4, 626},    /* xpos */
  116.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  117.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  118.     {DPS_LITERAL|DPS_NAME, 0, 4, 630},    /* ypos */
  119.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  120.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  121.     {DPS_LITERAL|DPS_NAME, 0, 10, 616},    /* ticklength */
  122.     {DPS_LITERAL|DPS_ARRAY, 0, 10, 536},
  123.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  124.     {DPS_LITERAL|DPS_NAME, 0, 13, 684},    /* getticklength */
  125.     {DPS_EXEC|DPS_ARRAY, 0, 8, 472},
  126.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  127.     {DPS_LITERAL|DPS_NAME, 0, 5, 679},    /* vtick */
  128.     {DPS_EXEC|DPS_ARRAY, 0, 5, 432},
  129.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  130.     {DPS_LITERAL|DPS_NAME, 0, 5, 674},    /* htick */
  131.     {DPS_EXEC|DPS_ARRAY, 0, 4, 400},
  132.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  133.     {DPS_LITERAL|DPS_NAME, 0, 10, 664},    /* increase-x */
  134.     {DPS_EXEC|DPS_ARRAY, 0, 5, 360},
  135.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  136.     {DPS_LITERAL|DPS_NAME, 0, 10, 654},    /* decrease-x */
  137.     {DPS_EXEC|DPS_ARRAY, 0, 5, 320},
  138.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  139.     {DPS_LITERAL|DPS_NAME, 0, 10, 644},    /* increase-y */
  140.     {DPS_EXEC|DPS_ARRAY, 0, 5, 280},
  141.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  142.     {DPS_LITERAL|DPS_NAME, 0, 10, 634},    /* decrease-y */
  143.     {DPS_EXEC|DPS_ARRAY, 0, 5, 240},
  144.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  145.     {DPS_LITERAL|DPS_NAME, 0, 4, 630},    /* ypos */
  146.     {DPS_EXEC|DPS_NAME, 0, 4, 630},    /* ypos */
  147.     {DPS_LITERAL|DPS_INT, 0, 0, 10},
  148.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},    /* sub */
  149.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  150.     {DPS_LITERAL|DPS_NAME, 0, 4, 630},    /* ypos */
  151.     {DPS_EXEC|DPS_NAME, 0, 4, 630},    /* ypos */
  152.     {DPS_LITERAL|DPS_INT, 0, 0, 10},
  153.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  154.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  155.     {DPS_LITERAL|DPS_NAME, 0, 4, 626},    /* xpos */
  156.     {DPS_EXEC|DPS_NAME, 0, 4, 626},    /* xpos */
  157.     {DPS_LITERAL|DPS_INT, 0, 0, 10},
  158.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},    /* sub */
  159.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  160.     {DPS_LITERAL|DPS_NAME, 0, 4, 626},    /* xpos */
  161.     {DPS_EXEC|DPS_NAME, 0, 4, 626},    /* xpos */
  162.     {DPS_LITERAL|DPS_INT, 0, 0, 10},
  163.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  164.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  165.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  166.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  167.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 133},    /* rlineto */
  168.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167},    /* stroke */
  169.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  170.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  171.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},    /* exch */
  172.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 133},    /* rlineto */
  173.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167},    /* stroke */
  174.     {DPS_LITERAL|DPS_INT, 0, 0, 10},
  175.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 82},    /* idiv */
  176.     {DPS_LITERAL|DPS_INT, 0, 0, 10},
  177.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 106},    /* mod */
  178.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 0},    /* abs */
  179.     {DPS_EXEC|DPS_NAME, 0, 10, 616},    /* ticklength */
  180.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},    /* exch */
  181.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 75},    /* get */
  182.     {DPS_LITERAL|DPS_INT, 0, 0, 8},
  183.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  184.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  185.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  186.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  187.     {DPS_LITERAL|DPS_INT, 0, 0, 5},
  188.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  189.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  190.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  191.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  192.     {'t','i','c','k','l','e','n','g','t','h'},
  193.     {'x','p','o','s'},
  194.     {'y','p','o','s'},
  195.     {'d','e','c','r','e','a','s','e','-','y'},
  196.     {'i','n','c','r','e','a','s','e','-','y'},
  197.     {'d','e','c','r','e','a','s','e','-','x'},
  198.     {'i','n','c','r','e','a','s','e','-','x'},
  199.     {'h','t','i','c','k'},
  200.     {'v','t','i','c','k'},
  201.     {'g','e','t','t','i','c','k','l','e','n','g','t','h'},
  202.     }; /* _dpsQ */
  203.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  204.   char pad[3];
  205.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,701);
  206.   if (0) *pad = 0;    /* quiets compiler warnings */
  207. }
  208. #line 30 "drawingFuncs.psw"
  209.  
  210. #line 211 "drawingFuncs.c"
  211. void drawCircle(float x, float y, float radius)
  212. {
  213.   typedef struct {
  214.     unsigned char tokenType;
  215.     unsigned char topLevelCount;
  216.     unsigned short nBytes;
  217.  
  218.     DPSBinObjGeneric obj0;
  219.     DPSBinObjReal obj1;
  220.     DPSBinObjReal obj2;
  221.     DPSBinObjReal obj3;
  222.     DPSBinObjGeneric obj4;
  223.     DPSBinObjGeneric obj5;
  224.     DPSBinObjGeneric obj6;
  225.     DPSBinObjGeneric obj7;
  226.     DPSBinObjGeneric obj8;
  227.     } _dpsQ;
  228.   static const _dpsQ _dpsStat = {
  229.     DPS_DEF_TOKENTYPE, 9, 76,
  230.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 111},    /* newpath */
  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: radius */
  234.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  235.     {DPS_LITERAL|DPS_INT, 0, 0, 360},
  236.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 5},    /* arc */
  237.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 22},    /* closepath */
  238.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167},    /* stroke */
  239.     }; /* _dpsQ */
  240.   _dpsQ _dpsF;    /* local copy  */
  241.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  242.   char pad[3];
  243.   register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  244.   _dpsF = _dpsStat;    /* assign automatic variable */
  245.  
  246.   _dpsP[1].val.realVal = x;
  247.   _dpsP[2].val.realVal = y;
  248.   _dpsP[3].val.realVal = radius;
  249.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,76);
  250.   if (0) *pad = 0;    /* quiets compiler warnings */
  251. }
  252. #line 38 "drawingFuncs.psw"
  253.  
  254. #line 255 "drawingFuncs.c"
  255. void drawAxes(float x, float y, float width, float height)
  256. {
  257.   typedef struct {
  258.     unsigned char tokenType;
  259.     unsigned char topLevelCount;
  260.     unsigned short nBytes;
  261.  
  262.     DPSBinObjGeneric obj0;
  263.     DPSBinObjGeneric obj1;
  264.     DPSBinObjReal obj2;
  265.     DPSBinObjReal obj3;
  266.     DPSBinObjGeneric obj4;
  267.     DPSBinObjGeneric obj5;
  268.     DPSBinObjGeneric obj6;
  269.     DPSBinObjGeneric obj7;
  270.     DPSBinObjGeneric obj8;
  271.     DPSBinObjReal obj9;
  272.     DPSBinObjReal obj10;
  273.     DPSBinObjGeneric obj11;
  274.     DPSBinObjGeneric obj12;
  275.     DPSBinObjGeneric obj13;
  276.     DPSBinObjReal obj14;
  277.     DPSBinObjGeneric obj15;
  278.     DPSBinObjGeneric obj16;
  279.     DPSBinObjGeneric obj17;
  280.     DPSBinObjGeneric obj18;
  281.     DPSBinObjGeneric obj19;
  282.     DPSBinObjGeneric obj20;
  283.     DPSBinObjGeneric obj21;
  284.     DPSBinObjGeneric obj22;
  285.     DPSBinObjGeneric obj23;
  286.     DPSBinObjReal obj24;
  287.     DPSBinObjGeneric obj25;
  288.     DPSBinObjGeneric obj26;
  289.     DPSBinObjReal obj27;
  290.     DPSBinObjGeneric obj28;
  291.     DPSBinObjGeneric obj29;
  292.     DPSBinObjGeneric obj30;
  293.     DPSBinObjGeneric obj31;
  294.     DPSBinObjGeneric obj32;
  295.     DPSBinObjGeneric obj33;
  296.     DPSBinObjGeneric obj34;
  297.     DPSBinObjGeneric obj35;
  298.     DPSBinObjGeneric obj36;
  299.     DPSBinObjGeneric obj37;
  300.     DPSBinObjReal obj38;
  301.     DPSBinObjGeneric obj39;
  302.     DPSBinObjGeneric obj40;
  303.     DPSBinObjGeneric obj41;
  304.     DPSBinObjGeneric obj42;
  305.     DPSBinObjGeneric obj43;
  306.     DPSBinObjGeneric obj44;
  307.     DPSBinObjGeneric obj45;
  308.     DPSBinObjGeneric obj46;
  309.     DPSBinObjGeneric obj47;
  310.     DPSBinObjGeneric obj48;
  311.     DPSBinObjGeneric obj49;
  312.     DPSBinObjGeneric obj50;
  313.     DPSBinObjGeneric obj51;
  314.     DPSBinObjGeneric obj52;
  315.     DPSBinObjGeneric obj53;
  316.     DPSBinObjGeneric obj54;
  317.     DPSBinObjGeneric obj55;
  318.     DPSBinObjGeneric obj56;
  319.     DPSBinObjGeneric obj57;
  320.     DPSBinObjGeneric obj58;
  321.     DPSBinObjGeneric obj59;
  322.     DPSBinObjGeneric obj60;
  323.     DPSBinObjGeneric obj61;
  324.     DPSBinObjGeneric obj62;
  325.     DPSBinObjGeneric obj63;
  326.     DPSBinObjGeneric obj64;
  327.     DPSBinObjGeneric obj65;
  328.     DPSBinObjGeneric obj66;
  329.     DPSBinObjGeneric obj67;
  330.     DPSBinObjGeneric obj68;
  331.     DPSBinObjGeneric obj69;
  332.     DPSBinObjGeneric obj70;
  333.     DPSBinObjGeneric obj71;
  334.     DPSBinObjGeneric obj72;
  335.     DPSBinObjGeneric obj73;
  336.     DPSBinObjGeneric obj74;
  337.     DPSBinObjGeneric obj75;
  338.     DPSBinObjGeneric obj76;
  339.     DPSBinObjGeneric obj77;
  340.     DPSBinObjGeneric obj78;
  341.     DPSBinObjGeneric obj79;
  342.     DPSBinObjGeneric obj80;
  343.     DPSBinObjGeneric obj81;
  344.     DPSBinObjGeneric obj82;
  345.     DPSBinObjGeneric obj83;
  346.     DPSBinObjGeneric obj84;
  347.     DPSBinObjGeneric obj85;
  348.     DPSBinObjGeneric obj86;
  349.     DPSBinObjGeneric obj87;
  350.     DPSBinObjGeneric obj88;
  351.     DPSBinObjGeneric obj89;
  352.     DPSBinObjGeneric obj90;
  353.     DPSBinObjGeneric obj91;
  354.     DPSBinObjGeneric obj92;
  355.     DPSBinObjGeneric obj93;
  356.     DPSBinObjGeneric obj94;
  357.     DPSBinObjGeneric obj95;
  358.     DPSBinObjGeneric obj96;
  359.     DPSBinObjGeneric obj97;
  360.     DPSBinObjGeneric obj98;
  361.     DPSBinObjGeneric obj99;
  362.     DPSBinObjGeneric obj100;
  363.     DPSBinObjGeneric obj101;
  364.     DPSBinObjReal obj102;
  365.     DPSBinObjGeneric obj103;
  366.     DPSBinObjGeneric obj104;
  367.     DPSBinObjGeneric obj105;
  368.     DPSBinObjGeneric obj106;
  369.     DPSBinObjGeneric obj107;
  370.     DPSBinObjGeneric obj108;
  371.     DPSBinObjGeneric obj109;
  372.     DPSBinObjGeneric obj110;
  373.     DPSBinObjGeneric obj111;
  374.     DPSBinObjGeneric obj112;
  375.     DPSBinObjGeneric obj113;
  376.     DPSBinObjGeneric obj114;
  377.     DPSBinObjGeneric obj115;
  378.     DPSBinObjGeneric obj116;
  379.     DPSBinObjGeneric obj117;
  380.     DPSBinObjGeneric obj118;
  381.     DPSBinObjGeneric obj119;
  382.     DPSBinObjGeneric obj120;
  383.     DPSBinObjGeneric obj121;
  384.     DPSBinObjGeneric obj122;
  385.     DPSBinObjGeneric obj123;
  386.     DPSBinObjGeneric obj124;
  387.     DPSBinObjGeneric obj125;
  388.     DPSBinObjGeneric obj126;
  389.     DPSBinObjGeneric obj127;
  390.     DPSBinObjGeneric obj128;
  391.     char obj129[10];
  392.     char obj130[5];
  393.     char obj131[4];
  394.     char obj132[13];
  395.     char obj133[4];
  396.     char obj134[10];
  397.     char obj135[10];
  398.     char obj136[5];
  399.     char obj137[4];
  400.     char obj138[4];
  401.     char obj139[10];
  402.     char obj140[4];
  403.     } _dpsQ;
  404.   static const _dpsQ _dpsStat = {
  405.     DPS_DEF_TOKENTYPE, 73, 1119,
  406.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 78},    /* gsave */
  407.     {DPS_LITERAL|DPS_NAME, 0, 4, 1064},    /* xmax */
  408.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  409.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: width */
  410.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  411.     {DPS_LITERAL|DPS_INT, 0, 0, 1},
  412.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},    /* sub */
  413.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  414.     {DPS_LITERAL|DPS_NAME, 0, 4, 1097},    /* ymax */
  415.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  416.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: height */
  417.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  418.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  419.     {DPS_LITERAL|DPS_NAME, 0, 4, 1111},    /* ymin */
  420.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  421.     {DPS_LITERAL|DPS_INT, 0, 0, 1},
  422.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  423.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  424.     {DPS_LITERAL|DPS_NAME, 0, 4, 1047},    /* xpos */
  425.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  426.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  427.     {DPS_LITERAL|DPS_NAME, 0, 4, 1093},    /* ypos */
  428.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  429.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  430.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  431.     {DPS_EXEC|DPS_NAME, 0, 4, 1111},    /* ymin */
  432.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  433.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  434.     {DPS_EXEC|DPS_NAME, 0, 4, 1097},    /* ymax */
  435.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  436.     {DPS_EXEC|DPS_NAME, 0, 4, 1064},    /* xmax */
  437.     {DPS_EXEC|DPS_NAME, 0, 4, 1097},    /* ymax */
  438.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  439.     {DPS_EXEC|DPS_NAME, 0, 4, 1064},    /* xmax */
  440.     {DPS_EXEC|DPS_NAME, 0, 4, 1111},    /* ymin */
  441.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  442.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 22},    /* closepath */
  443.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167},    /* stroke */
  444.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  445.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  446.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  447.     {DPS_EXEC|DPS_NAME, 0, 4, 1064},    /* xmax */
  448.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  449.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  450.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167},    /* stroke */
  451.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  452.     {DPS_EXEC|DPS_NAME, 0, 4, 1111},    /* ymin */
  453.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  454.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  455.     {DPS_EXEC|DPS_NAME, 0, 4, 1097},    /* ymax */
  456.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  457.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167},    /* stroke */
  458.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  459.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  460.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  461.     {DPS_EXEC|DPS_ARRAY, 0, 6, 920},
  462.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 101},    /* loop */
  463.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  464.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  465.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  466.     {DPS_EXEC|DPS_ARRAY, 0, 6, 808},
  467.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 101},    /* loop */
  468.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  469.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  470.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  471.     {DPS_EXEC|DPS_ARRAY, 0, 6, 696},
  472.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 101},    /* loop */
  473.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  474.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  475.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  476.     {DPS_EXEC|DPS_ARRAY, 0, 6, 584},
  477.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 101},    /* loop */
  478.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 77},    /* grestore */
  479.     {DPS_EXEC|DPS_NAME, 0, 4, 1093},    /* ypos */
  480.     {DPS_EXEC|DPS_NAME, 0, 4, 1111},    /* ymin */
  481.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 74},    /* ge */
  482.     {DPS_EXEC|DPS_ARRAY, 0, 7, 640},
  483.     {DPS_EXEC|DPS_ARRAY, 0, 1, 632},
  484.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 85},    /* ifelse */
  485.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 64},    /* exit */
  486.     {DPS_EXEC|DPS_NAME, 0, 4, 1093},    /* ypos */
  487.     {DPS_EXEC|DPS_NAME, 0, 13, 1051},    /* getticklength */
  488.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  489.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  490.     {DPS_EXEC|DPS_NAME, 0, 4, 1093},    /* ypos */
  491.     {DPS_EXEC|DPS_NAME, 0, 5, 1088},    /* htick */
  492.     {DPS_EXEC|DPS_NAME, 0, 10, 1101},    /* decrease-y */
  493.     {DPS_EXEC|DPS_NAME, 0, 4, 1093},    /* ypos */
  494.     {DPS_EXEC|DPS_NAME, 0, 4, 1097},    /* ymax */
  495.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 97},    /* le */
  496.     {DPS_EXEC|DPS_ARRAY, 0, 7, 752},
  497.     {DPS_EXEC|DPS_ARRAY, 0, 1, 744},
  498.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 85},    /* ifelse */
  499.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 64},    /* exit */
  500.     {DPS_EXEC|DPS_NAME, 0, 4, 1093},    /* ypos */
  501.     {DPS_EXEC|DPS_NAME, 0, 13, 1051},    /* getticklength */
  502.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  503.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  504.     {DPS_EXEC|DPS_NAME, 0, 4, 1093},    /* ypos */
  505.     {DPS_EXEC|DPS_NAME, 0, 5, 1088},    /* htick */
  506.     {DPS_EXEC|DPS_NAME, 0, 10, 1078},    /* increase-y */
  507.     {DPS_EXEC|DPS_NAME, 0, 4, 1047},    /* xpos */
  508.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  509.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 74},    /* ge */
  510.     {DPS_EXEC|DPS_ARRAY, 0, 7, 864},
  511.     {DPS_EXEC|DPS_ARRAY, 0, 1, 856},
  512.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 85},    /* ifelse */
  513.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 64},    /* exit */
  514.     {DPS_EXEC|DPS_NAME, 0, 4, 1047},    /* xpos */
  515.     {DPS_EXEC|DPS_NAME, 0, 13, 1051},    /* getticklength */
  516.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  517.     {DPS_EXEC|DPS_NAME, 0, 4, 1047},    /* xpos */
  518.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  519.     {DPS_EXEC|DPS_NAME, 0, 5, 1042},    /* vtick */
  520.     {DPS_EXEC|DPS_NAME, 0, 10, 1068},    /* decrease-x */
  521.     {DPS_EXEC|DPS_NAME, 0, 4, 1047},    /* xpos */
  522.     {DPS_EXEC|DPS_NAME, 0, 4, 1064},    /* xmax */
  523.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 97},    /* le */
  524.     {DPS_EXEC|DPS_ARRAY, 0, 7, 976},
  525.     {DPS_EXEC|DPS_ARRAY, 0, 1, 968},
  526.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 85},    /* ifelse */
  527.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 64},    /* exit */
  528.     {DPS_EXEC|DPS_NAME, 0, 4, 1047},    /* xpos */
  529.     {DPS_EXEC|DPS_NAME, 0, 13, 1051},    /* getticklength */
  530.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  531.     {DPS_EXEC|DPS_NAME, 0, 4, 1047},    /* xpos */
  532.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  533.     {DPS_EXEC|DPS_NAME, 0, 5, 1042},    /* vtick */
  534.     {DPS_EXEC|DPS_NAME, 0, 10, 1032},    /* increase-x */
  535.     {'i','n','c','r','e','a','s','e','-','x'},
  536.     {'v','t','i','c','k'},
  537.     {'x','p','o','s'},
  538.     {'g','e','t','t','i','c','k','l','e','n','g','t','h'},
  539.     {'x','m','a','x'},
  540.     {'d','e','c','r','e','a','s','e','-','x'},
  541.     {'i','n','c','r','e','a','s','e','-','y'},
  542.     {'h','t','i','c','k'},
  543.     {'y','p','o','s'},
  544.     {'y','m','a','x'},
  545.     {'d','e','c','r','e','a','s','e','-','y'},
  546.     {'y','m','i','n'},
  547.     }; /* _dpsQ */
  548.   _dpsQ _dpsF;    /* local copy  */
  549.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  550.   char pad[3];
  551.   register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  552.   _dpsF = _dpsStat;    /* assign automatic variable */
  553.  
  554.   _dpsP[2].val.realVal =
  555.   _dpsP[24].val.realVal =
  556.   _dpsP[27].val.realVal =
  557.   _dpsP[38].val.realVal =
  558.   _dpsP[102].val.realVal = x;
  559.   _dpsP[9].val.realVal =
  560.   _dpsP[14].val.realVal = y;
  561.   _dpsP[3].val.realVal = width;
  562.   _dpsP[10].val.realVal = height;
  563.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,1119);
  564.   if (0) *pad = 0;    /* quiets compiler warnings */
  565. }
  566. #line 85 "drawingFuncs.psw"
  567.