(FILECREATED "22-Apr-86 11:51:18" ("compiled on " {ERIS}SOURCES>PRESS.;125) "18-Apr-86 18:08:41" bcompl'd in "Xerox Lisp 21-Apr-86 ..." dated "21-Apr-86 11:58:07") (FILECREATED "27-Mar-86 19:22:14" {ERIS}SOURCES>PRESS.;125 137872 changes to: (FNS \STRINGWIDTH.PRESS) previous date: "10-Mar-86 17:08:57" {ERIS}SOURCES>PRESS.;123) \SEARCHPRESSFONTSA0001 D1 (NAME ERRORSET L (0 NIL) P 3 WSTRM P 2 FONTSFOUND P 1 F F 4 RESETVARSLST F 5 RESETY F 6 FAMILY F 7 ROTATION F 10Q PSIZE F 11Q FACE) u`1HJc iHhHHI Igi [gKd hhhTcKj oIggl [hTcKVWWW J (160Q UNION 154Q \GETPRESSFONTNAMES 127Q OPENSTREAM 105Q SETFILEPTR 63Q GETFILEPTR 50Q \GETSTREAM 36Q INFILEP) (122Q OLD 117Q INPUT 56Q SETFILEPTR 44Q INPUT 2 PRESSFONTWIDTHSFILES) ( 113Q (PROGN (CLOSEF? OLDVALUE))) \SEARCHPRESSFONTS D1 (P 2 RESETZ P 1 RESETY P 0 LISPXHIST I 4 DEVICE I 3 ROTATION I 2 FACE I 1 PSIZE I 0 FAMILY F 3 LISPXHIST F 4 RESETVARSLST) "S!Tog hgZ JI(35Q ERROR! 30Q RESETRESTORE 16Q \SEARCHPRESSFONTSA0001) (24Q ERROR 13Q INTERNAL) ( 10Q (\SEARCHPRESSFONTSA0001)) \GETPRESSFONTNAMES D1 (P 12Q XROTATION P 11Q XFACE P 10Q XSIZE P 7 XFAMILY P 6 XFACE P 5 TYPE P 4 FONTSFOUND P 3 MICASIZE P 2 NEXT P 1 FAMILYCODELST P 0 XFACECODE I 4 ROTATION I 3 FACE I 2 PSIZE I 1 FAMILY I 0 WSTRM) 4CgC C h@ jBgh Bn lHt @J @ J@ MlԺMdl@ I o _AgAOl@ ^HN Cg&CN!NC"O NC^_Ohi@ @ @ @ _BgKOOjeK_^@ @ _DgODGOOlHo NOghL&_OOOghO_O_djL(365Q FIXR 171Q \DECODEPRESSFACEBYTE 133Q ERROR 57Q SETFILEPTR 25Q \PRESSFAMILYCODELST 17Q \FACECODE 12Q MEMB) (426Q * 373Q PRESS 334Q * 270Q * 176Q * 142Q * 32Q * 6 *) ( 361Q 2540.0 130Q "unknown code number in widths file") \PRESSFAMILYCODELST D1 (P 4 I P 2 TYPE P 1 PAIRS P 0 NEXT I 0 WSTRM) aj!@H @ H@ JlԸJdk9@ @ @ k2LK@ _NOh^Lk\O&M IjI(123Q PACKC 10Q SETFILEPTR) NIL () \DECODEPRESSFACEBYTE D1 (L (0 FACECODE)) hl@b0l @@l bgl@@lbggXl@@lbgl@@lbggZ@kggYJIHhNIL (135Q REGULAR 131Q ITALIC 121Q MEDIUM 115Q BOLD 74Q LIGHT 54Q REGULAR 50Q COMPRESSED 27Q EXPANDED) () \CREATEPRESSFONTA0001 D1 (NAME ERRORSET L (0 NIL) P 2 FD F 3 FACE F 4 DEVICE F 5 FAMILY F 6 PSIZE F 7 RESETY F 10Q ROTATION) l`dTdUdVdSS HdIdWdo"djdjdjni HdI(J(jJi Jci(143Q \CREATECHARSET 112Q \ALLOCBLOCK 33Q \FACECODE) (2 FONTDESCRIPTORTYPE#) ( 61Q 35.27778) \CREATEPRESSFONT D1 (P 2 RESETZ P 1 RESETY P 0 LISPXHIST I 4 DEVICE I 3 ROTATION I 2 FACE I 1 PSIZE I 0 FAMILY F 3 LISPXHIST F 4 RESETVARSLST) "S!Tog hgZ JI(35Q ERROR! 30Q RESETRESTORE 16Q \CREATEPRESSFONTA0001) (24Q ERROR 13Q INTERNAL) ( 10Q (\CREATEPRESSFONTA0001)) \CREATECHARSET.PRESSA0001 D1 (NAME ERRORSET P 65Q SIZE P 64Q LENGTH P 63Q TYPE P 62Q NEXT P 61Q SIZE P 60Q LENGTH P 57Q TYPE P 56Q NEXT P 55Q SIZE P 54Q LENGTH P 53Q TYPE P 52Q NEXT P 51Q F P 47Q CSINFO P 46Q FD P 45Q NSMICASIZE P 44Q STRMCACHE P 43Q XLATEDFAM P 42Q FIXEDFLAGS P 41Q RELFLAG P 40Q FIRSTCHAR P 37Q LASTCHAR P 36Q TEM P 35Q WIDTHSY P 34Q WIDTHS P 33Q PRESSMICASIZE P 0 WSTRM F 76Q FAMILY F 77Q SIZE F 100Q FACE F 101Q RESETVARSLST F 102Q CHARSETHEIGHT F 103Q DEVICE F 104Q ROTATION F 105Q RESETY F 106Q FBBOX F 107Q FOO) > p$W~n lH_6W~n o %`dWdW|dW~dWW dIdWdo"ni dJ(&`l dKl dL'`)OPddW|dg0gIOP_RhOP_ROP_POR ORgi XMoORggl XhWcH Hggg X HOH_Hj1-W|iH <' gHd hhhWcHj jh_BGiHHOT H _VH _XOTOXOVl_TOVdlƿH H H _@H _>H H _Zj OZOZ oOJOZOJ H H ]jMM OZvdggdgggg_F OH _H_OLOFOhW|dgܿgXj j11OFiH ;j/h_BOLOFW~WWWhOLW|iHO\ H _^H _`O\O`O^l_\O^dl𲤿H H H _@H _>H H _bj ObOb oOJObOJ H H ^jNN ObUO_gg_F OH_OLOFO hhXj j15OFiH ;j/h_BOLOFW~WWWhOLW|iHOd H _fH _hOdOhOfl_dOfdl𲤿H H H _@H _>H H _jj OjOj oOJOjOJ H H _jOO OjRO_"OBj OBOB _BON_8Hd H H dnnkcONjH H dnnk H H cH H dnnkcOB$ONON OJn WOJncONWON H _DH ODllPH H _O@__OOO8OO<Ok_O>O@__OOO8OnOk_Hg O8O@O>O@k9Ol6_OlOnOpOrlOO>O@_ _O OO8O nO8O jO k_ OB1O>O@_$_"O$O" O8O$O8O$OJnO$k_$ODkkKH H H H ؀j_:ONOBO:djd O:OJnہO:ONciONl _&O&_:O>O@_*_(O*O(O:O*nO*k_*Hg O:O@O>O@k=Ot6_,OtOvOxOzlO,O>O@_0_.O0O.O:O0nO:O0jO0k_0OBWO>O@_4_2O4O2DO:O4O:O4OJnO4k_4(3127Q \GETSTREAM 3042Q \ALLOCBLOCK 2774Q \FZEROP 2727Q GETEOFPTR 2723Q GETFILEPTR 2471Q \GETSTREAM 2334Q \FZEROP 2040Q SETFILEPTR 2034Q \FIXPIN 2012Q \FZEROP 1752Q \FZEROP 1721Q ABS 1700Q \FZEROP 1562Q SETFILEPTR 1470Q \FAMILYCODE 1452Q SETFILEPTR 1347Q \FZEROP 1321Q ABS 1300Q \FZEROP 1162Q SETFILEPTR 1070Q \FAMILYCODE 1052Q SETFILEPTR 771Q DREVERSE 711Q \FZEROP 663Q ABS 642Q \FZEROP 524Q SETFILEPTR 475Q SETFILEPTR 452Q GETFILEPTR 440Q RANDACCESSP 431Q \FAMILYCODE 404Q COPYBYTES 400Q OPENSTREAM 361Q RANDACCESSP 343Q OPENSTREAM 317Q \GETSTREAM 304Q INFILEP 177Q \ALLOCBLOCK 164Q \ALLOCBLOCK 142Q \ALLOCBLOCK 106Q \FACECODE 42Q FIXR) (3161Q FDEV 3154Q STREAM 3124Q INPUT 3035Q CHARSETINFO 2752Q CHARSETINFO 2523Q FDEV 2516Q STREAM 2466Q INPUT 2242Q CHARSETINFO 2233Q CHARSETINFO 2176Q CHARSETINFO 2171Q CHARSETINFO 2073Q CHARSETINFO 2022Q CHARSETINFO 1544Q FONTDESCRIPTOR 1514Q FONTDESCRIPTOR 1421Q FONTDESCRIPTOR 1377Q CENTURY 1371Q CLASSIC 1144Q FONTDESCRIPTOR 1114Q FONTDESCRIPTOR 1041Q FRUTIGER 1030Q MODERN 1003Q FONTDESCRIPTOR 760Q GACHA 752Q TERMINAL 746Q LOGO 740Q LOGOTYPE 732Q TIMESROMAN 724Q CLASSIC 445Q SETFILEPTR 375Q NEW 372Q BOTH 367Q {NODIRCORE} 336Q OLD 333Q INPUT 313Q INPUT 247Q HELVETICA 236Q MODERN 213Q PRESSFONTWIDTHSFILES 156Q CHARSETINFOTYPE# 50Q FONTDESCRIPTORTYPE#) ( 1706Q .02 1306Q .02 650Q .02 326Q (PROGN (CLOSEF? OLDVALUE)) 130Q 35.27778 36Q 72.0) \CREATECHARSET.PRESS D1 (P 2 RESETZ P 1 RESETY P 0 LISPXHIST I 7 NOSLUG? I 6 FONTDESC I 5 CHARSET I 4 DEVICE I 3 ROTATION I 2 FACE I 1 SIZE I 0 FAMILY F 3 LISPXHIST F 4 RESETVARSLST) .Ejo S!Tog hgZ JI(51Q ERROR! 44Q RESETRESTORE 32Q \CREATECHARSET.PRESSA0001 12Q ERROR) (40Q ERROR 27Q INTERNAL) ( 24Q (\CREATECHARSET.PRESSA0001) 7 "Press does not support NS characters.") PRESSBITMAP D1 (P 7 YPOS P 6 XPOS P 5 PRDATA P 4 HEIGHT P 3 WIDTH P 2 PRESSPAGEWIDTH P 1 PRESSPAGEHEIGHT P 0 PRSTREAM I 3 CLIPPINGREGION I 2 SCALEFACTOR I 1 BITMAP I 0 FILE F 10Q PRESSBITMAPREGION) @ WWSH(]BSCEA A JKol^ILol_jNjOboi i jNNCko jjOOj_C;jdKJo jLIo j bAWNWOBCH H CKJo jLIo(322Q MIN 303Q CLOSEF 277Q \WRITEPRESSBITMAP 250Q CREATEREGION 243Q MIN 227Q MIN 167Q ERROR 130Q TERPRI 123Q PRIN1 47Q BITMAPHEIGHT 42Q BITMAPWIDTH 3 OPENPRSTREAM) (25Q STREAM) ( 332Q 35.14598 316Q 35.14598 237Q 35.14598 223Q 35.14598 164Q "Spruce cannot scale bitmaps. Try pressing to a full press printer." 117Q "Warning: Bitmap too large for Spruce PRESS page, will be clipped..." 72Q 35.14598 56Q 35.14598) FULLPRESSBITMAP D1 (P 7 YPOS P 6 XPOS P 5 PRDATA P 4 HEIGHT P 3 WIDTH P 2 PRESSPAGEWIDTH P 1 PRESSPAGEHEIGHT P 0 PRSTREAM I 3 CLIPPINGREGION I 2 SCALEFACTOR I 1 BITMAP I 0 FILE F 10Q PRESSBITMAPREGION) @ WWSH(]BobCA A JKBol^ILBol_jNjOGoi i KL bJKBol۾ILBol_jNjOo AWNWOBCH H Cq(266Q CLOSEF 262Q \WRITEPRESSBITMAP 235Q ERROR 154Q PRESS.BITMAPSCALE 146Q TERPRI 141Q PRIN1 61Q BITMAPHEIGHT 54Q BITMAPWIDTH 3 OPENPRSTREAM) (25Q STREAM) ( 232Q "Internal consistency check failed in FULLPRESSBITMAP." 204Q 35.14598 166Q 35.14598 135Q "Warning: Bitmap too large for PRESS page, will be scaled..." 107Q 35.14598 71Q 35.14598 36Q 1.0) SHOWREGION D1 (I 1 STREAM I 0 REGION) D@@A @jhdA j@hdA @ jhdA j@ hdA A(100Q RELDRAWTO 71Q MINUS 60Q RELDRAWTO 50Q MINUS 41Q RELDRAWTO 24Q RELDRAWTO 10Q MOVETO) NIL () SHOWPRESSBITMAPREGION D1 (P 0 STR F 1 PRESSBITMAPREGION) gg QH H (24Q CLOSEF 20Q SHOWREGION 10Q OPENIMAGESTREAM) (5 PRESS 2 {LPT}) () PRESSWINDOW D1 (P 4 HEIGHT P 3 WIDTH P 2 PTSTOMICAS P 1 BITMAP P 0 PRSTREAM I 0 W) ggogoh @ l#CI [I \H(H(] MJKlH H(H(^!NJLlH IhdH H (217Q CLOSEF 213Q \WRITEPRESSBITMAP 204Q DSPYPOSITION 132Q DSPXPOSITION 57Q BITMAPHEIGHT 52Q BITMAPWIDTH 41Q WINDOW.BITMAP 36Q WHICHW 30Q OPENPRSTREAM) (165Q PRESSDATA 157Q PRESSDATA 151Q STREAM 143Q PRESSDATA 136Q STREAM 113Q PRESSDATA 105Q PRESSDATA 77Q STREAM 71Q PRESSDATA 64Q STREAM 14Q BREAKPAGEFILENAME 5 HEADING 2 {CORE}WINDOW.PRESS) ( 20Q "Press Stream Window Image" 11Q "Press Stream Window Image") WINDOW.BITMAP D1 (P 1 BM P 0 REGION I 0 W) -@ @ HH Y@ hdI @ I(51Q OPENW 45Q BKBITBLT 35Q \INSUREWINDOW 30Q BITMAPCREATE 14Q CLOSEW 3 \INSUREWINDOW) NIL () \WRITEPRESSBITMAP D1 (P 23Q BM P 6 CURY P 5 CURX P 4 TOTCOUNT P 3 ELSTREAM P 2 HT P 1 WW P 0 PRDATA I 5 PRSTREAM I 4 CLIPPINGREGION I 3 SCALEFACTOR I 2 YPOS I 1 XPOS I 0 BITMAP) DNE(@@H[H]H^E E E EAB CobEk!Ej!EI__O!OOl!EJ!EJl!El!El!Ej!El!ECIo __O!OOl!ECJo __O!OOl!Ej!Ek!Ej!Ej!EI__O!OOl!Ej!Ej!EJ!EJl!Ej!El!E@JI\O 8_O O"jO$lOKl!KLl E E EMN hD @DDO&hdDD O&b(566Q BKBITBLT 534Q BITMAPCREATE 517Q SETXY.PRESS 511Q \ENTITYSTART.PRESS 505Q \ENTITYEND.PRESS 501Q \FIXPOUT 266Q FIXR 227Q FIXR 102Q SETXY.PRESS 74Q \ENTITYSTART.PRESS 70Q \ENTITYEND.PRESS 64Q SHOW.PRESS) (443Q FDEV 436Q STREAM 417Q BITMAP 55Q PRESSDATA 46Q PRESSDATA 37Q PRESSDATA 26Q BITMAP 20Q BITMAP 12Q STREAM) ( 261Q 32.0 222Q 32.0 110Q 1.0) \BCPLSOUT.PRESS D1 (P 2 I P 0 NC I 2 N I 1 X I 0 STRM) DA BkbdBB@H!HkJI@AJ)!JkZBHkJI@j!JkZh(3 NCHARS) NIL () \PAGEPAD.PRESS D1 (P 1 PADDING P 0 P I 0 STRM) 0@ nHknYddjdk@HIk @j!I(46Q SETFILEPTR 3 GETFILEPTR) NIL () \ENTITYEND.PRESS D1 (P 2 DLLENGTH P 1 ELSTREAM P 0 PRDATA I 3 ETYPE I 2 YOFFSET I 1 XOFFSET I 0 PRSTREAM) (@( HY@0@kKH%ZI kjIl!ICl!IH j!IH%H# IJ IAj\M!LMl!IBj_^O!NOl!IH__O!OOl!IH__O!OOl!IH H__O!OOl!IH!H__O!OOl!Id H'k_"_ O"!O O"l!h(410Q GETFILEPTR 145Q \FIXPOUT 140Q \FIXPOUT 56Q GETFILEPTR) (414Q PRESSDATA 355Q PRESSDATA 347Q PRESSDATA 314Q PRESSDATA 306Q PRESSDATA 254Q PRESSDATA 222Q PRESSDATA 130Q PRESSDATA 122Q PRESSDATA 104Q PRESSDATA 46Q PRESSDATA 33Q FDEV 26Q STREAM 17Q PRESSDATA 3 STREAM) () \PARTEND.PRESS D1 (P 2 PDSTREAM P 1 START P 0 PRDATA I 1 PARTTYPE I 0 PRSTREAM) s@(qHZH#YJA!JAl!JI!JIl!JH@ n[#KIٽ\M!LMl!J@ _^O!NOl!Hj h(157Q SETFILEPTR 124Q \PAGEPAD.PRESS 65Q GETFILEPTR) (151Q PRESSDATA 61Q PRESSDATA 23Q PRESSDATA 14Q PRESSDATA 3 STREAM) () \ENTITYSTART.PRESS D1 (P 0 PRDATA I 0 PRSTREAM) c@(AHh4HhH@0@kI%Hd[0KkJ'H@0@kL)@HH h(137Q SETXY.PRESS) (132Q PRESSDATA 124Q PRESSDATA 106Q FDEV 101Q STREAM 63Q FDEV 56Q STREAM 50Q PRESSDATA 32Q FDEV 25Q STREAM 3 STREAM) () SETX.PRESS D1 (P 0 ELSTREAM I 1 X I 0 PRSTREAM) K@(jA+AnTV$A@(jHl!HA!HAl!@(AhNIL (104Q PRESSDATA 77Q STREAM 43Q PRESSDATA 36Q STREAM 10Q PRESSDATA 3 STREAM) () SETXY.PRESS D1 (P 1 ELSTREAM P 0 PRDATA I 2 Y I 1 X I 0 PRSTREAM) [@(HYjAAnTVdl!IA!IAl!HAjBBniIl!IB!IBl!HBBNIL (124Q PRESSDATA 60Q PRESSDATA 14Q PRESSDATA 3 STREAM) () SETY.PRESS D1 (P 0 ELSTREAM I 1 Y I 0 PRSTREAM) B@(jA(Ani!A@(jHl!HA!HAl!@(AhNIL (40Q PRESSDATA 10Q PRESSDATA 3 STREAM) () SHOW.PRESS D1 (P 4 ELSTREAM P 3 CNT P 2 CURBYTE P 1 PRDATA I 0 PRSTREAM) @(@0@kH"I\JI)[djUI#II II lp!l!KLKkٰLl!Ll!KlٻKlLl!LK!IJ)hNIL (207Q PRESSDATA 120Q PRESSDATA 112Q PRESSDATA 100Q PRESSDATA 74Q PRESSDATA 64Q PRESSDATA 47Q PRESSDATA 37Q PRESSDATA 16Q FDEV 11Q STREAM 3 STREAM) () OPENPRSTREAM D1 (P 2 PRDATA P 1 OPT P 0 PRSTREAM I 1 OPTIONS I 0 PRFILE) / @gglo  `Ag'Y[l Kd3ihI`_ggg dLggg dMAg'dNjdnTVnrh_dO6dk2djdj_dOOOOOOOO OOO!Z`H&H joH Hg H`&HJ(Ag'YJIHAg' H H(453Q \STARTPAGE.PRESS 447Q SETUPFONTS.PRESS 365Q ERROR 362Q FULLNAME 347Q GETEOFPTR 133Q OPENSTREAM 111Q OPENSTREAM 43Q EQLENGTH 20Q OPENSTREAM) (443Q FONTS 432Q PRESSDATA 423Q HEADING 414Q STREAM 406Q \PRESSIMAGEOPS 403Q STREAM 375Q \OUTCHARFN.PRESS 372Q STREAM 337Q STREAM 333Q \NOIMAGEOPS 311Q PRESSDATA 270Q PRESSDATA 254Q PRESSDATA 241Q PRESSDATA 227Q PRESSDATA 145Q DOCUMENT.NAME 130Q OLD/NEW 125Q BOTH 122Q {NODIRCORE} 106Q OLD/NEW 103Q BOTH 100Q {NODIRCORE} 72Q DEFAULTPAGEREGION 33Q REGION 26Q PRESSDATATYPE# 6 NEW 3 OUTPUT) ( 356Q "can't convert existing file to Press" 14Q ((TYPE BINARY))) \BITBLT.PRESS D1 (P 3 DESTINATIONBOTTOM P 2 DESTINATIONLEFT P 1 OLDY P 0 OLDX I 15Q CLIPPEDSOURCEBOTTOM I 14Q CLIPPEDSOURCELEFT I 13Q CLIPPINGREGION I 12Q TEXTURE I 11Q OPERATION I 10Q SOURCETYPE I 7 HEIGHT I 6 WIDTH I 5 DESTINATIONBOTTOM I 4 DESTINATIONLEFT I 3 DESTINATION I 2 SOURCEBOTTOM I 1 SOURCELEFT I 0 SOURCEBITMAP) ]C C DHEICJ CK @JKkGGGFG C CH CI iGGFG (131Q INTERSECTREGIONS 126Q CREATEREGION 112Q \DSPYPOSITION.PRESS 104Q \DSPXPOSITION.PRESS 76Q \WRITEPRESSBITMAP 71Q CREATEREGION 46Q \DSPYPOSITION.PRESS 40Q \DSPXPOSITION.PRESS 12Q \DSPYPOSITION.PRESS 3 \DSPXPOSITION.PRESS) NIL () \BLTSHADE.PRESS D1 (P 1 DESTREGION P 0 REGION I 7 CLIPPINGREGION I 6 OPERATION I 5 HEIGHT I 4 WIDTH I 3 DESTINATIONBOTTOM I 2 DESTINATIONLEFT I 1 STREAM I 0 TEXTURE) )BCDE GHG H@ABCDEFGl (46Q \BLTSHADE.GENERICPRINTER 22Q INTERSECTREGIONS 6 CREATEREGION) NIL () \SCALEDBITBLT.PRESS D1 (P 3 DESTINATIONBOTTOM P 2 DESTINATIONLEFT P 1 OLDY P 0 OLDX I 16Q SCALE I 15Q CLIPPEDSOURCEBOTTOM I 14Q CLIPPEDSOURCELEFT I 13Q CLIPPINGREGION I 12Q TEXTURE I 11Q OPERATION I 10Q SOURCETYPE I 7 HEIGHT I 6 WIDTH I 5 DESTINATIONBOTTOM I 4 DESTINATIONLEFT I 3 DESTINATION I 2 SOURCEBOTTOM I 1 SOURCELEFT I 0 SOURCEBITMAP) ^C C DHEICJ CK @JKGGGGFG C CH CI iGGFG (132Q INTERSECTREGIONS 127Q CREATEREGION 113Q \DSPYPOSITION.PRESS 105Q \DSPXPOSITION.PRESS 77Q \WRITEPRESSBITMAP 72Q CREATEREGION 46Q \DSPYPOSITION.PRESS 40Q \DSPXPOSITION.PRESS 12Q \DSPYPOSITION.PRESS 3 \DSPXPOSITION.PRESS) NIL () \BITMAPSIZE.PRESS D1 (I 2 DIMENSION I 1 BITMAP I 0 STREAM) =BdgA gA BA A  (72Q \ILLEGAL.ARG 60Q BITMAPHEIGHT 47Q BITMAPWIDTH 32Q BITMAPHEIGHT 13Q BITMAPWIDTH) (24Q HEIGHT 4 WIDTH) () \CHARWIDTH.PRESS D1 (I 1 CHARCODE I 0 STREAM) 9A bdl @(4@(AlH(IIH Il(55Q \CREATECHARSET 3 \PRESS.CONVERT.NSCHARACTER) NIL () \CLOSEF.PRESS D1 (P 23Q DDRECORD P 22Q DDFILEPTR P 21Q DESCR P 20Q FDE P 17Q I P 1 PDSTREAM P 0 PRDATA I 0 PRSTREAM) @ @( HYd j4H j"O#@j!@j!@k I@jI @ @ O$_&@lj!@l/!@O&k_^O!NOl!@I __O!OOl!@H#__O!OOl!@O&H#__O!OOl!@l!@l!@o @j!@k!@j!@k!@l!@l!@l!@l!@l!@l!@O$n @H@ l4 @`l @dg l( @ h_ _"@j!@l!@O !@O !@l!@l!@O"g l @O"g !@l!@O"g ZK!JKl!@O"\M!LMl!O_Ok_T(644Q FONTPROP 624Q \FACECODE 621Q FONTPROP 607Q \BCPLSOUT.PRESS 602Q FONTPROP 516Q \PAGEPAD.PRESS 511Q \BCPLSOUT.PRESS 504Q GETFILEINFO 473Q \BCPLSOUT.PRESS 461Q \BCPLSOUT.PRESS 454Q FULLNAME 436Q SETFILEPTR 345Q \FIXPOUT 335Q IDATE 202Q GETFILEPTR 123Q GETFILEPTR 116Q \PAGEPAD.PRESS 111Q COPYBYTES 106Q GETFILEPTR 76Q \PARTEND.PRESS 27Q GETFILEPTR 3 \ENDPAGE.PRESS) (667Q FONTDESCRIPTOR 641Q DEVICESIZE 616Q DEVICEFACE 577Q DEVICEFAMILY 501Q CREATIONDATE 466Q USERNAME 444Q PRESSDATA 271Q PRESSDATA 235Q PRESSDATA 41Q PRESSDATA 20Q PRESSDATA 7 STREAM) ( 341Q -20000000000Q) \DRAWLINE.PRESS D1 (I 10Q DASHING I 7 COLOR I 6 OPERATION I 5 WIDTH I 4 Y2 I 3 X2 I 2 Y1 I 1 X1 I 0 PRSTREAM) 4 GABCDEF@GG @AB CD hhgEhG D(60Q \DRAWCURVE.PRESS 37Q CREATEPOSITION 32Q CREATEPOSITION 22Q DRAWDASHEDLINE) (46Q BUTT) () \ENDPAGE.PRESS D1 (P 0 ELSTREAM I 0 PRSTREAM) j@(1@ @ H0HkIj?@0@kJkj@j!@j!@j!H@jH0HkK @j h(146Q \PARTEND.PRESS 140Q COPYBYTES 25Q \ENTITYEND.PRESS 21Q SHOW.PRESS) (126Q FDEV 121Q STREAM 62Q FDEV 55Q STREAM 36Q FDEV 31Q STREAM 10Q PRESSDATA 3 STREAM) () NEWLINE.PRESS D1 (P 1 NEWYPOS P 0 PRDATA I 0 PRSTREAM) *@(HHYdH@ @ @HI h(46Q SETXY.PRESS 35Q SHOW.PRESS 30Q NEWPAGE.PRESS) NIL () NEWPAGE.PRESS D1 (I 0 PRSTREAM) @ @ (7 \STARTPAGE.PRESS 3 \ENDPAGE.PRESS) NIL () SETUPFONTS.PRESS D1 (P 2 FLG P 1 F I 1 FONTS I 0 PRSTREAM) LA`!HdHhHHIhddg J@I @I @ @(Ii(70Q \ENTITYEND.PRESS 63Q \DSPFONT.PRESS 53Q \DEFINEFONT.PRESS 43Q FONTCREATE) (102Q PRESSDATA 75Q STREAM 37Q PRESS 5 DEFAULTFONT) () \DEFINEFONT.PRESS D1 (P 0 PRDATA I 1 FONT I 0 PRSTREAM) k@(!AH XHAHHhHHkYIlHHkHjH Z JNIL (137Q PRESSDATA 126Q PRESSDATA 111Q PRESSDATA 105Q PRESSDATA 61Q PRESSDATA 55Q PRESSDATA 42Q PRESSDATA 33Q PRESSDATA 26Q PRESSDATA 15Q PRESSDATA 3 STREAM) () \DSPBOTTOMMARGIN.PRESS D1 (L (1 YPOSITION 0 PRSTREAM)) @(A@(ANIL (25Q PRESSDATA 20Q STREAM 10Q PRESSDATA 3 STREAM) () \DSPCLIPPINGREGION.PRESS D1 (P 1 \INTERRUPTABLE P 0 PRDATA I 1 REGION I 0 STREAM) 9@(H6A*Al Ad3ihAo HA6(55Q ERROR 24Q EQLENGTH) (3 STREAM) ( 52Q " is not a REGION.") \DSPFONT.PRESS D1 (P 3 FDENTRY P 2 OLDFONT P 1 CSINFO P 0 PRDATA I 1 FONT I 0 PRSTREAM) @(1HZAdAgi JA bk@ A(jAi Y@A [dH @ @ HK HAHKlp!HI@H2H HmA@ J(214Q \FIXLINELENGTH.PRESS 174Q \SETSPACE.PRESS 171Q FIXR 120Q \ENTITYSTART.PRESS 113Q \ENTITYEND.PRESS 72Q \DEFINEFONT.PRESS 64Q \CREATECHARSET 47Q SHOW.PRESS 36Q FONTCOPY 27Q \COERCEFONTDESC) (203Q FONTDESCRIPTOR 150Q CHARSETINFO 23Q PRESS) () \DSPLEFTMARGIN.PRESS D1 (I 1 XPOSITION I 0 PRSTREAM) @(A@(A@ (21Q \FIXLINELENGTH.PRESS) NIL () \DSPLINEFEED.PRESS D1 (P 0 PRDATA I 1 DELTAY I 0 PRSTREAM) @(HAAd3HA (31Q \ILLEGAL.ARG) NIL () \DSPRIGHTMARGIN.PRESS D1 (I 1 XPOSITION I 0 PRSTREAM) @( A@(A @ (21Q \FIXLINELENGTH.PRESS) NIL () \DSPSPACEFACTOR.PRESS D1 (P 0 PRDATA I 1 FACTOR I 0 STREAM) '@(H2A@ HA2@AH (43Q \SETSPACE.PRESS 40Q FIXR 17Q SHOW.PRESS) NIL () \DSPTOPMARGIN.PRESS D1 (L (1 YPOSITION 0 PRSTREAM)) @(!A@(A!NIL (25Q PRESSDATA 20Q STREAM 10Q PRESSDATA 3 STREAM) () \DSPXPOSITION.PRESS D1 (I 1 XPOSITION I 0 PRSTREAM) @(A@ @A (26Q SETX.PRESS 20Q SHOW.PRESS) (10Q PRESSDATA 3 STREAM) () \DSPYPOSITION.PRESS D1 (I 1 YPOSITION I 0 PRSTREAM) @(A@ @A (26Q SETY.PRESS 20Q SHOW.PRESS) (10Q PRESSDATA 3 STREAM) () \FIXLINELENGTH.PRESS D1 (L (0 PRSTREAM)) '@(@H HH$YkIl hNIL (26Q FONTDESCRIPTOR 21Q PRESSDATA) () \OUTCHARFN.PRESS D1 (P 3 CLIPPINGREGION P 2 NEWXPOS P 1 XPOS P 0 PRDATA I 1 CHARCODE I 0 PRSTREAM) Adl @ @jjl @h@ @ Al @j@ @(1HYA bIAl H4HAZIH6[?JKKk2HK%H4jHk4@ @IH @A!@ Hj4jHJh(256Q SHOW.PRESS 245Q SETXY.PRESS 231Q SHOW.PRESS 113Q \PRESS.CONVERT.NSCHARACTER 66Q NEWPAGE.PRESS 45Q \DSPXPOSITION.PRESS 41Q NEWLINE.PRESS 35Q DSPXPOSITION 12Q NEWLINE.PRESS) (273Q PRESSDATA 240Q PRESSDATA 176Q PRESSDATA 145Q PRESSDATA 104Q PRESSDATA 73Q STREAM 57Q STREAM 16Q STREAM) () \SETSPACE.PRESS D1 (P 1 ELSTREAM P 0 PRDATA I 1 S I 0 PRSTREAM) J@(1AH4h@(YAndAn`ػZK!JKIl!IA!IAl!HA4hNIL (31Q PRESSDATA 24Q STREAM 3 STREAM) () \STARTPAGE.PRESS D1 (P 3 SPACEFACTOR P 2 HFONT P 1 CFONT P 0 PRDATA I 0 PRSTREAM) @(AHY@ HoH2Hk2H@J @HH!J H@ @ @Hn o@ HH"k\"L@ @ @ HK2@HH!I @I h(226Q \DSPFONT.PRESS 220Q SETXY.PRESS 170Q NEWLINE.PRESS 163Q NEWLINE.PRESS 156Q PRIN3 130Q PRIN3 117Q SETX.PRESS 103Q SHOW.PRESS 76Q PRIN3 66Q SETXY.PRESS 44Q \DSPFONT.PRESS 15Q \ENTITYSTART.PRESS) (212Q FONTDESCRIPTOR 141Q PRESSDATA 135Q PRESSDATA 60Q FONTDESCRIPTOR) ( 124Q "Page ") \STRINGWIDTH.PRESSA0001 D1 (I 1 CC I 0 DUMMY F 0 S F 1 STREAM F 2 WIDTHSBASE) A bPAl Q(4RAlc(3 \PRESS.CONVERT.NSCHARACTER) NIL () \STRINGWIDTH.PRESS D1 (P 30Q CSET P 27Q WIDTHSBASE P 26Q S P 21Q C P 17Q CSET P 16Q ESC P 15Q ESCWIDTH P 14Q WIDTHSBASE P 13Q TOTAL P 7 C P 3 CSET P 2 WIDTHSBASE P 1 CSVECTOR P 0 PRFONT I 2 RDTBL I 1 STRING I 0 STREAM) @(H(AdlH(jH jAjC M__M jh_Lk\O2OOLOL_NO _l @(4JOlԾNB ABhJBJB jljH(dH 2BO"_B_OO_AQO k_&O _(O&O _$O Cjhi_*O&k_&O$LO*O(O&O(O&_" _"OO"l @(4OO"lBO"l"O"OOj_OjH(dH gABd O,(574Q \MAPPNAME 556Q \CREATECHARSET 451Q \PRESS.CONVERT.NSCHARACTER 271Q \CREATECHARSET 241Q \SYMBOL.ESCAPE.COUNT 146Q \PRESS.CONVERT.NSCHARACTER 41Q \CREATECHARSET) (566Q \STRINGWIDTH.PRESSA0001 315Q READTABLEP 227Q READTABLEP 214Q READTABLEP) () SHOWRECTANGLE.PRESS D1 (P 0 ELSTREAM I 2 HEIGHT I 1 WIDTH I 0 PRSTREAM) +@(Hl!HA!HAl!HB!HBl!hNIL (10Q PRESSDATA 3 STREAM) () \PRESS.CONVERT.NSCHARACTER D1 (L (0 CHARCODE)) L@dn-ln,l@dn/ln$l@dn%lnfl@dll`ll'@lNIL NIL () \ENDVECRUN D1 (P 7 CH P 6 ORIGWASDISPLAYING P 5 WASDISPLAYING P 4 YPOS P 3 XPOS P 2 ORIGYPOS P 1 ORIGXPOS P 0 PRDATA I 1 HALFVECWIDTH I 0 PRSTREAM) @ @(aHjH.H0Ko Lo AKhALhLnA Kn A^]@IJ H,gdAKLALGLnA>Kn A4M @ @Ko Lo i@jOjO !h]KOٻLO\@ @IJ HNkjHh,h(340Q SETXY.PRESS 331Q SHOW.PRESS 277Q \VECENCODE 256Q SETXY.PRESS 253Q FIXR 242Q FIXR 227Q SHOW.PRESS 144Q SETXY.PRESS 72Q FIXR 60Q FIXR 3 SHOW.PRESS) (362Q PRESSDATA 345Q PRESSDATA 151Q PRESSDATA 44Q PRESSDATA 35Q PRESSDATA 20Q PRESSDATA 7 STREAM) ( 247Q 6.614584 236Q 6.614584 66Q 6.614584 54Q 6.614584) \VECENCODE D1 (L (1 DY 0 DX)) 4Aj@jAl@dAAl l@A@jAHdIIlNIL NIL () \VECPUT D1 (P 2 YPOS P 1 XPOS P 0 PRDATA I 3 HALFVECWIDTH I 2 DY I 1 DX I 0 PRSTREAM) @(!HjjAHj"Aj@C HHjkjH.YH0ZHIA.HJB0HjdCJTJnCJCIEIn C;Hj'@ @Io Jo Hk@AB !HjjHABH,,h(300Q \VECENCODE 260Q SETXY.PRESS 255Q FIXR 244Q FIXR 231Q SHOW.PRESS 53Q \ENDVECRUN) (331Q PRESSDATA 322Q PRESSDATA 307Q PRESSDATA 265Q PRESSDATA 216Q PRESSDATA 145Q PRESSDATA 134Q PRESSDATA 123Q PRESSDATA 114Q PRESSDATA 105Q PRESSDATA 64Q PRESSDATA 60Q PRESSDATA 32Q PRESSDATA 14Q PRESSDATA 3 STREAM) ( 251Q 6.614584 240Q 6.614584) \VECSKIP D1 (I 2 DY I 1 DX I 0 PRSTREAM F 0 VecCurX F 1 VecCurY) @ PAcQBc@ (21Q \ENDVECRUN 3 \ENDVECRUN) NIL () \VECFONTINIT D1 (P 13Q BRUSH P 7 CSINFO P 6 FD P 5 FMLY P 1 WIDTHS) `ongkj  HJ0od_`dgdMdOdodjdk$ni _dO(`I_dOl _dO_N(ON_O Oh_O&_yOK Lh[HXRL&(202Q \ALLOCBLOCK 140Q \ALLOCBLOCK 23Q ARRAY) (222Q FONTDESCRIPTOR 162Q ARRAYP 155Q CHARSETINFOTYPE# 71Q PRESS 64Q FONTDESCRIPTORTYPE# 37Q \VecFontDir 16Q SMALLP 2 \VecFontDir) ( 114Q (MEDIUM REGULAR REGULAR) 51Q (4 10Q 20Q 40Q 100Q) 10Q (NEWVEC SNEWVEC HNEWVEC VNEWVEC)) \DRAWCIRCLE.PRESS D1 (P 0 R2RAD I 5 DASHING I 4 BRUSH I 3 RADIUS I 2 CENTERY I 1 CENTERX I 0 STREAM) fCo ACB AHBH ABC AHBH ACB AHBH ABC AHBH hiDE@ AB@ (143Q MOVETO 134Q DRAWCURVE 113Q CREATEPOSITION 102Q CREATEPOSITION 73Q CREATEPOSITION 62Q CREATEPOSITION 53Q CREATEPOSITION 42Q CREATEPOSITION 33Q CREATEPOSITION 22Q CREATEPOSITION 10Q FIXR) NIL ( 4 .7071068) \DRAWARC.PRESS D1 (I 7 DASHING I 6 BRUSH I 5 NDEGREES I 4 STARTANGLE I 3 RADIUS I 2 CENTERY I 1 CENTERX I 0 STREAM) @ABCDEFG (14Q \DRAWARC.GENERIC) NIL () \DRAWCURVE.PRESS D1 (P 5 KNOT P 1 LASTKNOT P 0 DASHLST I 4 DASHING I 3 BRUSH I 2 CLOSED I 1 KNOTS I 0 PRSTREAM) A@ Dddd3 ihDD AAAhbD"A l@AAAACD A@@A(d]o Mo KJh\J&LB DC A @II @(250Q SETXY.PRESS 236Q LAST 231Q \PRESSCURVE2 226Q \GETBRUSHFONT.PRESS 221Q PARAMETRICSPLINE 173Q CREATEPOSITION 170Q FIXR 156Q FIXR 131Q \DRAWCURVE.PRESS.LINE 77Q LENGTH 50Q \ILLEGAL.ARG 11Q SHOW.PRESS) NIL ( 164Q .1511811 152Q .1511811) \DRAWCURVE.PRESS.LINE D1 (P 7 TR P 6 LB P 5 DIST P 4 BOTTOM P 3 LEFT P 2 BACKOFF P 1 WIDTH P 0 SHAPE I 6 DASHING I 5 BRUSH I 4 Y2 I 3 X2 I 2 Y1 I 1 X1 I 0 PRSTREAM) g EdEkYHdgjghIlۺAC fAIlٻjKKInTVBdDDBD_NJ_jOOjOJ_niOOni_N]jv@KN @IM iBD aBIlټjLLIniAdCCAC_NJ_jOOjOJ_nTVOOnTV_N]j@NL @MI i(370Q SHOWRECTANGLE.PRESS 361Q SETXY.PRESS 230Q EQP 221Q SHOWRECTANGLE.PRESS 212Q SETXY.PRESS 55Q EQP) (37Q ROUND 27Q BUTT 2 ROUND) () \DRAWELLIPSE.PRESS D1 (P 1 COSOR P 0 SINOR I 7 DASHING I 6 BRUSH I 5 ORIENTATION I 4 SEMIMAJORRADIUS I 3 SEMIMINORRADIUS I 2 CENTERY I 1 CENTERX I 0 PRSTREAM) fE_oESo@AIDBHD AHCBIC AIDBHD AHCBIC hiFG AB@ h (142Q SIN 135Q COS 130Q MOVETO 122Q \DRAWCURVE.PRESS 105Q CREATEPOSITION 70Q CREATEPOSITION 53Q CREATEPOSITION 36Q CREATEPOSITION) NIL ( 15Q 1.0 6 0.0) \GETBRUSHFONT.PRESS D1 (P 0 LIST1 I 0 BRUSH) @dg/dg`&dg`dg`g`@dbko djdkHdlHdldldlHH(124Q FIXR 2 \VECFONTINIT) (75Q \VecFontDir 70Q BUTT 61Q \VecFontDir 53Q VERTICAL 43Q \VecFontDir 35Q HORIZONTAL 26Q \VecFontDir 20Q SQUARE 11Q ROUND) ( 120Q .02845276) \PRESSCURVE2A0001 D1 (NAME ERRORSET P 54Q KNOT# P 52Q EXTRADY P 51Q PUTDY P 50Q EXTRADX P 47Q PUTDX P 46Q HALFVECWIDTH P 45Q DASHCNT P 44Q DASHLST P 43Q DASHON P 42Q DELTA P 41Q NEWT P 40Q TT P 37Q EXTRANEOUS P 36Q DUPLICATEKNOT P 35Q YWALLDT P 34Q XWALLDT P 33Q YDIFF P 32Q XDIFF P 31Q NEWYT P 30Q NEWXT P 27Q Y'T P 26Q X'T P 25Q YT P 24Q XT P 23Q DY P 22Q DX P 21Q IY P 20Q IX P 17Q Y0 P 16Q X0 P 15Q #KNOTS P 14Q Y''' P 13Q X''' P 12Q Y'' P 11Q X'' P 10Q Y' P 7 X' P 6 Y P 5 X P 4 Y'POLY P 3 YPOLY P 2 X'POLY P 1 XPOLY P 0 PRDATA F 55Q PRSTREAM F 56Q SPLINE F 57Q BRUSHFONT F 60Q RESETVARSLST F 61Q RESETY F 62Q DASHING) J-gW^WZ WZhhhW`c`WZ(H H'naWZ WZ WZ(l!lg lg lg lg W\W\W\W\W\W\W\W\W\W\k(W\k(*W^g _Li_FWd_H_JWZOo Oo WZ(kWZ(jdOOkjWZ(h,WZ(O.WZ(O0o_@l_DO _ O _"Okk,OXOVIJOOX(OOX(OOX(MOX( KLOOX(OOX(OOX(NOX( O@Il2_(O@Kl2_*OXOkj%MOXk(MOXl( NOXk(NOXl( h_WZOL hcbi(2101Q \ENDVECRUN 1727Q \VECPUT 1701Q \VECPUT 1654Q FGTP 1642Q FGTP 1620Q ABS 1602Q ABS 1475Q FGTP 1320Q FIXR 1265Q FIXR 1167Q FGTP 1143Q FGTP 1122Q EQP 1101Q EQP 1002Q EQP 760Q EQP 656Q LOADPOLY 624Q LOADPOLY 547Q FIXR 537Q FIXR 367Q SETXY.PRESS 364Q FIXR 352Q FIXR 317Q FONTPROP 165Q ARRAY 155Q ARRAY 145Q ARRAY 135Q ARRAY 103Q \ENTITYSTART.PRESS 75Q \ENTITYEND.PRESS 54Q GETFILEPTR 11Q DSPFONT) (1554Q ARRAYP 1531Q ARRAYP 1055Q ARRAYP 1032Q ARRAYP 712Q ARRAYP 667Q ARRAYP 511Q PRESSDATA 504Q STREAM 472Q PRESSDATA 465Q STREAM 454Q PRESSDATA 447Q STREAM 421Q PRESSDATA 414Q STREAM 402Q PRESSDATA 375Q STREAM 314Q SIZE 162Q FLOATP 152Q FLOATP 142Q FLOATP 132Q FLOATP 117Q PRESSDATA 112Q STREAM 60Q PRESSDATA 47Q PRESSDATA 36Q STREAM 2 DSPFONT) ( 2042Q 1.0 2014Q .5 2004Q .5 1651Q 1.0 1637Q 1.0 1516Q 1.0 1472Q 1.0 1164Q 0.0 1140Q 0.0 1127Q .0005 1117Q 0.0 1106Q .0005 1076Q 0.0 1013Q 1.0 522Q 0.0 360Q 6.614584 346Q 6.614584) \PRESSCURVE2 D1 (P 2 RESETZ P 1 RESETY P 0 LISPXHIST I 3 BRUSHFONT I 2 DASHING I 1 SPLINE I 0 PRSTREAM F 3 LISPXHIST F 4 RESETVARSLST) "S!Tog hgZ JI(35Q ERROR! 30Q RESETRESTORE 16Q \PRESSCURVE2A0001) (24Q ERROR 13Q INTERNAL) ( 10Q (\PRESSCURVE2A0001)) \PRESSINITA0013 D1 (I 0 STREAM) @g (6 \UNIMPIMAGEOP) (3 FILLCIRCLE) () \PRESSINITA0017 D1 NIL oNIL NIL ( 3 35.27778) \PRESSINITA0046 D1 (I 2 Y I 1 X I 0 STREAM) +@&@AlH@&@BlHNIL (35Q IMAGEOPS 30Q STREAM 10Q IMAGEOPS 3 STREAM) () \PRESSINIT D1 NIL =`dgdgdgdgdgdg dg dgdgdgdgdgdgdgdgdg"dg$dg(dg&dg,dgdg*dg2dg4dg:dgdg8dg6dg0dg.dg NIL (472Q \PRESSIMAGEOPS 464Q \PRESSINITA0046 455Q NILL 446Q NILL 437Q NILL 430Q NILL 421Q NILL 412Q NILL 403Q NILL 374Q NILL 365Q NILL 356Q NILL 347Q NILL 340Q NILL 331Q NILL 322Q NILL 313Q NILL 304Q \DRAWARC.PRESS 275Q \SCALEDBITBLT.PRESS 266Q \DSPCLIPPINGREGION.PRESS 257Q \BITMAPSIZE.PRESS 250Q \CHARWIDTH.PRESS 241Q \STRINGWIDTH.PRESS 232Q \DSPSPACEFACTOR.PRESS 223Q NEWPAGE.PRESS 214Q PRESS 205Q \DSPTOPMARGIN.PRESS 176Q \DSPBOTTOMMARGIN.PRESS 167Q NEWLINE.PRESS 160Q \PRESSINITA0017 151Q \BITBLT.PRESS 142Q \BLTSHADE.PRESS 133Q \PRESSINITA0013 124Q \DRAWELLIPSE.PRESS 115Q \DRAWCIRCLE.PRESS 106Q \DRAWCURVE.PRESS 77Q \DRAWLINE.PRESS 70Q \DSPLINEFEED.PRESS 61Q \DSPRIGHTMARGIN.PRESS 52Q \DSPLEFTMARGIN.PRESS 43Q \DSPFONT.PRESS 34Q \DSPYPOSITION.PRESS 25Q \DSPXPOSITION.PRESS 16Q \CLOSEF.PRESS 7 PRESS 2 IMAGEOPSTYPE#) () MAKEPRESS D1 (I 4 TABS I 3 HEADING I 2 FONTS I 1 PFILE I 0 FILE) @AgBCD (13Q TEXTTOIMAGEFILE) (4 PRESS) () PRESSFILEPA0001 D1 (NAME ERRORSET L (0 NIL) F 1 FILE F 2 RESETVARSLST F 3 LEN F 4 RESETY) TQg gQd hhoQggl hRcQSn nj/Qg H H jci(101Q \GETSTREAM 66Q SETFILEPTR 45Q OPENFILE 17Q GETFILEPTR 6 OPENP) (76Q INPUT 40Q OLD 35Q INPUT 12Q SETFILEPTR 3 INPUT) ( 31Q (PROGN (CLOSEF? OLDVALUE))) PRESSFILEP D1 (P 3 RESETZ P 2 RESETY P 1 LISPXHIST P 0 LEN I 0 FILE F 4 LISPXHIST F 5 RESETVARSLST) S@ bdHg Hj;Hd 1Hnj)T!Uog hg[ KJ@h(110Q ERROR! 102Q RESETRESTORE 70Q PRESSFILEPA0001 36Q \FZEROP 16Q GETFILEINFO 3 FINDFILE) (76Q ERROR 65Q INTERNAL 13Q LENGTH) ( 62Q (PRESSFILEPA0001)) PRESS.BITMAPSCALE D1 (I 1 HEIGHT I 0 WIDTH F 0 PRESSBITMAPREGION) PoAPo@l (33Q MIN) NIL ( 23Q .02845276 10Q .02845276) (PRETTYCOMPRINT PRESSCOMS) (RPAQQ PRESSCOMS ((COMS (FNS \SEARCHPRESSFONTS \GETPRESSFONTNAMES \PRESSFAMILYCODELST \DECODEPRESSFACEBYTE \CREATEPRESSFONT \CREATECHARSET.PRESS) (INITVARS (PRESSFONTWIDTHSFILES (QUOTE {ERIS}FONTS>FONTS.WIDTHS))) (ALISTS (SYSTEMINITVARS PRESSFONTWIDTHSFILES)) (DECLARE: DONTCOPY ( CONSTANTS noInfoCode))) (FNS PRESSBITMAP FULLPRESSBITMAP SHOWREGION SHOWPRESSBITMAPREGION PRESSWINDOW WINDOW.BITMAP \WRITEPRESSBITMAP) (FNS \BCPLSOUT.PRESS \PAGEPAD.PRESS) (FNS \ENTITYEND.PRESS \PARTEND.PRESS \ENTITYSTART.PRESS SETX.PRESS SETXY.PRESS SETY.PRESS SHOW.PRESS) (FNS OPENPRSTREAM \BITBLT.PRESS \BLTSHADE.PRESS \SCALEDBITBLT.PRESS \BITMAPSIZE.PRESS \CHARWIDTH.PRESS \CLOSEF.PRESS \DRAWLINE.PRESS \ENDPAGE.PRESS NEWLINE.PRESS NEWPAGE.PRESS SETUPFONTS.PRESS \DEFINEFONT.PRESS \DSPBOTTOMMARGIN.PRESS \DSPCLIPPINGREGION.PRESS \DSPFONT.PRESS \DSPLEFTMARGIN.PRESS \DSPLINEFEED.PRESS \DSPRIGHTMARGIN.PRESS \DSPSPACEFACTOR.PRESS \DSPTOPMARGIN.PRESS \DSPXPOSITION.PRESS \DSPYPOSITION.PRESS \FIXLINELENGTH.PRESS \OUTCHARFN.PRESS \SETSPACE.PRESS \STARTPAGE.PRESS \STRINGWIDTH.PRESS SHOWRECTANGLE.PRESS \PRESS.CONVERT.NSCHARACTER) (COMS (* Drawcurve code) (FNS \ENDVECRUN \VECENCODE \VECPUT \VECSKIP \VECFONTINIT \DRAWCIRCLE.PRESS \DRAWARC.PRESS \DRAWCURVE.PRESS \DRAWCURVE.PRESS.LINE \DRAWELLIPSE.PRESS \GETBRUSHFONT.PRESS \PRESSCURVE2) (INITVARS (\VecFontDir)) ( CONSTANTS (\MicasPerInch 2540)) (DECLARE: DONTCOPY (CONSTANTS (ScansPerIn 384) (PointsPerIn 72.27) ( MicasPerScan (FQUOTIENT \MicasPerInch ScansPerIn)) (ScansPerMica (FQUOTIENT ScansPerIn \MicasPerInch)) (ScansPerPoint (FQUOTIENT ScansPerIn PointsPerIn)) (PointsPerScan (FQUOTIENT PointsPerIn ScansPerIn)) (MicasPerPoint (FQUOTIENT \MicasPerInch PointsPerIn)) (PointsPerMica (FQUOTIENT PointsPerIn \MicasPerInch)) (SPRUCEPAPERTOPSCANS 4096) (SPRUCEPAPERTOPMICAS (FIX (FQUOTIENT (FTIMES SPRUCEPAPERTOPSCANS \MicasPerInch) ScansPerIn))) (SPRUCEPAPERRIGHTMICAS (FIX (FTIMES 8.5 \MicasPerInch ))) (SPRUCEPAPERRIGHTSCANS (FIX (FTIMES 8.5 ScansPerIn))) (SPRUCEPAPERBOTTOMSCANS 0) ( SPRUCEPAPERBOTTOMMICAS 0) (SPRUCEPAPERLEFTSCANS 0) (SPRUCEPAPERLEFTMICAS 0)))) (FNS \PRESSINIT) ( DECLARE: DONTEVAL@LOAD DOCOPY (P (\PRESSINIT))) (DECLARE: DONTCOPY (RECORDS PRESSDATA FONTDIRENTRY)) ( INITRECORDS PRESSDATA) (INITVARS (DEFAULTPAGEREGION (CREATEREGION 2794 1905 16256 24765)) ( PRESSBITMAPREGION (CREATEREGION 1270 1270 (FIX (TIMES 7.5 \MicasPerInch)) (TIMES 10 \MicasPerInch)))) (GLOBALVARS DEFAULTPAGEREGION) (DECLARE: DONTCOPY (CONSTANTS (BYTESPERRECORD 512) (LISPENTITYTYPE 6) ( MICASPERINCH \MicasPerInch)) (E (RESETSAVE (RADIX 8))) (CONSTANTS * PRESSOPS)) (COMS (FNS MAKEPRESS PRESSFILEP PRESS.BITMAPSCALE) (ALISTS (IMAGESTREAMTYPES PRESS)) (ADDVARS (PRINTERTYPES ((PRESS SPRUCE PENGUIN DOVER) (CANPRINT (PRESS)) (STATUS PUP.PRINTER.STATUS) (PROPERTIES PUP.PRINTER.PROPERTIES) ( SEND EFTP) (BITMAPSCALE NIL) (BITMAPFILE (PRESSBITMAP FILE BITMAP SCALEFACTOR REGION ROTATION TITLE))) ((FULLPRESS RAVEN) (* same as PRESS but can scale bitmaps) (CANPRINT (PRESS)) (STATUS TRUE) ( PROPERTIES NILL) (SEND EFTP) (BITMAPSCALE PRESS.BITMAPSCALE) (BITMAPFILE (FULLPRESSBITMAP FILE BITMAP SCALEFACTOR REGION ROTATION TITLE)))) (PRINTFILETYPES (PRESS (TEST PRESSFILEP) (EXTENSION (PRESS)) ( CONVERSION (TEXT MAKEPRESS TEDIT (LAMBDA (FILE PFILE FONTS HEADING) (SETQ FILE (OPENTEXTSTREAM FILE)) (TEDIT.FORMAT.HARDCOPY FILE PFILE T NIL NIL NIL (QUOTE PRESS)) (CLOSEF? FILE) PFILE))))))))) (RPAQ? PRESSFONTWIDTHSFILES (QUOTE {ERIS}FONTS>FONTS.WIDTHS)) (ADDTOVAR SYSTEMINITVARS (PRESSFONTWIDTHSFILES {DSK}FONTS.WIDTHS)) (RPAQ? \VecFontDir) (RPAQQ \MicasPerInch 2540) (CONSTANTS (\MicasPerInch 2540)) (\PRESSINIT) (/DECLAREDATATYPE (QUOTE PRESSDATA) (QUOTE (POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER WORD WORD WORD WORD WORD BYTE BYTE FIXP FIXP FIXP FIXP FLAG FLAG POINTER POINTER POINTER POINTER POINTER FLAG POINTER)) (QUOTE (( PRESSDATA 0 POINTER) (PRESSDATA 2 POINTER) (PRESSDATA 4 POINTER) (PRESSDATA 6 POINTER) (PRESSDATA 8 POINTER) (PRESSDATA 10 POINTER) (PRESSDATA 12 POINTER) (PRESSDATA 14 POINTER) (PRESSDATA 16 POINTER) ( PRESSDATA 18 POINTER) (PRESSDATA 20 POINTER) (PRESSDATA 22 POINTER) (PRESSDATA 24 POINTER) (PRESSDATA 26 POINTER) (PRESSDATA 28 POINTER) (PRESSDATA 30 (BITS . 15)) (PRESSDATA 31 (BITS . 15)) (PRESSDATA 32 (BITS . 15)) (PRESSDATA 33 (BITS . 15)) (PRESSDATA 34 (BITS . 15)) (PRESSDATA 28 (BITS . 7)) ( PRESSDATA 26 (BITS . 7)) (PRESSDATA 35 FIXP) (PRESSDATA 37 FIXP) (PRESSDATA 39 FIXP) (PRESSDATA 41 FIXP) (PRESSDATA 24 (FLAGBITS . 0)) (PRESSDATA 24 (FLAGBITS . 16)) (PRESSDATA 44 POINTER) (PRESSDATA 46 POINTER) (PRESSDATA 48 POINTER) (PRESSDATA 50 POINTER) (PRESSDATA 52 POINTER) (PRESSDATA 52 ( FLAGBITS . 0)) (PRESSDATA 54 POINTER))) (QUOTE 56)) (RPAQ? DEFAULTPAGEREGION (CREATEREGION 2794 1905 16256 24765)) (RPAQ? PRESSBITMAPREGION (CREATEREGION 1270 1270 (FIX (TIMES 7.5 \MicasPerInch)) (TIMES 10 \MicasPerInch))) (ADDTOVAR IMAGESTREAMTYPES (PRESS (OPENSTREAM OPENPRSTREAM) (FONTCREATE \CREATEPRESSFONT) ( CREATECHARSET \CREATECHARSET.PRESS) (FONTSAVAILABLE \SEARCHPRESSFONTS))) (ADDTOVAR PRINTERTYPES ((PRESS SPRUCE PENGUIN DOVER) (CANPRINT (PRESS)) (STATUS PUP.PRINTER.STATUS) ( PROPERTIES PUP.PRINTER.PROPERTIES) (SEND EFTP) (BITMAPSCALE NIL) (BITMAPFILE (PRESSBITMAP FILE BITMAP SCALEFACTOR REGION ROTATION TITLE))) ((FULLPRESS RAVEN) (* same as PRESS but can scale bitmaps) ( CANPRINT (PRESS)) (STATUS TRUE) (PROPERTIES NILL) (SEND EFTP) (BITMAPSCALE PRESS.BITMAPSCALE) ( BITMAPFILE (FULLPRESSBITMAP FILE BITMAP SCALEFACTOR REGION ROTATION TITLE)))) (ADDTOVAR PRINTFILETYPES (PRESS (TEST PRESSFILEP) (EXTENSION (PRESS)) (CONVERSION (TEXT MAKEPRESS TEDIT (LAMBDA (FILE PFILE FONTS HEADING) (SETQ FILE (OPENTEXTSTREAM FILE)) (TEDIT.FORMAT.HARDCOPY FILE PFILE T NIL NIL NIL (QUOTE PRESS)) (CLOSEF? FILE) PFILE))))) (PUTPROPS PRESS COPYRIGHT ("Xerox Corporation" 1981 1982 1983 1984 1985 1986)) NIL