home *** CD-ROM | disk | FTP | other *** search
- /* drawingFuncs.c generated from drawingFuncs.psw
- by unix pswrap V1.009 Wed Apr 19 17:50:24 PDT 1989
- */
-
- #include <dpsclient/dpsfriends.h>
- #include <string.h>
-
- #line 1 "drawingFuncs.psw"
- #line 10 "drawingFuncs.c"
- void loadPSProcedures( void )
- {
- typedef struct {
- unsigned char tokenType;
- unsigned char topLevelCount;
- unsigned short nBytes;
-
- DPSBinObjGeneric obj0;
- DPSBinObjGeneric obj1;
- DPSBinObjGeneric obj2;
- DPSBinObjGeneric obj3;
- DPSBinObjGeneric obj4;
- DPSBinObjGeneric obj5;
- DPSBinObjGeneric obj6;
- DPSBinObjGeneric obj7;
- DPSBinObjGeneric obj8;
- DPSBinObjGeneric obj9;
- DPSBinObjGeneric obj10;
- DPSBinObjGeneric obj11;
- DPSBinObjGeneric obj12;
- DPSBinObjGeneric obj13;
- DPSBinObjGeneric obj14;
- DPSBinObjGeneric obj15;
- DPSBinObjGeneric obj16;
- DPSBinObjGeneric obj17;
- DPSBinObjGeneric obj18;
- DPSBinObjGeneric obj19;
- DPSBinObjGeneric obj20;
- DPSBinObjGeneric obj21;
- DPSBinObjGeneric obj22;
- DPSBinObjGeneric obj23;
- DPSBinObjGeneric obj24;
- DPSBinObjGeneric obj25;
- DPSBinObjGeneric obj26;
- DPSBinObjGeneric obj27;
- DPSBinObjGeneric obj28;
- DPSBinObjGeneric obj29;
- DPSBinObjGeneric obj30;
- DPSBinObjGeneric obj31;
- DPSBinObjGeneric obj32;
- DPSBinObjGeneric obj33;
- DPSBinObjGeneric obj34;
- DPSBinObjGeneric obj35;
- DPSBinObjGeneric obj36;
- DPSBinObjGeneric obj37;
- DPSBinObjGeneric obj38;
- DPSBinObjGeneric obj39;
- DPSBinObjGeneric obj40;
- DPSBinObjGeneric obj41;
- DPSBinObjGeneric obj42;
- DPSBinObjGeneric obj43;
- DPSBinObjGeneric obj44;
- DPSBinObjGeneric obj45;
- DPSBinObjGeneric obj46;
- DPSBinObjGeneric obj47;
- DPSBinObjGeneric obj48;
- DPSBinObjGeneric obj49;
- DPSBinObjGeneric obj50;
- DPSBinObjGeneric obj51;
- DPSBinObjGeneric obj52;
- DPSBinObjGeneric obj53;
- DPSBinObjGeneric obj54;
- DPSBinObjGeneric obj55;
- DPSBinObjGeneric obj56;
- DPSBinObjGeneric obj57;
- DPSBinObjGeneric obj58;
- DPSBinObjGeneric obj59;
- DPSBinObjGeneric obj60;
- DPSBinObjGeneric obj61;
- DPSBinObjGeneric obj62;
- DPSBinObjGeneric obj63;
- DPSBinObjGeneric obj64;
- DPSBinObjGeneric obj65;
- DPSBinObjGeneric obj66;
- DPSBinObjGeneric obj67;
- DPSBinObjGeneric obj68;
- DPSBinObjGeneric obj69;
- DPSBinObjGeneric obj70;
- DPSBinObjGeneric obj71;
- DPSBinObjGeneric obj72;
- DPSBinObjGeneric obj73;
- DPSBinObjGeneric obj74;
- DPSBinObjGeneric obj75;
- DPSBinObjGeneric obj76;
- } _dpsQ;
- static const _dpsQ _dpsStat = {
- DPS_DEF_TOKENTYPE, 30, 620,
- {DPS_LITERAL|DPS_NAME, 0, 0, 0}, /* xpos */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
- {DPS_LITERAL|DPS_NAME, 0, 0, 0}, /* ypos */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
- {DPS_LITERAL|DPS_NAME, 0, 0, 0}, /* ticklength */
- {DPS_LITERAL|DPS_ARRAY, 0, 10, 536},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
- {DPS_LITERAL|DPS_NAME, 0, 0, 0}, /* getticklength */
- {DPS_EXEC|DPS_ARRAY, 0, 8, 472},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
- {DPS_LITERAL|DPS_NAME, 0, 0, 0}, /* vtick */
- {DPS_EXEC|DPS_ARRAY, 0, 5, 432},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
- {DPS_LITERAL|DPS_NAME, 0, 0, 0}, /* htick */
- {DPS_EXEC|DPS_ARRAY, 0, 4, 400},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
- {DPS_LITERAL|DPS_NAME, 0, 0, 0}, /* increase-x */
- {DPS_EXEC|DPS_ARRAY, 0, 5, 360},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
- {DPS_LITERAL|DPS_NAME, 0, 0, 0}, /* decrease-x */
- {DPS_EXEC|DPS_ARRAY, 0, 5, 320},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
- {DPS_LITERAL|DPS_NAME, 0, 0, 0}, /* increase-y */
- {DPS_EXEC|DPS_ARRAY, 0, 5, 280},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
- {DPS_LITERAL|DPS_NAME, 0, 0, 0}, /* decrease-y */
- {DPS_EXEC|DPS_ARRAY, 0, 5, 240},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
- {DPS_LITERAL|DPS_NAME, 0, 0, 0}, /* ypos */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* ypos */
- {DPS_LITERAL|DPS_INT, 0, 0, 10},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169}, /* sub */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
- {DPS_LITERAL|DPS_NAME, 0, 0, 0}, /* ypos */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* ypos */
- {DPS_LITERAL|DPS_INT, 0, 0, 10},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1}, /* add */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
- {DPS_LITERAL|DPS_NAME, 0, 0, 0}, /* xpos */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* xpos */
- {DPS_LITERAL|DPS_INT, 0, 0, 10},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169}, /* sub */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
- {DPS_LITERAL|DPS_NAME, 0, 0, 0}, /* xpos */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* xpos */
- {DPS_LITERAL|DPS_INT, 0, 0, 10},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1}, /* add */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107}, /* moveto */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 133}, /* rlineto */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167}, /* stroke */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107}, /* moveto */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62}, /* exch */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 133}, /* rlineto */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167}, /* stroke */
- {DPS_LITERAL|DPS_INT, 0, 0, 10},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 82}, /* idiv */
- {DPS_LITERAL|DPS_INT, 0, 0, 10},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 106}, /* mod */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 0}, /* abs */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* ticklength */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62}, /* exch */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 75}, /* get */
- {DPS_LITERAL|DPS_INT, 0, 0, 8},
- {DPS_LITERAL|DPS_INT, 0, 0, 2},
- {DPS_LITERAL|DPS_INT, 0, 0, 2},
- {DPS_LITERAL|DPS_INT, 0, 0, 2},
- {DPS_LITERAL|DPS_INT, 0, 0, 2},
- {DPS_LITERAL|DPS_INT, 0, 0, 5},
- {DPS_LITERAL|DPS_INT, 0, 0, 2},
- {DPS_LITERAL|DPS_INT, 0, 0, 2},
- {DPS_LITERAL|DPS_INT, 0, 0, 2},
- {DPS_LITERAL|DPS_INT, 0, 0, 2},
- }; /* _dpsQ */
- _dpsQ _dpsF; /* local copy */
- register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
- register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
- static long int _dpsCodes[19] = {-1};
- {
- if (_dpsCodes[0] < 0) {
- static const char * const _dps_names[] = {
- "xpos",
- (char *) 0 ,
- (char *) 0 ,
- (char *) 0 ,
- (char *) 0 ,
- "ypos",
- (char *) 0 ,
- (char *) 0 ,
- (char *) 0 ,
- (char *) 0 ,
- "ticklength",
- (char *) 0 ,
- "getticklength",
- "vtick",
- "htick",
- "increase-x",
- "decrease-x",
- "increase-y",
- "decrease-y"};
- long int *_dps_nameVals[19];
- _dps_nameVals[0] = &_dpsCodes[0];
- _dps_nameVals[1] = &_dpsCodes[1];
- _dps_nameVals[2] = &_dpsCodes[2];
- _dps_nameVals[3] = &_dpsCodes[3];
- _dps_nameVals[4] = &_dpsCodes[4];
- _dps_nameVals[5] = &_dpsCodes[5];
- _dps_nameVals[6] = &_dpsCodes[6];
- _dps_nameVals[7] = &_dpsCodes[7];
- _dps_nameVals[8] = &_dpsCodes[8];
- _dps_nameVals[9] = &_dpsCodes[9];
- _dps_nameVals[10] = &_dpsCodes[10];
- _dps_nameVals[11] = &_dpsCodes[11];
- _dps_nameVals[12] = &_dpsCodes[12];
- _dps_nameVals[13] = &_dpsCodes[13];
- _dps_nameVals[14] = &_dpsCodes[14];
- _dps_nameVals[15] = &_dpsCodes[15];
- _dps_nameVals[16] = &_dpsCodes[16];
- _dps_nameVals[17] = &_dpsCodes[17];
- _dps_nameVals[18] = &_dpsCodes[18];
-
- DPSMapNames(_dpsCurCtxt, 19, _dps_names, _dps_nameVals);
- }
- }
-
- _dpsF = _dpsStat; /* assign automatic variable */
-
- _dpsP[0].val.nameVal = _dpsCodes[0];
- _dpsP[46].val.nameVal = _dpsCodes[1];
- _dpsP[45].val.nameVal = _dpsCodes[2];
- _dpsP[41].val.nameVal = _dpsCodes[3];
- _dpsP[40].val.nameVal = _dpsCodes[4];
- _dpsP[3].val.nameVal = _dpsCodes[5];
- _dpsP[36].val.nameVal = _dpsCodes[6];
- _dpsP[35].val.nameVal = _dpsCodes[7];
- _dpsP[31].val.nameVal = _dpsCodes[8];
- _dpsP[30].val.nameVal = _dpsCodes[9];
- _dpsP[6].val.nameVal = _dpsCodes[10];
- _dpsP[64].val.nameVal = _dpsCodes[11];
- _dpsP[9].val.nameVal = _dpsCodes[12];
- _dpsP[12].val.nameVal = _dpsCodes[13];
- _dpsP[15].val.nameVal = _dpsCodes[14];
- _dpsP[18].val.nameVal = _dpsCodes[15];
- _dpsP[21].val.nameVal = _dpsCodes[16];
- _dpsP[24].val.nameVal = _dpsCodes[17];
- _dpsP[27].val.nameVal = _dpsCodes[18];
- DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,620);
- }
- #line 21 "drawingFuncs.psw"
-
- #line 252 "drawingFuncs.c"
- void drawCircle(float x, float y, float radius)
- {
- typedef struct {
- unsigned char tokenType;
- unsigned char topLevelCount;
- unsigned short nBytes;
-
- DPSBinObjGeneric obj0;
- DPSBinObjReal obj1;
- DPSBinObjReal obj2;
- DPSBinObjReal obj3;
- DPSBinObjGeneric obj4;
- DPSBinObjGeneric obj5;
- DPSBinObjGeneric obj6;
- DPSBinObjGeneric obj7;
- DPSBinObjGeneric obj8;
- } _dpsQ;
- static const _dpsQ _dpsStat = {
- DPS_DEF_TOKENTYPE, 9, 76,
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 111}, /* newpath */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: x */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: y */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: radius */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_LITERAL|DPS_INT, 0, 0, 360},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 5}, /* arc */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 22}, /* closepath */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167}, /* stroke */
- }; /* _dpsQ */
- _dpsQ _dpsF; /* local copy */
- register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
- register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
- _dpsF = _dpsStat; /* assign automatic variable */
-
- _dpsP[1].val.realVal = x;
- _dpsP[2].val.realVal = y;
- _dpsP[3].val.realVal = radius;
- DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,76);
- }
- #line 29 "drawingFuncs.psw"
-
- #line 294 "drawingFuncs.c"
- void drawAxes(float x, float y, float width, float height)
- {
- typedef struct {
- unsigned char tokenType;
- unsigned char topLevelCount;
- unsigned short nBytes;
-
- DPSBinObjGeneric obj0;
- DPSBinObjGeneric obj1;
- DPSBinObjReal obj2;
- DPSBinObjReal obj3;
- DPSBinObjGeneric obj4;
- DPSBinObjGeneric obj5;
- DPSBinObjGeneric obj6;
- DPSBinObjGeneric obj7;
- DPSBinObjGeneric obj8;
- DPSBinObjReal obj9;
- DPSBinObjReal obj10;
- DPSBinObjGeneric obj11;
- DPSBinObjGeneric obj12;
- DPSBinObjGeneric obj13;
- DPSBinObjReal obj14;
- DPSBinObjGeneric obj15;
- DPSBinObjGeneric obj16;
- DPSBinObjGeneric obj17;
- DPSBinObjGeneric obj18;
- DPSBinObjGeneric obj19;
- DPSBinObjGeneric obj20;
- DPSBinObjGeneric obj21;
- DPSBinObjGeneric obj22;
- DPSBinObjGeneric obj23;
- DPSBinObjReal obj24;
- DPSBinObjGeneric obj25;
- DPSBinObjGeneric obj26;
- DPSBinObjReal obj27;
- DPSBinObjGeneric obj28;
- DPSBinObjGeneric obj29;
- DPSBinObjGeneric obj30;
- DPSBinObjGeneric obj31;
- DPSBinObjGeneric obj32;
- DPSBinObjGeneric obj33;
- DPSBinObjGeneric obj34;
- DPSBinObjGeneric obj35;
- DPSBinObjGeneric obj36;
- DPSBinObjGeneric obj37;
- DPSBinObjReal obj38;
- DPSBinObjGeneric obj39;
- DPSBinObjGeneric obj40;
- DPSBinObjGeneric obj41;
- DPSBinObjGeneric obj42;
- DPSBinObjGeneric obj43;
- DPSBinObjGeneric obj44;
- DPSBinObjGeneric obj45;
- DPSBinObjGeneric obj46;
- DPSBinObjGeneric obj47;
- DPSBinObjGeneric obj48;
- DPSBinObjGeneric obj49;
- DPSBinObjGeneric obj50;
- DPSBinObjGeneric obj51;
- DPSBinObjGeneric obj52;
- DPSBinObjGeneric obj53;
- DPSBinObjGeneric obj54;
- DPSBinObjGeneric obj55;
- DPSBinObjGeneric obj56;
- DPSBinObjGeneric obj57;
- DPSBinObjGeneric obj58;
- DPSBinObjGeneric obj59;
- DPSBinObjGeneric obj60;
- DPSBinObjGeneric obj61;
- DPSBinObjGeneric obj62;
- DPSBinObjGeneric obj63;
- DPSBinObjGeneric obj64;
- DPSBinObjGeneric obj65;
- DPSBinObjGeneric obj66;
- DPSBinObjGeneric obj67;
- DPSBinObjGeneric obj68;
- DPSBinObjGeneric obj69;
- DPSBinObjGeneric obj70;
- DPSBinObjGeneric obj71;
- DPSBinObjGeneric obj72;
- DPSBinObjGeneric obj73;
- DPSBinObjGeneric obj74;
- DPSBinObjGeneric obj75;
- DPSBinObjGeneric obj76;
- DPSBinObjGeneric obj77;
- DPSBinObjGeneric obj78;
- DPSBinObjGeneric obj79;
- DPSBinObjGeneric obj80;
- DPSBinObjGeneric obj81;
- DPSBinObjGeneric obj82;
- DPSBinObjGeneric obj83;
- DPSBinObjGeneric obj84;
- DPSBinObjGeneric obj85;
- DPSBinObjGeneric obj86;
- DPSBinObjGeneric obj87;
- DPSBinObjGeneric obj88;
- DPSBinObjGeneric obj89;
- DPSBinObjGeneric obj90;
- DPSBinObjGeneric obj91;
- DPSBinObjGeneric obj92;
- DPSBinObjGeneric obj93;
- DPSBinObjGeneric obj94;
- DPSBinObjGeneric obj95;
- DPSBinObjGeneric obj96;
- DPSBinObjGeneric obj97;
- DPSBinObjGeneric obj98;
- DPSBinObjGeneric obj99;
- DPSBinObjGeneric obj100;
- DPSBinObjGeneric obj101;
- DPSBinObjReal obj102;
- DPSBinObjGeneric obj103;
- DPSBinObjGeneric obj104;
- DPSBinObjGeneric obj105;
- DPSBinObjGeneric obj106;
- DPSBinObjGeneric obj107;
- DPSBinObjGeneric obj108;
- DPSBinObjGeneric obj109;
- DPSBinObjGeneric obj110;
- DPSBinObjGeneric obj111;
- DPSBinObjGeneric obj112;
- DPSBinObjGeneric obj113;
- DPSBinObjGeneric obj114;
- DPSBinObjGeneric obj115;
- DPSBinObjGeneric obj116;
- DPSBinObjGeneric obj117;
- DPSBinObjGeneric obj118;
- DPSBinObjGeneric obj119;
- DPSBinObjGeneric obj120;
- DPSBinObjGeneric obj121;
- DPSBinObjGeneric obj122;
- DPSBinObjGeneric obj123;
- DPSBinObjGeneric obj124;
- DPSBinObjGeneric obj125;
- DPSBinObjGeneric obj126;
- DPSBinObjGeneric obj127;
- DPSBinObjGeneric obj128;
- } _dpsQ;
- static const _dpsQ _dpsStat = {
- DPS_DEF_TOKENTYPE, 73, 1036,
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 78}, /* gsave */
- {DPS_LITERAL|DPS_NAME, 0, 0, 0}, /* xmax */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: x */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: width */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1}, /* add */
- {DPS_LITERAL|DPS_INT, 0, 0, 1},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169}, /* sub */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
- {DPS_LITERAL|DPS_NAME, 0, 0, 0}, /* ymax */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: y */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: height */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1}, /* add */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
- {DPS_LITERAL|DPS_NAME, 0, 0, 0}, /* ymin */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: y */
- {DPS_LITERAL|DPS_INT, 0, 0, 1},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1}, /* add */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
- {DPS_LITERAL|DPS_NAME, 0, 0, 0}, /* xpos */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
- {DPS_LITERAL|DPS_NAME, 0, 0, 0}, /* ypos */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: x */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* ymin */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107}, /* moveto */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: x */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* ymax */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99}, /* lineto */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* xmax */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* ymax */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99}, /* lineto */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* xmax */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* ymin */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99}, /* lineto */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 22}, /* closepath */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167}, /* stroke */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: x */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107}, /* moveto */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* xmax */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99}, /* lineto */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167}, /* stroke */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* ymin */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107}, /* moveto */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* ymax */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99}, /* lineto */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167}, /* stroke */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107}, /* moveto */
- {DPS_EXEC|DPS_ARRAY, 0, 6, 920},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 101}, /* loop */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107}, /* moveto */
- {DPS_EXEC|DPS_ARRAY, 0, 6, 808},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 101}, /* loop */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107}, /* moveto */
- {DPS_EXEC|DPS_ARRAY, 0, 6, 696},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 101}, /* loop */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107}, /* moveto */
- {DPS_EXEC|DPS_ARRAY, 0, 6, 584},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 101}, /* loop */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 77}, /* grestore */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* ypos */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* ymin */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 74}, /* ge */
- {DPS_EXEC|DPS_ARRAY, 0, 7, 640},
- {DPS_EXEC|DPS_ARRAY, 0, 1, 632},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 85}, /* ifelse */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 64}, /* exit */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* ypos */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* getticklength */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110}, /* neg */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* ypos */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* htick */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* decrease-y */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* ypos */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* ymax */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 97}, /* le */
- {DPS_EXEC|DPS_ARRAY, 0, 7, 752},
- {DPS_EXEC|DPS_ARRAY, 0, 1, 744},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 85}, /* ifelse */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 64}, /* exit */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* ypos */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* getticklength */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110}, /* neg */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* ypos */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* htick */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* increase-y */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* xpos */
- {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: x */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 74}, /* ge */
- {DPS_EXEC|DPS_ARRAY, 0, 7, 864},
- {DPS_EXEC|DPS_ARRAY, 0, 1, 856},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 85}, /* ifelse */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 64}, /* exit */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* xpos */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* getticklength */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110}, /* neg */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* xpos */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* vtick */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* decrease-x */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* xpos */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* xmax */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 97}, /* le */
- {DPS_EXEC|DPS_ARRAY, 0, 7, 976},
- {DPS_EXEC|DPS_ARRAY, 0, 1, 968},
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 85}, /* ifelse */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 64}, /* exit */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* xpos */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* getticklength */
- {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110}, /* neg */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* xpos */
- {DPS_LITERAL|DPS_INT, 0, 0, 0},
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* vtick */
- {DPS_EXEC|DPS_NAME, 0, 0, 0}, /* increase-x */
- }; /* _dpsQ */
- _dpsQ _dpsF; /* local copy */
- register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
- register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
- static long int _dpsCodes[41] = {-1};
- {
- if (_dpsCodes[0] < 0) {
- static const char * const _dps_names[] = {
- "xmax",
- (char *) 0 ,
- (char *) 0 ,
- (char *) 0 ,
- (char *) 0 ,
- "ymax",
- (char *) 0 ,
- (char *) 0 ,
- (char *) 0 ,
- (char *) 0 ,
- "ymin",
- (char *) 0 ,
- (char *) 0 ,
- (char *) 0 ,
- (char *) 0 ,
- "xpos",
- (char *) 0 ,
- (char *) 0 ,
- (char *) 0 ,
- (char *) 0 ,
- (char *) 0 ,
- (char *) 0 ,
- "ypos",
- (char *) 0 ,
- (char *) 0 ,
- (char *) 0 ,
- (char *) 0 ,
- (char *) 0 ,
- (char *) 0 ,
- "getticklength",
- (char *) 0 ,
- (char *) 0 ,
- (char *) 0 ,
- "htick",
- (char *) 0 ,
- "decrease-y",
- "increase-y",
- "vtick",
- (char *) 0 ,
- "decrease-x",
- "increase-x"};
- long int *_dps_nameVals[41];
- _dps_nameVals[0] = &_dpsCodes[0];
- _dps_nameVals[1] = &_dpsCodes[1];
- _dps_nameVals[2] = &_dpsCodes[2];
- _dps_nameVals[3] = &_dpsCodes[3];
- _dps_nameVals[4] = &_dpsCodes[4];
- _dps_nameVals[5] = &_dpsCodes[5];
- _dps_nameVals[6] = &_dpsCodes[6];
- _dps_nameVals[7] = &_dpsCodes[7];
- _dps_nameVals[8] = &_dpsCodes[8];
- _dps_nameVals[9] = &_dpsCodes[9];
- _dps_nameVals[10] = &_dpsCodes[10];
- _dps_nameVals[11] = &_dpsCodes[11];
- _dps_nameVals[12] = &_dpsCodes[12];
- _dps_nameVals[13] = &_dpsCodes[13];
- _dps_nameVals[14] = &_dpsCodes[14];
- _dps_nameVals[15] = &_dpsCodes[15];
- _dps_nameVals[16] = &_dpsCodes[16];
- _dps_nameVals[17] = &_dpsCodes[17];
- _dps_nameVals[18] = &_dpsCodes[18];
- _dps_nameVals[19] = &_dpsCodes[19];
- _dps_nameVals[20] = &_dpsCodes[20];
- _dps_nameVals[21] = &_dpsCodes[21];
- _dps_nameVals[22] = &_dpsCodes[22];
- _dps_nameVals[23] = &_dpsCodes[23];
- _dps_nameVals[24] = &_dpsCodes[24];
- _dps_nameVals[25] = &_dpsCodes[25];
- _dps_nameVals[26] = &_dpsCodes[26];
- _dps_nameVals[27] = &_dpsCodes[27];
- _dps_nameVals[28] = &_dpsCodes[28];
- _dps_nameVals[29] = &_dpsCodes[29];
- _dps_nameVals[30] = &_dpsCodes[30];
- _dps_nameVals[31] = &_dpsCodes[31];
- _dps_nameVals[32] = &_dpsCodes[32];
- _dps_nameVals[33] = &_dpsCodes[33];
- _dps_nameVals[34] = &_dpsCodes[34];
- _dps_nameVals[35] = &_dpsCodes[35];
- _dps_nameVals[36] = &_dpsCodes[36];
- _dps_nameVals[37] = &_dpsCodes[37];
- _dps_nameVals[38] = &_dpsCodes[38];
- _dps_nameVals[39] = &_dpsCodes[39];
- _dps_nameVals[40] = &_dpsCodes[40];
-
- DPSMapNames(_dpsCurCtxt, 41, _dps_names, _dps_nameVals);
- }
- }
-
- _dpsF = _dpsStat; /* assign automatic variable */
-
- _dpsP[2].val.realVal =
- _dpsP[24].val.realVal =
- _dpsP[27].val.realVal =
- _dpsP[38].val.realVal =
- _dpsP[102].val.realVal = x;
- _dpsP[9].val.realVal =
- _dpsP[14].val.realVal = y;
- _dpsP[3].val.realVal = width;
- _dpsP[10].val.realVal = height;
- _dpsP[1].val.nameVal = _dpsCodes[0];
- _dpsP[116].val.nameVal = _dpsCodes[1];
- _dpsP[41].val.nameVal = _dpsCodes[2];
- _dpsP[33].val.nameVal = _dpsCodes[3];
- _dpsP[30].val.nameVal = _dpsCodes[4];
- _dpsP[8].val.nameVal = _dpsCodes[5];
- _dpsP[88].val.nameVal = _dpsCodes[6];
- _dpsP[49].val.nameVal = _dpsCodes[7];
- _dpsP[31].val.nameVal = _dpsCodes[8];
- _dpsP[28].val.nameVal = _dpsCodes[9];
- _dpsP[13].val.nameVal = _dpsCodes[10];
- _dpsP[74].val.nameVal = _dpsCodes[11];
- _dpsP[46].val.nameVal = _dpsCodes[12];
- _dpsP[34].val.nameVal = _dpsCodes[13];
- _dpsP[25].val.nameVal = _dpsCodes[14];
- _dpsP[18].val.nameVal = _dpsCodes[15];
- _dpsP[125].val.nameVal = _dpsCodes[16];
- _dpsP[122].val.nameVal = _dpsCodes[17];
- _dpsP[115].val.nameVal = _dpsCodes[18];
- _dpsP[111].val.nameVal = _dpsCodes[19];
- _dpsP[108].val.nameVal = _dpsCodes[20];
- _dpsP[101].val.nameVal = _dpsCodes[21];
- _dpsP[21].val.nameVal = _dpsCodes[22];
- _dpsP[98].val.nameVal = _dpsCodes[23];
- _dpsP[94].val.nameVal = _dpsCodes[24];
- _dpsP[87].val.nameVal = _dpsCodes[25];
- _dpsP[84].val.nameVal = _dpsCodes[26];
- _dpsP[80].val.nameVal = _dpsCodes[27];
- _dpsP[73].val.nameVal = _dpsCodes[28];
- _dpsP[81].val.nameVal = _dpsCodes[29];
- _dpsP[123].val.nameVal = _dpsCodes[30];
- _dpsP[109].val.nameVal = _dpsCodes[31];
- _dpsP[95].val.nameVal = _dpsCodes[32];
- _dpsP[85].val.nameVal = _dpsCodes[33];
- _dpsP[99].val.nameVal = _dpsCodes[34];
- _dpsP[86].val.nameVal = _dpsCodes[35];
- _dpsP[100].val.nameVal = _dpsCodes[36];
- _dpsP[113].val.nameVal = _dpsCodes[37];
- _dpsP[127].val.nameVal = _dpsCodes[38];
- _dpsP[114].val.nameVal = _dpsCodes[39];
- _dpsP[128].val.nameVal = _dpsCodes[40];
- DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,1036);
- }
- #line 76 "drawingFuncs.psw"
-