(FILECREATED "14-NOV-83 11:47:33" ("compiled on " {PHYLUM}SOURCES>COLORPATCH.;2) "10-NOV-83 04:11:06" bcompl'd in WORK dated "10-NOV-83 04:23:52") (FILECREATED "14-NOV-83 11:46:43" {PHYLUM}SOURCES>COLORPATCH.;2 7865 changes to: (VARS COLORPATCHCOMS) previous date: "10-NOV-83 14:43:59" {PHYLUM}SOURCES>COLORPATCH.;1) \SLOWBLTCHAR D1 (P 14Q FONT P 13Q HEIGHTMOVED P 12Q YPOS P 11Q \INTERRUPTABLE P 10Q \INTERRUPTABLE P 7 \INTERRUPTABLE P 6 RIGHT P 5 LEFT P 4 NEWX P 3 CURX P 1 ROTATION P 0 DD I 1 DISPLAYSTREAM I 0 CHARCODE)  AÉ(!HÉ ÈYdjð¢±oHÉ1KHÉ@ÐÈØ\HÉñ²l A ¿HÉ[HÉ@ÐÈؼHLKHÉØ[HÈ"dKñ¡¿K]HÈ#LHÉغdJñ‘¿J^dMñ´‚±HÉ*\È jð’± HÉÈdkð²E¿`”A ¿A`ð¤A ¿LMÍ¿LNMÙÍ¿LHÉ@ÐÈMØKÙÍ¿Ljv¿`“¿±»dlð²V¿HɤA ¿`”A ¿A`ð¤A ¿LMàà]Í¿LNààMÙÍ¿LHÉ@ÐÈààMØKààÙÍ¿Ljv¿`“¿°`lð²XHɤA ¿ `”A ¿A`ð¤A ¿LMààà]Í¿LNàààMÙÍ¿LHÉ@ÐÈàààMØKàààÙÍ¿Ljv¿`“¿‚ihHÉHÉ@ÐÈHÉ  IdlZð²6¿OOØA OÉjHÉ@ÐÈAHÉOÈÙkØOOÈO nð²4OOÙA OÉjHÉ@ÐÈAHÉOÈÙAÉOÈO o (1010Q ERROR 1000Q BKBITBLT 730Q \DSPYPOSITION.DISPLAY 710Q BKBITBLT 637Q \DSPYPOSITION.DISPLAY 572Q SHOULDNT 564Q \PUTUPCOLORCURSOR 500Q \TOTOPWDS 465Q \IFCOLORDS\TAKEDOWNCOLORCURSOR 451Q \DDSETCOLORFONT 430Q \PUTUPCOLORCURSOR 350Q \TOTOPWDS 335Q \IFCOLORDS\TAKEDOWNCOLORCURSOR 321Q \DDSETCOLORFONT 275Q \PUTUPCOLORCURSOR 226Q \TOTOPWDS 213Q \IFCOLORDS\TAKEDOWNCOLORCURSOR 56Q \DSPPRINTCR/LF) (770Q FONTDESCRIPTOR 755Q FONTDESCRIPTOR 700Q FONTDESCRIPTOR 664Q FONTDESCRIPTOR 560Q \COLORCURSORDOWN 472Q \TOPWDS 460Q \COLORCURSORBM 424Q \COLORCURSORDOWN 342Q \TOPWDS 330Q \COLORCURSORBM 271Q \COLORCURSORDOWN 220Q \TOPWDS 206Q \COLORCURSORBM) ( 1005Q "Not implemented to rotate by other than 0, 90 or 270") PRINTBITMAP D1 (L (1 FILE 0 BITMAP)) ƒ@@`ð³0@lð™@-X`ð³ oi ¿@i ¿oi ¿i hoA ¿H A ¿kA ¿H A Hd kð³¿kA ¿H A ¿HA oA h(177Q PRIN1 167Q \WRITEBITMAP 161Q PRIN2 155Q BITSPERPIXEL 150Q SPACES 136Q BITSPERPIXEL 131Q PRIN2 125Q BITMAPHEIGHT 120Q SPACES 112Q PRIN2 106Q BITMAPWIDTH 101Q PRIN1 67Q TERPRI 62Q PRIN1 51Q PRIN1 43Q PRIN1) (30Q BITMAPTYPE# 10Q BITMAPTYPE#) ( 173Q ")" 75Q "(" 56Q " is not a BITMAP." 37Q "******** ") READBITMAP D1 (P 6 BITSPERPIXEL P 5 W P 4 BM P 3 BASE P 2 STRM P 1 HEIGHT P 0 WIDTH I 0 FILE) Ê@ @ gð§o ¿@ @ @g CJ gð‘kƒ@ ^HÚlØââââ½HIN \É»Hjð³mIjð³hJ gð²PIdjñ²WJ ¿J l"ð²=Mdjñ²0KjJ l@ÙààààJ l@ÙäÇ¿KkJ l@ÙààààJ l@ÙäÇ¿KkлkÙ°Ï¿J l"ð©¿o hkÙ°¨¿J ¿J l)ð²èL(276Q SKIPSEPRS 263Q ERROR 150Q SKIPSEPRS 130Q SKIPSEPRS 106Q BITMAPCREATE 65Q RATOM 52Q SKIPSEPRS 43Q GETSTREAM 34Q RATOM 30Q RATOM 23Q ERROR 7 READC 3 SKIPSEPRS) (133Q %" 55Q %" 40Q INPUT 12Q %() ( 260Q "BAD FORMAT OF BITMAP IN FILE" 20Q "BAD FORMAT OF BITMAP IN FILE") (PRETTYCOMPRINT COLORPATCHCOMS) (RPAQQ COLORPATCHCOMS ((FNS \SLOWBLTCHAR PRINTBITMAP READBITMAP))) (PUTPROPS COLORPATCH COPYRIGHT ("Xerox Corporation" 1983)) NIL