This is drawingFuncs.c in view mode; [Download] [Up]
/* 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, 66}, /* fill */
}; /* _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"
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.