1 LISP LIBRARY PACKAGES MANUAL 1 LISP LIBRARY PACKAGES MANUAL CENTRONICS 1 PRINTING 1 CENTRONICS 6 The Centronics package implements a stream interface to an industry-standard Centronics printer port. This port, found on the Xerox 1108 Extended Processor board, is designed to drive Centronics-compatible devices, typically printers. The package allows you to send bytes over the parallel port, and notifies the user of any device error conditions. This package is typically used in conjunction with a printer driver package, such as FX80STREAM, C150STREAM, or 4045STREAM, though it can run by itself. 2 Functions 1 (CENTRONICS.RESET) [Function] The only user-callable function in the package, this initializes the parallel port and any attached device. This should be called after the printer is powered on. 2 Opening a Centronics Stream 1 To open a stream to the Centronics port, evaluate a form similar to this: (SETQ CENTRONICS.STREAM (OPENSTREAM '{CENTRONICS} 'OUTPUT)) All bytes BOUTed to CENTRONICS.STREAM will be sent to the attached printer. You may only have one stream open to the parallel port at one time; attempts to open others will yield an error. 2 Dealing With Device Errors 1 When a device error is detected (e.g., printer offline, out of paper, etc.), a break window will pop up. After resetting the device, type ©©RETURN'' (the word, not the key) to continue. Type ©©STOP'' to abort.(LIST ((PAGE NIL (PAPERSIZE Letter FOLIOINFO (ARABIC ) STARTINGPAGE# 251) (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD RIGHT) CHARLOOKS (SUPERSCRIPT 0 INVISIBLE OFF SELECTPOINT OFF PROTECTED OFF SIZE 10 FAMILY MODERN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF EXPANSION REGULAR SLOPE REGULAR WEIGHT MEDIUM INVERTED OFF USERINFO NIL STYLE NIL) FORMATINFO (ARABIC )) (270 12 288 36) NIL) (HEADING NIL (HEADINGTYPE FOOTINGR) (54 27 558 36) NIL) (HEADING NIL (HEADINGTYPE RECTOHEAD) (54 762 558 36) NIL) (TEXT NIL NIL (54 54 504 618) NIL))) (PAGE NIL (PAPERSIZE Letter FOLIOINFO (ARABIC )) (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD RIGHT) CHARLOOKS (SUPERSCRIPT 0 INVISIBLE OFF SELECTPOINT OFF PROTECTED OFF SIZE 10 FAMILY MODERN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF EXPANSION REGULAR SLOPE REGULAR WEIGHT MEDIUM INVERTED OFF USERINFO NIL STYLE NIL) FORMATINFO (ARABIC )) (-234 12 288 36) NIL) (HEADING NIL (HEADINGTYPE FOOTINGV) (54 27 558 36) NIL) (HEADING NIL (HEADINGTYPE VERSOHEAD) (54 762 558 36) NIL) (TEXT NIL NIL (54 54 504 684) NIL))) (PAGE NIL (PAPERSIZE Letter FOLIOINFO (ARABIC )) (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD RIGHT) CHARLOOKS (SUPERSCRIPT 0 INVISIBLE OFF SELECTPOINT OFF PROTECTED OFF SIZE 10 FAMILY MODERN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF EXPANSION REGULAR SLOPE REGULAR WEIGHT MEDIUM INVERTED OFF USERINFO NIL STYLE NIL) FORMATINFO (ARABIC )) (270 12 288 36) NIL) (HEADING NIL (HEADINGTYPE FOOTINGR) (54 27 558 36) NIL) (HEADING NIL (HEADINGTYPE RECTOHEAD) (54 762 558 36) NIL) (TEXT NIL NIL (54 54 504 684) NIL)))))0ø2ÈTT.ÌÌø ø.ÌÌøÈ.ÌÌø È/ø2ÈT/øÈT.ÌÌøø)ø2T)øT(ÌÌø(ÌÌø )ÌÌøT)ÌÌøTBøø PAGEHEADING VERSOHEADBøø PAGEHEADING RECTOHEADAøø PAGEHEADINGFOOTINGVAøø PAGEHEADINGFOOTINGRMODERNMODERNMODERN MODERN  HRULE.GETFNMODERN  HRULE.GETFNMODERN   HRULE.GETFNMODERN   HRULE.GETFNMODERN    HRULE.GETFNMODERN a ™ HRULE.GETFNMODERN   HRULE.GETFNMODERN ¤ HRULE.GETFNMODERN HRULE.GETFNMODERNJ<¾ HRULE.GETFNMODERN HRULE.GETFNMODERN ÓDzº