(FILECREATED "30-Sep-85 19:52:13" ("compiled on " {QV}LISP>ACE>ACE-MAIN.;2) "19-Mar-85 14:34:17" tcompl%'d in "INTERLISP-D 19-Jun-85 ..." dated "19-Jun-85 10:24:28") (FILECREATED "30-Sep-85 18:40:00" {QV}LISP>ACE>ACE-MAIN.;2 54248 changes to: (VARS ACE-MAINCOMS) previous date: " 2-May-85 20:56:43" {ICE}LISP>ACE>ACE-MAIN.;25) ACE D1 (P 1 TEMP.REGION P 0 FONT I 3 APPLICATION I 2 POSITION I 1 WINDOW I 0 SEQUENCE F 2 ACE.CONTROL.WINDOW F 3 ACE.AREA.THRESHOLD F 4 ACE.VERTICAL.BLOCK F 5 ACE.CURRENT.SEQUENCE F 6 ACE.CURRENT.SEQUENCE.NAME F 7 ACE.RUNNING.UNDER.TRILLIUM F 10Q ACE.SEQ.WINDOW.YOFF F 11Q LOGINHOST/DIR F 12Q ACE.DIRECTORY F 13Q ACE.FRAME.TAIL F 14Q ACE.SEQ.WINDOW.XOFF F 15Q ACE.SEQ.WINDOW F 16Q ACE.SEQ.WIDTH F 17Q ACE.CURRENT.FRAME F 20Q ACE.SEQ.HEIGHT)  `gl g XR R \nd` lH l` lhok cHR Rgg Rgg ` oi Rg R l2clchc Cg A@B coiW coi og hccc jcchc cc`g`Rjd g h(377Q ACE.UPD.CONTROL.WINDOW 370Q ADDMENU 313Q ACE.TELLEM 300Q ACE.TELLEM 265Q ACE.ASKEM 247Q ACE.TRILLIUM 217Q MOVEW 213Q PUTWINDOWPROP 204Q ACE.TELLEM 173Q ACE.SETUP.CW.CLIPPING.REGIONS 164Q PUTWINDOWPROP 151Q PUTWINDOWPROP 136Q DSPFONT 126Q CREATEW 100Q CHECK/MENU/IMAGE 67Q FONTHEIGHT 53Q CHECK/MENU/IMAGE 37Q TOTOPW 32Q WINDOWP 25Q FONTCREATE 11Q ACE.CREATE.CONTROL.MENU) (374Q RESET 361Q ACE.CONTROL.MENU 353Q ACE.ANIMATE 350Q MENU 345Q ACE.CONTROL.MENU 310Q L 236Q TRILLIUM 210Q MOVEFN 170Q ACE.CONTROL.MENU 161Q DON'T 156Q REPAINTFN 146Q DON'T 143Q RESHAPEFN 103Q BITMAP 75Q ACE.CONTROL.MENU 56Q BITMAP 50Q ACE.CONTROL.MENU 22Q BOLD 15Q HELVETICA 5 ACE.CONTROL.MENU) ( 305Q "Be sure and Initialize it." 274Q "If using the Tablet," 257Q "Animation Directory? " 200Q "Position This Window" 122Q " ACE CONTROL WINDOW") ACE.ANIMATE D1 (I 2 CARES I 1 WHO I 0 ITEM F 0 ACE.CONTROL.WINDOW) oi @dgdgdgdgvdgjdg^dgRdgFdg:dg.dg"dgi dggP g i (311Q TTY.PROCESS 304Q ACE.UPD.CONTROL.WINDOW 275Q OPENWP 270Q ACE.QUIT.ACE 257Q ACE.SET.DEVICE 243Q ACE.MM1201.INIT 226Q ACE.DELAY 212Q ACE.DECREMENT.FRAME 176Q ACE.INCREMENT.FRAME 162Q ACE.RESET.SEQ 146Q ACE.DELETE.FRAME 132Q ACE.PUT.SEQ.FILE 116Q ACE.GET.SEQ.FILE 102Q ACE.NEW.SEQUENCE 65Q ACE.RUN.CURRENT.SEQ 50Q ACE.EDIT 33Q ACE.NEW.FRAME 7 ACE.TELLEM) (301Q UPD 263Q QUIT 251Q DEVICE 234Q INIT.MM1201 220Q TIME 204Q DEC 170Q INC 154Q RESET 140Q DEL 124Q I/O:PUT 110Q I/O:GET 74Q NEW 57Q RUN 42Q EDIT 25Q FRAME) ( 3 "") ACE.RUN D1 (P 1 FRAME.PART P 0 FRAME I 4 TIMER I 3 YOFFSET I 2 XOFFSET I 1 WINDOW I 0 SEQ) W@PdDlDl HbH$dIhdABICIhdgg Dg h(114Q TIMEREXPIRED? 100Q BITBLT 25Q \CLOCK0) (111Q MILLISECONDS 74Q REPLACE 71Q INPUT) () ACE.NEW.SEQUENCE D1 (P 0 TEMP.REGION I 0 REGION F 1 ACE.CURRENT.SEQUENCE F 2 ACE.SEQ.WIDTH F 3 ACE.SEQ.HEIGHT) go Q#oi og og W@ @oi og hddg XcHcjRSk jdhhhcQh h(204Q ACE.QUICKDRAW&UPD 174Q ACE.FIGURE.OUT.WINDOW 153Q BITMAPCREATE 125Q GETREGION 113Q ACE.TELLEM 100Q ACE.TELLEM 64Q REGIONP 56Q ACE.CONFIRMIT 43Q ACE.TELLEM 27Q ACE.TELLEM 14Q ACE.UPD.CONTROL.WINDOW) (122Q ACE.NEW.SEQ.ASST 110Q L 53Q L 40Q L 5 OPERATION) ( 105Q "Watch ACE window for COORs." 74Q "Specify SIZE of the NEW Sequence." 50Q "Click LEFT to Create NEW Sequence." 35Q "the Current Animation Sequence." 23Q "Creating a NEW Sequence will ERASE" 11Q "NEW") ACE.NEW.FRAME D1 (F 0 ACE.CURRENT.FRAME F 1 ACE.FRAME.TAIL) Cgo g g oi hPjhhPPcdcoi (100Q ACE.EDIT 75Q ACE.TELLEM 40Q ACE.TELLEM 27Q ACE.CHECKSTUFF 17Q ACE.CHECKSTUFF 11Q ACE.UPD.CONTROL.WINDOW) (24Q FRAME 14Q SEQ 2 OPERATION) ( 71Q "Going to EDIT ..." 34Q "Can't put a frame before the First Frame." 6 "FRAME") ACE.QUIT.ACE D1 (F 0 ACE.SEQ.WINDOW F 1 ACE.CONTROL.WINDOW) >go oi og og P Q oi g(70Q ACE.TELLEM 57Q CLOSEW 52Q CLOSEW 45Q ACE.CONFIRMIT 33Q ACE.TELLEM 21Q ACE.TELLEM 11Q ACE.UPD.CONTROL.WINDOW) (73Q MAKE 42Q L 30Q L 2 OPERATION) ( 64Q "QUIT Aborted." 37Q "Click LEFT to QUIT." 25Q "All Images and Data will be LOST." 15Q "QUITing will Close All Animation Windows;" 6 "QUIT") ACE.RESET.SEQ D1 (F 0 ACE.SEQ.WINDOW F 1 ACE.CURRENT.SEQUENCE) %go Pg Qh oi (42Q ACE.TELLEM 31Q ACE.QUICKDRAW&UPD 21Q ACE.CHECKSTUFF 11Q ACE.UPD.CONTROL.WINDOW) (16Q SEQ 2 OPERATION) ( 36Q "There is No Current Sequence." 6 "RESET") ACE.RUN.CURRENT.SEQ D1 (F 0 ACE.FRAME.TAIL F 1 ACE.SEQ.WINDOW F 2 ACE.SEQ.WINDOW.XOFF F 3 ACE.CURRENT.FRAME F 4 ACE.SEQ.WINDOW.YOFF F 5 ACE.CURRENT.SEQUENCE) 'go g PQRT hcU c(42Q LAST 33Q ACE.RUN 24Q RECLAIM 17Q ACE.CHECKSTUFF 11Q ACE.UPD.CONTROL.WINDOW) (14Q SEQ 2 OPERATION) ( 6 "RUN") ACE.DELAY D1 NIL jgo `A`dodi dodg dgjdndhHdI  ddgg(147Q ACE.DELAY.FRAME 135Q ACE.DELAY.SEQ 120Q MENU 11Q ACE.UPD.CONTROL.WINDOW) (141Q FDELAY 127Q SDELAY 115Q ACE.DELAY.MENU 62Q DEFAULTMENUHELDFN 53Q CLRPROMPT 21Q MENUTYPE# 14Q ACE.DELAY.MENU 2 OPERATION) ( 44Q "Sequence Timing Adjustments" 27Q (("Set Delay on a Frame" (QUOTE FDELAY) "Adjust the delay on any frame by number") ("Reset Entire Sequence" (QUOTE SDELAY) "Set the delay on every frame")) 6 "DELAY") ACE.DELAY.FRAME D1 (P 11Q FRAME P 5 COUNT P 1 FRAME P 0 CHOICE F 12Q ACE.CURRENT.SEQUENCE) @`WjB LBNoh dJdodgdg jdndhdK X:_MkؽoMoO Mh_OOh_L\O&_ghWH YlIoHo iIl XdjH(256Q ACE.ASKEM 246Q CONCAT 223Q NTH 147Q CONCAT 113Q MENU 33Q \NCONC2) (211Q QUIT 64Q CLRPROMPT 55Q ACE.DELAY.FRAME.ASST 5 MENUTYPE#) ( 243Q "; New Delay: " 236Q "Frame " 141Q " : " 134Q "Frame " 46Q "Frame Delays" 26Q (Quit (QUOTE QUIT) "Stop adjusting delays")) ACE.DELAY.SEQ D1 (P 0 NEW.DELAY.VALUE F 1 ACE.CURRENT.SEQUENCE) %oihl XdQdHh(15Q ACE.ASKEM) NIL ( 6 "Enter Delay for Entire Sequence: ") ACE.DECREMENT.FRAME D1 (F 0 ACE.CURRENT.SEQUENCE F 1 ACE.CURRENT.FRAME) $go g g PQ (41Q ACE.QUICKDRAW&UPD 36Q LDIFF 27Q ACE.CHECKSTUFF 17Q ACE.CHECKSTUFF 11Q ACE.UPD.CONTROL.WINDOW) (24Q FRAME 14Q SEQ 2 OPERATION) ( 6 "DEC") ACE.INCREMENT.FRAMEA0001 D1 (NAME ERRORSET P 0 FRAME.PART F 1 ACE.SEQ.WINDOW F 2 RESETVARSLST F 3 ACE.CONTROL.WINDOW F 4 RESETY F 5 CURRENT.FRAME F 6 ACE.SEQ.WINDOW.XOFF F 7 ACE.SEQ.WINDOW.YOFF) QghQ QhSg Q hRcU%dHhdQVHWHhdgg hci(105Q BITBLT 27Q DSPCLIPPINGREGION 23Q GETWINDOWUSERPROP 7 DSPCLIPPINGREGION) (101Q REPLACE 76Q INPUT 20Q SEQUENCE.CLIPPING.REGION 2 DSPCLIPPINGREGION) () ACE.INCREMENT.FRAME D1 (P 4 FRAME.PART P 3 RESETZ P 2 RESETY P 1 LISPXHIST P 0 CURRENT.FRAME F 5 ACE.FRAME.TAIL F 6 ACE.CURRENT.FRAME F 7 ACE.SEQ.WINDOW.YOFF F 10Q ACE.CONTROL.WINDOW F 11Q LISPXHIST F 12Q RESETVARSLST F 13Q ACE.SEQ.WINDOW F 14Q ACE.SEQ.WINDOW.XOFF) go g vg nUUc c H_Wg 'W!Wog hg[ K/H'dLhdWWLWLhdgg h(202Q BITBLT 126Q ERROR! 120Q RESETRESTORE 106Q ACE.INCREMENT.FRAMEA0001 63Q GETWINDOWUSERPROP 32Q ACE.CHECKSTUFF 22Q ACE.CHECKSTUFF 14Q ACE.UPD.CONTROL.WINDOW) (176Q REPLACE 173Q INPUT 114Q ERROR 103Q INTERNAL 60Q SEQUENCE.CLIPPING.REGION 27Q TAIL 17Q SEQ 5 OPERATION) ( 100Q (ACE.INCREMENT.FRAMEA0001) 11Q "INC") ACE.DELETE.FRAME D1 (P 1 AFTER.BM P 0 BEFORE.BM F 2 ACE.CURRENT.SEQUENCE F 3 ACE.CURRENT.FRAME F 4 ACE.FRAME.TAIL F 5 ACE.AREA.THRESHOLD F 6 ACE.VERTICAL.BLOCK) u go g `g XRSoi Hoi ?TRS c /RS RT SHIVU STRS h(161Q ACE.QUICKDRAW&UPD 156Q LDIFF 141Q ACE.COMPILE.FRAME 126Q ACE.RECONSTRUCT.FRAME 123Q LDIFF 114Q ACE.RECONSTRUCT.FRAME 111Q LDIFF 101Q ACE.QUICKDRAW&UPD 74Q LDIFF 63Q ACE.CONFIRMIT 50Q ACE.TELLEM 32Q ACE.CHECKSTUFF 22Q ACE.CHECKSTUFF 14Q ACE.UPD.CONTROL.WINDOW) (27Q FRAME 17Q SEQ 5 OPERATION) ( 57Q "Click LEFT to Confirm Delete" 44Q "Can't DELETE first frame. Aborted." 11Q "DELETE") ACE.SET.DEVICE D1 NIL _go g g`A`dododi dg dgjdndhHdI  (134Q ACE.UPD.CONTROL.WINDOW 131Q MENU 17Q ACE.UPD.CONTROL.WINDOW 11Q ACE.UPD.CONTROL.WINDOW) (126Q ACE.SET.DEVICE.MENU 73Q DEFAULTMENUHELDFN 64Q CLRPROMPT 32Q MENUTYPE# 25Q ACE.SET.DEVICE.MENU 22Q DEVICE 14Q DEVICE 2 OPERATION) ( 50Q "Select Input Device" 40Q (("Mouse" (QUOTE MOUSE) "Use the standard mouse for drawing and such") ("Tablet" (QUOTE MM1201) "Use the MM1201 Tablet as the input device")) 6 "SET DEVICE") ACE.QUICKDRAW&UPDA0001 D1 (NAME ERRORSET P 1 FRAME.PART P 0 FRAME F 2 ACE.SEQ.WINDOW F 3 RESETVARSLST F 4 ACE.CONTROL.WINDOW F 5 RESETY F 6 PARTIAL.SEQ F 7 ACE.SEQ.WINDOW.XOFF F 10Q ACE.SEQ.WINDOW.YOFF) cghR RhTg R hScV9dHd*#dYhdRWIWIhdgg hc i(122Q BITBLT 27Q DSPCLIPPINGREGION 23Q GETWINDOWUSERPROP 7 DSPCLIPPINGREGION) (116Q REPLACE 113Q INPUT 20Q SEQUENCE.CLIPPING.REGION 2 DSPCLIPPINGREGION) () ACE.QUICKDRAW&UPD D1 (P 4 FRAME.PART P 3 FRAME P 2 RESETZ P 1 RESETY P 0 LISPXHIST I 0 PARTIAL.SEQ F 7 ACE.CURRENT.FRAME F 10Q ACE.CONTROL.WINDOW F 11Q LISPXHIST F 12Q ACE.FRAME.TAIL F 13Q RESETVARSLST F 14Q ACE.SEQ.WINDOW F 15Q ACE.SEQ.WINDOW.XOFF F 16Q ACE.SEQ.WINDOW.YOFF F 17Q ACE.CURRENT.SEQUENCE)  @Wg 'W!Wog hgZ J@@:dKd+$d\hdWWLWLhdgg Wc@ kkNMWcNk^Wc(173Q LENGTH 151Q BITBLT 61Q ERROR! 53Q RESETRESTORE 41Q ACE.QUICKDRAW&UPDA0001 16Q GETWINDOWUSERPROP) (145Q REPLACE 142Q INPUT 47Q ERROR 36Q INTERNAL 13Q SEQUENCE.CLIPPING.REGION) ( 33Q (ACE.QUICKDRAW&UPDA0001)) ACE.RECONSTRUCT.FRAME D1 (P 2 FRAME.PART P 1 FRAME P 0 ABITMAP I 0 SEQ) E@ X@0dI%IdZhdHJJhdgg H(67Q BITBLT 13Q BITMAPCOPY) (63Q REPLACE 60Q INPUT) () ACE.TRILLIUM D1 (I 2 POSITION I 1 SEQUENCE I 0 WINDOW F 0 ACE.CURRENT.SEQUENCE F 1 ACE.CURRENT.FRAME F 2 ACE.FRAME.TAIL F 3 ACE.RUNNING.UNDER.TRILLIUM F 4 CURRENT.FRAME F 5 CURRENT.INTERFACE.WINDOW F 6 ACE.DIRECTORY F 7 ACE.SEQ.WINDOW F 10Q ACE.SEQ.HEIGHT F 11Q ACE.SEQ.WINDOW.XOFF F 12Q ACE.SEQ.WINDOW.YOFF F 13Q ACE.SEQ.WIDTH F 14Q ACE.CONTROL.WINDOW) icT @ @oi og 8UcB QBcBcAfAcccccNoi og ogg hoi og ogg hccc`gid c Pg Wgg (322Q ACE.TRILLIUM.LOOP 317Q PUTWINDOWPROP 304Q ACE.UPD.CONTROL.WINDOW 275Q ACE.RESET.SEQ 266Q DIRECTORYNAME 235Q ACE.CONFIRMIT 217Q ACE.TELLEM 204Q ACE.TELLEM 172Q ACE.CONFIRMIT 154Q ACE.TELLEM 141Q ACE.TELLEM 127Q ACE.SET.SEQ.CLIP.REGION 123Q ACE.CREATE.EDITING.BORDER 115Q ACE.SEQ.FETCH.HEIGHT 107Q ACE.SEQ.FETCH.WIDTH 53Q POSITIONP 41Q ACE.CONFIRMIT 26Q ACE.TELLEM 12Q WINDOWP 6 DISPLAY.FRAME) (314Q DON'T 311Q MOVEFN 301Q RESET 257Q DEFAULTWHENSELECTEDFN 254Q MENU 251Q ACE.CONTROL.MENU 232Q ANY 227Q L 214Q L 167Q ANY 164Q L 151Q L 36Q L) ( 224Q "Click any button to Exit." 211Q "This is likely a Trillium error." 200Q "No Position Specification. Aborted." 161Q "Click any button to Exit." 146Q "Likely a Trillium error. ACE aborted." 135Q "Error in Window Specification." 33Q "Click LEFT to use Current Interface Window." 22Q "There is no Window Specification") ACE.TRILLIUM.LOOP D1 (P 1 MENU.POS P 0 CHOICE F 2 ACE.CONTROL.WINDOW)  hR hR oi `I XddgdggyHdglgbHdgUgKHdg>g4Hdg'gHdgi gHgg HgA(335Q ACE.QUIT.TRILLIUM 320Q ACE.UPD.CONTROL.WINDOW 303Q ACE.SET.DEVICE 272Q ACE.MM1201.INIT 254Q ACE.DELAY 242Q ACE.DECREMENT.FRAME 225Q ACE.INCREMENT.FRAME 213Q ACE.RESET.SEQ 176Q ACE.DELETE.FRAME 164Q ACE.PUT.SEQ.FILE 147Q ACE.GET.SEQ.FILE 135Q ACE.NEW.SEQUENCE 120Q ACE.RUN.CURRENT.SEQ 105Q ACE.EDIT 70Q ACE.NEW.FRAME 50Q MENU 40Q ACE.TELLEM 26Q DSPYOFFSET 21Q \INSUREWINDOW 14Q DSPXOFFSET 7 \INSUREWINDOW) (325Q QUIT 315Q UPD 310Q QUIT 276Q DEVICE 263Q INIT.MM1201 247Q TIME 234Q DEC 220Q INC 205Q RESET 171Q DEL 156Q I/O:PUT 142Q I/O:GET 127Q NEW 113Q RUN 77Q EDIT 62Q FRAME 44Q ACE.CONTROL.MENU) ( 34Q "") ACE.RUN.TRILLIUM D1 (P 1 FRAME.PART P 0 FRAME I 5 TIMER I 4 UPTO I 3 YOFFSET I 2 XOFFSET I 1 WINDOW I 0 SEQ) DX@PdElEl Hb H$dIhdABICIhdgg Eg hdT@ kDJDjE@dDk 4dH$dIhdABICIhdgg hh(246Q BITBLT 172Q LDIFF 167Q NTH 144Q LENGTH 117Q TIMEREXPIRED? 103Q BITBLT 30Q \CLOCK0) (242Q REPLACE 237Q INPUT 114Q MILLISECONDS 77Q REPLACE 74Q INPUT) () ACE.QUIT.TRILLIUM D1 (F 0 ACE.CONTROL.WINDOW F 1 ACE.RUNNING.UNDER.TRILLIUM F 2 ACE.CURRENT.SEQUENCE) P hcR(3 CLOSEW) NIL () ACE.CREATE.EDITING.BORDER D1 (P 3 Y2 P 2 Y1 P 1 X2 P 0 X1 I 0 MODE F 4 ACE.SEQ.WINDOW F 5 ACE.SEQ.WIDTH F 6 ACE.SEQ.HEIGHT F 7 ACE.SEQ.WINDOW.XOFF F 10Q ACE.SEQ.WINDOW.YOFF) q@@gbUddYVddLWlٸWUعWlٺWVػHJHKl@T HKIKl@T IKIJl@T IJHJl@T h(155Q DRAWLINE 140Q DRAWLINE 123Q DRAWLINE 106Q DRAWLINE) (7 PAINT) () ACE.GET.SEQ.FILEA0001A0002 D1 (NAME ERRORSET L (0 NIL) F 1 RESETVARSLST F 2 TEMP.SEQUENCE.NAME F 3 RESETY) hggghgog Hddidd gHhhh` g hQcog cci(137Q ERRORSET 115Q SETTOPVAL 106Q CURSOR 30Q GETTOPVAL) (134Q NOBREAK 112Q HELPFLAG 103Q WAITINGCURSOR 63Q QUOTE 25Q HELPFLAG 16Q SETTOPVAL 10Q DEFAULTCURSOR 5 CURSOR 2 PROGN) ( 131Q (LOAD FILENAME (QUOTE SYSLOAD)) 22Q (QUOTE HELPFLAG)) ACE.GET.SEQ.FILEA0001 D1 (NAME ERRORSET P 4 RESETZ P 3 RESETY P 2 LISPXHIST P 1 TEMP.SEQUENCE.NAME P 0 FILENAME F 5 ACE.DIRECTORY F 6 ACE.CURRENT.SEQUENCE F 7 ACE.SEQ.HEIGHT F 10Q LISPXHIST F 11Q RESETVARSLST F 12Q MACROY F 13Q ACE.CURRENT.SEQUENCE.NAME F 14Q ACE.SEQ.WIDTH)  go V!oi og oi }XoilgHgUg gUg oi Ho g W!Wog hg\ LIo og hciccc(305Q ACE.RESET.SEQ 301Q ACE.FIGURE.OUT.WINDOW 273Q ACE.SEQ.FETCH.HEIGHT 265Q ACE.SEQ.FETCH.WIDTH 250Q ACE.TELLEM 235Q ACE.TELLEM 221Q ERROR! 213Q RESETRESTORE 201Q ACE.GET.SEQ.FILEA0001A0002 157Q ACE.TELLEM 151Q CONCAT 140Q ACE.TELLEM 127Q PACKFILENAME 123Q FILENAMEFIELD 111Q FILENAMEFIELD 62Q ACE.GET.A.FILE.NAME 55Q ACE.TELLEM 44Q ACE.CONFIRMIT 30Q ACE.TELLEM 14Q ACE.UPD.CONTROL.WINDOW) (245Q L 207Q ERROR 176Q INTERNAL 154Q L 120Q DIRECTORY 114Q DIRECTORY 106Q HOST 102Q HOST 76Q BODY 41Q L 5 OPERATION) ( 242Q "No Such File or File Server Problems." 232Q "Not Found." 173Q (ACE.GET.SEQ.FILEA0001A0002) 146Q " ... " 134Q "Loading: " 70Q "No NAME. Aborted" 51Q "Get Sequence ABORTED." 36Q "Sequence; Click LEFT to confirm LOAD." 24Q "Loading a Sequence will ERASE the Current" 11Q "GET FILE") ACE.GET.SEQ.FILE D1 (P 3 RESETSTATE P 2 MACROY P 0 OLDVALUE F 4 RESETVARSLST F 5 \TopLevelTtyWindow) ;U 1gHhhTcYog gIcgI KJ(66Q ERROR! 61Q APPLY 36Q ACE.GET.SEQ.FILEA0001 3 TTYDISPLAYSTREAM) (52Q TTYDISPLAYSTREAM 42Q ERROR 33Q INTERNAL 11Q TTYDISPLAYSTREAM) ( 30Q (ACE.GET.SEQ.FILEA0001)) ACE.PUT.SEQ.FILEA0001 D1 (NAME ERRORSET L (0 NIL) F 1 RESETVARSLST F 2 TEMP.SEQUENCE.NAME F 3 RESETY) hggghgog Hddidd gHhhh` g hQcog cci(137Q ERRORSET 115Q SETTOPVAL 106Q CURSOR 30Q GETTOPVAL) (134Q NOBREAK 112Q HELPFLAG 103Q WAITINGCURSOR 63Q QUOTE 25Q HELPFLAG 16Q SETTOPVAL 10Q DEFAULTCURSOR 5 CURSOR 2 PROGN) ( 131Q (MAKEFILE FILENAME (QUOTE (NEW FAST))) 22Q (QUOTE HELPFLAG)) ACE.PUT.SEQ.FILE D1 (P 4 RESETZ P 3 RESETY P 2 LISPXHIST P 1 TEMP.SEQUENCE.NAME P 0 FILENAME F 5 ACE.CURRENT.SEQUENCE.NAME F 6 ACE.DIRECTORY F 7 FILELST F 10Q LISPXHIST F 11Q RESETVARSLST)  go g Uoi U-Xoi hgHgVg gVg Xg $oi og ghgH XHg g o Hg go oi Ho g W!Wog hg\ LI!o og og hc o Hg W (423Q DREMOVE 416Q FILENAMEFIELD 406Q ACE.TELLEM 372Q ACE.TELLEM 357Q ACE.TELLEM 344Q ACE.TELLEM 330Q ERROR! 322Q RESETRESTORE 310Q ACE.PUT.SEQ.FILEA0001 267Q ACE.TELLEM 261Q CONCAT 251Q ACE.TELLEM 241Q PUTPROP 227Q FILENAMEFIELD 220Q SET 211Q PACK* 203Q FILENAMEFIELD 172Q PACKFILENAME 156Q ACE.CONFIRMIT 142Q ACE.TELLEM 130Q FILENAMEFIELD 121Q PACKFILENAME 115Q FILENAMEFIELD 103Q FILENAMEFIELD 63Q ACE.TELLEM 51Q ACE.GET.A.FILE.NAME 42Q ACE.CONFIRMIT 22Q ACE.CHECKSTUFF 14Q ACE.UPD.CONTROL.WINDOW) (413Q NAME 367Q L 354Q L 316Q ERROR 305Q INTERNAL 264Q L 232Q FILETYPE 224Q NAME 206Q COMS 200Q NAME 166Q BODY 162Q VERSION 153Q L 125Q VERSION 112Q DIRECTORY 106Q DIRECTORY 100Q HOST 74Q HOST 70Q BODY 17Q SEQ 5 OPERATION) ( 403Q "Done" 364Q "Check the Name. Is the File Server Down?" 351Q "Nothing doing. Can't write this File out." 341Q "Aborted." 302Q (ACE.PUT.SEQ.FILEA0001) 256Q " ... " 245Q "Putting to File: " 236Q (DON'TLIST DON'TCOMPILE) 215Q ((UGLYVARS ACE.CURRENT.SEQUENCE)) 150Q "Click any Other to Write Over Existing Version." 136Q "Click LEFT to Write a New Version." 57Q "NIL ain't no good. Aborted." 36Q "Click LEFT to Keep Same Name." 11Q "PUT FILE") ACE.GET.A.FILE.NAME D1 NIL oihlx (12Q ACE.ASKEM) NIL ( 3 "Enter FILENAME: ") ACE.ASKEMA0001 D1 (NAME ERRORSET F 0 ACE.CONTROL.WINDOW F 1 TIMELIMIT? F 2 RESETVARSLST F 3 RESETY F 4 FLG F 5 STRING F 6 DEFAULTANSWER F 7 SPACES?) ZoPg P Pg P hRcQlxcTdiP gP UVhPhQWo  ci(124Q MKATOM 121Q PROMPTFORWORD 76Q TERPRI 64Q DSPRESET 33Q DSPLEFTMARGIN 26Q GETWINDOWUSERPROP 16Q DSPCLIPPINGREGION 12Q GETWINDOWUSERPROP) (70Q L 23Q PROMPT.CLIP.REGION 7 PROMPT.CLIP.REGION) ( 115Q (15Q 33Q 12Q) 3 (PROGN (DSPCLIPPINGREGION (WINDOWPROP ACE.CONTROL.WINDOW (QUOTE NORMAL.CLIP.REGION)) ACE.CONTROL.WINDOW) (DSPLEFTMARGIN (fetch (REGION LEFT) of (WINDOWPROP ACE.CONTROL.WINDOW (QUOTE NORMAL.CLIP.REGION))) ACE.CONTROL.WINDOW))) ACE.ASKEM D1 (P 2 RESETZ P 1 RESETY P 0 LISPXHIST I 4 SPACES? I 3 TIMELIMIT? I 2 DEFAULTANSWER I 1 FLG I 0 STRING F 3 LISPXHIST F 4 RESETVARSLST) "S!Tog hgZ JI(35Q ERROR! 30Q RESETRESTORE 16Q ACE.ASKEMA0001) (24Q ERROR 13Q INTERNAL) ( 10Q (ACE.ASKEMA0001)) ACE.TELLEMA0001 D1 (NAME ERRORSET F 0 ACE.CONTROL.WINDOW F 1 RESETVARSLST F 2 RESETY F 3 FLG F 4 STRING) EoPg P Pg P hQcSdiP gP TP hci(75Q PRIN1 67Q TERPRI 55Q DSPRESET 33Q DSPLEFTMARGIN 26Q GETWINDOWUSERPROP 16Q DSPCLIPPINGREGION 12Q GETWINDOWUSERPROP) (61Q L 23Q PROMPT.CLIP.REGION 7 PROMPT.CLIP.REGION) ( 3 (PROGN (DSPCLIPPINGREGION (WINDOWPROP ACE.CONTROL.WINDOW (QUOTE NORMAL.CLIP.REGION)) ACE.CONTROL.WINDOW) (DSPLEFTMARGIN (fetch (REGION LEFT) of (WINDOWPROP ACE.CONTROL.WINDOW (QUOTE NORMAL.CLIP.REGION))) ACE.CONTROL.WINDOW))) ACE.TELLEM D1 (P 2 RESETZ P 1 RESETY P 0 LISPXHIST I 1 FLG I 0 STRING F 3 LISPXHIST F 4 RESETVARSLST) "S!Tog hgZ JI(35Q ERROR! 30Q RESETRESTORE 16Q ACE.TELLEMA0001) (24Q ERROR 13Q INTERNAL) ( 10Q (ACE.TELLEMA0001)) ACE.CONFIRMITA0001 D1 (NAME ERRORSET F 0 WHICHKEYS? F 1 MACROY) '`jPi `j ci(36Q GETMOUSESTATE 32Q EQP 23Q EVAL 20Q MOUSESTATE-EXPR 10Q GETMOUSESTATE) (26Q LASTMOUSEBUTTONS 2 LASTMOUSEBUTTONS) () ACE.CONFIRMIT D1 (P 3 RESETSTATE P 2 MACROY P 0 OLDVALUE I 2 WHICHKEYS? I 1 FLG I 0 CONFIRMSTRING F 4 RESETVARSLST F 5 ACE.LEFTMOUSE.CURSOR F 6 ACE.MIDDLEMOUSE.CURSOR F 7 ACE.RIGHTMOUSE.CURSOR F 10Q ACE.ALLMOUSE.CURSOR) {Bgb@A ldhi BdgU$gVBdgWg obW 1gHhhTcYog gIcgI KJ(166Q ERROR! 161Q APPLY 136Q ACE.CONFIRMITA0001 103Q CURSOR 23Q DISMISS 14Q ACE.TELLEM) (152Q CURSOR 142Q ERROR 133Q INTERNAL 111Q CURSOR 64Q ANY 53Q RIGHT 41Q MIDDLE 30Q LEFT 4 LEFT) ( 130Q (ACE.CONFIRMITA0001) 73Q (NOT UP)) ACE.DEFINE.SEQ.WINDOW D1 (F 0 ACE.SEQ.WINDOW F 1 ACE.SEQ.WIDTH F 2 ACE.SEQ.HEIGHT) oi 4PP l2dQlRlhol coi P ?P!QPg RPg oi oi oghlx cP(166Q EVAL 163Q ACE.ASKEM 145Q ACE.TELLEM 133Q ACE.CONFIRMIT 121Q GETWINDOWPROP 106Q GETWINDOWPROP 71Q MOVEW 64Q ACE.TELLEM 51Q CREATEW 17Q CLOSEW 7 ACE.CONFIRMIT) (155Q L 116Q HEIGHT 103Q WIDTH) ( 152Q "Enter the Window: " 141Q "CAUTION: Enter NIL if Unsure at this Stage." 127Q "Click LEFT to Keep Current Window." 60Q "Position the Sequence Window" 44Q "Animation Sequence Window" 3 "Click LEFT to Create a Sequence Window.") ACE.FIGURE.OUT.WINDOW D1 (I 0 REGION/POSITION F 0 ACE.SEQ.WINDOW.XOFF F 1 ACE.SEQ.WINDOW.YOFF F 2 ACE.RUNNING.UNDER.TRILLIUM F 3 CURRENT.FRAME) -RS g @ @c@cjcc(52Q ACE.SET.SEQ.CLIP.REGION 46Q ACE.DEFINE.SEQ.WINDOW 22Q POSITIONP 14Q ACE.CREATE.EDITING.BORDER 5 DISPLAY.FRAME) (11Q INVERT) () ACE.RETURN.CLOSEST.VERTEX D1 (L (1 REGION 0 POINT)) = @AAkX@AX@@AAkY@AY@HINIL NIL () ACE.NEW.SEQ.ASST D1 (I 2 DUM I 1 MOVE I 0 FIXED) %Ag@ @gA@ A@  A(41Q ACE.UPD.CONTROL.WINDOW 35Q ABS 25Q ABS 10Q ACE.UPD.CONTROL.WINDOW) (15Q CURSOR 4 CURSOR) () ACE.DELAY.FRAME.ASST D1 (I 2 MOUSE I 1 MENU I 0 ITEM F 0 ACE.CURRENT.SEQUENCE) @dPd@  (31Q ACE.QUICKDRAW&UPD 26Q LDIFF 22Q NTH) NIL () ACE.SETUP.CW.CLIPPING.REGIONS D1 (P 2 INFO P 1 ABOVEMENU P 0 NORMAL I 0 MENU F 3 ACE.CONTROL.WINDOW) 0SghS X SgH@ HH@  Y SgIIlIl Z SgJJklIIIkJJklIl JJkkIJJkkIIkkgS jd@ @  nigS h(327Q DSPFILL 315Q CREATEREGION 305Q CHECK/MENU/IMAGE 274Q CHECK/MENU/IMAGE 266Q DRAWLINE 211Q PUTWINDOWPROP 206Q CREATEREGION 122Q PUTWINDOWPROP 116Q CREATEREGION 70Q PUTWINDOWPROP 64Q CREATEREGION 53Q CHECK/MENU/IMAGE 31Q CHECK/MENU/IMAGE 17Q PUTWINDOWPROP 13Q DSPCLIPPINGREGION) (323Q PAINT 310Q BITMAP 277Q BITMAP 261Q PAINT 126Q PROMPT.CLIP.REGION 74Q INFO.CLIP.REGION 56Q BITMAP 34Q BITMAP 23Q ABOVEMENU.CLIP.REGION 6 NORMAL.CLIP.REGION) () ACE.CHECKSTUFF D1 (I 0 CONDITIONS F 0 ACE.CURRENT.SEQUENCE F 1 ACE.CURRENT.FRAME F 2 ACE.FRAME.TAIL) 9@dgP.oi gQoi @g R oi (66Q ACE.TELLEM 43Q ACE.TELLEM 22Q ACE.TELLEM) (50Q TAIL 26Q FRAME 4 SEQ) ( 62Q "Sequence is at End." 37Q "No Current Frame. Aborted" 16Q "No Current Sequence defined. Aborted") ACE.UPD.CONTROL.WINDOWA0001 D1 (NAME ERRORSET F 0 VALUE F 1 ACE.CONTROL.WINDOW F 2 ITEM F 3 RESETVARSLST F 4 ACE.CURRENT.SEQUENCE F 5 ACE.FRAME.TAIL F 6 RESETY) oQg Q Qg Q hScRdggPg'PiTgUgTU cgPRdggPwggPlRdggi g ggBig g g g .Rg'gi gg gg gg c i(343Q ACE.UPD.CW.MULE 331Q ACE.UPD.CW.MULE 317Q ACE.UPD.CW.MULE 305Q ACE.UPD.CONTROL.WINDOW2 265Q ACE.UPD.CW.MULE 256Q ACE.UPD.CW.MULE 247Q ACE.UPD.CW.MULE 240Q ACE.UPD.CW.MULE 215Q ACE.UPD.CW.MULE 206Q ACE.UPD.CONTROL.WINDOW2 123Q LENGTH 120Q LDIFF 33Q DSPLEFTMARGIN 26Q GETWINDOWUSERPROP 16Q DSPCLIPPINGREGION 12Q GETWINDOWUSERPROP) (340Q NA 335Q ACE.CURSOR 326Q NA 323Q ACE.OPERATION 314Q MOUSE 311Q ACE.DEVICE 301Q FRAME 273Q RESET 262Q ACE.CURSOR 253Q ACE.OPERATION 244Q ACE.DEVICE 235Q ACE.FRAME 224Q OK 221Q ACE.OPERATION 212Q ACE.DEVICE 202Q FRAME 173Q UPD 163Q ACE.OPERATION 156Q OPERATION 150Q ACE.DEVICE 142Q DEVICE 131Q ACE.FRAME 112Q START 103Q NA 65Q FRAME 56Q ACE.CURSOR 50Q CURSOR 23Q INFO.CLIP.REGION 7 INFO.CLIP.REGION) ( 3 (PROGN (DSPCLIPPINGREGION (WINDOWPROP ACE.CONTROL.WINDOW (QUOTE NORMAL.CLIP.REGION)) ACE.CONTROL.WINDOW) (DSPLEFTMARGIN (fetch (REGION LEFT) of (WINDOWPROP ACE.CONTROL.WINDOW (QUOTE NORMAL.CLIP.REGION))) ACE.CONTROL.WINDOW))) ACE.UPD.CONTROL.WINDOW D1 (P 2 RESETZ P 1 RESETY P 0 LISPXHIST I 1 VALUE I 0 ITEM F 3 LISPXHIST F 4 RESETVARSLST) "S!Tog hgZ JI(35Q ERROR! 30Q RESETRESTORE 16Q ACE.UPD.CONTROL.WINDOWA0001) (24Q ERROR 13Q INTERNAL) ( 10Q (ACE.UPD.CONTROL.WINDOWA0001)) ACE.UPD.CW.MULE D1 (I 1 VALUE I 0 ITEM F 0 ACE.CONTROL.WINDOW) %@dgTA AgP@A P@ bl A oP AP oP AoP Ag>AdAgAgP@A P@ bk oP AP l@dg-AP@ bP@A l oP AP lQgOAgAgP@A P@ bl oP AdgggggP l P A(441Q SPACES 432Q PRIN1 375Q PRIN1 364Q ACE.UPD.CLEAR.SET.LINE 354Q WINDOWPROP 346Q WINDOWPROP 311Q PRIN1 303Q PRIN1 272Q ACE.UPD.CLEAR.SET.LINE 264Q WINDOWPROP 253Q WINDOWPROP 225Q PRIN1 217Q PRIN1 206Q ACE.UPD.CLEAR.SET.LINE 177Q WINDOWPROP 171Q WINDOWPROP 124Q PRIN1 106Q PRIN1 75Q PRIN1 66Q PRIN1 54Q POSITIONP 47Q ACE.UPD.CLEAR.SET.LINE 37Q WINDOWPROP 31Q WINDOWPROP 14Q POSITIONP) (426Q NA 422Q TABLET 415Q MM1201 411Q MOUSE 403Q MOUSE 336Q MM1201 330Q MOUSE 321Q ACE.DEVICE 240Q ACE.OPERATION 161Q NA 153Q START 134Q ACE.FRAME 21Q NA 4 ACE.CURSOR) ( 371Q " Device: " 277Q " State: " 213Q " Frame: " 120Q " Cursor: " 102Q " " 62Q " Cursor: ") ACE.UPD.CLEAR.SET.LINE D1 (I 0 LINES F 0 ACE.CONTROL.WINDOW) P jhP @kP (21Q RELMOVETO 11Q DSPLINEFEED 3 MOVETOUPPERLEFT) NIL () ACE.CREATE.CONTROL.MENU D1 NIL ?`dodi dldg dgjdndhHdI NIL (74Q ACE.CONTROL.MENU 41Q DEFAULTMENUHELDFN 32Q CLRPROMPT 2 MENUTYPE#) ( 10Q (("Get Sequence" (QUOTE I/O:GET) "Fetch a sequence-file") ("Edit Frame" (QUOTE EDIT) "Edits the CURRENT frame") ("Run Sequence" (QUOTE RUN) "Runs the sequence") ("Put Sequence" (QUOTE I/O:PUT) "Writes current sequence out to a file") ("New Frame" (QUOTE FRAME) "Adds in another frame AFTER the current one") ("Increment Frame" (QUOTE INC) "Moves forward one frame and displays") ("New Sequence" (QUOTE NEW) "Make a new sequence from scratch") ("Delete Frame" (QUOTE DEL) "Removes CURRENT frame and smoothes over") ("Decrement Frame" (QUOTE DEC) "Goes back one frame") ("Reset Sequence" (QUOTE RESET) "Clears window and resets to start of sequence") (" Adjust Timing Delays " (QUOTE TIME) "Manipulate the timing adjustments") ("Initialize MM1201 Tablet" (QUOTE INIT.MM1201) "Sets up the Tablet for use") (" " NIL "Ah! You found the mouse button tester!") ("Change Input Device" (QUOTE DEVICE) "Select Mouse or Tablet (for now)") ("Quit" (QUOTE QUIT) "Exit ACE; Trillium user's MUST quit when done"))) ACE.SEQ.FETCH.WIDTH D1 (F 0 ACE.CURRENT.SEQUENCE) PNIL (10Q BITMAP) () ACE.SEQ.FETCH.HEIGHT D1 (F 0 ACE.CURRENT.SEQUENCE) PNIL (10Q BITMAP) () ACE.SET.SEQ.CLIP.REGION D1 (I 3 HEIGHT I 2 WIDTH I 1 BOTTOM I 0 LEFT F 0 ACE.SEQ.WINDOW.XOFF F 1 ACE.SEQ.WINDOW.YOFF F 2 ACE.CONTROL.WINDOW F 3 ACE.SEQ.WIDTH F 4 ACE.SEQ.HEIGHT) (@PbAQbBSbCTbRg@ABC (45Q PUTWINDOWPROP 42Q CREATEREGION) (33Q SEQUENCE.CLIPPING.REGION) () ACE.ASKEM2 D1 (I 4 SPACES? I 3 TIMELIMIT? I 2 DEFAULTANSWER I 1 FLG I 0 STRING F 0 ACE.CONTROL.WINDOW) 2Cl