(FILECREATED " 3-May-87 22:05:24" ("compiled on " {QV}1.3K>LIBRARY>NCSCREEN.;3) "12-Nov-85 14:59:23" recompiled changes: SCREEN.LayoutCardsInSquare SCREEN.GetCascadePosition SCREEN.LayoutCardsInSurround SCREEN.MoveCardToPos SCREEN.MoveWinToPos SCREEN.WinShrinkAndPlace SCREEN.WinLLCorner SCREEN.WinLRCorner SCREEN.WinULCorner SCREEN.WinURCorner in "INTERLISP-D 11-May-86 ..." dated "11-May-86 15:19:08") (FILECREATED " 3-May-87 22:05:14" {QV}1.3K>LIBRARY>NCSCREEN.;3 12572 changes to: (FNS SCREEN.GetCascadePosition SCREEN.LayoutCardsInSquare SCREEN.LayoutCardsInSurround SCREEN.MoveWinToPos SCREEN.MoveCardToPos SCREEN.WinShrinkAndPlace SCREEN.WinLLCorner SCREEN.WinLRCorner SCREEN.WinULCorner SCREEN.WinURCorner) (VARS NCSCREENCOMS) previous date: "15-Apr-85 20:57:51" {QV}RELEASE1.2I>LIBRARY>NCSCREEN.;1) SCREEN.LayoutCardsInSquare D1 (P 7 Win P 6 NextRowPos P 5 Card P 4 Col P 3 Pos P 1 NumCols P 0 NumCards I 1 Cards I 0 StartPos) SA HkÙ kØYA@k3Jµ O h]K ¿M _¿Ldkð—¿O ¾LIð“k¼NˆLkØ¼O »JZ°Ç(113Q SCREEN.WinURCorner 71Q SCREEN.WinLLCorner 53Q NCP.CardWindow 46Q SCREEN.MoveCardToPos 36Q GIVE.TTY.PROCESS 14Q SQRT 3 LENGTH) NIL () SCREEN.LayoutCardsInCascade D1 (P 3 Win P 2 Card P 1 Pos I 1 Cards I 0 StartPos) ,A@"HµhZ ²JI ¿J [ ¹K ¿HX°Ý(44Q GIVE.TTY.PROCESS 37Q SCREEN.GetCascadePosition 33Q NCP.CardWindow 26Q SCREEN.MoveCardToPos 17Q NCP.ValidCard) NIL () SCREEN.GetCascadePosition D1 (P 1 Region P 0 Pos I 0 Window) 1@ @ ÉH@ É,`ØØIIØ` `ØÙ(50Q FONTHEIGHT 22Q \INSUREWINDOW 7 \INSUREWINDOW 3 SCREEN.WinULCorner) (53Q SCREEN.CascadeYSpace 45Q WindowTitleDisplayStream 27Q SCREEN.CascadeXSpace) () SCREEN.LayoutCardsInSurround D1 (P 7 Region P 6 Window P 5 Card P 4 RemainingEdge P 3 Pos P 2 CenterWindow P 1 CenterRegion P 0 RemainingCards I 1 Cards I 0 CenterCard) ñA!@ µ@ ZH©d ¿A J ÉYJ I2jLó¢HµH³0J ¿A ½H¸MKg¿M ^ »LN Õ¼°ÉJ I2jLó¢HµH³0J ¿A ½H¸MKg¿M ^ »LN Õ¼°ÉJ I2jLó¢HµJ A H Õ½H¸MKg¿M ^ »LN Õ¼°É(350Q WINDOWREGION 342Q SCREEN.WinURCorner 336Q NCP.CardWindow 331Q SCREEN.MoveCardToPos 312Q LENGTH 306Q LENGTH 302Q GIVE.TTY.PROCESS 257Q SCREEN.WinLLCorner 243Q WINDOWREGION 235Q SCREEN.WinLRCorner 231Q NCP.CardWindow 224Q SCREEN.MoveCardToPos 206Q LENGTH 201Q GIVE.TTY.PROCESS 152Q SCREEN.WinULCorner 136Q WINDOWREGION 130Q SCREEN.WinLLCorner 124Q NCP.CardWindow 117Q SCREEN.MoveCardToPos 101Q LENGTH 74Q GIVE.TTY.PROCESS 45Q SCREEN.WinURCorner 36Q \INSUREWINDOW 31Q LENGTH 24Q GIVE.TTY.PROCESS 15Q NCP.OpenCard 7 NCP.CardDisplayedP) (326Q UL 221Q UR 114Q UL) () SCREEN.SurroundCardWithFileBoxContents D1 (P 3 NumberDisplayed P 2 NumberOfChildren P 1 FileBoxChildren P 0 Selection I 1 Box I 0 Card) Š@@³=A³#hiol ¿Xd²:b¿Hb°1@³hio¿b³hAd³io¿bµhA Yd Z@I [JKñ´ìhioKoJol ¿°Ï(205Q NC.PrintMsg 201Q CHARACTER 146Q SCREEN.LayoutCardsInSurround 140Q LENGTH 133Q NCP.FileBoxChildren 120Q NCP.SelectCards 114Q NCP.PrintMsg 71Q NCP.SelectCards 65Q NCP.PrintMsg 32Q NCP.SelectCards 26Q NCP.PrintMsg 23Q CHARACTER) NIL ( 174Q " total cards." 167Q " out of " 162Q "Only able to display " 111Q "Select FileBox." 62Q "Select center card." 16Q "Select center card and a filebox.") SCREEN.MoveCardToPos D1 (I 2 Corner I 1 Pos I 0 Card) @ µ @` AB(21Q SCREEN.MoveWinToPos 14Q NCP.OpenCard 3 NCP.CardWindow) (11Q NC.OffScreenPosition) () SCREEN.MoveWinToPos D1 (P 0 Region I 2 Corner I 1 Pos I 0 Win) d@ Bdgð—¿@AA°3gð›@AHÕkØ°Bgðœ@AHÕkØAŒ@AAHÕkØ¿@ ` X@HH(141Q MOVEW 127Q MAKEWITHINREGION 121Q COPY 116Q WINDOWREGION 111Q MOVEW 3 WINDOWREGION) (124Q WHOLESCREEN 52Q LR 30Q UR 13Q LL) () SCREEN.WinShrinkAndPlace D1 (P 1 ShrunkWin P 0 WinULCorner I 0 Win) @ @dšh`Yµ@H I(31Q SCREEN.MoveWinToPos 20Q SHRINKW 3 SCREEN.WinULCorner) (15Q NC.OffScreenPosition) () SCREEN.WinLLCorner D1 (I 0 Win) @ HH(3 WINDOWREGION) NIL () SCREEN.WinLRCorner D1 (I 0 Win) @ HHkÙØH(3 WINDOWREGION) NIL () SCREEN.WinULCorner D1 (I 0 Win) @ HHHkÙØ(3 WINDOWREGION) NIL () SCREEN.WinURCorner D1 (I 0 Win) @ HHkÙØHHkÙØ(3 WINDOWREGION) NIL () (PRETTYCOMPRINT NCSCREENCOMS) (RPAQQ NCSCREENCOMS ((* * Functions for laying out sets of cards. Also some handy utility functions for windows.) (GLOBALVARS SCREEN.CascadeXSpace SCREEN.CascadeYSpace) (VARS (SCREEN.CascadeXSpace 3) ( SCREEN.CascadeYSpace 8)) (* Functions for laying out cards on the screen.) (FNS SCREEN.LayoutCardsInSquare SCREEN.LayoutCardsInCascade SCREEN.GetCascadePosition SCREEN.LayoutCardsInSurround SCREEN.SurroundCardWithFileBoxContents) (* These move cards and windows.) (FNS SCREEN.MoveCardToPos SCREEN.MoveWinToPos SCREEN.WinShrinkAndPlace) (* These compute corner positions for windows.) (FNS SCREEN.WinLLCorner SCREEN.WinLRCorner SCREEN.WinULCorner SCREEN.WinURCorner))) (RPAQQ SCREEN.CascadeXSpace 3) (RPAQQ SCREEN.CascadeYSpace 8) (PUTPROPS NCSCREEN COPYRIGHT ("Xerox Corporation" 1984 1985 1987)) NIL