(FILECREATED " 5-Dec-85 17:57:23" ("compiled on " {ERIS}LIBRARY>COLORNNGS.;13) "26-Nov-85 14:28:40" recompiled changes: \COLORNNGS.CMD \COLORNNGS.STARTCOLOR \COLORNNGS.SETSCREENCOLORMAP in "INTERLISP-D 26-Nov-85 ..." dated "26-Nov-85 14:41:27") (FILECREATED " 5-Dec-85 17:56:37" {ERIS}LIBRARY>COLORNNGS.;13 14635 changes to: (FNS \COLORNNGS.STARTCOLOR \COLORNNGS.SETSCREENCOLORMAP \COLORNNGS.CMD) (VARS COLORNNGSCOMS) previous date: " 5-Dec-85 15:13:27" {ERIS}LIBRARY>COLORNNGS.;9) \COLORNNGS.CMD D1 (P 0 X I 1 RESETFLG I 0 ARG) ;Al j ljl k@ @dl j ljl jH h(62Q PCBUS.WRITEHL 44Q PCBUS.READHL 26Q PCBUS.WRITEHL 7 PCBUS.READHL) NIL () \COLORNNGS.DEMO D1 (P 3 J P 1 I) jnjIH(ljKJl KnII Kk[IkYljIHhl InI l InI l InI IkY(141Q PCBUS.WRITEHL 125Q PCBUS.WRITEHL 111Q PCBUS.WRITEHL 43Q PCBUS.WRITEHL) NIL () \COLORNNGS.INITCOLOR D1 NIL >ggdggggghhhjdnnhhdhNIL (73Q \COLORNNGSWSDATA 43Q \COLORNNGSWSOPS 25Q \COLORNNGS.ROTATECOLORMAP 22Q \COLORNNGS.COLORLEVEL 17Q \COLORNNGS.SETSCREENCOLORMAP 14Q \COLORNNGS.STOPCOLOR 11Q \COLORNNGS.STARTCOLOR 5 NILL 2 COLORBACKGROUND) () \COLORNNGS.STARTCOLOR D1 (I 2 PTRTOBITS I 1 COLORMAP I 0 DISPLAY) _`d` d```` `` ljl g A (134Q SCREENCOLORMAP 130Q \INSTALL.PERIODIC.INTERRUPT 104Q \TEMPLOCKPAGES 70Q \BITMAPPAGES 24Q \BitmapWords 2 \COLORNNGS.INITCOLORS) (125Q \COLORNNGS.UPDATEDAEMON 122Q \PERIODIC.INTERRUPT.FREQUENCY 115Q \COLORNNGS.LASTMOVEDPAGE 111Q \COLORNNGS.MOVELIMIT 101Q ColorScreenBitMapPages 76Q ColorScreenBitMapBase 73Q ColorScreenBitMapPages 65Q ColorScreenBitMap 62Q ColorScreenBitMapBasePage 54Q ColorScreenBitMapBase 47Q ColorScreenBitMapBase 44Q ColorScreenBitMapEndPage 36Q ColorScreenBitMapEnd 30Q ColorScreenBitMapEnd 21Q ColorScreenBitMap 15Q ColorScreenBitMapBase 10Q BITMAP 5 ColorScreenBitMap) () \COLORNNGS.STOPCOLOR D1 (I 0 DISPLAY F 0 \SystemColorMap) P Pk g @(h(20Q \REMOVE.PERIODIC.INTERRUPT 11Q \UNLOCKPAGES 3 COLORMAPP) (25Q FDEV 15Q \COLORNNGS.UPDATEDAEMON) () \COLORNNGS.SETSCREENCOLORMAP D1 (P 1 COLOR I 1 COLORMAP I 0 DISPLAY) ljIdHhAI( IkY(22Q \COLORNNGS.SENDCOLORMAPENTRY) NIL () \COLORNNGS.SENDCOLORMAPENTRY D1 (I 1 RGB I 0 COLOR#) *l @nA l @nA l @nA h(46Q PCBUS.WRITEHL 30Q PCBUS.WRITEHL 13Q PCBUS.WRITEHL) NIL () \COLORNNGS.LOCKFNS D1 (F 0 \COLORNNGS.LOCKEDFNS F 1 \COLORNNGS.LOCKEDVARS) Pd Qd h(22Q \LOCKVAR 6 \LOCKFN) NIL () \COLORNNGS.LOCKPAGES D1 NIL `` (10Q \TEMPLOCKPAGES) (5 ColorScreenBitMapPages 2 ColorScreenBitMapBase) () \REMOVE.PERIODIC.INTERRUPT D1 (L (0 INTERRUPT)) `hNIL (6 \PERIODIC.INTERRUPT 2 \PERIODIC.INTERRUPT) () \INSTALL.PERIODIC.INTERRUPT D1 (L (0 INTERRUPT)) `@NIL (6 \PERIODIC.INTERRUPT 2 \PERIODIC.INTERRUPT) () \COLORNNGS.SENDPAGE D1 (I 1 CurrPageInBitMap I 0 AbsCurrPage) Cl nAljjl l nAnjjl @XHll Aln0(46Q PCBUS.WRITEHL 22Q PCBUS.WRITEHL) NIL () \BITMAPPAGES D1 (L (0 BITMAP)) @@lNIL (11Q BITMAP 3 BITMAP) () \BitmapWords D1 (L (0 BM)) @@NIL (11Q BITMAP 3 BITMAP) () \DIRTYPAGEP D1 (I 0 VPAGE) @qnjhNIL NIL () \MAKECLEANPAGE D1 (I 0 VPAGE) @dr@qosNIL NIL ( 10Q -10001Q) \MAKEDIRTYPAGE D1 (I 0 VPAGE) @dr@qnsNIL NIL () \COLORNNGS.UPDATEDAEMON D1 (P 4 AbsCurrPage P 3 LastMovedPage P 2 StoppingPage P 1 CurrPage P 0 PagesMoved F 5 \INTERRUPTABLE) aU^g Pj`k`ܹ`Z`I\qnjLI L HkظI[IkY`jH`IJKg (136Q \INSTALL.PERIODIC.INTERRUPT 65Q \MAKECLEANPAGE 60Q \COLORNNGS.SENDPAGE 10Q \REMOVE.PERIODIC.INTERRUPT) (133Q \COLORNNGS.UPDATEDAEMON 127Q \COLORNNGS.LASTMOVEDPAGE 114Q \COLORNNGS.MOVELIMIT 104Q ColorScreenBitMapPages 37Q ColorScreenBitMapBasePage 32Q \COLORNNGS.LASTMOVEDPAGE 25Q ColorScreenBitMapPages 20Q \COLORNNGS.LASTMOVEDPAGE 5 \COLORNNGS.UPDATEDAEMON) () \COLORNNGS.EVENTFN D1 (P 1 PAGE I 1 EVENT I 0 DEVICE F 2 \SystemColorMap F 3 LastSystemColorMap F 4 \COLORCURSORBM) @(AgAgAdg+h ``IdHhd` I IkYg+g ``IdHd` I IkYAdgRd0chcdcgAgAg`` jg (262Q \INSTALL.PERIODIC.INTERRUPT 250Q \TEMPLOCKPAGES 161Q \MAKEDIRTYPAGE 154Q \COLORNNGS.SENDPAGE 125Q \REMOVE.PERIODIC.INTERRUPT 102Q \MAKEDIRTYPAGE 75Q \COLORNNGS.SENDPAGE 45Q COLORDISPLAY) (257Q \COLORNNGS.UPDATEDAEMON 254Q \COLORNNGS.LASTMOVEDPAGE 245Q ColorScreenBitMapPages 242Q ColorScreenBitMapBase 234Q AFTERDOMAKESYS 226Q AFTERDOSAVEVM 220Q AFTERDOSYSOUT 175Q AFTERSAVEVM 150Q ColorScreenBitMapBasePage 133Q ColorScreenBitMapBasePage 130Q ColorScreenBitMapEndPage 122Q \COLORNNGS.UPDATEDAEMON 114Q BEFORESAVEVM 71Q ColorScreenBitMapBasePage 53Q ColorScreenBitMapBasePage 50Q ColorScreenBitMapEndPage 35Q BEFOREMAKESYS 26Q BEFORESYSOUT 20Q BEFORELOGOUT 3 FDEV) () \COLORNNGS.INITCOLORS D1 (P 1 I) l nl l nl oi o o o l nl l nl l nl l nl o o o o ljIH,l InI l InI l InI IkYo o (270Q \COLORNNGS.CMD 261Q \COLORNNGS.CMD 242Q PCBUS.WRITEHL 226Q PCBUS.WRITEHL 212Q PCBUS.WRITEHL 164Q \COLORNNGS.CMD 155Q \COLORNNGS.CMD 146Q \COLORNNGS.CMD 137Q \COLORNNGS.CMD 130Q PCBUS.WRITEHL 116Q PCBUS.WRITEHL 104Q PCBUS.WRITEHL 72Q PCBUS.WRITEHL 60Q \COLORNNGS.CMD 51Q \COLORNNGS.CMD 42Q \COLORNNGS.CMD 33Q \COLORNNGS.CMD 23Q PCBUS.WRITEHL 11Q PCBUS.WRITEHL) NIL ( 265Q (15Q) 256Q (153Q) 161Q (112Q 377Q 377Q) 152Q (170Q 377Q 377Q 377Q 377Q 377Q 377Q 377Q 377Q) 143Q (160Q 0 0 0 177Q) 134Q (113Q 0 300Q 0) 55Q (106Q 0) 46Q (157Q) 37Q (107Q 100Q) 27Q (0 37Q 76Q 144Q 10Q 5 3 360Q 100Q)) (PRETTYCOMPRINT COLORNNGSCOMS) (RPAQQ COLORNNGSCOMS ((* COLORNNGS -- Driver for the NNGS color card -- By Kelly Roach. *) (FNS \COLORNNGS.CMD \COLORNNGS.DEMO) (FNS \COLORNNGS.INITCOLOR) (FNS \COLORNNGS.STARTCOLOR \COLORNNGS.STOPCOLOR \COLORNNGS.SETSCREENCOLORMAP \COLORNNGS.SENDCOLORMAPENTRY) (FNS \COLORNNGS.LOCKFNS \COLORNNGS.LOCKPAGES) (FNS \REMOVE.PERIODIC.INTERRUPT \INSTALL.PERIODIC.INTERRUPT) (FNS \COLORNNGS.SENDPAGE) (FNS \BITMAPPAGES \BitmapWords \DIRTYPAGEP \MAKECLEANPAGE \MAKEDIRTYPAGE \COLORNNGS.UPDATEDAEMON \COLORNNGS.EVENTFN \COLORNNGS.INITCOLORS) (MACROS \DIRTYPAGEP) (CONSTANTS \VMAP.NOTDIRTY) (PROP ARGNAMES \BUSBLTOUTBYTES) (FILES BUSMASTER COLOR) (VARS \COLORNNGS.LOCKEDFNS \COLORNNGS.LOCKEDVARS) (P (\COLORNNGS.LOCKFNS)) (DECLARE: DONTEVAL@COMPILE DOCOPY (P ( \COLORNNGS.INITCOLOR) (\CREATEDISPLAY (QUOTE COLORNNGSDISPLAY) \COLORNNGSWSOPS \COLORNNGSWSDATA ( FUNCTION \COLORNNGS.EVENTFN)))))) (PUTPROPS \DIRTYPAGEP DMACRO ((VPAGE) (fetch (VMEMFLAGS DIRTY) of (\READFLAGS VPAGE)))) (RPAQQ \VMAP.NOTDIRTY -4097) (CONSTANTS \VMAP.NOTDIRTY) (PUTPROPS \BUSBLTOUTBYTES ARGNAMES (VMADDR BUSADDRHI BUSADDRLO NWORDS)) (FILESLOAD BUSMASTER COLOR) (RPAQQ \COLORNNGS.LOCKEDFNS (\COLORNNGS.UPDATEDAEMON \REMOVE.PERIODIC.INTERRUPT \COLORNNGS.SENDPAGE \MAKECLEANPAGE \INSTALL.PERIODIC.INTERRUPT BUS.WRITE2 BUS.WRITE BUS.WRITEHL)) (RPAQQ \COLORNNGS.LOCKEDVARS (ColorScreenBitMapPages ColorScreenBitMapBasePage \COLORNNGS.MOVELIMIT \COLORNNGS.LASTMOVEDPAGE)) (\COLORNNGS.LOCKFNS) (\COLORNNGS.INITCOLOR) (\CREATEDISPLAY (QUOTE COLORNNGSDISPLAY) \COLORNNGSWSOPS \COLORNNGSWSDATA (FUNCTION \COLORNNGS.EVENTFN )) (PUTPROPS COLORNNGS COPYRIGHT ("Xerox Corporation" 1985)) NIL