ftp.nice.ch/pub/next/developer/objc/dps/AdobeExamples.N.bs.tar.gz#/AdobeExamples/NX_Patterns/PSWpatternsdemo.c

This is PSWpatternsdemo.c in view mode; [Download] [Up]

/* PSWpatternsdemo.c generated from PSWpatternsdemo.psw
   by unix pswrap V1.009  Wed Apr 19 17:50:24 PDT 1989
 */

#include <dpsclient/dpsfriends.h>
#include <string.h>

#line 1 "PSWpatternsdemo.psw"

/*
 * (a)  (C) 1990 by Adobe Systems Incorporated. All rights reserved.
 *
 * (b)  If this Sample Code is distributed as part of the Display PostScript
 *	System Software Development Kit from Adobe Systems Incorporated,
 *	then this copy is designated as Development Software and its use is
 *	subject to the terms of the License Agreement attached to such Kit.
 *
 * (c)  If this Sample Code is distributed independently, then the following
 *	terms apply:
 *
 * (d)  This file may be freely copied and redistributed as long as:
 *	1) Parts (a), (d), (e) and (f) continue to be included in the file,
 *	2) If the file has been modified in any way, a notice of such
 *      modification is conspicuously indicated.
 *
 * (e)  PostScript, Display PostScript, and Adobe are registered trademarks of
 *	Adobe Systems Incorporated.
 * 
 * (f) THE INFORMATION BELOW IS FURNISHED AS IS, IS SUBJECT TO
 *	CHANGE WITHOUT NOTICE, AND SHOULD NOT BE CONSTRUED
 *	AS A COMMITMENT BY ADOBE SYSTEMS INCORPORATED.
 *	ADOBE SYSTEMS INCORPORATED ASSUMES NO RESPONSIBILITY
 *	OR LIABILITY FOR ANY ERRORS OR INACCURACIES, MAKES NO
 *	WARRANTY OF ANY KIND (EXPRESS, IMPLIED OR STATUTORY)
 *	WITH RESPECT TO THIS INFORMATION, AND EXPRESSLY
 *	DISCLAIMS ANY AND ALL WARRANTIES OF MERCHANTABILITY, 
 *	FITNESS FOR PARTICULAR PURPOSES AND NONINFRINGEMENT
 *	OF THIRD PARTY RIGHTS.
 */

/*
 *	PSWpatternsdemo.psw
 *
 *	These PostScript procedures are for the demonstration program only.
 *	They are not the recommended approach for displaying patterns. The
 *	font approach outlined in PSWpatterns.psw should be used instead.
 *
 *	The composite method is not recommended because it is not much
 *	faster than the font approach, it is difficult to work with and it will not
 *	print. The drawing approach is not recommended because it is slow.
 *
 *	Version:	2.0
 *	Author:	Ken Fromm
 *	History:
 *			03-07-91		Added this comment.
 */
#line 58 "PSWpatternsdemo.c"
void PSWPatternDemoDefs( 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;
    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;
    DPSBinObjGeneric 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;
    DPSBinObjGeneric obj129;
    DPSBinObjGeneric obj130;
    DPSBinObjGeneric obj131;
    DPSBinObjGeneric obj132;
    DPSBinObjGeneric obj133;
    DPSBinObjGeneric obj134;
    DPSBinObjGeneric obj135;
    DPSBinObjGeneric obj136;
    DPSBinObjGeneric obj137;
    DPSBinObjGeneric obj138;
    DPSBinObjGeneric obj139;
    DPSBinObjGeneric obj140;
    DPSBinObjGeneric obj141;
    DPSBinObjGeneric obj142;
    DPSBinObjGeneric obj143;
    DPSBinObjGeneric obj144;
    DPSBinObjGeneric obj145;
    DPSBinObjGeneric obj146;
    DPSBinObjGeneric obj147;
    DPSBinObjGeneric obj148;
    DPSBinObjGeneric obj149;
    DPSBinObjGeneric obj150;
    DPSBinObjGeneric obj151;
    DPSBinObjGeneric obj152;
    DPSBinObjGeneric obj153;
    DPSBinObjGeneric obj154;
    DPSBinObjGeneric obj155;
    DPSBinObjGeneric obj156;
    DPSBinObjGeneric obj157;
    DPSBinObjGeneric obj158;
    DPSBinObjGeneric obj159;
    DPSBinObjGeneric obj160;
    DPSBinObjGeneric obj161;
    DPSBinObjGeneric obj162;
    DPSBinObjGeneric obj163;
    DPSBinObjGeneric obj164;
    DPSBinObjGeneric obj165;
    DPSBinObjGeneric obj166;
    DPSBinObjGeneric obj167;
    DPSBinObjGeneric obj168;
    DPSBinObjGeneric obj169;
    DPSBinObjGeneric obj170;
    DPSBinObjGeneric obj171;
    DPSBinObjGeneric obj172;
    DPSBinObjGeneric obj173;
    DPSBinObjGeneric obj174;
    DPSBinObjGeneric obj175;
    DPSBinObjGeneric obj176;
    DPSBinObjGeneric obj177;
    DPSBinObjGeneric obj178;
    DPSBinObjGeneric obj179;
    DPSBinObjGeneric obj180;
    DPSBinObjGeneric obj181;
    DPSBinObjGeneric obj182;
    DPSBinObjGeneric obj183;
    DPSBinObjGeneric obj184;
    DPSBinObjGeneric obj185;
    DPSBinObjGeneric obj186;
    DPSBinObjGeneric obj187;
    DPSBinObjGeneric obj188;
    DPSBinObjGeneric obj189;
    DPSBinObjGeneric obj190;
    DPSBinObjGeneric obj191;
    DPSBinObjGeneric obj192;
    DPSBinObjGeneric obj193;
    DPSBinObjGeneric obj194;
    DPSBinObjGeneric obj195;
    DPSBinObjGeneric obj196;
    DPSBinObjGeneric obj197;
    DPSBinObjGeneric obj198;
    DPSBinObjGeneric obj199;
    DPSBinObjGeneric obj200;
    DPSBinObjGeneric obj201;
    DPSBinObjGeneric obj202;
    DPSBinObjGeneric obj203;
    DPSBinObjGeneric obj204;
    DPSBinObjGeneric obj205;
    DPSBinObjGeneric obj206;
    DPSBinObjGeneric obj207;
    DPSBinObjGeneric obj208;
    DPSBinObjGeneric obj209;
    DPSBinObjGeneric obj210;
    DPSBinObjGeneric obj211;
    DPSBinObjGeneric obj212;
    DPSBinObjGeneric obj213;
    DPSBinObjGeneric obj214;
    DPSBinObjGeneric obj215;
    DPSBinObjGeneric obj216;
    DPSBinObjGeneric obj217;
    DPSBinObjGeneric obj218;
    DPSBinObjGeneric obj219;
    DPSBinObjGeneric obj220;
    DPSBinObjGeneric obj221;
    DPSBinObjGeneric obj222;
    DPSBinObjGeneric obj223;
    DPSBinObjGeneric obj224;
    DPSBinObjGeneric obj225;
    DPSBinObjGeneric obj226;
    DPSBinObjGeneric obj227;
    DPSBinObjGeneric obj228;
    DPSBinObjGeneric obj229;
    DPSBinObjGeneric obj230;
    DPSBinObjGeneric obj231;
    DPSBinObjGeneric obj232;
    DPSBinObjGeneric obj233;
    DPSBinObjGeneric obj234;
    DPSBinObjGeneric obj235;
    DPSBinObjGeneric obj236;
    DPSBinObjGeneric obj237;
    DPSBinObjGeneric obj238;
    DPSBinObjGeneric obj239;
    DPSBinObjGeneric obj240;
    DPSBinObjGeneric obj241;
    DPSBinObjGeneric obj242;
    DPSBinObjGeneric obj243;
    DPSBinObjGeneric obj244;
    DPSBinObjGeneric obj245;
    DPSBinObjGeneric obj246;
    DPSBinObjGeneric obj247;
    DPSBinObjGeneric obj248;
    DPSBinObjGeneric obj249;
    DPSBinObjGeneric obj250;
    DPSBinObjGeneric obj251;
    DPSBinObjGeneric obj252;
    DPSBinObjGeneric obj253;
    DPSBinObjGeneric obj254;
    DPSBinObjGeneric obj255;
    DPSBinObjGeneric obj256;
    DPSBinObjGeneric obj257;
    DPSBinObjGeneric obj258;
    DPSBinObjGeneric obj259;
    DPSBinObjGeneric obj260;
    DPSBinObjGeneric obj261;
    DPSBinObjGeneric obj262;
    DPSBinObjGeneric obj263;
    DPSBinObjGeneric obj264;
    DPSBinObjGeneric obj265;
    DPSBinObjGeneric obj266;
    DPSBinObjGeneric obj267;
    DPSBinObjGeneric obj268;
    DPSBinObjGeneric obj269;
    DPSBinObjGeneric obj270;
    DPSBinObjGeneric obj271;
    DPSBinObjGeneric obj272;
    DPSBinObjGeneric obj273;
    DPSBinObjGeneric obj274;
    DPSBinObjGeneric obj275;
    DPSBinObjGeneric obj276;
    DPSBinObjGeneric obj277;
    DPSBinObjGeneric obj278;
    DPSBinObjGeneric obj279;
    DPSBinObjGeneric obj280;
    DPSBinObjGeneric obj281;
    DPSBinObjGeneric obj282;
    DPSBinObjGeneric obj283;
    DPSBinObjGeneric obj284;
    DPSBinObjGeneric obj285;
    DPSBinObjGeneric obj286;
    DPSBinObjGeneric obj287;
    DPSBinObjGeneric obj288;
    DPSBinObjGeneric obj289;
    DPSBinObjGeneric obj290;
    DPSBinObjGeneric obj291;
    DPSBinObjGeneric obj292;
    DPSBinObjGeneric obj293;
    DPSBinObjGeneric obj294;
    DPSBinObjGeneric obj295;
    DPSBinObjGeneric obj296;
    DPSBinObjGeneric obj297;
    DPSBinObjGeneric obj298;
    DPSBinObjGeneric obj299;
    DPSBinObjGeneric obj300;
    DPSBinObjGeneric obj301;
    DPSBinObjGeneric obj302;
    DPSBinObjGeneric obj303;
    DPSBinObjGeneric obj304;
    DPSBinObjGeneric obj305;
    DPSBinObjGeneric obj306;
    DPSBinObjGeneric obj307;
    DPSBinObjGeneric obj308;
    DPSBinObjGeneric obj309;
    DPSBinObjGeneric obj310;
    DPSBinObjGeneric obj311;
    DPSBinObjGeneric obj312;
    DPSBinObjGeneric obj313;
    DPSBinObjGeneric obj314;
    DPSBinObjGeneric obj315;
    DPSBinObjGeneric obj316;
    DPSBinObjGeneric obj317;
    DPSBinObjGeneric obj318;
    DPSBinObjGeneric obj319;
    DPSBinObjGeneric obj320;
    DPSBinObjGeneric obj321;
    DPSBinObjGeneric obj322;
    DPSBinObjGeneric obj323;
    DPSBinObjGeneric obj324;
    DPSBinObjGeneric obj325;
    DPSBinObjGeneric obj326;
    DPSBinObjGeneric obj327;
    DPSBinObjGeneric obj328;
    DPSBinObjGeneric obj329;
    DPSBinObjGeneric obj330;
    DPSBinObjGeneric obj331;
    DPSBinObjGeneric obj332;
    DPSBinObjGeneric obj333;
    DPSBinObjGeneric obj334;
    DPSBinObjGeneric obj335;
    DPSBinObjGeneric obj336;
    DPSBinObjGeneric obj337;
    DPSBinObjGeneric obj338;
    DPSBinObjGeneric obj339;
    DPSBinObjGeneric obj340;
    DPSBinObjGeneric obj341;
    DPSBinObjGeneric obj342;
    DPSBinObjGeneric obj343;
    DPSBinObjGeneric obj344;
    DPSBinObjGeneric obj345;
    DPSBinObjGeneric obj346;
    DPSBinObjGeneric obj347;
    DPSBinObjGeneric obj348;
    DPSBinObjGeneric obj349;
    DPSBinObjGeneric obj350;
    DPSBinObjGeneric obj351;
    DPSBinObjGeneric obj352;
    DPSBinObjGeneric obj353;
    DPSBinObjGeneric obj354;
    DPSBinObjGeneric obj355;
    DPSBinObjGeneric obj356;
    DPSBinObjGeneric obj357;
    DPSBinObjGeneric obj358;
    DPSBinObjGeneric obj359;
    DPSBinObjGeneric obj360;
    DPSBinObjGeneric obj361;
    DPSBinObjGeneric obj362;
    DPSBinObjGeneric obj363;
    DPSBinObjGeneric obj364;
    DPSBinObjGeneric obj365;
    DPSBinObjGeneric obj366;
    DPSBinObjGeneric obj367;
    DPSBinObjGeneric obj368;
    DPSBinObjGeneric obj369;
    DPSBinObjGeneric obj370;
    DPSBinObjGeneric obj371;
    DPSBinObjGeneric obj372;
    DPSBinObjGeneric obj373;
    DPSBinObjGeneric obj374;
    DPSBinObjGeneric obj375;
    DPSBinObjGeneric obj376;
    DPSBinObjGeneric obj377;
    DPSBinObjGeneric obj378;
    DPSBinObjGeneric obj379;
    DPSBinObjGeneric obj380;
    DPSBinObjGeneric obj381;
    DPSBinObjGeneric obj382;
    DPSBinObjGeneric obj383;
    DPSBinObjGeneric obj384;
    DPSBinObjGeneric obj385;
    DPSBinObjGeneric obj386;
    DPSBinObjGeneric obj387;
    } _dpsQ;
  static const _dpsQ _dpsStat = {
    DPS_DEF_TOKENTYPE, 50, 3108,
    {DPS_LITERAL|DPS_NAME, 0, 0, 0},	/* PatternImageDict */
    {DPS_LITERAL|DPS_INT, 0, 0, 8},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 53},	/* dict */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 13},	/* begin */
    {DPS_LITERAL|DPS_NAME, 0, 0, 0},	/* PATImageDict */
    {DPS_LITERAL|DPS_INT, 0, 0, 1},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 53},	/* dict */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},	/* def */
    {DPS_LITERAL|DPS_NAME, 0, 0, 0},	/* PATsi */
    {DPS_EXEC|DPS_ARRAY, 0, 6, 3056},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 14},	/* bind */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},	/* def */
    {DPS_LITERAL|DPS_NAME, 0, 0, 0},	/* PATdrawcell */
    {DPS_EXEC|DPS_ARRAY, 0, 13, 2952},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 14},	/* bind */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},	/* def */
    {DPS_LITERAL|DPS_NAME, 0, 0, 0},	/* PATsize */
    {DPS_EXEC|DPS_ARRAY, 0, 19, 2800},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 14},	/* bind */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},	/* def */
    {DPS_LITERAL|DPS_NAME, 0, 0, 0},	/* PATpicalc */
    {DPS_EXEC|DPS_ARRAY, 0, 59, 2328},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 14},	/* bind */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},	/* def */
    {DPS_LITERAL|DPS_NAME, 0, 0, 0},	/* PATtile */
    {DPS_EXEC|DPS_ARRAY, 0, 28, 1728},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 14},	/* bind */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},	/* def */
    {DPS_LITERAL|DPS_NAME, 0, 0, 0},	/* PATimage */
    {DPS_EXEC|DPS_ARRAY, 0, 25, 1528},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 14},	/* bind */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},	/* def */
    {DPS_LITERAL|DPS_NAME, 0, 0, 0},	/* PATfill */
    {DPS_EXEC|DPS_ARRAY, 0, 36, 1032},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 14},	/* bind */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},	/* def */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 30},	/* currentdict */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 57},	/* end */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},	/* def */
    {DPS_LITERAL|DPS_NAME, 0, 0, 0},	/* PatternDrawDict */
    {DPS_LITERAL|DPS_INT, 0, 0, 1},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 53},	/* dict */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 13},	/* begin */
    {DPS_LITERAL|DPS_NAME, 0, 0, 0},	/* PATfill */
    {DPS_EXEC|DPS_ARRAY, 0, 27, 400},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 14},	/* bind */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},	/* def */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 30},	/* currentdict */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 57},	/* end */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},	/* def */
    {DPS_LITERAL|DPS_BOOL, 0, 0, 0},
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATredef */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATDict */
    {DPS_LITERAL|DPS_NAME, 0, 0, 0},	/* CurrentPattern */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 75},	/* get */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 13},	/* begin */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PatternGState */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATsg */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PaintType */
    {DPS_LITERAL|DPS_INT, 0, 0, 2},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 61},	/* eq */
    {DPS_EXEC|DPS_ARRAY, 0, 4, 1000},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 84},	/* if */
    {DPS_LITERAL|DPS_INT, 0, 0, 0},
    {DPS_LITERAL|DPS_INT, 0, 0, 1},
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* NumSources */
    {DPS_LITERAL|DPS_INT, 0, 0, 1},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},	/* sub */
    {DPS_EXEC|DPS_ARRAY, 0, 18, 616},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 72},	/* for */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},	/* pop */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},	/* pop */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},	/* pop */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},	/* pop */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 57},	/* end */
    {DPS_LITERAL|DPS_BOOL, 0, 0, 1},
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATredef */
    {DPS_LITERAL|DPS_INT, 0, 0, 2},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},	/* index */
    {DPS_LITERAL|DPS_INT, 0, 0, 2},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},	/* index */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},	/* moveto */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* Multi */
    {DPS_EXEC|DPS_ARRAY, 0, 5, 960},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 84},	/* if */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* Multi */
    {DPS_EXEC|DPS_ARRAY, 0, 3, 936},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 84},	/* if */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 30},	/* currentdict */
    {DPS_LITERAL|DPS_INT, 0, 0, 4},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},	/* index */
    {DPS_EXEC|DPS_ARRAY, 0, 8, 760},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 131},	/* repeat */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},	/* pop */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},	/* pop */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 40},	/* currentpoint */
    {DPS_LITERAL|DPS_INT, 0, 0, 7},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},	/* index */
    {DPS_EXEC|DPS_ARRAY, 0, 14, 824},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 131},	/* repeat */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* YStep */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},	/* add */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},	/* moveto */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 78},	/* gsave */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 40},	/* currentpoint */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 173},	/* translate */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 318},	/* mark */
    {DPS_LITERAL|DPS_INT, 0, 0, 4},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},	/* index */
    {DPS_LITERAL|DPS_INT, 0, 0, 4},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},	/* index */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PaintProc */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 19},	/* cleartomark */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 77},	/* grestore */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* XStep */
    {DPS_LITERAL|DPS_INT, 0, 0, 0},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 134},	/* rmoveto */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PaintData */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},	/* exch */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 75},	/* get */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 56},	/* dup */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PaintColors */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},	/* exch */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 75},	/* get */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATsc */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATDict */
    {DPS_LITERAL|DPS_NAME, 0, 0, 0},	/* PColor */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 75},	/* get */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATsc */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATDict */
    {DPS_LITERAL|DPS_NAME, 0, 0, 0},	/* CurrentPattern */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 75},	/* get */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 13},	/* begin */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PatternGState */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATsg */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* BBox */
    {DPS_LITERAL|DPS_INT, 0, 0, 0},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 75},	/* get */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* BBox */
    {DPS_LITERAL|DPS_INT, 0, 0, 1},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 75},	/* get */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 173},	/* translate */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},	/* moveto */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* BBox */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 2},	/* aload */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},	/* pop */
    {DPS_LITERAL|DPS_INT, 0, 0, 2},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},	/* index */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},	/* sub */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},	/* exch */
    {DPS_LITERAL|DPS_INT, 0, 0, 3},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},	/* index */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},	/* sub */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},	/* exch */
    {DPS_LITERAL|DPS_INT, 0, 0, 4},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},	/* index */
    {DPS_EXEC|DPS_ARRAY, 0, 15, 1320},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 131},	/* repeat */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},	/* pop */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},	/* pop */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},	/* pop */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},	/* pop */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},	/* pop */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},	/* pop */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 57},	/* end */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 40},	/* currentpoint */
    {DPS_LITERAL|DPS_INT, 0, 0, 6},
    {DPS_LITERAL|DPS_INT, 0, 0, 2},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 135},	/* roll */
    {DPS_LITERAL|DPS_INT, 0, 0, 7},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},	/* index */
    {DPS_EXEC|DPS_ARRAY, 0, 11, 1440},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 131},	/* repeat */
    {DPS_LITERAL|DPS_INT, 0, 0, 6},
    {DPS_LITERAL|DPS_INT, 0, 0, -2},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 135},	/* roll */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},	/* moveto */
    {DPS_LITERAL|DPS_INT, 0, 0, 0},
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* YStep */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 134},	/* rmoveto */
    {DPS_LITERAL|DPS_INT, 0, 0, 4},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 25},	/* copy */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATImageDict */
    {DPS_LITERAL|DPS_NAME, 0, 0, 0},	/* CurrentImage */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 75},	/* get */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 40},	/* currentpoint */
    {DPS_LITERAL|DPS_INT, 0, 0, 1},
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* composite */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* XStep */
    {DPS_LITERAL|DPS_INT, 0, 0, 0},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 134},	/* rmoveto */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 13},	/* begin */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 78},	/* gsave */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 30},	/* currentdict */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATsize */
    {DPS_LITERAL|DPS_INT, 0, 0, 4},
    {DPS_LITERAL|DPS_INT, 0, 0, 2},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 135},	/* roll */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},	/* pop */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},	/* pop */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 172},	/* transform */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PatternGState */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATsg */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 95},	/* itransform */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 173},	/* translate */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 78},	/* gsave */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATdrawcell */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATpicalc */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 20},	/* clip */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 111},	/* newpath */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATtile */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 77},	/* grestore */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 79},	/* gstate */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 34},	/* currentgstate */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 77},	/* grestore */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 57},	/* end */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATDict */
    {DPS_LITERAL|DPS_NAME, 0, 0, 0},	/* CurrentPattern */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 75},	/* get */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 56},	/* dup */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 13},	/* begin */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 149},	/* setfont */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 104},	/* matrix */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 39},	/* currentmatrix */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PatternGState */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATsg */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 156},	/* setmatrix */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PaintType */
    {DPS_LITERAL|DPS_INT, 0, 0, 2},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 61},	/* eq */
    {DPS_EXEC|DPS_ARRAY, 0, 4, 2296},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 84},	/* if */
    {DPS_LITERAL|DPS_INT, 0, 0, 0},
    {DPS_LITERAL|DPS_INT, 0, 0, 1},
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* NumSources */
    {DPS_LITERAL|DPS_INT, 0, 0, 1},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},	/* sub */
    {DPS_EXEC|DPS_ARRAY, 0, 21, 1952},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 72},	/* for */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},	/* pop */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},	/* pop */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},	/* pop */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},	/* pop */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 57},	/* end */
    {DPS_LITERAL|DPS_INT, 0, 0, 2},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},	/* index */
    {DPS_LITERAL|DPS_INT, 0, 0, 2},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},	/* index */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},	/* moveto */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* Multi */
    {DPS_EXEC|DPS_ARRAY, 0, 5, 2256},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 84},	/* if */
    {DPS_LITERAL|DPS_INT, 0, 0, 0},
    {DPS_LITERAL|DPS_INT, 0, 0, 1},
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATfstr */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 98},	/* length */
    {DPS_LITERAL|DPS_INT, 0, 0, 1},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},	/* sub */
    {DPS_EXEC|DPS_ARRAY, 0, 7, 2200},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 72},	/* for */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},	/* pop */
    {DPS_LITERAL|DPS_INT, 0, 0, 2},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},	/* index */
    {DPS_EXEC|DPS_ARRAY, 0, 8, 2120},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 131},	/* repeat */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 40},	/* currentpoint */
    {DPS_LITERAL|DPS_INT, 0, 0, 5},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},	/* index */
    {DPS_EXEC|DPS_ARRAY, 0, 2, 2184},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 131},	/* repeat */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* YStep */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},	/* add */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},	/* moveto */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATfstr */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* oldshow */
    {DPS_LITERAL|DPS_INT, 0, 0, 1},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},	/* index */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATfstr */
    {DPS_LITERAL|DPS_INT, 0, 0, 3},
    {DPS_LITERAL|DPS_INT, 0, 0, 1},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 135},	/* roll */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 120},	/* put */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 56},	/* dup */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PaintColors */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},	/* exch */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 75},	/* get */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATsc */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATDict */
    {DPS_LITERAL|DPS_NAME, 0, 0, 0},	/* PColor */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 75},	/* get */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATsc */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATDict */
    {DPS_LITERAL|DPS_NAME, 0, 0, 0},	/* CurrentPattern */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 75},	/* get */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 13},	/* begin */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 115},	/* pathbbox */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PatHeight */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 54},	/* div */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 16},	/* ceiling */
    {DPS_LITERAL|DPS_INT, 0, 0, 1},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},	/* add */
    {DPS_LITERAL|DPS_INT, 0, 0, 4},
    {DPS_LITERAL|DPS_INT, 0, 0, 1},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 135},	/* roll */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PatWidth */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 54},	/* div */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 16},	/* ceiling */
    {DPS_LITERAL|DPS_INT, 0, 0, 1},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},	/* add */
    {DPS_LITERAL|DPS_INT, 0, 0, 4},
    {DPS_LITERAL|DPS_INT, 0, 0, 1},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 135},	/* roll */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PatHeight */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 54},	/* div */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 69},	/* floor */
    {DPS_LITERAL|DPS_INT, 0, 0, 4},
    {DPS_LITERAL|DPS_INT, 0, 0, 1},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 135},	/* roll */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PatWidth */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 54},	/* div */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 69},	/* floor */
    {DPS_LITERAL|DPS_INT, 0, 0, 4},
    {DPS_LITERAL|DPS_INT, 0, 0, 1},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 135},	/* roll */
    {DPS_LITERAL|DPS_INT, 0, 0, 2},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},	/* index */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},	/* sub */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 44},	/* cvi */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 0},	/* abs */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},	/* exch */
    {DPS_LITERAL|DPS_INT, 0, 0, 3},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},	/* index */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},	/* sub */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 44},	/* cvi */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 0},	/* abs */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},	/* exch */
    {DPS_LITERAL|DPS_INT, 0, 0, 4},
    {DPS_LITERAL|DPS_INT, 0, 0, 2},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 135},	/* roll */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PatHeight */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 108},	/* mul */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PatHeight */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},	/* sub */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},	/* exch */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PatWidth */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 108},	/* mul */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PatWidth */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},	/* sub */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},	/* exch */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 57},	/* end */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 13},	/* begin */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 78},	/* gsave */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 104},	/* matrix */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 39},	/* currentmatrix */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PatternGState */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATsg */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATdrawcell */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 156},	/* setmatrix */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 115},	/* pathbbox */
    {DPS_LITERAL|DPS_INT, 0, 0, 2},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},	/* index */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},	/* sub */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},	/* exch */
    {DPS_LITERAL|DPS_INT, 0, 0, 3},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},	/* index */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},	/* sub */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},	/* exch */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 77},	/* grestore */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 57},	/* end */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 111},	/* newpath */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* BBox */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 2},	/* aload */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},	/* pop */
    {DPS_LITERAL|DPS_INT, 0, 0, 2},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},	/* index */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},	/* sub */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},	/* exch */
    {DPS_LITERAL|DPS_INT, 0, 0, 3},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},	/* index */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},	/* sub */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},	/* exch */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATrectdraw */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATImageDict */
    {DPS_LITERAL|DPS_NAME, 0, 0, 0},	/* CurrentImage */
    {DPS_LITERAL|DPS_INT, 0, 0, 3},
    {DPS_LITERAL|DPS_INT, 0, 0, -1},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 135},	/* roll */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 120},	/* put */
    }; /* _dpsQ */
  _dpsQ _dpsF;	/* local copy  */
  register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  static long int _dpsCodes[82] = {-1};
  {
if (_dpsCodes[0] < 0) {
    static const char * const _dps_names[] = {
	"PatternImageDict",
	"PATImageDict",
	(char *) 0 ,
	(char *) 0 ,
	"PATsi",
	"PATdrawcell",
	(char *) 0 ,
	(char *) 0 ,
	"PATsize",
	(char *) 0 ,
	"PATpicalc",
	(char *) 0 ,
	"PATtile",
	(char *) 0 ,
	"PATimage",
	"PATfill",
	(char *) 0 ,
	"PatternDrawDict",
	"PATredef",
	(char *) 0 ,
	"PATDict",
	(char *) 0 ,
	(char *) 0 ,
	(char *) 0 ,
	(char *) 0 ,
	(char *) 0 ,
	"CurrentPattern",
	(char *) 0 ,
	(char *) 0 ,
	(char *) 0 ,
	"PatternGState",
	(char *) 0 ,
	(char *) 0 ,
	(char *) 0 ,
	(char *) 0 ,
	"PATsg",
	(char *) 0 ,
	(char *) 0 ,
	(char *) 0 ,
	(char *) 0 ,
	"PaintType",
	(char *) 0 ,
	"NumSources",
	(char *) 0 ,
	"Multi",
	(char *) 0 ,
	(char *) 0 ,
	"YStep",
	(char *) 0 ,
	(char *) 0 ,
	"PaintProc",
	"XStep",
	(char *) 0 ,
	"PaintData",
	"PaintColors",
	(char *) 0 ,
	"PATsc",
	(char *) 0 ,
	(char *) 0 ,
	(char *) 0 ,
	"PColor",
	(char *) 0 ,
	"BBox",
	(char *) 0 ,
	(char *) 0 ,
	(char *) 0 ,
	"CurrentImage",
	(char *) 0 ,
	"composite",
	"PATfstr",
	(char *) 0 ,
	(char *) 0 ,
	"oldshow",
	"PatHeight",
	(char *) 0 ,
	(char *) 0 ,
	(char *) 0 ,
	"PatWidth",
	(char *) 0 ,
	(char *) 0 ,
	(char *) 0 ,
	"PATrectdraw"};
    long int *_dps_nameVals[82];
    _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];
    _dps_nameVals[41] = &_dpsCodes[41];
    _dps_nameVals[42] = &_dpsCodes[42];
    _dps_nameVals[43] = &_dpsCodes[43];
    _dps_nameVals[44] = &_dpsCodes[44];
    _dps_nameVals[45] = &_dpsCodes[45];
    _dps_nameVals[46] = &_dpsCodes[46];
    _dps_nameVals[47] = &_dpsCodes[47];
    _dps_nameVals[48] = &_dpsCodes[48];
    _dps_nameVals[49] = &_dpsCodes[49];
    _dps_nameVals[50] = &_dpsCodes[50];
    _dps_nameVals[51] = &_dpsCodes[51];
    _dps_nameVals[52] = &_dpsCodes[52];
    _dps_nameVals[53] = &_dpsCodes[53];
    _dps_nameVals[54] = &_dpsCodes[54];
    _dps_nameVals[55] = &_dpsCodes[55];
    _dps_nameVals[56] = &_dpsCodes[56];
    _dps_nameVals[57] = &_dpsCodes[57];
    _dps_nameVals[58] = &_dpsCodes[58];
    _dps_nameVals[59] = &_dpsCodes[59];
    _dps_nameVals[60] = &_dpsCodes[60];
    _dps_nameVals[61] = &_dpsCodes[61];
    _dps_nameVals[62] = &_dpsCodes[62];
    _dps_nameVals[63] = &_dpsCodes[63];
    _dps_nameVals[64] = &_dpsCodes[64];
    _dps_nameVals[65] = &_dpsCodes[65];
    _dps_nameVals[66] = &_dpsCodes[66];
    _dps_nameVals[67] = &_dpsCodes[67];
    _dps_nameVals[68] = &_dpsCodes[68];
    _dps_nameVals[69] = &_dpsCodes[69];
    _dps_nameVals[70] = &_dpsCodes[70];
    _dps_nameVals[71] = &_dpsCodes[71];
    _dps_nameVals[72] = &_dpsCodes[72];
    _dps_nameVals[73] = &_dpsCodes[73];
    _dps_nameVals[74] = &_dpsCodes[74];
    _dps_nameVals[75] = &_dpsCodes[75];
    _dps_nameVals[76] = &_dpsCodes[76];
    _dps_nameVals[77] = &_dpsCodes[77];
    _dps_nameVals[78] = &_dpsCodes[78];
    _dps_nameVals[79] = &_dpsCodes[79];
    _dps_nameVals[80] = &_dpsCodes[80];
    _dps_nameVals[81] = &_dpsCodes[81];

    DPSMapNames(_dpsCurCtxt, 82, _dps_names, _dps_nameVals);
    }
  }

  _dpsF = _dpsStat;	/* assign automatic variable */

  _dpsP[0].val.nameVal = _dpsCodes[0];
  _dpsP[4].val.nameVal = _dpsCodes[1];
  _dpsP[382].val.nameVal = _dpsCodes[2];
  _dpsP[182].val.nameVal = _dpsCodes[3];
  _dpsP[8].val.nameVal = _dpsCodes[4];
  _dpsP[12].val.nameVal = _dpsCodes[5];
  _dpsP[356].val.nameVal = _dpsCodes[6];
  _dpsP[206].val.nameVal = _dpsCodes[7];
  _dpsP[16].val.nameVal = _dpsCodes[8];
  _dpsP[194].val.nameVal = _dpsCodes[9];
  _dpsP[20].val.nameVal = _dpsCodes[10];
  _dpsP[207].val.nameVal = _dpsCodes[11];
  _dpsP[24].val.nameVal = _dpsCodes[12];
  _dpsP[210].val.nameVal = _dpsCodes[13];
  _dpsP[28].val.nameVal = _dpsCodes[14];
  _dpsP[32].val.nameVal = _dpsCodes[15];
  _dpsP[43].val.nameVal = _dpsCodes[16];
  _dpsP[39].val.nameVal = _dpsCodes[17];
  _dpsP[51].val.nameVal = _dpsCodes[18];
  _dpsP[76].val.nameVal = _dpsCodes[19];
  _dpsP[52].val.nameVal = _dpsCodes[20];
  _dpsP[291].val.nameVal = _dpsCodes[21];
  _dpsP[287].val.nameVal = _dpsCodes[22];
  _dpsP[216].val.nameVal = _dpsCodes[23];
  _dpsP[129].val.nameVal = _dpsCodes[24];
  _dpsP[125].val.nameVal = _dpsCodes[25];
  _dpsP[53].val.nameVal = _dpsCodes[26];
  _dpsP[292].val.nameVal = _dpsCodes[27];
  _dpsP[217].val.nameVal = _dpsCodes[28];
  _dpsP[130].val.nameVal = _dpsCodes[29];
  _dpsP[56].val.nameVal = _dpsCodes[30];
  _dpsP[354].val.nameVal = _dpsCodes[31];
  _dpsP[224].val.nameVal = _dpsCodes[32];
  _dpsP[201].val.nameVal = _dpsCodes[33];
  _dpsP[133].val.nameVal = _dpsCodes[34];
  _dpsP[57].val.nameVal = _dpsCodes[35];
  _dpsP[355].val.nameVal = _dpsCodes[36];
  _dpsP[225].val.nameVal = _dpsCodes[37];
  _dpsP[202].val.nameVal = _dpsCodes[38];
  _dpsP[134].val.nameVal = _dpsCodes[39];
  _dpsP[58].val.nameVal = _dpsCodes[40];
  _dpsP[227].val.nameVal = _dpsCodes[41];
  _dpsP[65].val.nameVal = _dpsCodes[42];
  _dpsP[234].val.nameVal = _dpsCodes[43];
  _dpsP[82].val.nameVal = _dpsCodes[44];
  _dpsP[249].val.nameVal = _dpsCodes[45];
  _dpsP[85].val.nameVal = _dpsCodes[46];
  _dpsP[100].val.nameVal = _dpsCodes[47];
  _dpsP[270].val.nameVal = _dpsCodes[48];
  _dpsP[178].val.nameVal = _dpsCodes[49];
  _dpsP[111].val.nameVal = _dpsCodes[50];
  _dpsP[114].val.nameVal = _dpsCodes[51];
  _dpsP[188].val.nameVal = _dpsCodes[52];
  _dpsP[117].val.nameVal = _dpsCodes[53];
  _dpsP[121].val.nameVal = _dpsCodes[54];
  _dpsP[283].val.nameVal = _dpsCodes[55];
  _dpsP[124].val.nameVal = _dpsCodes[56];
  _dpsP[290].val.nameVal = _dpsCodes[57];
  _dpsP[286].val.nameVal = _dpsCodes[58];
  _dpsP[128].val.nameVal = _dpsCodes[59];
  _dpsP[126].val.nameVal = _dpsCodes[60];
  _dpsP[288].val.nameVal = _dpsCodes[61];
  _dpsP[135].val.nameVal = _dpsCodes[62];
  _dpsP[370].val.nameVal = _dpsCodes[63];
  _dpsP[143].val.nameVal = _dpsCodes[64];
  _dpsP[138].val.nameVal = _dpsCodes[65];
  _dpsP[183].val.nameVal = _dpsCodes[66];
  _dpsP[383].val.nameVal = _dpsCodes[67];
  _dpsP[187].val.nameVal = _dpsCodes[68];
  _dpsP[254].val.nameVal = _dpsCodes[69];
  _dpsP[277].val.nameVal = _dpsCodes[70];
  _dpsP[273].val.nameVal = _dpsCodes[71];
  _dpsP[274].val.nameVal = _dpsCodes[72];
  _dpsP[296].val.nameVal = _dpsCodes[73];
  _dpsP[341].val.nameVal = _dpsCodes[74];
  _dpsP[339].val.nameVal = _dpsCodes[75];
  _dpsP[312].val.nameVal = _dpsCodes[76];
  _dpsP[304].val.nameVal = _dpsCodes[77];
  _dpsP[346].val.nameVal = _dpsCodes[78];
  _dpsP[344].val.nameVal = _dpsCodes[79];
  _dpsP[318].val.nameVal = _dpsCodes[80];
  _dpsP[381].val.nameVal = _dpsCodes[81];
  DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,3108);
}
#line 269 "PSWpatternsdemo.psw"


/*****************************************************
*
*	The wraps called from the pattern object.
*
*****************************************************/
#line 1117 "PSWpatternsdemo.c"
void PSWBeginPatternImage( void )
{
  typedef struct {
    unsigned char tokenType;
    unsigned char topLevelCount;
    unsigned short nBytes;

    DPSBinObjGeneric obj0;
    DPSBinObjGeneric obj1;
    } _dpsQ;
  static const _dpsQ _dpsStat = {
    DPS_DEF_TOKENTYPE, 2, 20,
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PatternImageDict */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 13},	/* begin */
    }; /* _dpsQ */
  _dpsQ _dpsF;	/* local copy  */
  register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  static long int _dpsCodes[1] = {-1};
  {
if (_dpsCodes[0] < 0) {
    static const char * const _dps_names[] = {
	"PatternImageDict"};
    long int *_dps_nameVals[1];
    _dps_nameVals[0] = &_dpsCodes[0];

    DPSMapNames(_dpsCurCtxt, 1, _dps_names, _dps_nameVals);
    }
  }

  _dpsF = _dpsStat;	/* assign automatic variable */

  _dpsP[0].val.nameVal = _dpsCodes[0];
  DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,20);
}
#line 279 "PSWpatternsdemo.psw"

#line 1155 "PSWpatternsdemo.c"
void PSWSetPatternImage(int PatternImageNum)
{
  typedef struct {
    unsigned char tokenType;
    unsigned char topLevelCount;
    unsigned short nBytes;

    DPSBinObjGeneric obj0;
    DPSBinObjGeneric obj1;
    DPSBinObjGeneric obj2;
    } _dpsQ;
  static const _dpsQ _dpsStat = {
    DPS_DEF_TOKENTYPE, 3, 28,
    {DPS_LITERAL|DPS_INT, 0, 0, 0},	/* param: PatternImageNum */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 212},	/* execuserobject */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATsi */
    }; /* _dpsQ */
  _dpsQ _dpsF;	/* local copy  */
  register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  static long int _dpsCodes[1] = {-1};
  {
if (_dpsCodes[0] < 0) {
    static const char * const _dps_names[] = {
	"PATsi"};
    long int *_dps_nameVals[1];
    _dps_nameVals[0] = &_dpsCodes[0];

    DPSMapNames(_dpsCurCtxt, 1, _dps_names, _dps_nameVals);
    }
  }

  _dpsF = _dpsStat;	/* assign automatic variable */

  _dpsP[0].val.integerVal = PatternImageNum;
  _dpsP[2].val.nameVal = _dpsCodes[0];
  DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,28);
}
#line 283 "PSWpatternsdemo.psw"


/*
*	Sizes the image for the pattern in the current window. Assumes the
*	PatternDict is already on the dictionary stack.
*/
#line 1201 "PSWpatternsdemo.c"
void PSWSizeImage(int PatternNum, float *X, float *Y, float *W, float *H)
{
  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;
    } _dpsQ;
  static const _dpsQ _dpsStat = {
    DPS_DEF_TOKENTYPE, 22, 180,
    {DPS_LITERAL|DPS_INT, 0, 0, 0},	/* param: PatternNum */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 212},	/* execuserobject */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATsp */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PatternImageDict */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 13},	/* begin */
    {DPS_LITERAL|DPS_INT, 0, 0, 0},	/* param: PatternNum */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 212},	/* execuserobject */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATsize */
    {DPS_LITERAL|DPS_INT, 0, 0, 3},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 119},	/* printobject */
    {DPS_LITERAL|DPS_INT, 0, 0, 2},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 119},	/* printobject */
    {DPS_LITERAL|DPS_INT, 0, 0, 1},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 119},	/* printobject */
    {DPS_LITERAL|DPS_INT, 0, 0, 0},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 119},	/* printobject */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 57},	/* end */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATusp */
    {DPS_LITERAL|DPS_INT, 0, 0, 0},
    {DPS_LITERAL|DPS_INT, 0, 0, 4},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 119},	/* printobject */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 70},	/* flush */
    }; /* _dpsQ */
  _dpsQ _dpsF;	/* local copy  */
  register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  static long int _dpsCodes[4] = {-1};
  DPSResultsRec _dpsR[4];
  static const DPSResultsRec _dpsRstat[] = {
    { dps_tFloat, -1 },
    { dps_tFloat, -1 },
    { dps_tFloat, -1 },
    { dps_tFloat, -1 },
    };
    _dpsR[0] = _dpsRstat[0];
    _dpsR[0].value = (char *)X;
    _dpsR[1] = _dpsRstat[1];
    _dpsR[1].value = (char *)Y;
    _dpsR[2] = _dpsRstat[2];
    _dpsR[2].value = (char *)W;
    _dpsR[3] = _dpsRstat[3];
    _dpsR[3].value = (char *)H;

  {
if (_dpsCodes[0] < 0) {
    static const char * const _dps_names[] = {
	"PATsp",
	"PatternImageDict",
	"PATsize",
	"PATusp"};
    long int *_dps_nameVals[4];
    _dps_nameVals[0] = &_dpsCodes[0];
    _dps_nameVals[1] = &_dpsCodes[1];
    _dps_nameVals[2] = &_dpsCodes[2];
    _dps_nameVals[3] = &_dpsCodes[3];

    DPSMapNames(_dpsCurCtxt, 4, _dps_names, _dps_nameVals);
    }
  }

  _dpsF = _dpsStat;	/* assign automatic variable */

  _dpsP[0].val.integerVal =
  _dpsP[5].val.integerVal = PatternNum;
  _dpsP[2].val.nameVal = _dpsCodes[0];
  _dpsP[3].val.nameVal = _dpsCodes[1];
  _dpsP[7].val.nameVal = _dpsCodes[2];
  _dpsP[17].val.nameVal = _dpsCodes[3];
  DPSSetResultTable(_dpsCurCtxt, _dpsR, 4);
  DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,180);
  DPSAwaitReturnValues(_dpsCurCtxt);
}
#line 295 "PSWpatternsdemo.psw"


/*
*	Make an image of the pattern in the current window. The image
*	will be composited into the clipping path to produce the pattern.
*	Leaves a gstate object on the stack. Assumes the PatternDict is
*	already on the dictionary stack.
*/
#line 1315 "PSWpatternsdemo.c"
void PSWMakeImage(int PatternNum)
{
  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;
    } _dpsQ;
  static const _dpsQ _dpsStat = {
    DPS_DEF_TOKENTYPE, 10, 84,
    {DPS_LITERAL|DPS_INT, 0, 0, 0},	/* param: PatternNum */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 212},	/* execuserobject */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATsp */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PatternImageDict */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 13},	/* begin */
    {DPS_LITERAL|DPS_INT, 0, 0, 0},	/* param: PatternNum */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 212},	/* execuserobject */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATimage */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 57},	/* end */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PATusp */
    }; /* _dpsQ */
  _dpsQ _dpsF;	/* local copy  */
  register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  static long int _dpsCodes[4] = {-1};
  {
if (_dpsCodes[0] < 0) {
    static const char * const _dps_names[] = {
	"PATsp",
	"PatternImageDict",
	"PATimage",
	"PATusp"};
    long int *_dps_nameVals[4];
    _dps_nameVals[0] = &_dpsCodes[0];
    _dps_nameVals[1] = &_dpsCodes[1];
    _dps_nameVals[2] = &_dpsCodes[2];
    _dps_nameVals[3] = &_dpsCodes[3];

    DPSMapNames(_dpsCurCtxt, 4, _dps_names, _dps_nameVals);
    }
  }

  _dpsF = _dpsStat;	/* assign automatic variable */

  _dpsP[0].val.integerVal =
  _dpsP[5].val.integerVal = PatternNum;
  _dpsP[2].val.nameVal = _dpsCodes[0];
  _dpsP[3].val.nameVal = _dpsCodes[1];
  _dpsP[7].val.nameVal = _dpsCodes[2];
  _dpsP[9].val.nameVal = _dpsCodes[3];
  DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,84);
}
#line 309 "PSWpatternsdemo.psw"

#line 1380 "PSWpatternsdemo.c"
void PSWBeginPatternDraw( void )
{
  typedef struct {
    unsigned char tokenType;
    unsigned char topLevelCount;
    unsigned short nBytes;

    DPSBinObjGeneric obj0;
    DPSBinObjGeneric obj1;
    } _dpsQ;
  static const _dpsQ _dpsStat = {
    DPS_DEF_TOKENTYPE, 2, 20,
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PatternDrawDict */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 13},	/* begin */
    }; /* _dpsQ */
  _dpsQ _dpsF;	/* local copy  */
  register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  static long int _dpsCodes[1] = {-1};
  {
if (_dpsCodes[0] < 0) {
    static const char * const _dps_names[] = {
	"PatternDrawDict"};
    long int *_dps_nameVals[1];
    _dps_nameVals[0] = &_dpsCodes[0];

    DPSMapNames(_dpsCurCtxt, 1, _dps_names, _dps_nameVals);
    }
  }

  _dpsF = _dpsStat;	/* assign automatic variable */

  _dpsP[0].val.nameVal = _dpsCodes[0];
  DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,20);
}
#line 314 "PSWpatternsdemo.psw"

#line 1418 "PSWpatternsdemo.c"
void PSWCompositePattern(int PatternNum, int PatternImageNum, float X, float Y)
{
  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;
    DPSBinObjReal obj21;
    DPSBinObjGeneric obj22;
    DPSBinObjGeneric obj23;
    DPSBinObjGeneric 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;
    DPSBinObjGeneric obj38;
    DPSBinObjGeneric obj39;
    DPSBinObjGeneric obj40;
    } _dpsQ;
  static const _dpsQ _dpsStat = {
    DPS_DEF_TOKENTYPE, 41, 332,
    {DPS_LITERAL|DPS_INT, 0, 0, 0},	/* param: PatternNum */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 212},	/* execuserobject */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 13},	/* begin */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* BBox */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 2},	/* aload */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 117},	/* pop */
    {DPS_LITERAL|DPS_INT, 0, 0, 2},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},	/* index */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},	/* sub */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},	/* exch */
    {DPS_LITERAL|DPS_INT, 0, 0, 3},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 88},	/* index */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},	/* sub */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},	/* exch */
    {DPS_LITERAL|DPS_INT, 0, 0, 2},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 25},	/* copy */
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* PatternGState */
    {DPS_LITERAL|DPS_NAME, 0, 0, 0},	/* cm */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 75},	/* get */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 55},	/* dtransform */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 83},	/* idtransform */
    {DPS_LITERAL|DPS_REAL, 0, 0, 0},	/* param: Y */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},	/* exch */
    {DPS_LITERAL|DPS_INT, 0, 0, 2},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 54},	/* div */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},	/* sub */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},	/* exch */
    {DPS_LITERAL|DPS_REAL, 0, 0, 0},	/* param: X */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},	/* exch */
    {DPS_LITERAL|DPS_INT, 0, 0, 2},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 54},	/* div */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},	/* sub */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},	/* exch */
    {DPS_LITERAL|DPS_INT, 0, 0, 0},	/* param: PatternImageNum */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 212},	/* execuserobject */
    {DPS_LITERAL|DPS_INT, 0, 0, 3},
    {DPS_LITERAL|DPS_INT, 0, 0, 1},
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 135},	/* roll */
    {DPS_LITERAL|DPS_INT, 0, 0, 1},
    {DPS_EXEC|DPS_NAME, 0, 0, 0},	/* composite */
    {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 57},	/* end */
    }; /* _dpsQ */
  _dpsQ _dpsF;	/* local copy  */
  register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  static long int _dpsCodes[4] = {-1};
  {
if (_dpsCodes[0] < 0) {
    static const char * const _dps_names[] = {
	"BBox",
	"PatternGState",
	"cm",
	"composite"};
    long int *_dps_nameVals[4];
    _dps_nameVals[0] = &_dpsCodes[0];
    _dps_nameVals[1] = &_dpsCodes[1];
    _dps_nameVals[2] = &_dpsCodes[2];
    _dps_nameVals[3] = &_dpsCodes[3];

    DPSMapNames(_dpsCurCtxt, 4, _dps_names, _dps_nameVals);
    }
  }

  _dpsF = _dpsStat;	/* assign automatic variable */

  _dpsP[0].val.integerVal = PatternNum;
  _dpsP[33].val.integerVal = PatternImageNum;
  _dpsP[27].val.realVal = X;
  _dpsP[21].val.realVal = Y;
  _dpsP[3].val.nameVal = _dpsCodes[0];
  _dpsP[16].val.nameVal = _dpsCodes[1];
  _dpsP[17].val.nameVal = _dpsCodes[2];
  _dpsP[39].val.nameVal = _dpsCodes[3];
  DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,332);
}
#line 330 "PSWpatternsdemo.psw"

These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.