This is Explosion.c in view mode; [Download] [Up]
/* Explosion.c generated from Explosion.psw by unix pswrap V1.009 Wed Apr 19 17:50:24 PDT 1989 */ #include <dpsclient/dpsfriends.h> #include <string.h> #line 1 "Explosion.psw" // Copyright 1993, Katzlberger Thomas, Innsbruck, Austria. All rights reserved. // You may not delete this notice. #line 13 "Explosion.c" void PSWinit( 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; char obj9[9]; } _dpsQ; static const _dpsQ _dpsF = { DPS_DEF_TOKENTYPE, 4, 85, {DPS_LITERAL|DPS_NAME, 0, 9, 72}, /* explosion */ {DPS_EXEC|DPS_ARRAY, 0, 5, 32}, {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 14}, /* bind */ {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51}, /* def */ {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 150}, /* setgray */ {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, 167}, /* stroke */ {'e','x','p','l','o','s','i','o','n'}, }; /* _dpsQ */ register DPSContext _dpsCurCtxt = DPSPrivCurrentContext(); char pad[3]; DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,85); if (0) *pad = 0; /* quiets compiler warnings */ } #line 14 "Explosion.psw" #line 52 "Explosion.c" void PSWdrawExplosion(float gray, float x, float y, float rad) { typedef struct { unsigned char tokenType; unsigned char topLevelCount; unsigned short nBytes; DPSBinObjReal obj0; DPSBinObjReal obj1; DPSBinObjReal obj2; DPSBinObjReal obj3; DPSBinObjGeneric obj4; char obj5[9]; } _dpsQ; static const _dpsQ _dpsStat = { DPS_DEF_TOKENTYPE, 5, 53, {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: rad */ {DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: gray */ {DPS_EXEC|DPS_NAME, 0, 9, 40}, /* explosion */ {'e','x','p','l','o','s','i','o','n'}, }; /* _dpsQ */ _dpsQ _dpsF; /* local copy */ register DPSContext _dpsCurCtxt = DPSPrivCurrentContext(); char pad[3]; register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0; _dpsF = _dpsStat; /* assign automatic variable */ _dpsP[3].val.realVal = gray; _dpsP[0].val.realVal = x; _dpsP[1].val.realVal = y; _dpsP[2].val.realVal = rad; DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,53); if (0) *pad = 0; /* quiets compiler warnings */ } #line 20 "Explosion.psw"
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.