This is CopyIcon.c in view mode; [Download] [Up]
/* ./sym/CopyIcon.c generated from CopyIcon.psw
by unix pswrap V1.009 Wed Apr 19 17:50:24 PDT 1989
*/
#include <dpsclient/dpsfriends.h>
#include <string.h>
#line 1 "CopyIcon.psw"
/*
* Copyright 1991 RightBrain Software. All rights reserved.
*
* No part of this code may be reproduced in any form, compiled
* or source code, nor used for any purpose without the express
* written permission of RightBrain Software.
*
* Entered into the public domain 12/15/93 by RightBrain Software.
*
*/
#line 21 "./sym/CopyIcon.c"
void copyIconPicture(int win, float x, float y, float w, float h)
{
typedef struct {
unsigned char tokenType;
unsigned char topLevelCount;
unsigned short nBytes;
DPSBinObjReal obj0;
DPSBinObjReal obj1;
DPSBinObjReal obj2;
DPSBinObjReal obj3;
DPSBinObjGeneric obj4;
DPSBinObjGeneric obj5;
DPSBinObjGeneric obj6;
DPSBinObjGeneric obj7;
DPSBinObjGeneric obj8;
DPSBinObjGeneric obj9;
DPSBinObjGeneric obj10;
DPSBinObjGeneric obj11;
DPSBinObjGeneric obj12;
char obj13[9];
char obj14[4];
char obj15[17];
} _dpsQ;
static const _dpsQ _dpsStat = {
DPS_DEF_TOKENTYPE, 13, 138,
{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: w */
{DPS_LITERAL|DPS_REAL, 0, 0, 0}, /* param: h */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 78}, /* gsave */
{DPS_LITERAL|DPS_INT, 0, 0, 0}, /* param: win */
{DPS_EXEC|DPS_NAME, 0, 17, 117}, /* windowdeviceround */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 79}, /* gstate */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 77}, /* grestore */
{DPS_LITERAL|DPS_INT, 0, 0, 0},
{DPS_LITERAL|DPS_INT, 0, 0, 0},
{DPS_EXEC|DPS_NAME, 0, 4, 113}, /* Copy */
{DPS_EXEC|DPS_NAME, 0, 9, 104}, /* composite */
{'c','o','m','p','o','s','i','t','e'},
{'C','o','p','y'},
{'w','i','n','d','o','w','d','e','v','i','c','e','r','o','u','n','d'},
}; /* _dpsQ */
_dpsQ _dpsF; /* local copy */
register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
char pad[3];
register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
_dpsF = _dpsStat; /* assign automatic variable */
_dpsP[5].val.integerVal = win;
_dpsP[0].val.realVal = x;
_dpsP[1].val.realVal = y;
_dpsP[2].val.realVal = w;
_dpsP[3].val.realVal = h;
DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,138);
if (0) *pad = 0; /* quiets compiler warnings */
}
#line 15 "CopyIcon.psw"
#line 81 "./sym/CopyIcon.c"
void imageIconPicture(int w, int h, int bps, const char *data)
{
typedef struct {
unsigned char tokenType;
unsigned char sizeFlag;
unsigned short topLevelCount;
unsigned long 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;
char obj17[6];
} _dpsQ;
static const _dpsQ _dpsStat = {
DPS_DEF_TOKENTYPE, 0, 16, 150,
{DPS_LITERAL|DPS_INT, 0, 0, 0}, /* param: w */
{DPS_LITERAL|DPS_INT, 0, 0, 0}, /* param: h */
{DPS_LITERAL|DPS_INT, 0, 0, 0}, /* param: bps */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 260}, /* [ */
{DPS_LITERAL|DPS_INT, 0, 0, 0}, /* param: w */
{DPS_LITERAL|DPS_INT, 0, 0, 0},
{DPS_LITERAL|DPS_INT, 0, 0, 0},
{DPS_LITERAL|DPS_INT, 0, 0, 0}, /* param: h */
{DPS_LITERAL|DPS_INT, 0, 0, 0},
{DPS_LITERAL|DPS_INT, 0, 0, 0}, /* param: h */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110}, /* neg */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 261}, /* ] */
{DPS_EXEC|DPS_ARRAY, 0, 1, 128},
{DPS_EXEC|DPS_NAME, 0, 6, 136}, /* pstack */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 70}, /* flush */
{DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 86}, /* image */
{DPS_LITERAL|DPS_STRING, 0, 0, 142}, /* param data */
{'p','s','t','a','c','k'},
}; /* _dpsQ */
_dpsQ _dpsF; /* local copy */
register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
char pad[3];
register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
register int _dps_offset = 142;
_dpsF = _dpsStat; /* assign automatic variable */
_dpsP[0].val.integerVal =
_dpsP[4].val.integerVal = w;
_dpsP[1].val.integerVal =
_dpsP[7].val.integerVal =
_dpsP[9].val.integerVal = h;
_dpsP[2].val.integerVal = bps;
_dpsP[16].length = strlen(data);
_dpsP[16].val.stringVal = _dps_offset;
_dps_offset += (_dpsP[16].length + 3) & ~3;
_dpsF.nBytes = _dps_offset+8;
DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,150);
DPSWriteStringChars(_dpsCurCtxt, (char *)data, _dpsP[16].length);
DPSWriteStringChars(_dpsCurCtxt, (char *)pad, ~(_dpsP[16].length + 3) & 3);
if (0) *pad = 0; /* quiets compiler warnings */
}
#line 19 "CopyIcon.psw"
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.