(FILECREATED " 5-Sep-85 19:30:35" ("compiled on " {ERIS}LIBRARY>FONTSAMPLE.;5) "26-Aug-85 14:56:04" tcompl'd in "INTERLISP-D 26-Aug-85 ..." dated "26-Aug-85 16:55:04") (FILECREATED " 5-Sep-85 19:29:50" {ERIS}LIBRARY>FONTSAMPLE.;5 12927 changes to: (FNS FNT.FINDALL FNT.DISPLOOK FNT.NARRDSCR FNT.FACEMAP) (VARS FNT.INFOFONT) previous date: " 5-Sep-85 16:57:58" {ERIS}LIBRARY>FONTSAMPLE.;3) FNT.MAKEBOOK D1 (P 14Q I P 13Q OUTFNAME P 12Q PAGENO P 11Q BREAKFILE P 10Q ITER P 7 ANGL P 6 FACE P 5 SIZE P 4 TYPE P 3 OUTFDSCR P 2 OUTFTYPE P 1 FONTLIST P 0 CURRFONT I 3 PERPAGE I 2 PRNTFN I 1 ListOfFonts I 0 OUTFROOTNAME)  BgbClbgZk_@dO _J AdgJ j_i_IAd KOlBOk_CO$O j_Ok_O @O _J OiOh (215Q CLOSEF 171Q OPENIMAGESTREAM 163Q FNT.FILEMAP 154Q CLOSEF 63Q FNT.FINDALL 46Q OPENIMAGESTREAM 40Q FNT.FILEMAP) (54Q ALL 24Q INTERPRESS 7 FNT.DISPLOOK) () FNT.LESSP D1 (P 1 KEY2 P 0 KEY1 I 1 DSC2 I 0 DSC1) 4 @dA XAYHdIbbIHI @Abb(45Q ALPHORDER 12Q ALPHORDER) NIL () FNT.DISPLOOK D1 (I 1 FONTDSC I 0 FILEDSC F 0 FNT.INFOFONT F 1 FNT.OUTFTEXT) )P@ @ @ @ @ @Ah A@ Q@ h(45Q PRIN1 40Q DSPFONT 33Q FNT.NARRDSCR 24Q TERPRI 20Q TERPRI 14Q TERPRI 10Q TERPRI 4 DSPFONT) NIL () FNT.DISPTBLE D1 (P 12Q XPosition P 7 CharacterCode P 6 YPosition P 4 Font P 3 DDev P 2 InchesToPrinterUnits P 1 FontList P 0 TitleFont I 1 FONTDSC I 0 Stream F 14Q FNT.INFOFONT F 15Q FNT.OUTFTEXT) K W Ahh@ o@ I dJoJo@ H@ @I A@ W@ L@ JoJl jO3OjOO jONJoNJoJoJo O/OjhOO \jOOJoOJoAON@ Odl KgO@ O @ Ok_OJo__oi NJo_Ծ7oi i h(476Q TERPRI 471Q PRIN1 441Q PRIN1 400Q PRIN1 374Q CHARACTER 366Q BLTCHAR 340Q MOVETO 274Q \FZEROP 172Q \FZEROP 125Q DSPFONT 117Q PRIN1 110Q DSPFONT 102Q FNT.NARRDSCR 74Q DSPFONT 66Q MOVETO 34Q IMAGESTREAMTYPE 20Q DSPSCALE 4 FONTCREATE) (356Q DISPLAY) ( 465Q " done." 450Q -.5 435Q "." 417Q .45 325Q 7.5 312Q 7.5 244Q .75 236Q 7.5 223Q 1.5 211Q 1.5 133Q 1.5 61Q 10.0 53Q .75 24Q 72.0) FNT.DISPDSCR D1 (P 20Q DESCR P 17Q T7 P 16Q T6 P 15Q T5 P 14Q T4 P 13Q T3 P 12Q T2 P 11Q T1 P 10Q T0 P 7 UNITS P 6 OFFX P 5 TEMP P 4 STRM P 3 NUMB P 2 JUNK P 1 SIZE P 0 NAME I 1 FONTLIST I 0 OUTF) Ahh@ ]do_Mo^dj_NOl_NOl_NOl_NOl(_NOl2_NOl7_NOlF_AdO O O O ]MO@ H@ O@ oI@ O@ o@ J@ O@ J@ O@ J@ o@ O@ K@ O@ L@ O@ ]h(405Q DSPXPOSITION 376Q PRIN1 370Q DSPXPOSITION 361Q PRIN1 353Q DSPXPOSITION 344Q PRIN1 333Q PRIN1 322Q DSPXPOSITION 313Q PRIN1 303Q DSPXPOSITION 274Q PRIN1 265Q PRIN1 254Q DSPXPOSITION 245Q PRINTNUM 233Q DSPXPOSITION 224Q PRIN1 216Q DSPXPOSITION 20Q DSPSCALE) NIL ( 340Q ")" 261Q "(" 240Q (FIX 3) 36Q 42.5 26Q 4.25) FNT.NARRDSCR D1 (P 16Q DESCR P 15Q T5 P 14Q T4 P 13Q T3 P 12Q T2 P 11Q T1 P 10Q T0 P 7 UNITS P 6 OFFX P 5 TEMP P 4 STRM P 3 NUMB P 2 FACE P 1 SIZE P 0 NAME I 1 FONTLIST I 0 OUTF)  Ahh@ ]do_Mo^dj_NOl_NOl_NOl_NOl!_NOl0_ArdOOO O]MO@ H@ O@ oI@ O@ J@ O@ K@ O@ L@ O@ h(300Q DSPXPOSITION 271Q PRIN1 263Q DSPXPOSITION 254Q PRIN1 246Q DSPXPOSITION 237Q PRIN1 231Q DSPXPOSITION 222Q PRINTNUM 210Q DSPXPOSITION 201Q PRIN1 173Q DSPXPOSITION 150Q FNT.FACEMAP 15Q DSPSCALE) NIL ( 215Q (FIX 3) 33Q 42.5 23Q 4.25) FNT.DISPINIT D1 (L (0 FILEDSC) F 0 FNT.OUTFTEXT F 1 FNT.INFOFONT) ocochNIL NIL ( 11Q (TERMINAL 10Q (MEDIUM REGULAR REGULAR) 0 INTERPRESS) 3 "abcdefghijkl ABCDEFGHIJKL") FNT.FACEMAP D1 (I 0 OLDFACE) &@ bd @ @ (43Q CONCAT 40Q GNC 35Q MKSTRING 26Q GNC 23Q MKSTRING 15Q GNC 12Q MKSTRING 3 \FONTFACE) NIL () FNT.SIZEMAP D1 (P 0 STR I 0 SIZE) l @o@ @ (27Q MKSTRING 22Q CONCAT 17Q MKSTRING) NIL ( 13Q "0") FNT.MAKENAME D1 (P 4 DDEV P 3 FACE P 2 SIZE P 1 TYPE P 0 STR I 0 FONTLIST) ?P@ Y@ Z@ [@\I J K L o (74Q CONCAT 64Q GNC 61Q MKSTRING 55Q MKSTRING 51Q MKSTRING 45Q MKSTRING 31Q MKSTRING 26Q FNT.FACEMAP 16Q FNT.SIZEMAP 7 MKSTRING) NIL ( 70Q ".IP") FNT.MAKEWIND D1 (P 0 PPI F 1 FNT.WINDOW) $hi lHXjdHoHl h c(37Q CREATEW 7 DSPSCALE) NIL ( 22Q 8.5) FNT.FILEMAP D1 (P 2 DESTNAME P 1 ROOTNAME P 0 FNAME I 1 NUMBER I 0 OUTFNAME) +0@di"dXdg YdA YgIgH (50Q PACKFILENAME 34Q MKATOM 31Q CONCAT 23Q FILENAMEFIELD) (44Q BODY 40Q NAME 20Q NAME) () FNT.FINDALL D1 (P 0 RESULT I 0 DEVICE) gdog@i Xdg (33Q SORT 23Q FONTSAVAILABLE) (30Q FNT.LESSP 15Q * 5 *) ( 12Q (* * *)) (PRETTYCOMPRINT FONTSAMPLECOMS) (RPAQQ FONTSAMPLECOMS ((VARS FNT.PANEL FNT.FNAME FNT.INFOFONT FNT.OUTFTEXT) (FNS FNT.MAKEBOOK FNT.LESSP FNT.DISPLOOK FNT.DISPTBLE FNT.DISPDSCR FNT.NARRDSCR FNT.DISPINIT FNT.FACEMAP FNT.SIZEMAP FNT.MAKENAME FNT.MAKEWIND FNT.FILEMAP FNT.FINDALL))) (RPAQQ FNT.PANEL ((PROG (SETQ FNT.WIND (FNT.MAKEWIND)) (SETQ FNT.FONTLIST (QUOTE (GACHA 10 (MEDIUM REGULAR REGULAR) 0 INTERPRESS)))) (PROG (CLEARW FNT.WIND) (FNT.DISPTBLE FNT.WIND FNT.FONTLIST)) (PROG (SETQ FNT.FILENAME (FNT.MAKENAME FNT.FONTLIST)) (SETQ FNT.STRM (OPENIMAGESTREAM FNT.FILENAME (QUOTE INTERPRESS))) (TOTOPW FNT.WIND) (BITBLT FNT.WIND 0 0 FNT.STRM 0 0 612 792 (QUOTE INPUT) (QUOTE REPLACE )) (CLOSEF FNT.STRM)))) (RPAQQ FNT.FNAME {DSK}FONTBOOK.IP) (RPAQQ FNT.INFOFONT (TERMINAL 8 (MEDIUM REGULAR REGULAR) 0)) (RPAQQ FNT.OUTFTEXT "abcdefghijkl ABCDEFGHIJKL") (PUTPROPS FONTSAMPLE COPYRIGHT ("Xerox Corporation" 1985)) NIL