1 LISP LIBRARY PACKAGES MANUAL 1 LISP LIBRARY PACKAGES MANUAL C150STREAM 1 PRINTING 1 C150STREAM 6 C150Stream lets you open an image stream to a Diablo C150, an inexpensive color inkjet printer. The package allows the complete set of image stream operations (DRAWLINE, BITBLT, etc.) to be performed in eight colors (cyan, magenta, yellow, red, green, blue, black, and white) on the 1020-point-wide-by-1320-point-high C150 page, at a resolution of 120 points per inch. Output can go directly to the C150 printer (using the Centronics driver package) or can be saved in a file for later printing. 2 Printing on the C150 1 You must first set the variable C150FONTDIRECTORIES to the location of the supplied C150 font files. Then you may create a C150 image stream by evaluating a form like (SETQ C150 (OPENIMAGESTREAM '{CENTRONICS}.C150)) The stream C150 can thereafter be used as the target of any graphics program. Due to a temporary restriction, only one C150 stream may be open at one time; attempts to open more than one will cause an error. Here are some examples of operations that may be performed on a C150 image stream: · (DSPCOLOR 'BLUE C150) will set C150's foreground color to blue. · (DSPBACKCOLOR 'RED C150) will set C150's background color to red. · (BITBLT (WHICHW) NIL NIL C150 0 0) will place a window's image at position (0,0) on the C150's page. · (DSPNEWPAGE C150) will cause the current page image to be printed. · To print a TEdit document, right-button in the TEdit window's title bar and select ©©Hardcopy.'' Slide off to the right of that selection and pick ©©To a printer.'' Choose "C150" from the printer menu. · (PRINTOUT C150 ©©Hello world©© T) will print the string ©©Hello world'' on the C150's page, followed by a carriage-return/linefeed. 2 Limitations 1 Currently, the only available fonts are Classic in 10, 14, and 18 points, and Times Roman in 10, 12, and 14 points. They are not very heavily bit-tuned. C150 font files are named <. C150 Font. For example, Classic 10L0, C150 Font. The C150 printer is not particularly fast when in graphics mode. This package is primarily for those who need moderate-resolution color hard copy; the C150 is not suited for fast-turnaround hard copy. If after an error, the user encounters an error message disallowing multiple C150 streams even when she believes there are none open, use the function (C150.RESET).(LIST ((PAGE NIL (PAPERSIZE Letter FOLIOINFO (ARABIC ) STARTINGPAGE# 253) (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 LEFT) 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 )) (54 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)))))1ÌÌøØÈ1ÌÌøØÈ.ÌÌø È/ø2ÈT/øÈT.ÌÌøÈ(ÌÌø)ø2T)øT(ÌÌø )ÌÌøT)ÌÌøTBøø PAGEHEADING VERSOHEADBøø PAGEHEADING RECTOHEADAøø PAGEHEADINGFOOTINGVAøø PAGEHEADINGFOOTINGRMODERN €MODERNMODERNMODERN  HRULE.GETFNMODERN  HRULE.GETFNMODERN   HRULE.GETFNMODERN    HRULE.GETFNMODERN    HRULE.GETFNMODERN ñ HRULE.GETFNMODERN   HRULE.GETFNMODERN ¨1&CDgE͇ HRULE.GETFNMODERN  HRULE.GETFNMODERN·@ʤ €Hzº