hưs2D p,COMPILE-DATADBOBlLambda TenТFfFDp,COMPILER,NEW-DESTINATIONSpGLOBALlTpB SITEpB LMIpB SOURCE-FILE-GENERIC-PATHNAME1DplFSMAKE-FASLOAD-PATHNAMEDpB+QUOTElDJDB:DSKDB:DGJCXDVIDB:,DVIPRESS-METHODSDB:pB lUNSPECIFICDB:BFpB QFASL-SOURCE-FILE-UNIQUE-ID1DB8DB:B;DB:DSKDB:DGJCXDVIDB:,DVIPRESS-METHODSDB:LISPDB:FpB SYNTAXpB ,ZETALISPpB ,PACKAGEpB DVIpB BASEF 1DplSIlDEFFLAVOR2DB:CDOVER-DVI-DOCUMENTDB:NILDB:DDOCUMENTDB:BmDpB METHODBkpB lINITIALIZEˀQ2F5ByFA@BkpB ,SET-PRINTER-NAMEDOVERpB SET-PRINTER-RESOLUTIONFpB SET-PRINTER-MAX-FONTSpB SET-FONTMAPpBhlSIMPLE-MAKE-ARRAYÀART-QpB lSET-BUFFERÁMAKE-INSTANCEPRESS-STREAMpB BUFFERpB lSET-OUTPUT-STREAMÁOPEN-8B-OUTPUT1EpBhlFLAVOR-VAR-SELF-REF-INDEXEB:EBkOUTFILEpB lSET-PRESS-PATHNAMEpB SET-FONTNUMSDDpB ,MACROS-EXPANDEDDFILL-POINTERSETFFUNCALL-SELFSENDDpB(,ARG-MAPDDpBh.OPERATION.DpB(lLOCAL-MAPDBmD!BmBkBmPIXEL-HPIXEL-VCHCVCWCXCYCZPAGE-LENGTHCPAGE-WIDTHXPAGE-OFFSETYPAGE-OFFSETFILE-BUFFERBÀBUFFERÀHSTACKÀVSTACKÀWSTACKÀXSTACKÀYSTACKÀZSTACKCPXL-HSTACKCPXL-VSTACKCURRENT-FONTFONTMAPFONTNUMSÀJOB-IDPRINTER-NAMECPRINTER-RESOLUTIONCPRINTER-MAX-FONTSB[DB[ D B[ D1B[ D @@|DE@|@!@B[DB[AD@B[ADB[D @@|DE@|@!@OByDBvBkpB NORMAL-ENDINGˀ FBFA@BkÀCLOSEBpB OUTPUT-STREAMDDBDBBDBDDBD!BmBkBmBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB[A OBDBvBkpB ,ABNORMAL-ENDINGˀ FBFA@BkBBBDDBDBBDBDDBD!BmBkBmBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB[AA OBDBvBkpB START-OUTPUTˀ FBFA@Bk1EBEB:EBkBpB lADD-FONTS1EBEB:EBkBÀFORMATl~& Processing pages.... DDBDBDBDDBD!BmBkBmBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBD E OBDBvBkpB lEND-OUTPUTˀFBFA@BkB ,~& Finishing output ... BpB lOUTPUT-FONT-DIRECTORY-PARTpB OUTPUT-PART-DIRECTORYpB lOUTPUT-DOCUMENT-DIRECTORYDDBDBDBDDBD!BmBkBmBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBE O-BDBvBkpB ,DO-PAGESˀ%2FB0FA@FNTDEF1NOPEOPCTRANSLATION-ARRAYBOPTOTAL-PAGESBk1EBEB:EBkBBAD-DVIMissing bopbop command missingF pB lDOVER-BOPREVERSEB ~D ÁGET-PARAMETERSF DDBD GET-MESSAGE-NAMEBBLOOPÀPSETQDECFBBSIGNED-QUADBINCFCBGET-BYTEDOTIMESCMOVE-BACKDBDDBDBDBmBmDÁPREV-PAGE-PTRDCIBmDCADCBDCCDCDDCURRENT-PAGEDCBOP-PARAMSDCOMMANDDCMNDDBYTEDÀBYTESD!BmBkBmBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB D@ bA|AEDCO@E@E@`#@!@E@E@`cJ[ X@E@E@`3@!@E@E@`J[E@E@E@`#J[F@E|@E@`3J[G@E|@E@`3J[H@E@E@`3@!EE2U8EEEE3S|[FE|ZGE|ZHB8@EBE@E@E@`S@!CCEDUY|JwIKw D D@`#@! D D@`cJ[K XC4 D D@`J[E D D@`#J[F D| D@`3J[G D| D@`3J[H D D@`3@!EE2U8EEEE3S|[FE|ZGE|ZHJEZJCCETYB[DJEDILw D D@`#@! D D@`cJ[LB[ DLEJ[LE LEXIIE 4=XMw D D@`#@! D D@`cJ[M )XMEY DDDE@`MER#23@! D D@`#@! D D@`cJ[ D D@`#@! D D@`cJ[3N D D@`N3@! D D@`c@!VESOuB0DBvBkpB ,SET-CHARˀ !FBxF@C*FONT-DEFINITIONS*BkBpB ,MAYBE-NEW-ENTITYpB ,PRESS-SHOW-CHARpB ,GET-HASH1EBEB:EBkB1EBEB:EBkBDDBDÁTFD-DVI-WIDTHSBPBDBDDBDCHARCODEDBDDCTFMFNTDEFD!BmBkBmBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB  D@ D @ D@E`EJ[3 OBxDBvBkpB ,PUT-CHARˀ FBF@DVI2MICABkBBpB PRESS-PUT-CHARBDDBDBDBDDBDBD!BmBkBmBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB  DED rOBDBvBkpB ,SET-RULEˀ*FBF@BBkBBpB SET-GRAPHIC-XBpB PRESS-SET-RECTANGLEDDBDBPBDBDDBDÀPARAMSDBDDCHTDCWDD!BmBkBmBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB  DD rŁGIA@8AE 8 DDAsD@s DA3 OBDBvBkpB ,PUT-RULEˀ FBF@BBkBBpB PRESS-DRAW-RECTANGLEDDBDBDBDDBDBDBDDBDBD!BmBkBmBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB āGIA@Z xAEZx DDAsD@sOBDBvBkpB NOPˀ F BF@BkDDBDDBDÀIGNORED!BmBkBmBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBOBDBvBkpB RIGHTˀ FBF@BBkBBBpB GRAPH-SET-XDDBDBPBDBDDBDDELTA-HDBDDCGRAPHIC-XD!BmBkBmBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB D3 D r@ D@OBDBvBkpB lWˀFBF@BBkBB1EBEB:EBkBBBDDBDBPBDBDDBDÀNEW-WDBDDB D!BmBkBmBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB āE8E D 2 D r@ D@O*BDBvBkpB lXˀFB-F@BBkBB1EBEB:EBkBBBDDBDBPBDBDDBDÀNEW-XDBDDB D!BmBkBmBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB āE8E D 2 D r@ D@ODB-DBvBkpB DOWNˀFBGF@BBkBB1EBEB:EBkBpB HEIGHTpB GRAPH-SET-YDDBDBPBDBDDBDDELTA-VDBDDCGRAPHIC-YD!BmBkBmBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB D3 @ D rS@ D@OcBGDBvBkpB lYˀ #FBfF@BBkBB1EBEB:EBkBBQBSBUDDBDBPBDBDDBDÀNEW-YDBDDB]D!BmBkBmBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB āE8E D 2 @ D rS@ D@O}BfDBvBkpB lZˀ #FBF@BBkBB1EBEB:EBkBBQBSBUDDBDBPBDBDDBDÀNEW-ZDBDDB]D!BmBkBmBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB āE8E D 2 @ D rS@ D@OBDBvBkpB BOPˀ 1.F$BF@BBk1EBEB:EBkBB1EBEB:EBkBBQBB7BpBBBpB SET-GRAPHIC-YBSpB BEGIN-NEW-PAGEpB EMPTY-STACKDDBDBBDBDDBDBD!BmBkBmBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBD D DDrD@D rSB[OBDBvBkpB EOPˀ  F BF@BkBpB OUTPUT-PARTDDBDBDBDDBDBD!BmBkBmBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBOBDBvBkpB AFTERpB lPOP-STACKˀFBF@BBkBBBBUBSBQDDBDBDBDDBDBD!BmBkBmBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB DD r D@ D rSOBDBvBkpB ,SET-FNTˀ?*F*BF@BBk1EBEB:EBkBB BBAUndefined fontBBBBBSBQpB ,SET-FONTDDBDBBBLCGET-FNTNUMDBDDBDCTEXFNTNUMDBDDB[BmDÀFNTNUMD!BmBkBmBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB|D@`A@@EAU 8D@EJ[8@E@EB DBEJ[ X DDr D @DrS D OB1DpBh,FASL-RECORD-FILE-MACROS-EXPANDEDDB:DDBeaDB DBS[sDBRf-wDBQvTDBPLEDBOazDBN7CDBMQBBLDBKbWDBJDBUDBAsDBx