(FILECREATED "28-Jul-86 14:59:26" ("compiled on " {DSK}PCEDISPLAY.;4) "12-Nov-85 14:59:23" recompiled changes: \PCE.WINDOW.ATTACH.PROCESS \PCE.WINDOW.DETACH.PROCESS \PCE.DISPLAY.Init \PCE.DISPLAY.NotifyProcedure in "INTERLISP-D 22-Mar-86 ..." dated "22-Mar-86 17:07:07") (FILECREATED "28-Jul-86 14:57:42" {DSK}PCEDISPLAY.;4 120970 changes to: (FNS \PCE.DISPLAY.Init \PCE.DISPLAY.NotifyProcedure \PCE.WINDOW.ATTACH.PROCESS \PCE.WINDOW.DETACH.PROCESS) (VARS PCEDISPLAYCOMS) previous date: "16-Jul-86 09:15:12" {DSK}PCEDISPLAY.;2) (NLSETQ (\PCE.TERMINATE)) (SETQ \PCE.WINDOW NIL) (SETQ \PCE.DISPLAY.SCRATCH.BM NIL) PCE.GET.WINDOW D1 NIL ` (5 WINDOWP) (2 \PCE.WINDOW) () PCE.INVERT.WINDOWA0001 D1 (NAME ERRORSET F 0 RESETY) !`hi n`jdndg ci(33Q BLTSHADE 7 OBTAIN.MONITORLOCK) (27Q INVERT 16Q \PCE.WINDOW 2 \PCE.WINDOW.LOCK) () PCE.INVERT.WINDOW D1 (P 2 RESETZ P 1 RESETY P 0 LISPXHIST F 3 LISPXHIST F 4 RESETVARSLST) 3` #S!Tog hgZ J`h(46Q ERROR! 40Q RESETRESTORE 26Q PCE.INVERT.WINDOWA0001 5 OPENWP) (60Q \PCE.DISPLAY.INVERTED 53Q \PCE.DISPLAY.INVERTED 34Q ERROR 23Q INTERNAL 2 \PCE.WINDOW) ( 20Q (PCE.INVERT.WINDOWA0001)) PCE.INVERT.WINDOW.STATE D1 NIL `hhNIL (2 \PCE.DISPLAY.INVERTED) () PCE.PCTERMINAL.ARRAY D1 NIL ` (5 COPYARRAY) (2 \PCE.PCToNSCharArray) () PCE.SET.WINDOW D1 (I 0 WIN) hg g jhidl `jd@ h@g`lP `l@ (  @gg @gg @gg @gg @gg @gg @gjd`lP`l @gg @@ @ @(330Q REDISPLAYW 323Q OPENWP 317Q \PCE.WINDOW.ATTACH.PROCESS 310Q PUTWINDOWPROP 276Q PUTWINDOWPROP 273Q CREATEREGION 246Q PUTWINDOWPROP 234Q PUTWINDOWPROP 222Q WINDOWADDPROP 210Q WINDOWADDPROP 176Q PUTWINDOWPROP 164Q PUTWINDOWPROP 152Q PUTWINDOWPROP 146Q HEIGHTIFWINDOW 141Q \INSUREWINDOW 127Q WIDTHIFWINDOW 107Q WINDOWP 64Q \CLOCK0 33Q CREATE.MONITORLOCK 22Q CREATE.MONITORLOCK 14Q \PCE.DISPLAY.COPY.INIT.VARS 11Q \PCE.ALLOC.BITMAPS 2 \PCE.CHECK.INITIALIZED) (314Q \PCE.WINDOW 305Q \PCE.WINDOW.COPYBUTTONEVENTFN 302Q COPYBUTTONEVENTFN 265Q \PCE.FONTCHARHEIGHT 257Q \PCE.FONTCHARWIDTH 252Q EXTENT 243Q LIMIT 240Q SCROLLEXTENTUSE 231Q \PCE.WINDOW.SCROLLFN 226Q SCROLLFN 217Q \PCE.WINDOW.OPENFN 214Q OPENFN 205Q \PCE.WINDOW.OPENFN 202Q EXPANDFN 173Q \PCE.WINDOW.RESHAPEFN 170Q RESHAPEFN 161Q \PCE.WINDOW.REPAINTFN 156Q REPAINTFN 132Q \PCE.FONTCHARHEIGHT 121Q \PCE.FONTCHARWIDTH 116Q MAXSIZE 103Q \PCE.CARET.YPOS 77Q \PCE.CARET.XPOS 73Q \PCE.BLINK.TIMER 67Q \PCE.BLINK.OFF.RATE 56Q \PCE.BLINK.CHARS.ENABLED 52Q \PCE.BLINK.CHARS.STATE 46Q \PCE.BLINK.CARET.STATE 42Q \PCE.BLINK.NUMCHARS 36Q \PCE.WINDOW.COPY.LOCK 30Q \PCE.WINDOW.COPY.LOCK 25Q \PCE.WINDOW.LOCK 17Q \PCE.WINDOW.LOCK 6 \PCE.WINDOW) () \PCE.STUFF.WINDOW D1 (I 3 TOCHAR I 2 FROMCHAR I 1 ATTRIB I 0 CHARS) @o bA6l;@@dilj2IdHJݼK Lh[IkYL&ioAbB3jBBjbC3#nbdBAddhb@`o `nC`IH#LIJKnJAK@IkYh(176Q MEMB 14Q CHCON 2 \PCE.CHECK.INITIALIZED) (217Q \PCE.DISPLAY.COLOR.BASE 202Q \PCE.DISPLAY.MONO.BASE 167Q \PCE.DISPLAY.MODE) ( 173Q (MONO NIL) 114Q (0 1 2 11Q 12Q 160Q 200Q 201Q 202Q 211Q 212Q 360Q) 11Q "ABCDEFGabcdefg") \PCE.WINDOW.ATTACH.PROCESS D1 NIL $g g (41Q PUTWINDOWPROP 36Q PCE.KBD.PROC 30Q PCE.GET.WINDOW 25Q PROCESSPROP 22Q PCE.GET.WINDOW 14Q PCE.KBD.PROC 7 PCE.KBD.PROC 2 PCE.GET.WINDOW) (33Q PROCESS 17Q WINDOW) () \PCE.WINDOW.DETACH.PROCESS D1 NIL g  hh(25Q PCE.KBD.PROC 20Q PCE.KBD.PROC 14Q PUTWINDOWPROP 6 PCE.GET.WINDOW 2 PCE.GET.WINDOW) (30Q PROCESS 11Q PROCESS) () \PCE.WINDOW.OPENFN D1 (I 0 WINDOW) @@ (12Q REDISPLAYW 3 PCE.GET.WINDOW) NIL () \PCE.WINDOW.REPAINTFNA0001 D1 (NAME ERRORSET F 0 RESETY) `hi i `` ci(26Q \PCE.COPY.UNDERLINE.DRAW 14Q \PCE.DISPLAY.UPDATE 7 OBTAIN.MONITORLOCK) (23Q \PCE.WINDOW.COPY.ENDCHARNUM 20Q \PCE.WINDOW.COPY.STARTCHARNUM 2 \PCE.WINDOW.LOCK) () \PCE.WINDOW.REPAINTFN D1 (P 2 RESETZ P 1 RESETY P 0 LISPXHIST I 1 REG I 0 WINDOW F 3 LISPXHIST F 4 RESETVARSLST) /@(S!Tog hgZ JI(52Q ERROR! 45Q RESETRESTORE 33Q \PCE.WINDOW.REPAINTFNA0001 14Q \PCE.SHOW.LOCKS 11Q \PCE.CHECK.INITIALIZED 3 PCE.GET.WINDOW) (41Q ERROR 30Q INTERNAL) ( 25Q (\PCE.WINDOW.REPAINTFNA0001)) \PCE.WINDOW.RESHAPEFN D1 (I 0 WINDOW) @@jd (14Q \PCE.WINDOW.SCROLLFN 3 PCE.GET.WINDOW) NIL () \PCE.WINDOW.SCROLLFN D1 (P 14Q NEWY P 13Q OLDY P 12Q NEWX P 11Q OLDX P 6 CRBOTTOM P 5 CRLEFT P 4 CRWIDTH P 3 CRHEIGHT P 2 CR P 1 EXTENT P 0 DSP I 3 CONTINUOUSFLG I 2 YDELTA I 1 XDELTA I 0 WINDOW)  @ @ @ rhH Zd]J^J\J[A! IAIL _hH ObCAjAj jhH كH bB( oBIK I_hH ObCBjBj jhH كH bMIMLIIdAA_dOObdH NINKIIdBB_dOObdH @ h(420Q REDISPLAYW 414Q WYOFFSET 342Q WXOFFSET 270Q DSPLINEFEED 262Q DSPLINEFEED 231Q WYOFFSET 215Q FIXR 161Q DSPLINEFEED 153Q DSPLINEFEED 122Q WXOFFSET 111Q FIXR 41Q DSPCLIPPINGREGION 27Q \INSUREWINDOW 21Q \INSUREWINDOW 15Q \PCE.CHECK.INITIALIZED 3 PCE.GET.WINDOW) NIL ( 200Q 1.0) \PCE.DISPLAY.Configure D1 (I 0 CONFIG) E@g'ddg`lg`l@g'dgggg(2 \PCE.DISPLAY.Terminate) (102Q \PCE.DISPLAY.MODE 77Q COLOR80 71Q COLOR80 65Q COLOR40 57Q COLOR40 52Q DISPLAYTYPE 41Q \PCE.DISPLAY.FCBPTR 35Q \PCE.DISPLAY.MODE 32Q MONO 22Q \PCE.DISPLAY.FCBPTR 15Q MONOCHROME 6 DISPLAYTYPE) () \PCE.DISPLAY.Init D1 NIL 5g hghggggggggh (57Q ADD.PROCESS 5 CREATE.EVENT) (62Q \PCE.DISPLAY.Process 51Q \PCE.DISPLAY.Init 46Q RESTARTFORM 43Q HARDRESET 40Q RESTARTABLE 35Q DELETE 32Q AFTEREXIT 27Q PCE-DISPLAY 24Q NAME 17Q \PCE.DISPLAY.NotifyProcedure 14Q \PCE.DISPLAY.gotUpNotify 10Q \PCE.DISPLAY.Condition 2 DISPLAY.Condition) () \PCE.DISPLAY.Notify D1 NIL -` %i``` ` o` (52Q \PCE.SYSTEM.ERROR 32Q NOTIFY.EVENT 5 OPENWP) (47Q \PCE.DISPLAY.Condition 36Q \PCE.DEBUG.FLG 27Q \PCE.DISPLAY.Condition 22Q EVENTTYPE# 16Q \PCE.DISPLAY.Condition 13Q \PCE.DISPLAY.gotUpNotify 2 \PCE.WINDOW) ( 44Q "\PCE.DISPLAY.Condition not an event") \PCE.DISPLAY.NotifyProcedureA0001 D1 (NAME ERRORSET F 0 RESETY) `hi ci(13Q \PCE.DISPLAY.UPDATE 7 OBTAIN.MONITORLOCK) (2 \PCE.WINDOW.COPY.LOCK) () \PCE.DISPLAY.NotifyProcedure D1 (P 2 RESETZ P 1 RESETY P 0 LISPXHIST F 3 LISPXHIST F 4 RESETVARSLST) K  `` h` S!Tog hgZ J(105Q ERROR! 77Q RESETRESTORE 65Q \PCE.DISPLAY.NotifyProcedureA0001 44Q OPENWP 27Q AWAIT.EVENT 14Q REDISPLAYW 11Q PCE.GET.WINDOW 5 OPENWP 2 PCE.GET.WINDOW) (73Q ERROR 62Q INTERNAL 41Q \PCE.WINDOW 35Q \PCE.DISPLAY.gotUpNotify 24Q \PCE.DISPLAY.Condition 20Q \PCE.DISPLAY.gotUpNotify) ( 57Q (\PCE.DISPLAY.NotifyProcedureA0001)) \PCE.DISPLAY.Terminate D1 NIL ` ` hdd(15Q DEL.PROCESS 5 PROCESSP) (32Q \PCE.DISPLAY.Process 26Q \PCE.DISPLAY.gotUpNotify 22Q \PCE.DISPLAY.Condition 12Q \PCE.DISPLAY.Process 2 \PCE.DISPLAY.Process) () \PCE.ALLOC.BITMAPS D1 (P 4 CH P 3 FONTSET P 1 PCBOLDFONT P 0 PCFONT) w``4`/``%` ``````  glgjg Xdgg Yo!Jlll`,`lAH `H`Ho `lP`l H d` I d` Hi d` Ii d` ` d` dlnj `lP`l ll hjd`hhjhh[nl \H LI JZ(556Q GETCHARBITMAP 550Q GETCHARBITMAP 501Q BITMAPCREATE 472Q \PCE.DISPLAY.ALLOC.SHADES 464Q BITMAPCREATE 442Q \ALLOCBLOCK 420Q \PCE.CREATE.BBT 406Q \PCE.CREATE.WIDE.FONT.BM 375Q \PCE.CREATE.BBT 363Q \PCE.CREATE.FONT.BM 353Q \PCE.CREATE.BBT 341Q \PCE.CREATE.FONT.BM 331Q \PCE.CREATE.BBT 317Q \PCE.CREATE.FONT.BM 310Q \PCE.CREATE.BBT 276Q \PCE.CREATE.FONT.BM 267Q BITMAPCREATE 247Q \PCE.SYSTEM.ERROR 207Q CHARWIDTH 131Q FONTCOPY 116Q FONTCREATE) (530Q \PCE.CARET.CARET1 512Q \PCE.CARET.BITMAP 504Q \PCE.CARET.BITMAP 467Q \PCE.BLINK.BITMAP 456Q \PCE.FONTCHARHEIGHT 450Q \PCE.FONTCHARWIDTH 445Q \PCE.DISPLAY.OLDCHARS 427Q PILOTBBT 423Q \PCE.DISPLAY.WIDEFONT.BBT 415Q \PCE.DISPLAY.SCRATCH.BM 411Q \PCE.DISPLAY.WIDEFONT.BM 403Q \PCE.DISPLAY.BOLDFONT.BM 400Q \PCE.DISPLAY.UNDERBOLDFONT.BBT 372Q \PCE.DISPLAY.SCRATCH.BM 366Q \PCE.DISPLAY.UNDERBOLDFONT.BM 356Q \PCE.DISPLAY.UNDERFONT.BBT 350Q \PCE.DISPLAY.SCRATCH.BM 344Q \PCE.DISPLAY.UNDERFONT.BM 334Q \PCE.DISPLAY.BOLDFONT.BBT 326Q \PCE.DISPLAY.SCRATCH.BM 322Q \PCE.DISPLAY.BOLDFONT.BM 313Q \PCE.DISPLAY.FONT.BBT 305Q \PCE.DISPLAY.SCRATCH.BM 301Q \PCE.DISPLAY.FONT.BM 272Q \PCE.DISPLAY.SCRATCH.BM 261Q \PCE.FONTCHARHEIGHT 253Q \PCE.FONTCHARWIDTH 234Q FONTDESCRIPTOR 230Q \PCE.FONTCHARDESCENT 221Q FONTDESCRIPTOR 215Q \PCE.FONTCHARHEIGHT 201Q \PCE.FONTCHARWIDTH 174Q \PCE.DEBUG.FLG 171Q \PCE.FONTCHARDESCENT 164Q \PCE.FONTCHARHEIGHT 157Q \PCE.FONTCHARWIDTH 126Q BRR 123Q FACE 112Q DISPLAY 106Q MRR 101Q PCTERMINAL 67Q \PCE.DISPLAY.OLDCHARS 62Q PILOTBBTTYPE# 56Q \PCE.DISPLAY.UNDERBOLDFONT.BBT 52Q \PCE.BLINK.BITMAP 44Q BITMAPTYPE# 40Q \PCE.BLINK.BITMAP 33Q \PCE.DISPLAY.SCRATCH.BM 25Q BITMAPTYPE# 21Q \PCE.DISPLAY.SCRATCH.BM 14Q \PCE.CARET.BITMAP 6 BITMAPTYPE# 2 \PCE.CARET.BITMAP) ( 244Q "PCTERMINAL14 fonts wrong size" 136Q (0 41Q 42Q 46Q 50Q 356Q 357Q 361Q 375Q)) \PCE.CREATE.BBT D1 (I 1 DESTBM I 0 SOURCEBM) fP`@dKn@AdLnd`Ad` ZdIJIJHJHNIL (136Q PILOTBBT 125Q PILOTBBT 114Q PILOTBBT 103Q PILOTBBT 73Q \PCE.FONTCHARHEIGHT 60Q \PCE.FONTCHARWIDTH 5 PILOTBBTTYPE#) () \PCE.CREATE.FONT.BM D1 (P 4 X P 2 BBT P 1 DSP P 0 BM I 1 UNDERLINEFLG I 0 FONT) e0`n` Xd Y@I nI ljLdKAnHjknkg H``I `L( I Lk\(134Q PRIN1 130Q CHARACTER 117Q MOVETO 102Q BLTSHADE 41Q DSPRIGHTMARGIN 32Q DSPFONT 24Q DSPCREATE 17Q BITMAPCREATE) (123Q \PCE.PCToNSCharArray 113Q \PCE.FONTCHARDESCENT 107Q \PCE.FONTCHARWIDTH 76Q INVERT 14Q \PCE.FONTCHARHEIGHT 5 \PCE.FONTCHARWIDTH) () \PCE.CREATE.WIDE.FONT.BM D1 (P 3 BBT P 2 BM P 1 THIN.HEIGHT P 0 THIN.WIDTH I 0 THINFONTBM) b@ ` BHlI Z@J `M dkdldjdjdkHIڼdL [dj QKj @KjvKkKjvJ(42Q NCREATE2 32Q \PCE.CREATE.BBT 24Q BITMAPCREATE 11Q BITMAPHEIGHT 3 BITMAPWIDTH) (130Q PILOTBBT 36Q PILOTBBTTYPE# 6 \PCE.DISPLAY.BOLDFONT.BM) () \PCE.DECODE.TEXT.ATTRIBUTES D1 (L (0 ATTRIBUTE)) ^@lp@lHdjIjIlgHlIjIdlgIlIkIl ggIkIl ggNIL (133Q NORMAL 127Q UNDERLINE 112Q BRIGHT 106Q BRIGHT.UNDERLINE 63Q REVERSE 40Q INVISIBLE) () \PCE.DISPLAY.ALLOC.SHADES D1 (P 10Q TEXTURE P 7 Y P 0 BACKNUM.TO.GRAYNUM) lgjd All, ojl(Mlgjd olj Ongjd lj OO`` `I Zdk 0JjCJjJlÿl l n`jdnd `` `K dndk \dk 0LjCLjLjÿdk Q`j @h_NO'O`jOll Om_M]_OO`OOl@*HOO*Ok_O_HO(_ljOOHO(_OdO OOl Ol Ol Ol j.OllOljlOOllOOjl _`OOOl@*Ok_{Ok_p(632Q EQP 622Q EQP 612Q EQP 602Q EQP 567Q EQP 424Q BLTSHADE 301Q NCREATE2 271Q \PCE.CREATE.BBT 260Q BLTSHADE 235Q BITMAPCREATE 171Q NCREATE2 161Q \PCE.CREATE.BBT 125Q ARRAY 63Q ARRAY 23Q BITMAPCREATE 11Q ARRAY) (720Q \PCE.DISPLAY.COLOR.FORE.GRAYBIT 463Q \PCE.DISPLAY.COLOR.BACK.GRAYBIT 411Q \PCE.DISPLAY.COLOR.BRICKS.BM 362Q \PCE.DISPLAY.MEDRES.GRAY.BBT 351Q \PCE.DISPLAY.MEDRES.GRAY.BBT 275Q PILOTBBTTYPE# 266Q \PCE.DISPLAY.SCRATCH.BM 263Q \PCE.DISPLAY.MEDRES.GRAY.BM 246Q \PCE.DISPLAY.MEDRES.GRAY.BM 240Q \PCE.DISPLAY.MEDRES.GRAY.BM 226Q \PCE.DISPLAY.COLOR.BRICKS.BBT 165Q PILOTBBTTYPE# 156Q \PCE.DISPLAY.SCRATCH.BM 153Q \PCE.DISPLAY.COLOR.BRICKS.BM 130Q \PCE.DISPLAY.COLOR.FORE.GRAYBIT 120Q SMALLP 66Q \PCE.DISPLAY.COLOR.BACK.GRAYBIT 56Q SMALLP 26Q \PCE.DISPLAY.COLOR.BRICKS.BM 4 SMALLP) ( 72Q (12Q 10Q 4 3 7 6 5 0 11Q 6 3 2 4 3 1 0) 32Q (0 100Q 10100Q 12024Q 45032Q 55132Q 155172Q 165753Q 77737Q 177737Q 177777Q)) \PCE.DISPLAY.INIT.MEMORY D1 NIL Mo dn o ddn``n gi`j(66Q \CLEARWORDS 27Q \PCE.GET.PC.PTR 20Q \CLEARWORDS 6 \PCE.GET.PC.PTR) (112Q \PCE.DISPLAY.COLOR.PAGE.OFFSET 106Q \PCE.DISPLAY.BASE 103Q \PCE.DISPLAY.MONO.BASE 100Q \PCE.DISPLAY.MODE.HAS.TEXT 74Q \PCE.DISPLAY.MODE 71Q MONO 60Q \PCE.DISPLAY.COLOR.BASE 55Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 51Q PILOTBBTTYPE# 46Q \PCE.DISPLAY.COLOR.ODDLINEBLOCK.BASE 36Q \PCE.DISPLAY.COLOR.EVENLINEBLOCK.BASE 32Q \PCE.DISPLAY.COLOR.BASE 11Q \PCE.DISPLAY.MONO.BASE) ( 24Q 2700000Q 3 2600000Q) \PCE.DISPLAY.REPAINT.GRAPHICS D1 (P 23Q LINE P 21Q HIGH P 20Q LOW P 17Q DISPLAYBASE P 16Q MASKBIT P 15Q BITNUM P 13Q LASTBITON P 12Q CURRENTBITON P 11Q DIRTYBITS P 10Q FIRSTBITNUM P 2 BITSPERBMLINE P 1 WORDSPERBMLINE P 0 HIRESFLG I 1 DIRTYBITSLIST I 0 REDISPLAYFLG) `ga`YdlZ@oAj2 O*` d`jd`jdnd`DgA_jOi h_l2On3OOOjOO O_OOjh_`_Odll_ l _"`_8ll_ l_"+Olll_ Ol2ll_"OO l_ O"O O&O$XOIO&`O&Iм`Jn`Jn`K`K`j`L`L`j`n`k `j Q`j @`jv`J`jvH``ѽ`M`M`J`jv``Ѿ`N`N`J`Jk`n`l Q`j @`jvO&l_&Ok_O_O_Ol_gg h(1222Q BKBITBLT 221Q \FZEROP 153Q BLOCK 141Q \FZEROP 54Q OPENWP) (1216Q REPLACE 1213Q INVERT 1130Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 1120Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 1107Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 1076Q PILOTBBT 1073Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 1062Q PILOTBBT 1057Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 1050Q PILOTBBT 1045Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 1035Q PILOTBBT 1032Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 1022Q PILOTBBT 1017Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 1010Q PILOTBBT 1005Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 1000Q PILOTBBT 775Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 767Q \PCE.DISPLAY.MEDRES.GRAY.BBT 760Q PILOTBBT 755Q \PCE.DISPLAY.MEDRES.GRAY.BBT 745Q PILOTBBT 742Q \PCE.DISPLAY.MEDRES.GRAY.BBT 732Q PILOTBBT 727Q \PCE.DISPLAY.MEDRES.GRAY.BBT 720Q PILOTBBT 715Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 710Q PILOTBBT 705Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 672Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 663Q PILOTBBT 660Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 652Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 642Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 632Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 623Q PILOTBBT 620Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 607Q PILOTBBT 604Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 575Q PILOTBBT 572Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 562Q PILOTBBT 557Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 547Q PILOTBBT 544Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 535Q PILOTBBT 532Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 522Q PILOTBBT 517Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 507Q PILOTBBT 504Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 471Q PILOTBBT 466Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 453Q PILOTBBT 450Q \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT 434Q \PCE.DISPLAY.SCRATCH.BM 305Q \PCE.DISPLAY.COLOR.EVENLINEBLOCK.BASE 254Q \PCE.DISPLAY.COLOR.ODDLINEBLOCK.BASE 112Q INPUT 103Q \PCE.DISPLAY.INVERTED 72Q \PCE.WINDOW 65Q \PCE.DISPLAY.SCRATCH.BM 51Q \PCE.WINDOW 14Q \PCE.DISPLAY.SCRATCH.BM 5 HIRES 2 \PCE.DISPLAY.MODE) ( 32Q (177777Q 177777Q 177777Q 177777Q)) \PCE.DISPLAY.REPAINT.TEXT D1 (P 44Q HEIGHT P 43Q WIDTH P 42Q Y P 41Q X P 40Q BACKGROUND.BIT P 37Q OLDPCWORD P 36Q PCWORD P 35Q FONT.BITMAP.XPOS P 34Q ATTRIB.BYTE P 33Q CHAR.IS.BLINKING P 32Q ATTRIB P 31Q LAST.ATTRIB.BYTE P 30Q XPOS P 27Q COL P 25Q DEST P 24Q OLDLINEBASE P 23Q LINEBASE P 22Q YPOS P 21Q FIRSTCHARNUM P 20Q SCRATCH.BITMAP.OFFSET P 17Q DIRTYBIT.COUNTDOWN P 16Q ROW P 14Q BLINK.CHARBM P 13Q MONOFLG P 12Q ROWS.PER.DIRTYBIT P 11Q FONTCHARWIDTH P 10Q MAXCOLS P 7 FONTBBT P 6 FONTBM P 5 BMWIDTH.TIMES.CHARHEIGHT P 4 MASKBIT P 3 MAXCOL P 2 MINCOL P 1 MAXROW P 0 MINROW I 1 DIRTYBITS I 0 REDISPLAYFLG) %@6`jn j`jdnd j`jdnd jnbnonon````lP`l`g `g``_l(_`l_l_N_`OljOjd`l6OOOjO_LLAj=HdOOIdOO`O"_&`O"_(`O _*O)OO*OO*`O*`Y`O*`O*`O*`O*`O*`O*`O*`O*OkjdsO.O,nO&O._@COlj0`k%O>lj`kj`O0O$O` OCO67OO:j`O0O$O`gO4ggg `OOl OjvO8l_8`O8( `O@`j Q`j @`jvOg/l.JlJl*Jdl gj` oJ ho ` `g```@H `@H Hlj`jh(443Q \PCE.DISPLAY.UPDATE.GRAPHICS 430Q \PCE.DISPLAY.UPDATE.TEXT 373Q \PCE.CARET.SET.TYPE 360Q MEMB 344Q \PCE.SYSTEM.ERROR 114Q \PCE.SYSTEM.ERROR 75Q \FZEROP 5 OPENWP) (456Q \PCE.DISPLAY.FCBPTR 435Q \PCE.DISPLAY.MODE 422Q \PCE.DISPLAY.MODE.HAS.TEXT 416Q \PCE.DISPLAY.BASE 413Q \PCE.DISPLAY.COLOR.BASE 407Q \PCE.DISPLAY.MONO.BASE 402Q MONO 377Q \PCE.DISPLAY.MODE 370Q \PCE.DISPLAY.MODE 363Q \PCE.DISPLAY.MODE.HAS.TEXT 351Q \PCE.DISPLAY.MODE 332Q \PCE.DEBUG.FLG 322Q MEDRES 267Q HIRES 247Q COLOR80 214Q COLOR40 157Q \PCE.DISPLAY.FCBPTR 146Q MONO 142Q \PCE.DISPLAY.MODE 101Q \PCE.DEBUG.FLG 53Q \PCE.DISPLAY.FCBPTR 42Q \DoveIORegion 33Q \PCE.DISPLAY.FCBPTR 25Q \PCE.DISPATCHER.FCBPTR 2 \PCE.WINDOW) ( 355Q (MONO COLOR40 COLOR80) 340Q "Bad Color Mode" 106Q "Display error") \PCE.DISPLAY.UPDATE.GRAPHICSA0001 D1 (NAME ERRORSET F 0 REDISPLAYFLG F 1 \PCE.DIRTYBITSLIST.SPECVAR F 2 RESETY) `hi PQ ci(15Q \PCE.DISPLAY.REPAINT.GRAPHICS 7 OBTAIN.MONITORLOCK) (2 \PCE.WINDOW.LOCK) () \PCE.DISPLAY.UPDATE.GRAPHICS D1 (P 4 RESETZ P 3 RESETY P 2 LISPXHIST P 1 \PCE.DIRTYBITSLIST.SPECVAR P 0 DBARRAYBASE I 1 REQBITS I 0 REDISPLAYFLG F 5 LISPXHIST F 6 RESETVARSLST) [AdljibAljE`l HHHHh`jU!Vog hg\ Lh(127Q ERROR! 120Q RESETRESTORE 106Q \PCE.DISPLAY.UPDATE.GRAPHICSA0001) (114Q ERROR 103Q INTERNAL 62Q \PCE.DISPLAY.FCBPTR 27Q \PCE.DISPLAY.FCBPTR) ( 100Q (\PCE.DISPLAY.UPDATE.GRAPHICSA0001)) \PCE.DISPLAY.UPDATE.TEXTA0001 D1 (NAME ERRORSET F 0 REDISPLAYFLG F 1 \PCE.DIRTYBITS.SPECVAR F 2 RESETY) `hi PQ ci(15Q \PCE.DISPLAY.REPAINT.TEXT 7 OBTAIN.MONITORLOCK) (2 \PCE.WINDOW.LOCK) () \PCE.DISPLAY.UPDATE.TEXTA0002 D1 (NAME ERRORSET F 0 MONOFLG F 1 RESETY) ,`hi P```` ci(46Q \PCE.CARET.RESHAPE 7 OBTAIN.MONITORLOCK) (40Q \PCE.DISPLAY.FCBPTR 32Q \PCE.DISPLAY.FCBPTR 23Q \PCE.DISPLAY.FCBPTR 15Q \PCE.DISPLAY.FCBPTR 2 \PCE.WINDOW.LOCK) () \PCE.DISPLAY.UPDATE.TEXTA0003 D1 (NAME ERRORSET F 0 MONOFLG F 1 RESETY) "`hi P``!` ci(34Q \PCE.CARET.MOVE 7 OBTAIN.MONITORLOCK) (30Q \PCE.DISPLAY.COLOR.PAGE.OFFSET 23Q \PCE.DISPLAY.FCBPTR 15Q \PCE.DISPLAY.FCBPTR 2 \PCE.WINDOW.LOCK) () \PCE.DISPLAY.UPDATE.TEXT D1 (P 4 RESETZ P 3 RESETY P 2 LISPXHIST P 1 \PCE.DIRTYBITS.SPECVAR P 0 MONOFLG I 1 REQBITS I 0 REDISPLAYFLG F 5 LISPXHIST F 6 RESETVARSLST) `gAdlj,Hj` H```nbibAljL`j.`"n`jU!Vog h ` g\ LAdl@j)U!Vog hg\ LAl j&U!Vog hg\ Lh(350Q BLOCK 343Q ERROR! 335Q RESETRESTORE 323Q \PCE.DISPLAY.UPDATE.TEXTA0003 273Q BLOCK 266Q ERROR! 260Q RESETRESTORE 246Q \PCE.DISPLAY.UPDATE.TEXTA0002 212Q ERROR! 204Q RESETRESTORE 164Q \FZEROP 156Q \PCE.DISPLAY.UPDATE.TEXTA0001) (331Q ERROR 320Q INTERNAL 254Q ERROR 243Q INTERNAL 200Q ERROR 171Q \PCE.DISPLAY.FCBPTR 153Q INTERNAL 132Q \PCE.DISPLAY.FCBPTR 115Q \PCE.DISPLAY.COLOR.PAGE.OFFSET 106Q \PCE.DISPLAY.COLOR.PAGE.OFFSET 60Q \PCE.DISPLAY.BASE 54Q \PCE.DISPLAY.COLOR.PAGE.OFFSET 51Q \PCE.DISPLAY.COLOR.BASE 45Q \PCE.DISPLAY.MONO.BASE 37Q \PCE.DISPLAY.COLOR.PAGE.OFFSET 32Q \PCE.DISPLAY.FCBPTR 5 MONO 2 \PCE.DISPLAY.MODE) ( 315Q (\PCE.DISPLAY.UPDATE.TEXTA0003) 240Q (\PCE.DISPLAY.UPDATE.TEXTA0002) 150Q (\PCE.DISPLAY.UPDATE.TEXTA0001)) \PCE.BLINK D1 NIL [`V` N` F`hdd  ` ` `l`l ```(111Q \CLOCK0 67Q \PCE.BLINK.CHARS.SET 61Q \PCE.BLINK.CARET.SET 51Q TTY.PROCESSP 46Q PCE.KBD.PROC 42Q \PCE.BLINK.CHARS.SET 22Q TIMEREXPIRED? 12Q OPENWP) (130Q \PCE.BLINK.TIMER 124Q \PCE.BLINK.OFF.RATE 120Q \PCE.BLINK.ON.RATE 114Q \PCE.BLINK.STATE 102Q \PCE.BLINK.TIMER 72Q \PCE.BLINK.TIMER 64Q \PCE.BLINK.STATE 56Q \PCE.BLINK.STATE 34Q \PCE.BLINK.STATE 27Q \PCE.BLINK.STATE 17Q \PCE.BLINK.TIMER 7 \PCE.WINDOW 2 \PCE.DISPLAY.MODE.HAS.TEXT) () \PCE.BLINK.CARET.SET D1 (I 0 NEWSTATE) `@@h(10Q \PCE.CARET.INVERT) (14Q \PCE.BLINK.CARET.STATE 2 \PCE.BLINK.CARET.STATE) () \PCE.BLINK.CHARS D1 NIL Q`jJ` B`jd`jdndgg `jd`jdnd`ggg `(116Q \PCE.CARET.INVERT 106Q BKBITBLT 46Q BKBITBLT 14Q OPENWP) (111Q \PCE.BLINK.CARET.STATE 102Q REPLACE 77Q INPUT 73Q INVERT 67Q \PCE.DISPLAY.INVERTED 56Q \PCE.WINDOW 51Q \PCE.DISPLAY.SCRATCH.BM 42Q INVERT 37Q INPUT 26Q \PCE.DISPLAY.SCRATCH.BM 21Q \PCE.BLINK.BITMAP 11Q \PCE.WINDOW 2 \PCE.BLINK.NUMCHARS) () \PCE.BLINK.CHARS.SET D1 (I 0 NEWSTATE) ``@@h(15Q \PCE.BLINK.CHARS) (21Q \PCE.BLINK.CHARS.STATE 7 \PCE.BLINK.CHARS.STATE 2 \PCE.BLINK.CHARS.ENABLED) () \PCE.CARET.DRAW D1 (P 3 ENDY P 2 STARTY P 1 LASTVIS P 0 MONO.DISPLAY.P I 1 ENDLINE I 0 STARTLINE) @j`jdnd `hgXdl lYj@@IjAAIjbIbH$@j@d j@lغAI lAl؈@lںAlڻlJZlK[@An`jKnA@ٰ$n`jKnlKk n`jdnJk h(263Q BLTSHADE 240Q BLTSHADE 132Q EQP 115Q \FZEROP 20Q BLTSHADE) (247Q \PCE.CARET.BITMAP 221Q \PCE.CARET.BITMAP 201Q \PCE.CARET.BITMAP 32Q MONO 23Q \PCE.CARET.TYPE 6 \PCE.CARET.BITMAP) () \PCE.CARET.INVERT D1 NIL 4`/` '`````` ` (61Q \CARET.SHOW 50Q \INSUREWINDOW 12Q OPENWP) (56Q \PCE.CARET.CARET1 45Q \PCE.WINDOW 42Q \PCE.CARET.CARET1 35Q \PCE.CARET.YPOS 30Q \PCE.CARET.CARET1 23Q \PCE.CARET.XPOS 17Q \PCE.CARET.CARET1 7 \PCE.WINDOW 2 \PCE.CARET.TYPE) () \PCE.CARET.MOVE D1 (P 4 CARET.LINE P 3 CARET.YPOS P 2 CARET.XPOS P 1 CHARWIDTH P 0 CHARS.ON.LINE I 0 CARET.POS) _`gl(lP`g`lڂ`2`l@H[I@H ZK`d`h`KJ`(132Q \PCE.CARET.INVERT 111Q \PCE.CARET.INVERT 62Q IMOD) (125Q \PCE.BLINK.CARET.STATE 122Q \PCE.CARET.XPOS 116Q \PCE.CARET.YPOS 105Q \PCE.BLINK.CARET.STATE 76Q \PCE.CARET.XPOS 70Q \PCE.CARET.YPOS 44Q \PCE.FONTCHARHEIGHT 36Q \PCE.FONTCHARWIDTH 27Q \PCE.FONTCHARWIDTH 22Q COLOR40 17Q \PCE.CARET.TYPE 5 COLOR40 2 \PCE.CARET.TYPE) () \PCE.CARET.RESHAPE D1 (I 1 ENDLINE I 0 STARTLINE) `@A `(24Q \PCE.CARET.INVERT 14Q \PCE.CARET.DRAW 6 \PCE.CARET.INVERT) (17Q \PCE.BLINK.CARET.STATE 2 \PCE.BLINK.CARET.STATE) () \PCE.CARET.SET.TYPE D1 (I 0 NEWTYPE) A`@h`@dglll ``hh`(74Q \PCE.CARET.INVERT 43Q BITMAPCREATE 16Q \PCE.CARET.INVERT) (67Q \PCE.BLINK.CARET.STATE 57Q \PCE.CARET.BITMAP 51Q \PCE.CARET.CARET1 46Q \PCE.CARET.BITMAP 27Q COLOR40 23Q \PCE.CARET.TYPE 12Q \PCE.BLINK.CARET.STATE 2 \PCE.CARET.TYPE) () \PCE.COPY.UNDERLINE.DRAW D1 (P 7 LINENUM P 6 Y P 5 ENDY P 4 ENDX P 3 STARTY P 2 STARTX P 1 CHARWIDTH P 0 CHARS.PER.LINE I 1 ENDCHARNUM I 0 STARTCHARNUM) @A``gl(`d؅lP`@AA@bbI@H Z`l@H[IdAH \`lAH]K@HMN>``JNdM LIO H IJlg jNj`ԾOk_h(224Q BLTSHADE 206Q IMOD 202Q \PCE.WINDOW.LASTCHAR 171Q EQP 122Q IMOD 76Q IMOD) (234Q \PCE.FONTCHARHEIGHT 220Q INVERT 162Q \PCE.WINDOW 157Q GRAYSHADE 130Q \PCE.FONTCHARHEIGHT 103Q \PCE.FONTCHARHEIGHT 53Q \PCE.FONTCHARWIDTH 42Q \PCE.FONTCHARWIDTH 32Q COLOR40 27Q \PCE.DISPLAY.MODE) () \PCE.DISPLAY.COPY.INIT.VARS D1 NIL 8`lgmj ljIH`Im*IkYhd(20Q ARRAY) (65Q \PCE.WINDOW.COPY.ENDCHARNUM 61Q \PCE.WINDOW.COPY.STARTCHARNUM 41Q \PCE.WINDOW.LASTCHAR.ARRAY 23Q \PCE.WINDOW.LASTCHAR.ARRAY 12Q FIXP 2 \PCE.WINDOW.LASTCHAR.ARRAY) () \PCE.DISPLAY.COPY.UNDERLINE D1 (I 1 NEWENDCHARNUM I 0 NEWSTARTCHARNUM) '@`A``` @A @Ah(32Q \PCE.COPY.UNDERLINE.DRAW 25Q \PCE.COPY.UNDERLINE.DRAW) (42Q \PCE.WINDOW.COPY.ENDCHARNUM 36Q \PCE.WINDOW.COPY.STARTCHARNUM 22Q \PCE.WINDOW.COPY.ENDCHARNUM 17Q \PCE.WINDOW.COPY.STARTCHARNUM 11Q \PCE.WINDOW.COPY.ENDCHARNUM 3 \PCE.WINDOW.COPY.STARTCHARNUM) () \PCE.PCDISPLAY.TO.NS.STRING D1 (P 13Q X P 11Q CHARS P 10Q FIRST.CHAR.ON.NEXT.LINE P 7 LAST.CHAR.ON.LINE P 5 CHARS.PER.LINE P 4 CHARNUM P 1 CHARLIST P 0 CHARMAP.ARRAY I 1 ENDCHARNUM I 0 STARTCHARNUM) @@Ao@AA@bb`'` ZjJJ n` `hX@`gl(lPLANLM MLMk AdOOL2OOQ`O9lOO Kl l H&K _OOh__Ok_O&_K(ٰO_OO uNYd (356Q CONCATLIST 343Q \NCONC2 254Q CHARACTER 241Q EQP 232Q EQP 147Q \PCE.WINDOW.LASTCHAR 100Q ARRAYSIZE 65Q \FZEROP 50Q ARRAYORIG) (210Q \PCE.DISPLAY.BASE 117Q COLOR40 114Q \PCE.DISPLAY.MODE 105Q PCE.PC.TO.NS.ARRAY 75Q PCE.PC.TO.NS.ARRAY 45Q PCE.PC.TO.NS.ARRAY 36Q PCE.PC.TO.NS.ARRAY) ( 16Q "") \PCE.POS.TO.CHARNUM D1 (P 3 CHARWIDTH P 2 CHARS.PER.LINE P 1 POS.ON.LINE P 0 LINE I 0 POS) Pl@`A`gl(`d؅lP`@KYjH!HljIdJdJHH dLLh(105Q \PCE.WINDOW.LASTCHAR) (42Q \PCE.FONTCHARWIDTH 31Q \PCE.FONTCHARWIDTH 21Q COLOR40 16Q \PCE.DISPLAY.MODE 6 \PCE.FONTCHARHEIGHT) () \PCE.WINDOW.COPYBUTTONEVENTFNA0001A0002A0003 D1 (NAME ERRORSET P 4 CHARNUM P 3 ENDCHARNUM P 2 STARTCHARNUM P 1 EXTENDING.RIGHT.FLG P 0 WINDOW.REGION F 10Q \LASTKEYSTATE F 11Q RESETY) `hi ` i2g l@Wl jjkjH`` ` ih` \]`ljLZiH`lj9J5K0IL[+JK JddK񓿿KJKKJMLONLiYhYJK ] JK hci(311Q BKSYSBUF 306Q \PCE.PCDISPLAY.TO.NS.STRING 300Q \PCE.DISPLAY.COPY.UNDERLINE 272Q BLOCK 266Q \PCE.DISPLAY.COPY.UNDERLINE 214Q \PCE.WINDOW.MIDCHAR 154Q GETMOUSESTATE 131Q GETMOUSESTATE 123Q \PCE.POS.TO.CHARNUM 120Q CURSORPOSITION 107Q SCROLL.HANDLER 100Q INSIDEP 36Q SHIFTDOWNP 27Q \PCE.DISPLAY.COPY.INIT.VARS 16Q \INSUREWINDOW 7 OBTAIN.MONITORLOCK) (160Q LASTMOUSEBUTTONS 135Q LASTMOUSEBUTTONS 115Q \PCE.WINDOW 104Q \PCE.WINDOW 75Q LASTMOUSEY 72Q LASTMOUSEX 33Q SHIFT 13Q \PCE.WINDOW 2 \PCE.WINDOW.LOCK) () \PCE.WINDOW.COPYBUTTONEVENTFNA0001A0002 D1 (NAME ERRORSET P 2 RESETZ P 1 RESETY P 0 LISPXHIST F 3 LISPXHIST F 4 RESETVARSLST F 5 RESETY) 0`hi S!Tog hgZ JIc i(47Q ERROR! 41Q RESETRESTORE 27Q \PCE.WINDOW.COPYBUTTONEVENTFNA0001A0002A0003 7 OBTAIN.MONITORLOCK) (35Q ERROR 24Q INTERNAL 2 \PCE.WINDOW.COPY.LOCK) ( 21Q (\PCE.WINDOW.COPYBUTTONEVENTFNA0001A0002A0003)) \PCE.WINDOW.COPYBUTTONEVENTFNA0001 D1 (NAME ERRORSET P 2 RESETZ P 1 RESETY P 0 LISPXHIST F 3 RESETVARSLST F 4 LISPXHIST F 5 RESETY) XiohhSci gd g ScT!Sog hgZ JIc i(117Q ERROR! 111Q RESETRESTORE 77Q \PCE.WINDOW.COPYBUTTONEVENTFNA0001A0002 52Q SETTOPVAL 43Q GETTOPVAL 33Q \PCE.BLINK.CHARS.SET 11Q PCE.FREEZE 2 PCE.RUN.STATE) (105Q ERROR 74Q INTERNAL 47Q \PCE.BLINK.CHARS.ENABLED 37Q \PCE.BLINK.CHARS.ENABLED) ( 71Q (\PCE.WINDOW.COPYBUTTONEVENTFNA0001A0002) 16Q (PCE.UNFREEZE)) \PCE.WINDOW.COPYBUTTONEVENTFN D1 (P 2 RESETZ P 1 RESETY P 0 LISPXHIST I 0 WINDOW F 3 LISPXHIST F 4 RESETVARSLST) 1`,@%S!Tog hgZ JI(54Q ERROR! 47Q RESETRESTORE 35Q \PCE.WINDOW.COPYBUTTONEVENTFNA0001 16Q \PCE.CHECK.INITIALIZED 10Q PCE.GET.WINDOW) (43Q ERROR 32Q INTERNAL 2 \PCE.DISPLAY.MODE.HAS.TEXT) ( 27Q (\PCE.WINDOW.COPYBUTTONEVENTFNA0001)) \PCE.WINDOW.LASTCHAR D1 (L (0 LINENUM)) hj`@(ZP`g@l(Xl'@lPXlOعHIKL`L9ll L iLmԼh`@JHI IJk*`@((130Q EQP) (143Q \PCE.WINDOW.LASTCHAR.ARRAY 116Q \PCE.WINDOW.LASTCHAR.ARRAY 60Q \PCE.DISPLAY.BASE 21Q COLOR40 16Q \PCE.DISPLAY.MODE 3 \PCE.WINDOW.LASTCHAR.ARRAY) () \PCE.WINDOW.MIDCHAR D1 (P 14Q REAL.CHARS.ON.LINE P 13Q NUM.CHARS.TO.ADD P 12Q LINENUM P 10Q LINENUM P 4 MID.CHAR P 3 NUM.REAL.CHARS.BETWEEN P 2 ENDCHAR.LINENUM P 1 STARTCHAR.LINENUM P 0 CHARS.PER.LINE I 1 ENDCHARNUM I 0 STARTCHARNUM) `gl(lPa@dAA@bbHYAHZdIj OO*OO dAA@OHڽdMMk_Ok_O[JIKl OO2OO dAA@OHھdNNk_OO_Ok_OHd@@O(163Q \PCE.WINDOW.LASTCHAR 67Q \PCE.WINDOW.LASTCHAR) (5 COLOR40 2 \PCE.DISPLAY.MODE) () (PRETTYCOMPRINT PCEDISPLAYCOMS) (RPAQQ PCEDISPLAYCOMS ((DECLARE: FIRST (P (* turn off PCE processes if already loaded and running) ( NLSETQ (\PCE.TERMINATE)) (* \PCE.WINDOW and \PCE.DISPLAY.SCRATCH.BM are reset on reloading pkg, so that all re-initialization will be done) (SETQ \PCE.WINDOW NIL) (SETQ \PCE.DISPLAY.SCRATCH.BM NIL))) ( DECLARE: DONTCOPY (P (LOADFNS NIL (QUOTE ADISPLAY) NIL (QUOTE (CARET1))))) (COMS (* user fns) (FNS PCE.GET.WINDOW PCE.INVERT.WINDOW PCE.INVERT.WINDOW.STATE PCE.PCTERMINAL.ARRAY PCE.SET.WINDOW) ( INITVARS (PCE.PC.TO.NS.ARRAY)) (GLOBALVARS PCE.PC.TO.NS.ARRAY)) (COMS (* PC window) (FNS \PCE.STUFF.WINDOW \PCE.WINDOW.ATTACH.PROCESS \PCE.WINDOW.DETACH.PROCESS \PCE.WINDOW.OPENFN \PCE.WINDOW.REPAINTFN \PCE.WINDOW.RESHAPEFN \PCE.WINDOW.SCROLLFN) (INITVARS (\PCE.WINDOW) ( \PCE.WINDOW.LOCK) (\PCE.WINDOW.COPY.LOCK)) (GLOBALVARS \PCE.WINDOW \PCE.WINDOW.LOCK \PCE.WINDOW.COPY.LOCK)) (COMS (* PCE Display updating process) (FNS \PCE.DISPLAY.Configure \PCE.DISPLAY.Init \PCE.DISPLAY.Notify \PCE.DISPLAY.NotifyProcedure \PCE.DISPLAY.Terminate) (INITVARS ( \PCE.DISPLAY.Condition) (\PCE.DISPLAY.gotUpNotify) (\PCE.DISPLAY.Process)) (GLOBALVARS \PCE.DISPLAY.Condition \PCE.DISPLAY.gotUpNotify \PCE.DISPLAY.Process)) (COMS (* updating the PC window from the PC display memory) (FNS \PCE.ALLOC.BITMAPS \PCE.CREATE.BBT \PCE.CREATE.FONT.BM \PCE.CREATE.WIDE.FONT.BM \PCE.DECODE.TEXT.ATTRIBUTES \PCE.DISPLAY.ALLOC.SHADES \PCE.DISPLAY.INIT.MEMORY \PCE.DISPLAY.REPAINT.GRAPHICS \PCE.DISPLAY.REPAINT.TEXT \PCE.DISPLAY.UPDATE \PCE.DISPLAY.UPDATE.GRAPHICS \PCE.DISPLAY.UPDATE.TEXT) (INITVARS (\PCE.DISPLAY.MODE) ( \PCE.DISPLAY.MODE.HAS.TEXT) (\PCE.DISPLAY.BASE) (\PCE.DISPLAY.MONO.BASE) (\PCE.DISPLAY.COLOR.BASE) ( \PCE.DISPLAY.COLOR.PAGE.OFFSET) (\PCE.DISPLAY.INVERTED)) (GLOBALVARS \PCE.DISPLAY.MODE \PCE.DISPLAY.MODE.HAS.TEXT \PCE.DISPLAY.BASE \PCE.DISPLAY.MONO.BASE \PCE.DISPLAY.COLOR.BASE \PCE.DISPLAY.COLOR.PAGE.OFFSET \PCE.DISPLAY.INVERTED) (INITVARS (\PCE.DISPLAY.SCRATCH.BM) ( \PCE.DISPLAY.FONT.BM) (\PCE.DISPLAY.FONT.BBT) (\PCE.DISPLAY.WIDEFONT.BM) (\PCE.DISPLAY.WIDEFONT.BBT) ( \PCE.DISPLAY.BOLDFONT.BM) (\PCE.DISPLAY.BOLDFONT.BBT) (\PCE.DISPLAY.UNDERFONT.BM) ( \PCE.DISPLAY.UNDERFONT.BBT) (\PCE.DISPLAY.UNDERBOLDFONT.BM) (\PCE.DISPLAY.UNDERBOLDFONT.BBT) ( \PCE.DISPLAY.OLDCHARS)) (GLOBALVARS \PCE.DISPLAY.SCRATCH.BM \PCE.DISPLAY.FONT.BM \PCE.DISPLAY.FONT.BBT \PCE.DISPLAY.WIDEFONT.BM \PCE.DISPLAY.WIDEFONT.BBT \PCE.DISPLAY.BOLDFONT.BM \PCE.DISPLAY.BOLDFONT.BBT \PCE.DISPLAY.UNDERFONT.BM \PCE.DISPLAY.UNDERFONT.BBT \PCE.DISPLAY.UNDERBOLDFONT.BM \PCE.DISPLAY.UNDERBOLDFONT.BBT \PCE.DISPLAY.OLDCHARS) (* repainting pseudo-color display) (INITVARS ( \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT) (\PCE.DISPLAY.COLOR.ODDLINEBLOCK.BASE) ( \PCE.DISPLAY.COLOR.EVENLINEBLOCK.BASE) (\PCE.DISPLAY.COLOR.BRICKS.BM) (\PCE.DISPLAY.COLOR.BRICKS.BBT) (\PCE.DISPLAY.COLOR.BACK.GRAYBIT) (\PCE.DISPLAY.COLOR.FORE.GRAYBIT) (\PCE.DISPLAY.MEDRES.GRAY.BM) ( \PCE.DISPLAY.MEDRES.GRAY.BBT)) (GLOBALVARS \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT \PCE.DISPLAY.COLOR.ODDLINEBLOCK.BASE \PCE.DISPLAY.COLOR.EVENLINEBLOCK.BASE \PCE.DISPLAY.COLOR.BRICKS.BM \PCE.DISPLAY.COLOR.BRICKS.BBT \PCE.DISPLAY.COLOR.BACK.GRAYBIT \PCE.DISPLAY.COLOR.FORE.GRAYBIT \PCE.DISPLAY.MEDRES.GRAY.BM \PCE.DISPLAY.MEDRES.GRAY.BBT)) (COMS (* blinking chars and caret) (FNS \PCE.BLINK \PCE.BLINK.CARET.SET \PCE.BLINK.CHARS \PCE.BLINK.CHARS.SET \PCE.CARET.DRAW \PCE.CARET.INVERT \PCE.CARET.MOVE \PCE.CARET.RESHAPE \PCE.CARET.SET.TYPE) (INITVARS ( \PCE.BLINK.STATE) (\PCE.BLINK.NUMCHARS 0) (\PCE.BLINK.CHARS.ENABLED T) (\PCE.BLINK.CHARS.STATE T) ( \PCE.BLINK.CARET.STATE NIL) (\PCE.BLINK.BITMAP) (\PCE.BLINK.ON.RATE 333) (\PCE.BLINK.OFF.RATE 333) ( \PCE.BLINK.TIMER) (\PCE.CARET.BITMAP) (\PCE.CARET.CARET1) (\PCE.CARET.XPOS) (\PCE.CARET.YPOS) ( \PCE.CARET.TYPE (QUOTE MONO))) (GLOBALVARS \PCE.BLINK.NUMCHARS \PCE.BLINK.STATE \PCE.BLINK.CHARS.ENABLED \PCE.BLINK.CHARS.STATE \PCE.BLINK.CARET.STATE \PCE.BLINK.BITMAP \PCE.BLINK.ON.RATE \PCE.BLINK.OFF.RATE \PCE.BLINK.TIMER \PCE.CARET.BITMAP \PCE.CARET.CARET1 \PCE.CARET.XPOS \PCE.CARET.YPOS \PCE.CARET.TYPE)) (COMS (* shift-select from PC window) (FNS \PCE.COPY.UNDERLINE.DRAW \PCE.DISPLAY.COPY.INIT.VARS \PCE.DISPLAY.COPY.UNDERLINE \PCE.PCDISPLAY.TO.NS.STRING \PCE.POS.TO.CHARNUM \PCE.WINDOW.COPYBUTTONEVENTFN \PCE.WINDOW.LASTCHAR \PCE.WINDOW.MIDCHAR) (INITVARS (\PCE.WINDOW.LASTCHAR.ARRAY) (\PCE.WINDOW.COPY.STARTCHARNUM) ( \PCE.WINDOW.COPY.ENDCHARNUM)) (GLOBALVARS \PCE.WINDOW.LASTCHAR.ARRAY \PCE.WINDOW.COPY.STARTCHARNUM \PCE.WINDOW.COPY.ENDCHARNUM)) (COMS (* PC fonts) (INITVARS (\PCE.FONTCHARWIDTH) (\PCE.FONTCHARHEIGHT) (\PCE.FONTCHARDESCENT)) (VARS \PCE.PCToNSCharArray) (GLOBALVARS \PCE.FONTCHARWIDTH \PCE.FONTCHARHEIGHT \PCE.FONTCHARDESCENT \PCE.PCToNSCharArray)) (COMS (* masks for sensing bits in REQBITS field of display FCB -- each bit specifies a different action to be performed) (CONSTANTS \PCE.DISPLAY.disableVideo \PCE.DISPLAY.dirtyBitsDirty \PCE.DISPLAY.modeControlSet \PCE.DISPLAY.pageChange \PCE.DISPLAY.colorChange \PCE.DISPLAY.cursorLocationChange \PCE.DISPLAY.cursorShapeChange \PCE.DISPLAY.extraWork) (* special values used to configure PC for mono or color display) (CONSTANTS \PCE.DISPLAY.pseudo80Or40Sw \PCE.DISPLAY.pseudoMono) (* special display modes specifying that mono blinking should be enabled or disabled) (CONSTANTS \PCE.DISPLAY.MonoBlinkEnabled \PCE.DISPLAY.MonoBlinkDisabled) (* PC memory addresses of the beginning of mono display memory and color display memory.) (CONSTANTS \PCE.DISPLAY.COLOR.ADDR \PCE.DISPLAY.MONO.ADDR) (* 4-bit numbers corresponding to each "color" that can be specified in the character attribute byte, which contains one blinking bit, 3 bits of background color, and four bits of fourground color.) (CONSTANTS \PCE.DISPLAY.COLOR.black \PCE.DISPLAY.COLOR.blue \PCE.DISPLAY.COLOR.green \PCE.DISPLAY.COLOR.cyan \PCE.DISPLAY.COLOR.red \PCE.DISPLAY.COLOR.magenta \PCE.DISPLAY.COLOR.brown \PCE.DISPLAY.COLOR.white \PCE.DISPLAY.COLOR.gray \PCE.DISPLAY.COLOR.lightBlue \PCE.DISPLAY.COLOR.lightGreen \PCE.DISPLAY.COLOR.lightCyan \PCE.DISPLAY.COLOR.lightRed \PCE.DISPLAY.COLOR.lightMagenta \PCE.DISPLAY.COLOR.yellow \PCE.DISPLAY.COLOR.intenseWhite) (* display mode numbers used to specify different type of color displays) (CONSTANTS \PCE.DISPLAY.Text40x25BWVal \PCE.DISPLAY.Text40x25BWNoBlinkingVal \PCE.DISPLAY.Text40x25ColorVal \PCE.DISPLAY.Text40x25ColorNoBlinkingVal \PCE.DISPLAY.Text80x25BWVal \PCE.DISPLAY.Text80x25BWNoBlinkingVal \PCE.DISPLAY.Text80x25ColorVal \PCE.DISPLAY.Text80x25ColorNoBlinkingVal \PCE.DISPLAY.GraphMedResBWVal \PCE.DISPLAY.GraphMedResBWAltVal \PCE.DISPLAY.GraphMedResColorVal \PCE.DISPLAY.GraphMedResColorAltVal \PCE.DISPLAY.GraphHiResVal \PCE.DISPLAY.GraphHiResAltVal) (* for each shade , tells which number shade this is <0-16>. This is used when setting up \PCE.DISPLAY.COLOR.BACK.GRAYBIT) (CONSTANTS \PCE.DISPLAY.white \PCE.DISPLAY.g1 \PCE.DISPLAY.g2 \PCE.DISPLAY.g4 \PCE.DISPLAY.g6 \PCE.DISPLAY.half \PCE.DISPLAY.g10 \PCE.DISPLAY.g12 \PCE.DISPLAY.g14 \PCE.DISPLAY.g15 \PCE.DISPLAY.black) (* 16-bit textures used for each shade of gray) (CONSTANTS \PCE.DISPLAY.BRICK.white \PCE.DISPLAY.BRICK.g1 \PCE.DISPLAY.BRICK.g2 \PCE.DISPLAY.BRICK.g4 \PCE.DISPLAY.BRICK.g6 \PCE.DISPLAY.BRICK.half \PCE.DISPLAY.BRICK.g10 \PCE.DISPLAY.BRICK.g12 \PCE.DISPLAY.BRICK.g14 \PCE.DISPLAY.BRICK.g15 \PCE.DISPLAY.BRICK.black)))) (RPAQ? PCE.PC.TO.NS.ARRAY) (RPAQ? \PCE.WINDOW) (RPAQ? \PCE.WINDOW.LOCK) (RPAQ? \PCE.WINDOW.COPY.LOCK) (RPAQ? \PCE.DISPLAY.Condition) (RPAQ? \PCE.DISPLAY.gotUpNotify) (RPAQ? \PCE.DISPLAY.Process) (RPAQ? \PCE.DISPLAY.MODE) (RPAQ? \PCE.DISPLAY.MODE.HAS.TEXT) (RPAQ? \PCE.DISPLAY.BASE) (RPAQ? \PCE.DISPLAY.MONO.BASE) (RPAQ? \PCE.DISPLAY.COLOR.BASE) (RPAQ? \PCE.DISPLAY.COLOR.PAGE.OFFSET) (RPAQ? \PCE.DISPLAY.INVERTED) (RPAQ? \PCE.DISPLAY.SCRATCH.BM) (RPAQ? \PCE.DISPLAY.FONT.BM) (RPAQ? \PCE.DISPLAY.FONT.BBT) (RPAQ? \PCE.DISPLAY.WIDEFONT.BM) (RPAQ? \PCE.DISPLAY.WIDEFONT.BBT) (RPAQ? \PCE.DISPLAY.BOLDFONT.BM) (RPAQ? \PCE.DISPLAY.BOLDFONT.BBT) (RPAQ? \PCE.DISPLAY.UNDERFONT.BM) (RPAQ? \PCE.DISPLAY.UNDERFONT.BBT) (RPAQ? \PCE.DISPLAY.UNDERBOLDFONT.BM) (RPAQ? \PCE.DISPLAY.UNDERBOLDFONT.BBT) (RPAQ? \PCE.DISPLAY.OLDCHARS) (RPAQ? \PCE.DISPLAY.COLOR.TO.SCRATCH.BBT) (RPAQ? \PCE.DISPLAY.COLOR.ODDLINEBLOCK.BASE) (RPAQ? \PCE.DISPLAY.COLOR.EVENLINEBLOCK.BASE) (RPAQ? \PCE.DISPLAY.COLOR.BRICKS.BM) (RPAQ? \PCE.DISPLAY.COLOR.BRICKS.BBT) (RPAQ? \PCE.DISPLAY.COLOR.BACK.GRAYBIT) (RPAQ? \PCE.DISPLAY.COLOR.FORE.GRAYBIT) (RPAQ? \PCE.DISPLAY.MEDRES.GRAY.BM) (RPAQ? \PCE.DISPLAY.MEDRES.GRAY.BBT) (RPAQ? \PCE.BLINK.STATE) (RPAQ? \PCE.BLINK.NUMCHARS 0) (RPAQ? \PCE.BLINK.CHARS.ENABLED T) (RPAQ? \PCE.BLINK.CHARS.STATE T) (RPAQ? \PCE.BLINK.CARET.STATE NIL) (RPAQ? \PCE.BLINK.BITMAP) (RPAQ? \PCE.BLINK.ON.RATE 333) (RPAQ? \PCE.BLINK.OFF.RATE 333) (RPAQ? \PCE.BLINK.TIMER) (RPAQ? \PCE.CARET.BITMAP) (RPAQ? \PCE.CARET.CARET1) (RPAQ? \PCE.CARET.XPOS) (RPAQ? \PCE.CARET.YPOS) (RPAQ? \PCE.CARET.TYPE (QUOTE MONO)) (RPAQ? \PCE.WINDOW.LASTCHAR.ARRAY) (RPAQ? \PCE.WINDOW.COPY.STARTCHARNUM) (RPAQ? \PCE.WINDOW.COPY.ENDCHARNUM) (RPAQ? \PCE.FONTCHARWIDTH) (RPAQ? \PCE.FONTCHARHEIGHT) (RPAQ? \PCE.FONTCHARDESCENT) (RPAQ \PCE.PCToNSCharArray (READARRAY 256 (QUOTE SMALLPOSP) 0)) (32 61407 61151 61132 61133 61390 61387 61286 60993 8830 61013 8553 8554 213 61141 61135 61119 61118 61109 61050 182 167 61150 61110 173 175 174 172 61149 61266 8741 8743 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 60986 61741 61925 61873 61859 61863 61857 61864 61869 61874 61877 61872 61892 61888 61886 61735 61736 61745 241 225 61905 61908 61903 61921 61919 61933 61780 61797 162 163 165 61348 61346 61858 61887 61904 61920 61900 61772 227 235 191 61034 61290 189 188 161 171 187 61024 61310 61025 61412 10281 10320 10321 10322 10323 10324 10325 10326 10327 10328 10329 10276 10278 10282 10280 10279 61413 61414 10330 10331 10332 10333 10334 10335 10336 10337 10338 10339 10340 10341 10342 10343 10344 10345 10346 10347 10348 10277 10275 61113 61114 61116 61115 61117 9825 251 9796 9843 9814 9846 9839 9848 9818 9803 9821 9829 8551 9850 9830 61270 61299 177 8550 8549 61165 61166 184 61305 176 183 199 61308 64936 178 60970 61217 NIL) (RPAQQ \PCE.DISPLAY.disableVideo 1) (RPAQQ \PCE.DISPLAY.dirtyBitsDirty 2) (RPAQQ \PCE.DISPLAY.modeControlSet 4) (RPAQQ \PCE.DISPLAY.pageChange 8) (RPAQQ \PCE.DISPLAY.colorChange 16) (RPAQQ \PCE.DISPLAY.cursorLocationChange 32) (RPAQQ \PCE.DISPLAY.cursorShapeChange 64) (RPAQQ \PCE.DISPLAY.extraWork 128) (CONSTANTS \PCE.DISPLAY.disableVideo \PCE.DISPLAY.dirtyBitsDirty \PCE.DISPLAY.modeControlSet \PCE.DISPLAY.pageChange \PCE.DISPLAY.colorChange \PCE.DISPLAY.cursorLocationChange \PCE.DISPLAY.cursorShapeChange \PCE.DISPLAY.extraWork) (RPAQQ \PCE.DISPLAY.pseudo80Or40Sw 4) (RPAQQ \PCE.DISPLAY.pseudoMono 8) (CONSTANTS \PCE.DISPLAY.pseudo80Or40Sw \PCE.DISPLAY.pseudoMono) (RPAQQ \PCE.DISPLAY.MonoBlinkEnabled 41) (RPAQQ \PCE.DISPLAY.MonoBlinkDisabled 9) (CONSTANTS \PCE.DISPLAY.MonoBlinkEnabled \PCE.DISPLAY.MonoBlinkDisabled) (RPAQQ \PCE.DISPLAY.COLOR.ADDR 753664) (RPAQQ \PCE.DISPLAY.MONO.ADDR 720896) (CONSTANTS \PCE.DISPLAY.COLOR.ADDR \PCE.DISPLAY.MONO.ADDR) (RPAQQ \PCE.DISPLAY.COLOR.black 0) (RPAQQ \PCE.DISPLAY.COLOR.blue 1) (RPAQQ \PCE.DISPLAY.COLOR.green 2) (RPAQQ \PCE.DISPLAY.COLOR.cyan 3) (RPAQQ \PCE.DISPLAY.COLOR.red 4) (RPAQQ \PCE.DISPLAY.COLOR.magenta 5) (RPAQQ \PCE.DISPLAY.COLOR.brown 6) (RPAQQ \PCE.DISPLAY.COLOR.white 7) (RPAQQ \PCE.DISPLAY.COLOR.gray 8) (RPAQQ \PCE.DISPLAY.COLOR.lightBlue 9) (RPAQQ \PCE.DISPLAY.COLOR.lightGreen 10) (RPAQQ \PCE.DISPLAY.COLOR.lightCyan 11) (RPAQQ \PCE.DISPLAY.COLOR.lightRed 12) (RPAQQ \PCE.DISPLAY.COLOR.lightMagenta 13) (RPAQQ \PCE.DISPLAY.COLOR.yellow 14) (RPAQQ \PCE.DISPLAY.COLOR.intenseWhite 15) (CONSTANTS \PCE.DISPLAY.COLOR.black \PCE.DISPLAY.COLOR.blue \PCE.DISPLAY.COLOR.green \PCE.DISPLAY.COLOR.cyan \PCE.DISPLAY.COLOR.red \PCE.DISPLAY.COLOR.magenta \PCE.DISPLAY.COLOR.brown \PCE.DISPLAY.COLOR.white \PCE.DISPLAY.COLOR.gray \PCE.DISPLAY.COLOR.lightBlue \PCE.DISPLAY.COLOR.lightGreen \PCE.DISPLAY.COLOR.lightCyan \PCE.DISPLAY.COLOR.lightRed \PCE.DISPLAY.COLOR.lightMagenta \PCE.DISPLAY.COLOR.yellow \PCE.DISPLAY.COLOR.intenseWhite) (RPAQQ \PCE.DISPLAY.Text40x25BWVal 44) (RPAQQ \PCE.DISPLAY.Text40x25BWNoBlinkingVal 12) (RPAQQ \PCE.DISPLAY.Text40x25ColorVal 40) (RPAQQ \PCE.DISPLAY.Text40x25ColorNoBlinkingVal 8) (RPAQQ \PCE.DISPLAY.Text80x25BWVal 45) (RPAQQ \PCE.DISPLAY.Text80x25BWNoBlinkingVal 13) (RPAQQ \PCE.DISPLAY.Text80x25ColorVal 41) (RPAQQ \PCE.DISPLAY.Text80x25ColorNoBlinkingVal 9) (RPAQQ \PCE.DISPLAY.GraphMedResBWVal 46) (RPAQQ \PCE.DISPLAY.GraphMedResBWAltVal 14) (RPAQQ \PCE.DISPLAY.GraphMedResColorVal 42) (RPAQQ \PCE.DISPLAY.GraphMedResColorAltVal 10) (RPAQQ \PCE.DISPLAY.GraphHiResVal 30) (RPAQQ \PCE.DISPLAY.GraphHiResAltVal 62) (CONSTANTS \PCE.DISPLAY.Text40x25BWVal \PCE.DISPLAY.Text40x25BWNoBlinkingVal \PCE.DISPLAY.Text40x25ColorVal \PCE.DISPLAY.Text40x25ColorNoBlinkingVal \PCE.DISPLAY.Text80x25BWVal \PCE.DISPLAY.Text80x25BWNoBlinkingVal \PCE.DISPLAY.Text80x25ColorVal \PCE.DISPLAY.Text80x25ColorNoBlinkingVal \PCE.DISPLAY.GraphMedResBWVal \PCE.DISPLAY.GraphMedResBWAltVal \PCE.DISPLAY.GraphMedResColorVal \PCE.DISPLAY.GraphMedResColorAltVal \PCE.DISPLAY.GraphHiResVal \PCE.DISPLAY.GraphHiResAltVal) (RPAQQ \PCE.DISPLAY.white 0) (RPAQQ \PCE.DISPLAY.g1 1) (RPAQQ \PCE.DISPLAY.g2 2) (RPAQQ \PCE.DISPLAY.g4 3) (RPAQQ \PCE.DISPLAY.g6 4) (RPAQQ \PCE.DISPLAY.half 5) (RPAQQ \PCE.DISPLAY.g10 6) (RPAQQ \PCE.DISPLAY.g12 7) (RPAQQ \PCE.DISPLAY.g14 8) (RPAQQ \PCE.DISPLAY.g15 9) (RPAQQ \PCE.DISPLAY.black 10) (CONSTANTS \PCE.DISPLAY.white \PCE.DISPLAY.g1 \PCE.DISPLAY.g2 \PCE.DISPLAY.g4 \PCE.DISPLAY.g6 \PCE.DISPLAY.half \PCE.DISPLAY.g10 \PCE.DISPLAY.g12 \PCE.DISPLAY.g14 \PCE.DISPLAY.g15 \PCE.DISPLAY.black) (RPAQQ \PCE.DISPLAY.BRICK.white 0) (RPAQQ \PCE.DISPLAY.BRICK.g1 64) (RPAQQ \PCE.DISPLAY.BRICK.g2 4160) (RPAQQ \PCE.DISPLAY.BRICK.g4 5140) (RPAQQ \PCE.DISPLAY.BRICK.g6 18970) (RPAQQ \PCE.DISPLAY.BRICK.half 23130) (RPAQQ \PCE.DISPLAY.BRICK.g10 55930) (RPAQQ \PCE.DISPLAY.BRICK.g12 60395) (RPAQQ \PCE.DISPLAY.BRICK.g14 32735) (RPAQQ \PCE.DISPLAY.BRICK.g15 65503) (RPAQQ \PCE.DISPLAY.BRICK.black 65535) (CONSTANTS \PCE.DISPLAY.BRICK.white \PCE.DISPLAY.BRICK.g1 \PCE.DISPLAY.BRICK.g2 \PCE.DISPLAY.BRICK.g4 \PCE.DISPLAY.BRICK.g6 \PCE.DISPLAY.BRICK.half \PCE.DISPLAY.BRICK.g10 \PCE.DISPLAY.BRICK.g12 \PCE.DISPLAY.BRICK.g14 \PCE.DISPLAY.BRICK.g15 \PCE.DISPLAY.BRICK.black) (PUTPROPS PCEDISPLAY COPYRIGHT ("Xerox Corporation" 1986)) NIL