(FILECREATED " 4-Aug-88 10:37:40" ("compiled on " {DSK}TRILLIUM>EDEN>GALAHAD>ITEMTYPES>SHOWTIME.;1) "12-Nov-85 14:59:23" tcompl'd in "INTERLISP-D 29-Feb-88 ..." dated "29-Feb-88 13:15:40") (FILECREATED " 4-Aug-88 10:36:50" {DSK}TRILLIUM>EDEN>GALAHAD>ITEMTYPES>SHOWTIME.;1 35465 changes to: (FNS SHOWTIME.MAKE.RES MAKEBRUSH) previous date: "28-Jul-88 09:45:09" {PAWNEE1:HENR801C:XEROX}KOTO>SHOWTIME.;3) SHOWTIME D1 (P 4 BITMAP.NAME P 3 WINDOW P 2 HEIGHT P 1 WIDTH P 0 BITMAP I 1 FORMAT I 0 FILENAME) P@dn bdA X`Ho@  YH ZldIJh [dgg Kgg K HjdK @g H \KH@ o [dgg Kgg Kg Kg (234Q PUTWINDOWPROP 225Q PUTWINDOWPROP 216Q PUTWINDOWPROP 204Q PUTWINDOWPROP 171Q CREATEW 161Q SHOWTIME.SETUP.WINDOWPROPS 152Q SET 146Q U-CASE 143Q FILENAMEFIELD 134Q BITBLT 125Q CLEARW 121Q PUTWINDOWPROP 107Q PUTWINDOWPROP 74Q CREATEW 56Q BITMAPHEIGHT 51Q BITMAPWIDTH 45Q PROMPTPRINT 42Q CONCAT 20Q SHOWTIME.LOAD.BITMAP 11Q \ADD.CONNECTED.DIR) (231Q BITMAP.NAME 222Q BITMAP.VALUE 213Q SHOWTIME.ICONFN 210Q ICONFN 201Q SHOWTIME.BUTTONEVENTFN 176Q BUTTONEVENTFN 140Q NAME 116Q SHOWTIME.ICONFN 113Q ICONFN 104Q SHOWTIME.BUTTONEVENTFN 101Q BUTTONEVENTFN 25Q BITMAPTYPE#) ( 166Q "Empty Viewer" 36Q "Couldn't find ") GET.SHOWTIME.MENU D1 NIL X`S`dodi gl HdIdodg dgjdndhHdI (35Q FONTCREATE) (125Q SHOWTIME.MENU 72Q DEFAULTMENUHELDFN 63Q CLRPROMPT 30Q TIMESROMAN 7 MENUTYPE# 2 SHOWTIME.MENU) ( 54Q ((" Load Another Picture " (QUOTE LOAD) NIL (EVAL SHOWTIME.LOAD.SUBITEMS)) ("Show a Bitmap" (QUOTE SHOW) NIL (SUBITEMS ("Put bitmap in this window" (QUOTE SHOW)) ("Reshape window to fit new Bitmap" (QUOTE RESHAPE&SHOW)))) ("Edit Bitmap" (QUOTE EDIT)) ("Redisplay" (QUOTE REDISPLAY) NIL (SUBITEMS ("Redisplay bitmap in this window" (QUOTE REDISPLAY)) ("Reshape window to fit this bitmap" (QUOTE RESHAPE&SHOW)))) ("Scale" (QUOTE SCALE)) ("Save this Picture" (QUOTE SAVE) NIL (EVAL SHOWTIME.SAVE.SUBITEMS))) 15Q "Viewer Options") SHOWTIME.ADD.FORMAT D1 (P 4 EACH I 2 WRITEFN I 1 READFN I 0 FORMAT) @ @`LABh` dLo oL [ddi3 gKhhIHhZH&J@`>dLo oL [ddi3 gKhhIHhZH&Jh(177Q MKATOM 174Q CONCAT 163Q CONCAT 62Q MKATOM 57Q CONCAT 46Q CONCAT 25Q PUTASSOC) (256Q SHOWTIME.MENU 252Q SHOWTIME.SAVE.SUBITEMS 215Q QUOTE 143Q SHOWTIME.FORMAT.FNS 135Q SHOWTIME.LOAD.SUBITEMS 100Q QUOTE 22Q SHOWTIME.FORMAT.FNS 10Q SHOWTIME.FORMAT.FNS) ( 167Q "SAVE." 160Q " Format" 52Q "LOAD." 43Q " Format") SHOWTIME.BUTTONEVENTFN D1 (P 5 SWITCH P 4 PERIOD.POS P 3 ICON P 2 BITMAP.NAME P 1 SELECTION P 0 BITMAP I 0 WINDOW) U` YoI \IkLk I]dghIl @  dgo ZJ XJ@I g(@g X`HH@g @I MdgH@ @ Hjd@ g@g @ Hjd@ MdgB@g X`H` o` U @gH @ Hjd@ :g#@g X`&H#HIl Mg@g @ @g [dJ (522Q ICONW.TITLE 513Q GETWINDOWUSERPROP 503Q SHOWTIME.SCALE.BITMAP 477Q GETWINDOWUSERPROP 460Q SHOWTIME.SAVE.BITMAP 455Q MKATOM 452Q SUBSTRING 430Q GETWINDOWUSERPROP 411Q BITBLT 401Q CLEARW 374Q PUTWINDOWPROP 363Q EDIT.BITMAP 356Q PRIN1 343Q TERPRI 323Q GETWINDOWUSERPROP 300Q BITBLT 270Q CLEARW 263Q GETWINDOWUSERPROP 243Q BITBLT 233Q CLEARW 226Q SHOWTIME.RESHAPE.WINDOW 205Q SHOWTIME.SHOW.BITMAP 200Q GETWINDOWUSERPROP 151Q GETWINDOWUSERPROP 131Q SHOWTIME.SHOW.BITMAP 122Q EVAL 111Q SHOWTIME.GET.NAME 67Q SHOWTIME.LOAD.FILE 63Q MKATOM 60Q SUBSTRING 36Q MKATOM 33Q SUBSTRING 21Q STRPOS 10Q MENU 5 GET.SHOWTIME.MENU) (510Q ICONWINDOW 474Q BITMAP 466Q SCALE 435Q BITMAPTYPE# 425Q BITMAP 416Q SAVE 370Q BITMAP 353Q PROMPTWINDOW 340Q PROMPTWINDOW 330Q BITMAPTYPE# 320Q BITMAP 310Q EDIT 260Q BITMAP 251Q REDISPLAY 215Q RESHAPE 175Q BITMAP.NAME 156Q BITMAPTYPE# 146Q BITMAP 137Q RESHAPE&SHOW 76Q SHOW 45Q LOAD) ( 350Q "No bitmap in Viewer to edit!" 106Q "Bitmap Name (CR to end)" 15Q ".") SHOWTIME.GET.NAMEA0001 D1 (NAME ERRORSET F 0 PROMPTW F 1 RESETVARSLST F 2 PROMPTSTRING F 3 RESETY) 'gPhP hQcRhdPhdl  ci(41Q MKATOM 36Q PROMPTFORWORD 12Q OPENW) (2 CLOSEW) () SHOWTIME.GET.NAMEA0002 D1 (NAME ERRORSET F 0 PROMPTW F 1 RESETVARSLST F 2 PROMPTSTRING F 3 RESETY) "gPhP hQcRhdP ci(34Q MKATOM 31Q PROMPTFORWORD 12Q OPENW) (2 CLOSEW) () SHOWTIME.GET.NAME D1 (P 10Q RESETZ P 7 RESETY P 6 LISPXHIST P 5 RESETZ P 4 RESETY P 3 LISPXHIST P 2 PROMPTW P 1 WIDTH P 0 FONT I 1 USE.EOL I 0 PROMPTSTRING F 11Q LISPXHIST F 12Q RESETVARSLST) @ob@H lAH l<``I H hdi A%W!Wog hg] MLW!Wog hg_ OO(202Q RESETRESTORE 167Q SHOWTIME.GET.NAMEA0002 143Q ERROR! 136Q RESETRESTORE 124Q SHOWTIME.GET.NAMEA0001 75Q CREATEW 67Q MAKEWITHINREGION 64Q CREATEREGION 61Q HEIGHTIFWINDOW 56Q FONTHEIGHT 52Q WIDTHIFWINDOW 31Q CHARWIDTH 23Q STRINGWIDTH 13Q DEFAULTFONT) (175Q ERROR 164Q INTERNAL 132Q ERROR 121Q INTERNAL 46Q LASTMOUSEY 43Q LASTMOUSEX) ( 161Q (SHOWTIME.GET.NAMEA0002) 116Q (SHOWTIME.GET.NAMEA0001) 5 "Name (CR to end) ") SHOWTIME.ICONFN D1 (I 1 OLDICON I 0 WINDOW) $A!```h@g gl (41Q TITLEDICONW 36Q FONTCREATE 26Q GETWINDOWUSERPROP) (31Q GACHA 23Q BITMAP.NAME 13Q SHOWTIMETITLEREGION 10Q SHOWTIME.MASK 5 SHOWTIME.ICON) () SHOWTIME.LOAD.FILE D1 (P 0 BITMAP I 2 WINDOW I 1 FORMAT I 0 FILENAME) /@ hi b A`b@AB o@ (54Q PROMPTPRINT 51Q CONCAT 40Q SHOWTIME.LOAD.BITMAP 21Q INFILEP 14Q SHOWTIME.GET.NAME 6 INFILEP) (27Q SHOWTIME.DEFAULT.FORMAT) ( 45Q "Couldn't find ") SHOWTIME.RESHAPE.WINDOW D1 (I 1 WINDOW I 0 BITMAP) 'Ad A @ @ i (44Q SHAPEW 41Q CREATEREGION 36Q HEIGHTIFWINDOW 32Q BITMAPHEIGHT 26Q WIDTHIFWINDOW 23Q BITMAPWIDTH 13Q \INSUREWINDOW 4 \INSUREWINDOW) NIL () SHOWTIME.SETUP.WINDOWPROPS D1 (I 2 NAME I 1 BITMAP I 0 WINDOW) !@goB @gB @gA (36Q PUTWINDOWPROP 26Q PUTWINDOWPROP 16Q PUTWINDOWPROP 13Q CONCAT) (32Q BITMAP 22Q BITMAP.NAME 3 TITLE) ( 7 "Viewer of ") INFORES D1 (P 15Q X P 11Q REAL.Y P 10Q REAL.X P 7 LO.Y P 6 HI.Y P 5 LO.X P 4 HI.X P 3 HEIGHT P 2 WIDTH P 1 STREAM P 0 Header I 0 FILE) g @g g YHl(k2OO'I _ OO h__Ok_O &_O Llk__OOI Ok_I \I ]I ^I _LlMn_NlOn_OOIhI h(235Q CLOSEF 114Q PACK 46Q CHARACTER 22Q GETSTREAM 14Q OPENFILE) (17Q INPUT 11Q INPUT 2 Interpress/Xerox/2.1/RasterEncoding/1.0% ) () READ.RES D1 (P 13Q X P 10Q HEIGHT P 7 WIDTH P 6 Attributes P 5 WORDS P 4 BASE P 3 BITMAP P 2 B P 1 A P 0 STREAM I 0 FILE)  @ b` o` @` h ^` @` o` _N_NXOOk [d\l^l? OOH Ok_OOlk OO3H H LIJLkмOn_jO Ok_ @ K(302Q CLOSEF 272Q \FZEROP 130Q BITMAPCREATE 102Q PRIN1 70Q PRIN1 61Q TERPRI 50Q INFORES 43Q PRIN1 33Q PRIN1 20Q TERPRI 6 FULLNAME) (135Q BITMAP 77Q PROMPTWINDOW 65Q PROMPTWINDOW 56Q PROMPTWINDOW 40Q PROMPTWINDOW 30Q PROMPTWINDOW 15Q PROMPTWINDOW) ( 74Q "isn't an RES file" 25Q "Can't find ") SHOWTIME.LOAD.RES.FILEA0001 D1 (NAME ERRORSET F 0 RESETVARSLST F 1 FILENAME F 2 BITMAP F 3 RESETY) g` hhPcQ cci(26Q READ.RES 10Q CURSOR) (5 WAITINGCURSOR 2 CURSOR) () SHOWTIME.LOAD.RES.FILE D1 (P 3 RESETZ P 2 RESETY P 1 LISPXHIST P 0 BITMAP I 0 FILENAME F 4 LISPXHIST F 5 RESETVARSLST) %T!Uog hg[ KJ(40Q ERROR! 33Q RESETRESTORE 21Q SHOWTIME.LOAD.RES.FILEA0001) (27Q ERROR 16Q INTERNAL) ( 13Q (SHOWTIME.LOAD.RES.FILEA0001)) SHOWTIME.MAKE.RESA0001 D1 (NAME ERRORSET F 0 STREAM F 1 BITMAP F 2 RESETVARSLST F 3 FILENAME F 4 RESETY) 6Sg cgPhhhRcQ cPQ QP P ci(60Q SHOWTIME.MAKE.RES.TAIL 53Q SHOWTIME.WRITEBM 45Q SHOWTIME.MAKE.RES.HEADER 35Q SHOWTIME.RES.CHECK&MASSAGE 6 OPENSTREAM) (14Q CLOSEF 3 OUTPUT) () SHOWTIME.MAKE.RES D1 (P 3 RESETZ P 2 RESETY P 1 LISPXHIST P 0 STREAM I 1 BITMAP I 0 FILENAME F 4 LISPXHIST F 5 RESETVARSLST) I@@l @;A`3A0T!Uog hg[ K@gnL (106Q SETFILEINFO 72Q ERROR! 64Q RESETRESTORE 52Q SHOWTIME.MAKE.RESA0001 7 \TYPEMASK.UFN) (100Q TYPE 60Q ERROR 47Q INTERNAL 22Q BITMAPTYPE#) ( 44Q (SHOWTIME.MAKE.RESA0001)) SHOWTIME.MAKE.RES.HEADER D1 (P 23Q CLEANNUM P 22Q PACKED.PIXEL.VECTOR.SIZE P 21Q LO.NIBBLE P 20Q MID.NIBBLE P 17Q HI.NIBBLE P 16Q BYTE P 15Q CHAR P 14Q BOUNDARY P 13Q HI.Y.ICS P 12Q LO.Y.ICS P 11Q HI.X.ICS P 10Q LO.X.ICS P 7 CLEANY P 6 CLEANX P 5 OFFSETHEIGHT P 4 OFFSETWIDTH P 3 HEADER P 2 HEIGHT P 0 WIDTH I 1 BITMAP I 0 STREAM) rA A  gHnԼnHnnJnn_Nl_Nl _Ol_Ol _h_l HIIhIi_K Il ԰d O @ od@O!@O!@O!@O!@O!@l!@l!@O!@O!@O!@O!@l!@l!@l!@l!@l!@l!@l!@lF!@l!@l!@l!@l!@O!@O!@l!@l!@l!@l!@l!POJll_$o_&ol _O&nl _ O&l_"@O!@O !@O"!@j!@k!@Hnl !@Hl!(550Q RSH 475Q RSH 457Q RSH 203Q PRINTCCODE 176Q CHCON 154Q UNPACK 120Q RSH 76Q RSH 12Q BITMAPHEIGHT 3 BITMAPWIDTH) (20Q Interpress/Xerox/2.1/RasterEncoding/1.0% ) ( 451Q 77600000Q 442Q 77777777Q 214Q (240Q 146Q 304Q 10Q 0 0 0 376Q 0 12Q 374Q 200Q 240Q 265Q 17Q 242Q 241Q 33Q)) SHOWTIME.MAKE.RES.TAIL D1 (P 1 BYTE P 0 DATA I 0 STREAM) oHd@I!hNIL NIL ( 3 (241Q 302Q 17Q 240Q 17Q 241Q 17Q 240Q 17Q 243Q 241Q 33Q 305Q 5 130Q 145Q 162Q 157Q 170Q 305Q 12Q 107Q 162Q 141Q 171Q 114Q 151Q 156Q 145Q 141Q 162Q 17Q 244Q 241Q 33Q 102Q 276Q 240Q 147Q)) SHOWTIME.READ.RESA0001 D1 (NAME ERRORSET F 0 RESETVARSLST F 1 FILENAME F 2 BITMAP F 3 RESETY) g` hhPcQ cci(26Q READ.RES 10Q CURSOR) (5 WAITINGCURSOR 2 CURSOR) () SHOWTIME.READ.RES D1 (P 3 RESETZ P 2 RESETY P 1 LISPXHIST P 0 BITMAP I 0 FILENAME F 4 LISPXHIST F 5 RESETVARSLST) %T!Uog hg[ KJ(40Q ERROR! 33Q RESETRESTORE 21Q SHOWTIME.READ.RESA0001) (27Q ERROR 16Q INTERNAL) ( 13Q (SHOWTIME.READ.RESA0001)) SHOWTIME.RES.CHECK&MASSAGE D1 (P 3 BM P 2 BOUNDARY P 1 WIDTH P 0 HEIGHT I 0 BITMAP) M@@BIl \jL l IMM @hMiZdH [@jdK KMl ԰(103Q BITBLT 73Q BITMAPCREATE 52Q \FZEROP 24Q REMAINDER) (11Q BITMAP 3 BITMAP) () SHOWTIME.LOAD.BITMAPA0001 D1 (NAME ERRORSET F 0 FILENAME F 1 WINDOW F 2 BITMAP F 3 NAME F 4 RESETVARSLST F 5 FORMAT F 6 ICON F 7 RESETY F 10Q OPTION) g` hhTcP U`Pddi3 gPhh c`R"` o` U` oKSQW Pg R Q QgS Qg c oS ` o` P` ci(273Q PRIN1 263Q PRIN1 250Q TERPRI 237Q ICONW.TITLE 221Q GETWINDOWUSERPROP 211Q PUTWINDOWPROP 177Q WINDOWP 172Q SETTOPVAL 166Q U-CASE 163Q FILENAMEFIELD 153Q SHOWTIME.SHOW.BITMAP 135Q PRIN1 125Q PRIN1 112Q TERPRI 71Q EVAL 26Q INFILEP 10Q CURSOR) (270Q PROMPTWINDOW 260Q PROMPTWINDOW 245Q PROMPTWINDOW 216Q ICONWINDOW 205Q BITMAP.NAME 160Q NAME 132Q PROMPTWINDOW 122Q PROMPTWINDOW 107Q PROMPTWINDOW 77Q BITMAPTYPE# 57Q QUOTE 36Q SHOWTIME.FORMAT.FNS 5 WAITINGCURSOR 2 CURSOR) ( 255Q "Couldn't find " 231Q "done!" 142Q " Format " 117Q "Problem loading ") SHOWTIME.LOAD.BITMAP D1 (P 6 RESETZ P 5 RESETY P 4 LISPXHIST P 3 OPTION P 2 BITMAP P 1 ICON P 0 NAME I 2 WINDOW I 1 FORMAT I 0 FILENAME F 7 LISPXHIST F 10Q RESETVARSLST) V@@g X` o` @` o` W!Wog hg^ NM(121Q ERROR! 114Q RESETRESTORE 102Q SHOWTIME.LOAD.BITMAPA0001 61Q PRIN1 46Q PRIN1 36Q PRIN1 23Q TERPRI 14Q U-CASE 11Q FILENAMEFIELD) (110Q ERROR 77Q INTERNAL 56Q PROMPTWINDOW 43Q PROMPTWINDOW 33Q PROMPTWINDOW 20Q PROMPTWINDOW 6 NAME) ( 74Q (SHOWTIME.LOAD.BITMAPA0001) 53Q "..." 30Q "Loading ") SHOWTIME.READ.LISPBM D1 (I 0 FILENAME) @g (11Q READBM 6 OPENFILE) (3 INPUT) () SHOWTIME.SAVE.BITMAPA0001 D1 (NAME ERRORSET F 0 FILENAME F 1 RESETVARSLST F 2 BITMAP F 3 FORMAT F 4 RESETY) {g` hhQc` o` P` o` S`Pddi3 gPhRddi3 gRhh o` ci(165Q PRIN1 152Q EVAL 66Q PRIN1 53Q PRIN1 43Q PRIN1 30Q TERPRI 10Q CURSOR) (162Q PROMPTWINDOW 137Q QUOTE 115Q QUOTE 73Q SHOWTIME.FORMAT.FNS 63Q PROMPTWINDOW 50Q PROMPTWINDOW 40Q PROMPTWINDOW 25Q PROMPTWINDOW 5 WAITINGCURSOR 2 CURSOR) ( 157Q "done!" 60Q "..." 35Q "Saving ") SHOWTIME.SAVE.BITMAP D1 (P 3 RESETZ P 2 RESETY P 1 LISPXHIST P 0 FILENAME I 1 FORMAT I 0 BITMAP F 4 LISPXHIST F 5 RESETVARSLST) 9hi Xd-@`%@"T!Uog hg[ KJ(64Q ERROR! 57Q RESETRESTORE 45Q SHOWTIME.SAVE.BITMAPA0001 7 SHOWTIME.GET.NAME) (53Q ERROR 42Q INTERNAL 20Q BITMAPTYPE#) ( 37Q (SHOWTIME.SAVE.BITMAPA0001)) SHOWTIME.SAVE.LISPBMA0001 D1 (NAME ERRORSET F 0 FILESTREAM F 1 RESETVARSLST F 2 FILENAME F 3 RESETY F 4 BITMAP) $Rg cgPhhhQcPT ci(36Q WRITEBM 6 OPENSTREAM) (14Q CLOSEF 3 OUTPUT) () SHOWTIME.SAVE.LISPBM D1 (P 3 RESETZ P 2 RESETY P 1 LISPXHIST P 0 FILESTREAM I 1 BITMAP I 0 FILENAME F 4 LISPXHIST F 5 RESETVARSLST) >@@l @0A`(A%T!Uog hg[ KJ(71Q ERROR! 64Q RESETRESTORE 52Q SHOWTIME.SAVE.LISPBMA0001 7 \TYPEMASK.UFN) (60Q ERROR 47Q INTERNAL 22Q BITMAPTYPE#) ( 44Q (SHOWTIME.SAVE.LISPBMA0001)) SHOWTIME.SCALE.BITMAPA0001 D1 (NAME ERRORSET F 0 RESETVARSLST F 1 BITMAP F 2 SCALE F 3 RESETY) g` hhPcQR cci(27Q SCALEBITMAP 10Q CURSOR) (5 WAITINGCURSOR 2 CURSOR) () SHOWTIME.SCALE.BITMAP D1 (P 5 RESETZ P 4 RESETY P 3 LISPXHIST P 2 SCALE P 1 YSCALE P 0 XSCALE I 1 WINDOW I 0 BITMAP F 6 LISPXHIST F 7 RESETVARSLST) 0@`r@oohddid Xkohddid YkHIZV!Wog hg] MAg@ Ag @ A @jdA ` @o ` (216Q PRIN1 210Q CONCAT 200Q TERPRI 171Q BITBLT 162Q CLEARW 156Q SETTOPVAL 152Q GETWINDOWUSERPROP 143Q PUTWINDOWPROP 131Q ERROR! 123Q RESETRESTORE 111Q SHOWTIME.SCALE.BITMAPA0001 53Q RNUMBER 32Q RNUMBER) (213Q PROMPTWINDOW 175Q PROMPTWINDOW 147Q BITMAP.NAME 137Q BITMAP 117Q ERROR 106Q INTERNAL 67Q FLOATP 63Q FLOATP 7 BITMAPTYPE#) ( 205Q " not a bitmap." 103Q (SHOWTIME.SCALE.BITMAPA0001) 42Q "Y SCALE FACTOR" 21Q "X SCALE FACTOR") SHOWTIME.SHOW.BITMAP D1 (I 3 OPTION I 2 WINDOW I 1 NAME I 0 BITMAP) N@`/@,ABg bCg@B B @jdB B@A ` @` o` (113Q PRIN1 101Q PRIN1 72Q TERPRI 63Q SHOWTIME.SETUP.WINDOWPROPS 55Q BITBLT 46Q CLEARW 41Q SHOWTIME.RESHAPE.WINDOW 23Q GETWINDOWUSERPROP) (110Q PROMPTWINDOW 76Q PROMPTWINDOW 67Q PROMPTWINDOW 32Q RESHAPE&SHOW 20Q BITMAP.NAME 4 BITMAPTYPE#) ( 105Q " not a bitmap") SHOWTIME.WRITEBM D1 (P 13Q X P 11Q Y P 5 BM P 4 BOUNDARY P 3 RWIDTH P 2 WIDTH P 1 HEIGHT P 0 BASE I 1 STREAM I 0 BITMAP) @q@@@Jl ^jNl _JOIOF Ikj OOhKkj OOAHj!AHk!HkиOk_Ok_hOi\dI ]@jdM MA Ol ԰(232Q SHOWTIME.WRITEBM 225Q BITBLT 215Q BITMAPCREATE 77Q \FZEROP 43Q REMAINDER) (32Q BITMAP 23Q BITMAP 14Q BITMAP 3 BITMAP) () MAKEBRUSHA0001 D1 (NAME ERRORSET F 0 FILESTREAM F 1 RESETVARSLST F 2 FILESPEC F 3 RESETY F 4 BITMAP) $Rg cgPhhhQcTP ci(36Q MAKEBRUSH.HEADER&BITMAP 6 OPENSTREAM) (14Q CLOSEF 3 OUTPUT) () MAKEBRUSH D1 (P 3 RESETZ P 2 RESETY P 1 LISPXHIST P 0 FILESTREAM I 1 BITMAP I 0 FILESPEC F 4 LISPXHIST F 5 RESETVARSLST) I@@l @;A`3A0T!Uog hg[ K@gn" (106Q SETFILEINFO 72Q ERROR! 64Q RESETRESTORE 52Q MAKEBRUSHA0001 7 \TYPEMASK.UFN) (100Q TYPE 60Q ERROR 47Q INTERNAL 22Q BITMAPTYPE#) ( 44Q (MAKEBRUSHA0001)) MAKEBRUSH.HEADER&BITMAP D1 (P 11Q X P 7 Y P 5 I P 3 RWIDTH P 2 WIDTH P 1 HEIGHT P 0 BASE I 1 STREAM I 0 BITMAP) @@@@Ak!Aj!AJn!AJl!AIn!AIl!lkMLAj!Mk]AKn!AKl!IkjONhKkj OOAHj!AHk!HkиOk_Ok_NIL (25Q BITMAP 17Q BITMAP 11Q BITMAP 3 BITMAP) () SHOWTIME.LOAD.BRUSH D1 (I 0 FILE) @ (3 READBRUSHFILE) NIL () SHOWTIME.READ.BRUSH D1 (I 0 FILENAME) @ (3 READBRUSHFILE) NIL () SHOWTIME.READ.PRESS D1 (I 0 FILENAME) @g (11Q READPRESS 6 OPENFILE) (3 INPUT) () SHOWTIME.LOAD.DIF.FILE D1 (P 21Q X P 17Q Y P 15Q I P 13Q STREAM P 12Q FILENAME P 11Q HEIGHTHIGH P 10Q HEIGHTLOW P 7 HEIGHT P 6 WIDTHHIGH P 5 WIDTHLOW P 4 WIDTH P 3 TEMPBASE P 2 BITMAPRASTERWIDTH P 1 BASE P 0 BITMAP I 0 FILE)  @ @g _lj OOO Ok_O ]O ^MN\O _O _OO_l?l  OOO Ok_LlOk XdYHZOkjOO?IOJлLkjO"O !KO"lO ǿO"lkKkлO"k_"Ok_O Ho@ (335Q PROMPTPRINT 332Q CONCAT 320Q CLOSEF? 157Q BITMAPCREATE 21Q OPENSTREAM 6 INFILEP) (173Q BITMAP 164Q BITMAP 16Q INPUT) ( 326Q "Couldn't find ") (PRETTYCOMPRINT SHOWTIMECOMS) (RPAQQ SHOWTIMECOMS ((FILES BITMAPFNS SCALEBITMAP READBRUSH) (* * General *) (FNS SHOWTIME GET.SHOWTIME.MENU SHOWTIME.ADD.FORMAT SHOWTIME.BUTTONEVENTFN SHOWTIME.GET.NAME SHOWTIME.ICONFN SHOWTIME.LOAD.FILE SHOWTIME.RESHAPE.WINDOW SHOWTIME.SETUP.WINDOWPROPS) (* * RES *) (FNS INFORES READ.RES SHOWTIME.LOAD.RES.FILE SHOWTIME.MAKE.RES SHOWTIME.MAKE.RES.HEADER SHOWTIME.MAKE.RES.TAIL SHOWTIME.READ.RES SHOWTIME.RES.CHECK&MASSAGE) (* * Bitmap *) (FNS SHOWTIME.LOAD.BITMAP SHOWTIME.READ.LISPBM SHOWTIME.SAVE.BITMAP SHOWTIME.SAVE.LISPBM SHOWTIME.SCALE.BITMAP SHOWTIME.SHOW.BITMAP SHOWTIME.WRITEBM) (* * Brush and Press *) (FNS MAKEBRUSH MAKEBRUSH.HEADER&BITMAP SHOWTIME.LOAD.BRUSH SHOWTIME.READ.BRUSH SHOWTIME.READ.PRESS) (* * DIF *) (FNS SHOWTIME.LOAD.DIF.FILE) (VARS (SHOWTIME.LOAD.SUBITEMS) (SHOWTIME.SAVE.SUBITEMS) (SHOWTIME.MENU) (SHOWTIMETITLEREGION (QUOTE (7 7 56 29))) (SHOWTIME.DEFAULT.FORMAT (QUOTE LISP)) (BackgroundMenu) (BRUSHDIRECTORY) ( SHOWTIME.FORMAT.FNS (QUOTE (SHOWTIME.FORMAT.FNS (RES READ.RES SHOWTIME.MAKE.RES) (LISP SHOWTIME.READ.LISPBM SHOWTIME.SAVE.LISPBM) (DIF SHOWTIME.LOAD.DIF.FILE NIL) (BRUSH SHOWTIME.LOAD.BRUSH MAKEBRUSH) (PRESS READPRESS PRESSBITMAP)))) SHOWTIME.ICON SHOWTIME.MASK) (APPENDVARS ( BackgroundMenuCommands (Showtime (QUOTE (SHOWTIME)) "Opens a ShowTime window for use."))) (P ( SHOWTIME.ADD.FORMAT)))) (FILESLOAD BITMAPFNS SCALEBITMAP READBRUSH) (RPAQQ SHOWTIME.LOAD.SUBITEMS NIL) (RPAQQ SHOWTIME.SAVE.SUBITEMS NIL) (RPAQQ SHOWTIME.MENU NIL) (RPAQQ SHOWTIMETITLEREGION (7 7 56 29)) (RPAQQ SHOWTIME.DEFAULT.FORMAT LISP) (RPAQQ BackgroundMenu NIL) (RPAQQ BRUSHDIRECTORY NIL) (RPAQQ SHOWTIME.FORMAT.FNS (SHOWTIME.FORMAT.FNS (RES READ.RES SHOWTIME.MAKE.RES) (LISP SHOWTIME.READ.LISPBM SHOWTIME.SAVE.LISPBM) (DIF SHOWTIME.LOAD.DIF.FILE NIL) (BRUSH SHOWTIME.LOAD.BRUSH MAKEBRUSH) (PRESS READPRESS PRESSBITMAP))) (RPAQ SHOWTIME.ICON (READBITMAP)) (80 84 "@C@@@@@@@@@@@@@@@@@@" "@CO@@@@@@@@@@@@@@@@@" "@COO@@@@@@@@@@@@@@@@" "@CMOO@@@@@@@@@@@@@@@" "@GLAOO@@@@@@@@@@@@@@" "@GL@AOO@@@@@@@@@@@@@" "@GN@@OOO@@@@@@@@@@@@" "@GN@@OOOO@@@@@@@@@@@" "@ON@@GOMOO@@@@@@@@@@" "@ON@@GOLAOO@@@@@@@@@" "@OO@@GOL@AOO@@@@@@@@" "@OO@@GON@@OOO@@@@@@@" "AOO@@CON@@OOOO@@@@@@" "AOO@@CON@@GOMOO@@@@@" "AOOH@CON@@GOLAOO@@@@" "AOOH@COO@@GOL@AOO@@@" "AOOH@AOO@@GON@@OOO@@" "@AOO@AOO@@CON@@OOOO@" "@@AOOAOO@@CON@@OOMOO" "@@@AOOOOH@CON@@GOLAO" "@@@@AOOOH@COO@@GOL@C" "@@@@@AOOH@AOO@@GON@C" "@@@@@@AOO@AOO@@GON@G" "@@@@@@@AOOAOO@@CON@F" "@@@@@@@@AOOOOH@CON@F" "@@@@@@@@@AOOOH@COO@F" "@@@@@@@@@@AOOH@COO@N" "@@@@@@@@@@@AOO@AOO@L" "@@@@@@@@@@@@AOOAOO@L" "@@@@@@@@@@@@@AOOOOHL" "@@@@@@@@@@@@@@AOOOIL" "@@@@@@@@@@@@@@@AOOIH" "@@@@@@@@@@@@@@@@AOIH" "@@@@@@@@@@@@@@@@@AOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OHGALF@LGLD@DDOND@GH" "OGKKNMOFONMKFNGLNOGH" "OGOKNMOFNNOKNNCHNOOH" "OGOKNMOFFLOKNNKJNOOH" "OHGH@MOGFMOKNNIBN@OH" "OOKKNMOGFMOKNNMFNOOH" "OOKKNMOG@AOKNNLFNOOH" "OGKKNMOGKKOKNNNNNOGH" "OHGALF@OKKOALDGLD@GH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "L@@@@@@@@@@@@@@@@@AH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH") (RPAQ SHOWTIME.MASK (READBITMAP)) (80 84 "@C@@@@@@@@@@@@@@@@@@" "@CO@@@@@@@@@@@@@@@@@" "@COO@@@@@@@@@@@@@@@@" "@COOO@@@@@@@@@@@@@@@" "@GOOOO@@@@@@@@@@@@@@" "@GOOOOO@@@@@@@@@@@@@" "@GOOOOOO@@@@@@@@@@@@" "@GOOOOOOO@@@@@@@@@@@" "@OOOOOOOOO@@@@@@@@@@" "@OOOOOOOOOO@@@@@@@@@" "@OOOOOOOOOOO@@@@@@@@" "@OOOOOOOOOOOO@@@@@@@" "AOOOOOOOOOOOOO@@@@@@" "AOOOOOOOOOOOOOO@@@@@" "AOOOOOOOOOOOOOOO@@@@" "AOOOOOOOOOOOOOOOO@@@" "AOOOOOOOOOOOOOOOOO@@" "@AOOOOOOOOOOOOOOOOO@" "@@AOOOOOOOOOOOOOOOOO" "@@@AOOOOOOOOOOOOOOOO" "@@@@AOOOOOOOOOOOOOOO" "@@@@@AOOOOOOOOOOOOOO" "@@@@@@AOOOOOOOOOOOOO" "@@@@@@@AOOOOOOOOOOON" "@@@@@@@@AOOOOOOOOOON" "@@@@@@@@@AOOOOOOOOON" "@@@@@@@@@@AOOOOOOOON" "@@@@@@@@@@@AOOOOOOOL" "@@@@@@@@@@@@AOOOOOOL" "@@@@@@@@@@@@@AOOOOOL" "@@@@@@@@@@@@@@AOOOOL" "@@@@@@@@@@@@@@@AOOOH" "@@@@@@@@@@@@@@@@AOOH" "@@@@@@@@@@@@@@@@@AOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH" "OOOOOOOOOOOOOOOOOOOH") (APPENDTOVAR BackgroundMenuCommands (Showtime (QUOTE (SHOWTIME)) "Opens a ShowTime window for use.")) (SHOWTIME.ADD.FORMAT) (PUTPROPS SHOWTIME COPYRIGHT ("Xerox Corporation" 1986 1987 1988)) NIL