This is SpheresWrap.c in view mode; [Download] [Up]
/* SpheresWrap.c generated from SpheresWrap.psw
by unix pswrap V1.009 Wed Apr 19 17:50:24 PDT 1989
*/
#include <dpsclient/dpsfriends.h>
#include <string.h>
#line 1 "SpheresWrap.psw"
#line 10 "SpheresWrap.c"
void drawSphereBW(color, radius, dcolor, dx, dy, maxsize)
float color; int radius; float dcolor; float dx; float dy; int maxsize;
{
typedef struct {
unsigned char tokenType;
unsigned char topLevelCount;
unsigned short nBytes;
DPSBinObjReal obj0;
DPSBinObjGeneric obj1;
DPSBinObjReal 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;
DPSBinObjReal 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;
DPSBinObjReal obj42;
DPSBinObjGeneric obj43;
DPSBinObjGeneric obj44;
DPSBinObjGeneric obj45;
DPSBinObjGeneric obj46;
DPSBinObjReal obj47;
DPSBinObjGeneric obj48;
DPSBinObjGeneric obj49;
DPSBinObjGeneric obj50;
DPSBinObjGeneric obj51;
DPSBinObjReal obj52;
DPSBinObjGeneric obj53;
DPSBinObjGeneric obj54;
char obj55[8];
char obj56[5];
char obj57[5];
char obj58[8];
} _dpsQ;
static _dpsQ _dpsF = {
DPS_DEF_TOKENTYPE, 28, 470,
{DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: color */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 150}, /* setgray */
{DPS_LITERAL|DPS_REAL, 0, 0, 1.0},
{DPS_EXEC|DPS_NAME, 0, 8, 458}, /* setalpha */
{DPS_LITERAL|DPS_INT, 0, 0, 0}, /* param: maxsize */
{DPS_LITERAL|DPS_INT, 0, 0, 0}, /* param: maxsize */
{DPS_LITERAL|DPS_INT, 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, 20}, /* clip */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 66}, /* fill */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167}, /* stroke */
{DPS_LITERAL|DPS_NAME, 0, 5, 453}, /* currX */
{DPS_LITERAL|DPS_INT, 0, 0, 0}, /* param: maxsize */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{DPS_LITERAL|DPS_NAME, 0, 5, 448}, /* currY */
{DPS_LITERAL|DPS_INT, 0, 0, 0}, /* param: maxsize */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{DPS_LITERAL|DPS_NAME, 0, 8, 440}, /* curColor */
{DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: color */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{DPS_LITERAL|DPS_INT, 0, 0, 0}, /* param: radius */
{DPS_LITERAL|DPS_INT, 0, 0, -1},
{DPS_LITERAL|DPS_INT, 0, 0, 0},
{DPS_EXEC|DPS_ARRAY, 0, 27, 224},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 72}, /* for */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 308}, /* initclip */
{DPS_LITERAL|DPS_NAME, 0, DPSSYSNAME, 410}, /* i */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62}, /* exch */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{DPS_EXEC|DPS_NAME, 0, 8, 440}, /* curColor */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 150}, /* setgray */
{DPS_EXEC|DPS_NAME, 0, 5, 453}, /* currX */
{DPS_EXEC|DPS_NAME, 0, 5, 448}, /* currY */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 410}, /* i */
{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, 66}, /* fill */
{DPS_LITERAL|DPS_NAME, 0, 5, 453}, /* currX */
{DPS_EXEC|DPS_NAME, 0, 5, 453}, /* currX */
{DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: dx */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1}, /* add */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{DPS_LITERAL|DPS_NAME, 0, 5, 448}, /* currY */
{DPS_EXEC|DPS_NAME, 0, 5, 448}, /* currY */
{DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: dy */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1}, /* add */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{DPS_LITERAL|DPS_NAME, 0, 8, 440}, /* curColor */
{DPS_EXEC|DPS_NAME, 0, 8, 440}, /* curColor */
{DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: dcolor */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1}, /* add */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{'c','u','r','C','o','l','o','r'},
{'c','u','r','r','Y'},
{'c','u','r','r','X'},
{'s','e','t','a','l','p','h','a'},
}; /* _dpsQ */
register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
char pad[3];
register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
_dpsP[0].val.realVal =
_dpsP[20].val.realVal = color;
_dpsP[6].val.integerVal =
_dpsP[22].val.integerVal = radius;
_dpsP[52].val.realVal = dcolor;
_dpsP[42].val.realVal = dx;
_dpsP[47].val.realVal = dy;
_dpsP[4].val.integerVal =
_dpsP[5].val.integerVal =
_dpsP[14].val.integerVal =
_dpsP[17].val.integerVal = maxsize;
DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,470);
if (0) *pad = 0; /* quiets compiler warnings */
}
#line 22 "SpheresWrap.psw"
#line 161 "SpheresWrap.c"
void drawSphereCL(red, green, blue, radius, dred, dgreen, dblue, dx, dy, maxsize)
float red; float green; float blue; int radius; float dred; float dgreen; float dblue; float dx; float dy; int maxsize;
{
typedef struct {
unsigned char tokenType;
unsigned char topLevelCount;
unsigned short nBytes;
DPSBinObjReal obj0;
DPSBinObjReal obj1;
DPSBinObjReal obj2;
DPSBinObjGeneric obj3;
DPSBinObjReal 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;
DPSBinObjReal obj22;
DPSBinObjGeneric obj23;
DPSBinObjGeneric obj24;
DPSBinObjReal obj25;
DPSBinObjGeneric obj26;
DPSBinObjGeneric obj27;
DPSBinObjReal 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;
DPSBinObjReal obj52;
DPSBinObjGeneric obj53;
DPSBinObjGeneric obj54;
DPSBinObjGeneric obj55;
DPSBinObjGeneric obj56;
DPSBinObjReal obj57;
DPSBinObjGeneric obj58;
DPSBinObjGeneric obj59;
DPSBinObjGeneric obj60;
DPSBinObjGeneric obj61;
DPSBinObjReal obj62;
DPSBinObjGeneric obj63;
DPSBinObjGeneric obj64;
DPSBinObjGeneric obj65;
DPSBinObjGeneric obj66;
DPSBinObjReal obj67;
DPSBinObjGeneric obj68;
DPSBinObjGeneric obj69;
DPSBinObjGeneric obj70;
DPSBinObjGeneric obj71;
DPSBinObjReal obj72;
DPSBinObjGeneric obj73;
DPSBinObjGeneric obj74;
char obj75[4];
char obj76[4];
char obj77[4];
char obj78[5];
char obj79[5];
char obj80[8];
} _dpsQ;
static _dpsQ _dpsF = {
DPS_DEF_TOKENTYPE, 36, 634,
{DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: red */
{DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: green */
{DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: blue */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 157}, /* setrgbcolor */
{DPS_LITERAL|DPS_REAL, 0, 0, 1.0},
{DPS_EXEC|DPS_NAME, 0, 8, 622}, /* setalpha */
{DPS_LITERAL|DPS_INT, 0, 0, 0}, /* param: maxsize */
{DPS_LITERAL|DPS_INT, 0, 0, 0}, /* param: maxsize */
{DPS_LITERAL|DPS_INT, 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, 20}, /* clip */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 66}, /* fill */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167}, /* stroke */
{DPS_LITERAL|DPS_NAME, 0, 5, 617}, /* currX */
{DPS_LITERAL|DPS_INT, 0, 0, 0}, /* param: maxsize */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{DPS_LITERAL|DPS_NAME, 0, 5, 612}, /* currY */
{DPS_LITERAL|DPS_INT, 0, 0, 0}, /* param: maxsize */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{DPS_LITERAL|DPS_NAME, 0, 4, 608}, /* curR */
{DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: red */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{DPS_LITERAL|DPS_NAME, 0, 4, 604}, /* curG */
{DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: green */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{DPS_LITERAL|DPS_NAME, 0, 4, 600}, /* curB */
{DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: blue */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{DPS_LITERAL|DPS_INT, 0, 0, 0}, /* param: radius */
{DPS_LITERAL|DPS_INT, 0, 0, -1},
{DPS_LITERAL|DPS_INT, 0, 0, 0},
{DPS_EXEC|DPS_ARRAY, 0, 39, 288},
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 72}, /* for */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 308}, /* initclip */
{DPS_LITERAL|DPS_NAME, 0, DPSSYSNAME, 410}, /* i */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62}, /* exch */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{DPS_EXEC|DPS_NAME, 0, 4, 608}, /* curR */
{DPS_EXEC|DPS_NAME, 0, 4, 604}, /* curG */
{DPS_EXEC|DPS_NAME, 0, 4, 600}, /* curB */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 157}, /* setrgbcolor */
{DPS_EXEC|DPS_NAME, 0, 5, 617}, /* currX */
{DPS_EXEC|DPS_NAME, 0, 5, 612}, /* currY */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 410}, /* i */
{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, 66}, /* fill */
{DPS_LITERAL|DPS_NAME, 0, 5, 617}, /* currX */
{DPS_EXEC|DPS_NAME, 0, 5, 617}, /* currX */
{DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: dx */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1}, /* add */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{DPS_LITERAL|DPS_NAME, 0, 5, 612}, /* currY */
{DPS_EXEC|DPS_NAME, 0, 5, 612}, /* currY */
{DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: dy */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1}, /* add */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{DPS_LITERAL|DPS_NAME, 0, 4, 608}, /* curR */
{DPS_EXEC|DPS_NAME, 0, 4, 608}, /* curR */
{DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: dred */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1}, /* add */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{DPS_LITERAL|DPS_NAME, 0, 4, 604}, /* curG */
{DPS_EXEC|DPS_NAME, 0, 4, 604}, /* curG */
{DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: dgreen */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1}, /* add */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{DPS_LITERAL|DPS_NAME, 0, 4, 600}, /* curB */
{DPS_EXEC|DPS_NAME, 0, 4, 600}, /* curB */
{DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: dblue */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1}, /* add */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */
{'c','u','r','B'},
{'c','u','r','G'},
{'c','u','r','R'},
{'c','u','r','r','Y'},
{'c','u','r','r','X'},
{'s','e','t','a','l','p','h','a'},
}; /* _dpsQ */
register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
char pad[3];
register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
_dpsP[0].val.realVal =
_dpsP[22].val.realVal = red;
_dpsP[1].val.realVal =
_dpsP[25].val.realVal = green;
_dpsP[2].val.realVal =
_dpsP[28].val.realVal = blue;
_dpsP[8].val.integerVal =
_dpsP[30].val.integerVal = radius;
_dpsP[62].val.realVal = dred;
_dpsP[67].val.realVal = dgreen;
_dpsP[72].val.realVal = dblue;
_dpsP[52].val.realVal = dx;
_dpsP[57].val.realVal = dy;
_dpsP[6].val.integerVal =
_dpsP[7].val.integerVal =
_dpsP[16].val.integerVal =
_dpsP[19].val.integerVal = maxsize;
DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,634);
if (0) *pad = 0; /* quiets compiler warnings */
}
#line 51 "SpheresWrap.psw"
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.