(FILECREATED "14-Jan-86 11:18:18" ("compiled on " {IVY}LISP>SP>DSL.;24) "12-Nov-85 14:59:23" recompiled exprs: RecordSegment in "INTERLISP-D 22-Nov-85 ..." dated "22-Nov-85 11:32:58") (FILECREATED "14-Jan-86 11:15:10" {IVY}LISP>SP>DSL.;24 120411 changes to: (FNS RecordSegment) (MACROS \RawFPlusArrays \RawFTimesArrays \RawFloatArray \RawPermArray) (RECORDS LinkedWindow PointRec SSFileForm SignalSegment) previous date: "11-Jan-86 17:17:16" {IVY}LISP>SP>DSL.;22) DSL D1 (F 0 DSLControlIconW) P P g(33Q BUSDMA.INIT 30Q BUS.RESET 17Q DTYPE 14Q TOTOPW 11Q MakeDSLControlW 3 WINDOWP) (22Q TIGER) () MakeDSLControlWA0001 D1 (I 0 w) @ g(3 CLOSEW) (6 DON'T) () MakeDSLControlW D1 (P 2 wr P 1 iw P 0 w F 3 DSLControlWindow F 4 DSLControlIconW F 5 DSLControlIcon) ldhddo ohi c!S Zohdi cYUjdTld T Sgg Sgg Sgg S gS Tgg Tgg TgSg TgS Tgg T(236Q PUTWINDOWPROP 224Q PUTWINDOWPROP 214Q PUTWINDOWPROP 211Q GETWINDOWUSERPROP 176Q PUTWINDOWPROP 164Q PUTWINDOWPROP 152Q DSPSCROLL 143Q MakePrompt 137Q PUTWINDOWPROP 125Q WINDOWADDPROP 113Q WINDOWADDPROP 101Q OPENW 75Q BITBLT 62Q \PosnDSLIconW 54Q CREATEW 37Q \INSUREWINDOW 26Q CREATEW 15Q GETBOXREGION) (233Q \PosnDSLCtlW 230Q AFTERMOVEFN 220Q DSLOutputWindow 206Q PromptWindow 202Q PromptWindow 173Q DSLControlWindowButtonFn 170Q BUTTONEVENTFN 161Q DON'T 156Q SHRINKFN 146Q ON 134Q DSLControlWindowButtonFn 131Q BUTTONEVENTFN 122Q \PosnDSLIconW 117Q AFTERMOVEFN 110Q MakeDSLControlWA0001 105Q SHRINKFN) ( 46Q (0 0 73Q 73Q) 21Q "DSL Control" 11Q "Specify the position of the DSL control window please") \PosnDSLIconW D1 (P 0 wr F 1 DSLControlWindow F 2 DSLControlIconW) @Q RHHl;'RHHl;HHl; Q Q h(73Q TOTOPW 65Q OPENWP 61Q MOVEW 3 \INSUREWINDOW) NIL () \PosnDSLCtlW D1 (P 0 wr F 1 DSLControlWindow F 2 DSLControlIconW) 6R QHHlQHHlHHl h(61Q MOVEW 3 \INSUREWINDOW) NIL () MakeAndShowSS D1 (P 5 offset P 4 format P 3 sample P 2 ampl P 1 file P 0 name I 0 $window$ F 12Q \SSAmplMenu F 13Q \SSSampleMenu F 14Q \SSFormatMenu F 15Q \SSOffsetMenu) K @ollx  H@o YI@W7`dododg dgjdndhdN c ZJCW:`dododg dgjdndh_dO c [KCW:`dododg dgjdndh_dO c \LCW:`dododg dgjdndh_dO c ]M HIhJKLdghMdgh  (510Q NewShow 505Q MakeSSForFile 445Q MENU 341Q MENU 235Q MENU 131Q MENU 30Q DSLPromptRead 13Q DSLPromptRead) (475Q Default 464Q DLion/MCmp 411Q DEFAULTMENUHELDFN 402Q CLRPROMPT 355Q MENUTYPE# 305Q DEFAULTMENUHELDFN 276Q CLRPROMPT 251Q MENUTYPE# 201Q DEFAULTMENUHELDFN 172Q CLRPROMPT 145Q MENUTYPE# 100Q DEFAULTMENUHELDFN 71Q CLRPROMPT 44Q MENUTYPE#) ( 373Q (Default (Other (DSLPromptRead $window$ "offset: " 1 113Q))) 363Q "Sample Offset" 267Q (VAX DLion/MCmp) 257Q "Data Format" 163Q ((5K 11610Q) (10K 23420Q) (27K 64570Q)) 153Q "Sample Rate" 62Q (1750Q 4000Q 40000Q (Other (DSLPromptRead $window$ "Amplitude: " 1 144Q))) 52Q "Max Amplitude" 25Q "Name of data file: " 4 "Name of new SS: ") DSLControlWindowButtonFnA0001 D1 (NAME ERRORSET L (0 NIL) F 2 DSLControlMenu F 3 DSLControlMenuItems F 4 MACROY) 9R0`dSdg dgjdndhHdI c ci(63Q MENU) (26Q DEFAULTMENUHELDFN 17Q CLRPROMPT 5 MENUTYPE#) () DSLControlWindowButtonFn D1 (P 3 RESETSTATE P 2 MACROY P 0 OLDVALUE I 0 Window F 4 RESETVARSLST) \@ b`lj@ @g @ 1gHhhTcYog gIcgI KJ(127Q ERROR! 122Q APPLY 77Q DSLControlWindowButtonFnA0001 44Q TTYDISPLAYSTREAM 36Q GETWINDOWUSERPROP 26Q MOVEW 10Q GETMOUSESTATE 3 MAINWINDOW) (113Q TTYDISPLAYSTREAM 103Q ERROR 74Q INTERNAL 52Q TTYDISPLAYSTREAM 33Q DSLOutputWindow 14Q LASTMOUSEBUTTONS) ( 71Q (DSLControlWindowButtonFnA0001)) MakeSSForFile D1 (P 0 duration I 6 offset I 5 format I 4 rate I 3 ampl I 2 size I 1 fileName I 0 name) BA Ag jA`EgHnـHdJEgnjdK@CngDn'gEgF EgjngA Ago dLdI (216Q SSNewName 203Q DSUBST 200Q DSUBST 175Q DSUBST 172Q DSUBST 167Q SUBST 152Q INFILEP 16Q GETFILEINFO 6 INFILEP) (160Q fileName 146Q offset 134Q VAX 125Q format 121Q rate 110Q ampl 60Q VAX 35Q VAX 30Q SignalSegmentTYPE# 13Q LENGTH) ( 164Q ((Data (DataFile . fileName) (SampleRate . rate) (MaxAmplitude . ampl) (SampleOffset . offset) (SampleFormat . format)))) PrintSSName D1 (I 0 key F 0 $AllFlg$) Po@l k @ h(24Q PRIN1 20Q SPACES 13Q STRPOS) NIL ( 5 "/") SSDir D1 (P 0 sf I 1 allFlg I 0 file) &@`A `A dHA h(35Q SSDir1 22Q SSDir1 11Q SSDir1) (14Q SignalFiles 5 SSDir) () FindAndShowSS D1 (P 3 w P 1 ow P 0 ss I 0 window) 9@ HJ hYH [g HKiJZ (66Q TOTOPW 45Q GETWINDOWUSERPROP 34Q NewShow 14Q OPENWINDOWS 3 GetSS) (42Q SignalSegment) () GetSSA0001 D1 (I 0 key F 0 $result$) o@l @Pch(11Q STRPOS) NIL ( 3 "/") GetSSA0002 D1 (I 1 key I 0 val F 0 $result$) @ oAl APch(21Q STRPOS) (3 SignalSegment) ( 13Q "/") GetSS D1 (P 2 $result$ P 1 ssName P 0 location I 0 window) i@ 1H{g@okld hHd dgH Hg gHg J/`dJdg dgjdndhdK Yo h II I o h h(237Q TERPRI 232Q PRIN1 222Q PRIN1 214Q FindSS 204Q TERPRI 177Q PRIN1 166Q MENU 107Q MAPHASH 72Q MAPHASHFILE 61Q HASHFILEP 46Q TYPENAME 34Q DSLPromptRead 4 \FindSSDir) (137Q DEFAULTMENUHELDFN 130Q CLRPROMPT 116Q MENUTYPE# 104Q GetSSA0002 76Q HARRAYP 67Q GetSSA0001 52Q ARRAYP 17Q {typein}) ( 227Q " not found" 174Q "No segments there" 26Q "Name of SS: ") \FindSSDir D1 (P 0 items I 1 readWindow I 0 nowhereFlg) L@Hoh AHgh `dHdg dgjdndhdI (111Q MENU 35Q \NCONC2 21Q \NCONC2 2 SFNames) (62Q DEFAULTMENUHELDFN 53Q CLRPROMPT 41Q MENUTYPE# 30Q {typein}) ( 14Q (NowhereYet SSDir)) UpdateDir D1 (P 0 hf) Hdh (15Q CleanupSSFiles 2 \FindSSDir) NIL () SFNames D1 (P 3 hf) +@`d[g KhIHhZH&J(23Q ROOTFILENAME 20Q HASHFILEPROP) (15Q NAME 5 SignalFiles) () CloseDir D1 (P 0 hf) Hd H` (22Q DREMOVE 13Q CLOSEHASHFILE 2 \FindSSDir) (25Q SignalFiles 17Q SignalFiles) () SSOneDir D1 (P 0 hf) i Hd (14Q SSDir1 3 \FindSSDir) NIL () NoticeDir D1 (P 0 file I 0 window) @okl Hd (23Q SSFile 12Q DSLPromptRead) NIL ( 4 "SS Directory File: ") CreateDir D1 (P 0 file I 0 window) [@okl HdI ?@g o@g H@g o@g @g Hi (130Q SSFile 122Q TERPRI 117Q GETWINDOWUSERPROP 107Q PRIN1 104Q GETWINDOWUSERPROP 70Q PRIN1 65Q GETWINDOWUSERPROP 54Q PRIN1 51Q GETWINDOWUSERPROP 35Q GETWINDOWUSERPROP 24Q INFILEP 12Q DSLPromptRead) (114Q DSLOutputWindow 101Q DSLOutputWindow 62Q DSLOutputWindow 46Q DSLOutputWindow 32Q DSLOutputWindow) ( 75Q "already exists and will not be recreated" 42Q "Note - " 4 "New SS Directory File: ") SSDir1A0001 D1 (NAME ERRORSET F 0 file F 1 MACROY) Pg i Pg i ci(32Q TERPRI 25Q MAPHASHFILE 15Q PRIN1 11Q ROOTFILENAME 6 HASHFILEPROP) (22Q PrintSSName 3 NAME) () SSDir1A0002A0003 D1 (I 1 key I 0 val) @ A h(12Q PrintSSName) (3 SignalSegment) () SSDir1A0002 D1 (NAME ERRORSET F 0 file F 1 MACROY) Pg i ci(13Q TERPRI 6 MAPHASH) (3 SSDir1A0002A0003) () SSDir1 D1 (P 3 RESETSTATE P 2 MACROY P 0 OLDVALUE I 1 $AllFlg$ I 0 file F 4 RESETVARSLST) @d dgC@ ;i 1gHhhTcYog gIcgI KJg:i 1gHhhTcog gIcgI KJ(210Q APPLY 164Q SSDir1A0002 131Q OUTPUT 114Q ERROR! 107Q APPLY 64Q SSDir1A0001 31Q OUTPUT 23Q HASHFILEP 7 TYPENAME) (201Q OUTPUT 170Q ERROR 161Q INTERNAL 137Q OUTPUT 122Q HARRAYP 100Q OUTPUT 70Q ERROR 61Q INTERNAL 37Q OUTPUT 13Q ARRAYP) ( 156Q (SSDir1A0002) 56Q (SSDir1A0001)) DTYPEA0001 D1 (NAME ERRORSET L (0 NIL)) oHHljk0iNIL NIL ( 3 (ARRAY 1 (QUOTE WORD))) DTYPE D1 NIL o gg(6 DTYPEA0001) (16Q LION 12Q TIGER) ( 3 (DTYPEA0001)) CloseSignalFile D1 (P 2 ow P 0 sf I 2 w I 1 aspect I 0 ss) IBg Hd IhH Bg BJHJg JiIY(72Q GETWINDOWUSERPROP 53Q PUTWINDOWPROP 43Q CLOSEF 25Q OPENWINDOWS 20Q OPENP 6 GETWINDOWUSERPROP) (67Q SignalFile 50Q SignalFile 3 SignalFile) () CloseSignalWindow D1 (I 0 window) '@g @g @ @g @g (44Q CLOSEF 41Q GETWINDOWUSERPROP 30Q GETWINDOWUSERPROP 21Q UndisplayAspect 15Q GETWINDOWUSERPROP 6 GETWINDOWUSERPROP) (36Q SignalFile 25Q SignalFile 12Q SignalSegment 3 DisplayedAspect) () CompressionButtonFnA0002 D1 (L (2 k 1 m 0 i)) @NIL NIL () CompressionButtonFn D1 (P 1 old P 0 window I 0 cw) @ !`kjHg H```6`d`dgdg dgjdndhdJ  ddkk8dgIkհ,dgIk԰ dl l gHoklN  h(246Q NewCompression 243Q SHOULDNT 237Q DSLPromptRead 142Q MENU 33Q GETWINDOWUSERPROP 6 MAINWINDOW 3 MAINWINDOW) (222Q Set 175Q Up 161Q Down 137Q CompressionMenu 110Q DEFAULTMENUHELDFN 101Q CLRPROMPT 72Q CompressionButtonFnA0002 63Q CompressionMenuItems 56Q MENUTYPE# 51Q CompressionMenu 44Q MENUTYPE# 40Q CompressionMenu 30Q Compression 14Q LASTMOUSEBUTTONS) ( 231Q "New value: ") NewCompression D1 (I 1 compr I 0 window) 5Ah@  '@gA @h@ A @dg A @ (62Q REDISPLAYW 56Q PositionSignalWindow 52Q GETWINDOWUSERPROP 42Q \UpdateLinks 33Q DSPCLIPPINGREGION 25Q PUTWINDOWPROP 13Q \CheckWidthVsCompr 5 DSPCLIPPINGREGION) (47Q SignalOrigin 21Q Compression) () \CheckWidthVsCompr D1 (I 1 width I 0 compr F 0 \SSDataArray) !@iAP oP A h(35Q ERROR 32Q PACK* 25Q ARRAYSIZE 12Q ARRAYSIZE) NIL ( 21Q "Compression times display width is too great for available data storage - can't do it. Max possible compression is ") PositionSignalWindow D1 (P 1 offset P 0 reg I 2 compr I 1 signalPos I 0 window) - @ h@ Xh@ YHABH@ IAB@ @ h(51Q \UpdateLinkedWindows 45Q DSPXOFFSET 34Q DSPCLIPPINGREGION 21Q DSPXOFFSET 13Q DSPCLIPPINGREGION 6 CLEARW) NIL () NewShow D1 (P 5 sww P 4 sw P 3 cw P 2 pw P 1 ow P 0 height I 1 window I 0 ss) jji QA $ho@ o@o bAg@ Agg Ag jdoA ]l hdi \Ag L AgL LgMh LgMj Lgg jdldH ohi YAgg IgldH IgldH jdlPH ohi [Ig KglPH KglPH Kgg K A AgI AgK Agg Agg Agg Agg Ago A A(546Q ReshapeSignalWindow 542Q PUTWINDOWPROP 527Q PUTWINDOWPROP 515Q WINDOWADDPROP 503Q WINDOWADDPROP 471Q PUTWINDOWPROP 456Q PUTWINDOWPROP 445Q PUTWINDOWPROP 434Q MakePrompt 427Q CLOSEW 422Q PUTWINDOWPROP 407Q PUTWINDOWPROP 373Q PUTWINDOWPROP 357Q ATTACHWINDOW 347Q CREATEW 336Q CREATEREGION 325Q PUTWINDOWPROP 311Q PUTWINDOWPROP 275Q ATTACHWINDOW 262Q CREATEW 251Q CREATEREGION 240Q PUTWINDOWPROP 225Q PUTWINDOWPROP 212Q PUTWINDOWPROP 177Q PUTWINDOWPROP 166Q CLOSEW 161Q ATTACHWINDOW 151Q CREATEW 143Q CREATEREGION 135Q WIDTHIFWINDOW 132Q STRINGWIDTH 114Q GETWINDOWUSERPROP 105Q WINDOWADDPROP 73Q PUTWINDOWPROP 60Q CREATEW 55Q CONCAT 32Q SSFullName 17Q WINDOWP 10Q HEIGHTIFWINDOW 3 DSPLINEFEED) (533Q SCROLLEXTENTUSE 524Q ButtonSignalWindow 521Q BUTTONEVENTFN 512Q ReshapeSignalWindow 507Q RESHAPEFN 500Q CloseSignalWindow 475Q CLOSEFN 466Q ScrollSignalWindow 463Q SCROLLFN 452Q CompressionWindow 441Q OriginWindow 417Q CompressionButtonFn 414Q BUTTONEVENTFN 400Q MINSIZE 364Q MAXSIZE 354Q TOP 316Q MINSIZE 302Q MAXSIZE 272Q BOTTOM 267Q LEFT 235Q ReshapeScaleWindow 232Q RESHAPEFN 217Q MINSIZE 204Q MAXSIZE 173Q ScaleWindow 156Q LEFT 111Q ATTACHEDWINDOWS 102Q RedisplayMarks 77Q REPAINTFN 67Q SignalSegment 42Q SignalSegment) ( 537Q (T) 342Q "Compression" 255Q "Origin" 126Q "Scale" 52Q "" 36Q " " 26Q "Signal Display for ") MakePrompt D1 (P 0 pw I 0 mw) lohdi H@gg Hgjd Hgjd oH iH Hgg Hgg Hgo Hg @gHj H(150Q PUTWINDOWPROP 136Q PUTWINDOWPROP 127Q PUTWINDOWPROP 114Q PUTWINDOWPROP 102Q PUTWINDOWPROP 70Q DSPSCROLL 63Q DSPFONT 53Q PUTWINDOWPROP 41Q PUTWINDOWPROP 27Q ATTACHWINDOW 11Q CREATEW) (142Q PromptWindow 133Q TOTOPFN 120Q REJECTMAINCOMS 111Q CLOSEW 106Q RESHAPEFN 77Q NILL 74Q PAGEFULLFN 45Q MINSIZE 33Q MAXSIZE 24Q RIGHT 21Q TOP) ( 124Q (OPENW TOTOPW) 57Q (GACHA 10Q) 3 (0 0 113Q 12Q)) LinkShow D1 (I 1 w I 0 ss) @AhA g (17Q \MakeLinkedWindow 6 DSPCLIPPINGREGION) (14Q end) () \ComputeZoomOffset D1 (L (2 compr2 1 compr1 0 width)) @dBAlNIL NIL () ZoomWindow D1 (P 1 subCompr P 0 compr I 1 w I 0 ss) 1Ag !H`׺kJJkY@AhA HI gI (56Q \MakeLinkedWindow 46Q \ComputeZoomOffset 36Q DSPCLIPPINGREGION 6 GETWINDOWUSERPROP) (51Q zoom 15Q ZoomRatio 3 Compression) () \MakeLinkedWindow D1 (P 7 link P 6 lw P 5 cr P 4 reg P 3 dummy P 2 compr I 4 subCompr I 3 linkType I 2 posOffset I 1 w I 0 ss) @@hhAg `@HdIA hA $K@BJK@@KK@K@  KjdLL A (oB hi ^dAghg KNAg i NgDJ NMBJDJ N AgNBC_ Nggi NgAB O Aggi (414Q WINDOWADDPROP 401Q WINDOWADDPROP 372Q MINUS 361Q WINDOWADDPROP 346Q WINDOWADDPROP 330Q REDISPLAYW 324Q PositionSignalWindow 306Q PUTWINDOWPROP 273Q SetAspect 267Q GETWINDOWUSERPROP 256Q ATTACHWINDOW 240Q NewShow 235Q CREATEW 230Q CONCAT 216Q \INSUREWINDOW 212Q CREATEREGION 66Q DSPCLIPPINGREGION 57Q \INSUREWINDOW 27Q GETWINDOWUSERPROP) (410Q UnlinkWindow 405Q CLOSEFN 365Q LinkedWindows 355Q UnlinkWindow 352Q CLOSEFN 334Q LinkedWindows 277Q Compression 264Q DisplayedAspect 252Q LOCALCLOSE 246Q BOTTOM 167Q SignalSegment 163Q SignalSegment 153Q SignalSegment 147Q SignalSegment 136Q SignalSegment 127Q SignalSegment 121Q SignalSegment 115Q SignalSegment 101Q SignalSegment 75Q SignalSegment 37Q SignalSegment 32Q SignalSegmentTYPE# 24Q Compression 12Q SignalSegment 3 SignalSegment) ( 224Q " at offset ") UnlinkWindow D1 (I 0 w) #@ g@d g  @g @ (40Q DETACHWINDOW 34Q WINDOWDELPROP 25Q WINDOWDELPROP 21Q GETWINDOWUSERPROP 13Q MAINWINDOW 3 MAINWINDOW) (31Q LinkedWindows 16Q LinkedWindows 6 LinkedWindows) () ClearSignalWindow D1 (I 0 w) @h@ k (11Q PositionSignalWindow 5 DSPLEFTMARGIN) NIL () RepaintSingleValuedAspect D1 (P 6 nWidth P 5 nLeft P 4 rRight P 3 rLeft P 2 eRight P 1 eLeft P 0 extent I 1 region I 0 window F 7 \DSLNoDataShade) @ @ @ HHHAAA$IKKALdIIKLJ%KdJJALKdJJA Wh@ KdIILdJJM^jMANA bA@g @A@g @A (245Q RepaintSingleValuedAspect/File 237Q RepaintSingleValuedAspect/Array 234Q GETWINDOWUSERPROP 220Q GETWINDOWUSERPROP 202Q CREATEREGION 136Q DSPFILL 127Q CREATEREGION 13Q \INSUREWINDOW 7 UpdateSignalCompression 3 UpdateSignalOrigin) (231Q SignalFile 215Q SignalFile) () RepaintSingleValuedAspect/File D1 (P 12Q offset P 11Q format P 10Q count P 7 datum P 6 index P 5 start P 4 pos P 3 eof P 2 compr P 1 ss P 0 file I 1 region I 0 window F 13Q \SSDataArray F 14Q PCDAC.BOARD) @g @g  Igg _Igg W _H [@g ZdA]JAk_JMJHj HWkjOO jMJսOJ_MOK%HKl HWkNOkOO OJ_HM HWONOO @AWj (272Q RepaintSingleValuedAspect/Array 262Q AWIN 244Q SETFILEPTR 226Q AWIN 203Q SETFILEPTR 144Q AWIN 126Q SETFILEPTR 72Q GETWINDOWUSERPROP 62Q GETEOFPTR 53Q \PCDAC.DATAOFFSET 46Q AspectProperty 32Q AspectProperty 15Q GETWINDOWUSERPROP 6 GETWINDOWUSERPROP) (67Q Compression 43Q SampleOffset 40Q Data 27Q SampleFormat 24Q Data 12Q SignalSegment 3 SignalFile) () RedisplayMarks D1 (P 12Q pp P 11Q right P 10Q left P 7 file P 6 getFn P 5 posFn P 4 mDelta P 3 height P 2 base P 1 compr P 0 ss I 1 reg I 0 w) S@g @g @g @g j@g @g @g xOtAd@ b_dA_H_dO_dO؅IO` OO_I`OhOO_dO؅lMHO_dO؅IJKOhL@hOH@g g H@g g lN O_Ody_d\OرP(446Q ShowMark 435Q AspectProperty 427Q GETWINDOWUSERPROP 417Q AspectProperty 411Q GETWINDOWUSERPROP 207Q MINUS 77Q DSPCLIPPINGREGION 61Q GETWINDOWUSERPROP 52Q GETWINDOWUSERPROP 43Q GETWINDOWUSERPROP 33Q GETWINDOWUSERPROP 24Q GETWINDOWUSERPROP 15Q GETWINDOWUSERPROP 6 GETWINDOWUSERPROP) (513Q SignalSegment 503Q SignalSegment 432Q SampleOffset 424Q DisplayedAspect 414Q SampleFormat 406Q DisplayedAspect 362Q SignalSegment 352Q SignalSegment 342Q SignalSegment 313Q SignalSegment 303Q SignalSegment 273Q SignalSegment 243Q LeftOff 234Q SignalSegment 204Q LeftOff 170Q SignalSegment 160Q SignalSegment 150Q SignalSegment 120Q SignalSegment 56Q SignalFile 47Q GetFn 40Q PositionFn 30Q SignalHeight 21Q SignalBase 12Q Compression 3 SignalSegment) () ReshapeSignalWindow D1 (P 1 deltaY P 0 reg I 0 window) @g h@  vh@ h@ @g`H`kIll׺dJJ @gHHl h@ h@ $n`@ @ @H@g @H (207Q REDISPLAYW 202Q \UpdateLinks 177Q GETWINDOWUSERPROP 163Q UpdateScaleFactor 157Q DSPRIGHTMARGIN 144Q DSPFONT 137Q DSPLEFTMARGIN 132Q PUTWINDOWPROP 107Q PUTWINDOWPROP 40Q FONTHEIGHT 35Q DSPFONT 30Q DSPCLIPPINGREGION 21Q \CheckWidthVsCompr 13Q DSPCLIPPINGREGION 6 GETWINDOWUSERPROP) (174Q Compression 113Q SignalBase 62Q MarkCycleLength 52Q MinSignalHeight 47Q SignalHeight 3 Compression) () \UpdateLinks D1 (P 2 lw P 1 ss I 2 compr I 1 width I 0 w) n@g @g HhZdg@JABI  33Q SignalSegment) () ShowMark D1 (P 7 RESETSTATE P 6 MACROY P 4 OLDVALUE P 1 maxX P 0 lf I 11Q val I 10Q pos I 7 window I 6 mDelta I 5 oldy I 4 point I 3 h I 2 y I 1 x I 0 ss F 10Q RESETVARSLST)  hG 1A`BC HF G GDZdJ؅Gdg @ hG YABCFG ABCFkhG ABCFhG G G 1gLhhWcog g_McgM ODIhG dKK`A EAEG FH`H (363Q IMOD 357Q MINUS 344Q MOVETO 330Q MINUS 312Q DSPXPOSITION 277Q ERROR! 270Q APPLY 242Q ShowMarkA0001 206Q OUTPUT 201Q MOVETO 171Q FONTDESCENT 166Q DSPFONT 154Q DRAWTO 136Q MOVETO 122Q DSPXPOSITION 114Q SecPrint 110Q GETWINDOWUSERPROP 37Q MOVETO 27Q MINUS 22Q MINUS 5 DSPLINEFEED) (353Q MarkCycleLength 324Q LeftOff 261Q OUTPUT 246Q ERROR 237Q INTERNAL 214Q OUTPUT 105Q DisplayedAspect 75Q SignalSegment 65Q SignalSegment 56Q SignalSegment 14Q LeftOff) ( 234Q (ShowMarkA0001)) PrintSignalSegment D1 (I 0 ss) ``g@ (16Q SSFullName) (12Q {SS} 6 SSRereadChar 2 SSRereadable) () SSFullName D1 (I 0 ss) `@X@@ @ hg@%`oi @g @gh @(125Q PACK 122Q \NCONC2 101Q SSNewName 76Q GENSYM 66Q PRIN1 34Q SSFullName) (133Q SignalSegment 114Q anon 106Q SignalSegment 73Q SS 54Q SSRereadable 45Q SignalSegment 41Q / 27Q SignalSegment 17Q SignalSegment 13Q SignalSegment 3 SignalSegment) ( 62Q "assigning random name to unnamed signal segment") FindSSA0004 D1 (NAME ERRORSET F 0 expandFlg F 1 HASHFILERDTBL F 2 fullName F 3 sf) P`cRhSg h(23Q LOOKUPHASHFILE) (20Q RETRIEVE 7 SSReadTable 3 SSExpandFlg) () FindSS D1 (P 4 MACROY P 3 MACROX P 1 sf I 2 dontCacheFlg I 1 expandFlg I 0 fullName F 5 RESETVARSLST F 6 HASHFILERDTBL) ib@` `!Hh@hI @`d@Ig dJ ` g`gVUc Uog KK[c LdUKc U UkL KA B@h` HXn(235Q PUTHASH 222Q SSFromFile 214Q ERROR! 203Q NLEFT 174Q TAILP 136Q FindSSA0004 76Q PUTHASH 62Q HASHFILEPROP 35Q LOOKUPHASHFILE) (232Q SSDir 144Q SSExpandFlg 133Q INTERNAL 110Q HASHFILERDTBL 104Q SSExpandFlg 101Q SSExpandFlg 73Q SSDir 57Q NAME 45Q SignalSegmentTYPE# 14Q SignalFiles 6 SSDir) ( 130Q (FindSSA0004)) PromptForSSFile D1 (P 2 nf I 1 w I 0 ss) `o@ HdIgHdIdg dgjdndhHdI  Jdhg(Ai oi i i okl J(201Q DSLPromptRead 166Q SSFile 162Q READ 155Q PRIN1 144Q TERPRI 117Q MENU 36Q SFNames 16Q CONCAT 13Q SSFullName) (132Q {NewFile} 64Q DEFAULTMENUHELDFN 55Q CLRPROMPT 33Q {NewFile} 2 MENUTYPE#) ( 173Q "New file name: " 151Q "New file name: " 7 "Choose file for ") SSFile D1 (P 3 hf P 2 f P 0 nfn I 1 newFlg I 0 file F 4 DWIMWAIT) @ %`INh@ @ @ Xd KJAC@i oi Tg g'@glld [@Jg JiIYKKd``o@ K(221Q HELP 150Q HASHFILEPROP 133Q CREATEHASHFILE 112Q ASKUSER 102Q PRIN1 71Q PRIN1 53Q OPENHASHFILE 45Q SPELLFILE 37Q OPENHASHFILE 32Q INFILEP 6 HASHFILEP) (207Q SignalFiles 203Q SignalFiles 175Q SignalFiles 145Q NAME 124Q EXPR 115Q Y 107Q N 13Q SignalFiles) ( 215Q "Can:t find/make signal file " 76Q " does not exist - create it? ") CleanupSSFiles D1 (P 3 olld P 2 new P 1 f I 0 files) )@`1HhYi I`[HXJ(24Q CLOSEHASHFILE) (31Q SignalFiles 5 SignalFiles) () SaveSSA0001 D1 (NAME ERRORSET F 0 fullName F 1 ss F 2 hf) iPQ R hh(15Q PUTHASHFILE 11Q SSFileForm) (3 SSRereadable) () SaveSS D1 (P 10Q p P 6 MACROY P 5 MACROX P 4 f P 2 fullName P 1 hf P 0 ss I 4 w I 3 saveSubs I 2 dontScrubFlg I 1 ssFile I 0 ss F 11Q RESETVARSLST) @d` !H ZAM`KYhYHD YIg`WcWog MNdW3McA@ !Hd2@A @Yh@A BH ZHJiIh(51Q ScrubSS 41Q \DeleteMark1 20Q \DeleteMark1 4 GrabMark) (24Q SignalSegment) () ScrubSS D1 (P 2 p P 1 f I 1 recFlg I 0 ss) @ `@ h` `H@h @hA8@,@ hIg @ hI HXdJi @h@g@gg(141Q ScrubSS 120Q PUTHASHFILE 113Q SSFullName 106Q LOOKUPHASHFILE 76Q SSFullName 23Q PUTHASH 14Q SSFullName 3 SSFullName) (202Q invalid 175Q invalid 172Q SignalSegment 164Q invalid 161Q SignalSegment 152Q SignalSegment 103Q RETRIEVE 64Q SignalSegment 52Q SignalSegment 43Q SignalSegment 27Q SignalFiles 20Q SSDir 6 SSDir) () InsertMark D1 (L (1 mark 0 points)) S@!HDAYdI؅HZdJ؅HXHAHhNIL (77Q SignalSegment 67Q SignalSegment 60Q SignalSegment 41Q SignalSegment 31Q SignalSegment 22Q SignalSegment) () \MoveMark1A0001 D1 (NAME ERRORSET L (0 NIL) F 2 pos F 3 mark F 4 compr F 5 ss F 6 str F 7 w F 10Q RESETVARSLST F 11Q file F 12Q value F 13Q base F 14Q height F 15Q del F 16Q format F 17Q posFn F 20Q offset F 21Q getFn F 22Q reg F 23Q right F 24Q left F 25Q dontMove F 26Q RESETY F 27Q region) qghV VhgV hWcgd gi WcSHdH؅TkTcWRTlWWWW lW"cURWWShWWRTW W*o` hWcW.`` "`lHj HH RV }URWWShWWRTW hW c$c(W$kc&W(W&V HdIIHdIIcWRTlWURWWShWWRTWWW lW"c `ljjhV hV ESRTHdIH"HHIHIURWWShWWRTW WSHdH؅lWUSHdH؅TkTWWShWWhWWW lW" UUhhUS SUW c,i(1153Q \RedisplayMark 1143Q InsertMark 1107Q ShowMark 733Q ShowMark 601Q INSIDEP 576Q CURSORPOSITION 571Q DSPCLIPPINGREGION 547Q GETMOUSESTATE 543Q BLOCK 537Q ShowMark 431Q LASTMOUSEX 401Q DSPCLIPPINGREGION 372Q ShowMark 343Q EQP 340Q LASTMOUSEX 331Q BLOCK 321Q \FZEROP 271Q GETMOUSESTATE 264Q INSIDEP 240Q SETCURSOR 217Q ShowMark 65Q ALLOW.BUTTON.EVENTS 53Q SETTOPVAL 43Q GETTOPVAL 23Q DSPOPERATION 7 DSPOPERATION) (1135Q SignalSegment 1123Q SignalSegment 1114Q SignalSegment 1043Q SignalSegment 1033Q SignalSegment 1024Q SignalSegment 773Q SignalSegment 763Q SignalSegment 754Q SignalSegment 677Q SignalSegment 662Q SignalSegment 653Q SignalSegment 646Q SignalSegment 633Q SignalSegment 625Q SignalSegment 553Q LASTMOUSEBUTTONS 275Q LASTMOUSEBUTTONS 261Q LASTMOUSEY 256Q LASTMOUSEX 235Q SSCursor2 123Q SignalSegment 113Q SignalSegment 104Q SignalSegment 47Q \MarkOprInProgress 37Q \MarkOprInProgress 17Q INVERT 2 DSPOPERATION) ( 232Q (CURSOR T)) \MoveMark1 D1 (P 22Q RESETZ P 21Q RESETY P 20Q LISPXHIST P 17Q right P 16Q left P 15Q reg P 14Q value P 13Q pos P 12Q region P 11Q format P 10Q offset P 7 del P 6 file P 5 posFn P 4 getFn P 3 base P 2 height P 1 compr P 0 str I 3 dontMove I 2 w I 1 ss I 0 mark F 23Q LISPXHIST F 24Q RESETVARSLST) B Bg Bg Bg Bg Bg Bg jhB `ABg g ABg g B [W&!W(og hg_$ O$O"(177Q ERROR! 171Q RESETRESTORE 156Q \MoveMark1A0001 130Q \INSUREWINDOW 124Q AspectProperty 116Q GETWINDOWUSERPROP 106Q AspectProperty 100Q GETWINDOWUSERPROP 63Q DSPLINEFEED 55Q GETWINDOWUSERPROP 46Q GETWINDOWUSERPROP 37Q GETWINDOWUSERPROP 30Q GETWINDOWUSERPROP 21Q GETWINDOWUSERPROP 12Q GETWINDOWUSERPROP 3 DECODE/WINDOW/OR/DISPLAYSTREAM) (164Q ERROR 153Q INTERNAL 121Q SampleFormat 113Q DisplayedAspect 103Q SampleOffset 75Q DisplayedAspect 67Q MarkCycleLength 52Q SignalFile 43Q PositionFn 34Q GetFn 25Q SignalBase 16Q SignalHeight 7 Compression) ( 150Q (\MoveMark1A0001)) NewMark D1 (P 0 mark I 4 dontMove I 3 end? I 2 subSS I 1 w I 0 ss) 5B `d@ dAokl d bhChXd@AD H(61Q \MoveMark1 40Q SSNewName 32Q DSLPromptRead) (10Q SignalSegmentTYPE#) ( 24Q "Name for new SS: ") NewSS D1 (P 2 aspectName P 0 beginning I 1 w I 0 ss) D@A H@AHi `IhZ@ HJgHIY(46Q GetAspect 22Q NewMark 4 NewMark) (67Q SignalSegment 61Q Inherited 55Q SignalSegment 27Q SSAutoInheritAspects) () AddSS D1 (P 1 sub P 0 name I 1 w I 0 ss) LAokl Hk gH@ gHh i Y@AIhi @AIid o (111Q PROMPTPRINT 101Q NewMark 70Q NewMark 54Q FindSS 50Q PACK 35Q SSFullName 22Q NTHCHAR 12Q DSLPromptRead) (40Q / 25Q /) ( 106Q "SS by that name not found" 4 "Name of existing sub-segment: ") JumpTo D1 (P 1 compr P 0 mark I 1 w I 0 ss) X@A 1HFAg YAHZdJ؅IhA lջjKKjI A o (125Q PROMPTPRINT 115Q REDISPLAYW 111Q PositionSignalWindow 65Q DSPCLIPPINGREGION 21Q GETWINDOWUSERPROP 4 MenuChooseMark) (55Q SignalSegment 45Q SignalSegment 36Q SignalSegment 16Q Compression) ( 122Q "No such mark") ToggleMarks D1 (P 1 p I 1 w I 0 ss) sA HgH gHiAgg o A Agg o @HA Yd`dhi HX(152Q FindSS 130Q RedisplayMarks 105Q PROMPTPRINT 76Q WINDOWADDPROP 63Q REDISPLAYW 57Q PROMPTPRINT 50Q WINDOWDELPROP 3 \INSUREWINDOW) (141Q SignalSegmentTYPE# 111Q SignalSegment 73Q RedisplayMarks 70Q REPAINTFN 45Q RedisplayMarks 42Q REPAINTFN 26Q RedisplayMarks 14Q RedisplayMarks) ( 102Q "Marks now displayed" 54Q "Marks no longer displayed") \DeleteMark1 D1 (I 2 w I 1 ss I 0 mark) @A@A @AB (30Q \RedisplayMark 20Q DREMOVE) (13Q SignalSegment 6 SignalSegment) () \RedisplayMark D1 (P 2 truePos P 1 r P 0 compr I 2 w I 1 ss I 0 mark) JBg hB "@[dK؅HkHZIJ`I@BI (107Q REDISPLAYW 16Q \APPEND2 13Q DSPCLIPPINGREGION 6 GETWINDOWUSERPROP) (71Q LeftOff 53Q SignalSegment 43Q SignalSegment 34Q SignalSegment 3 Compression) () MoveMark D1 (P 3 other P 2 duration P 1 offset P 0 mark I 2 bothFlg I 1 w I 0 ss) A@ aHBHHH@A H@A B@h\-h[d@A HdEH^d-Nذ#]HMHMiLJHJ@@hh@K K@A (272Q \RedisplayMark 264Q InsertMark 110Q \DeleteMark1 54Q \MoveMark1 46Q \DeleteMark1 4 GrabMark) (256Q SignalSegment 244Q SignalSegment 235Q SignalSegment 226Q SignalSegment 212Q SignalSegment 146Q SignalSegment 137Q SignalSegment 123Q SignalSegment 67Q SignalSegment 35Q SignalSegment 25Q SignalSegment) () ChooseMarkSelectFn D1 (L (2 key 1 menu 0 item) F 2 $ss$) 1RHhY@IBgIiHXNIL (42Q MIDDLE 25Q SignalSegment 3 SignalSegment) () MenuChooseMark D1 (I 1 w I 0 $ss$) to `@1H