/ Celestin Apprentice 2 / Apprentice-Release2.iso / Tools / Languages / Mops 2.5 / Mops source.sit / Mops source / Module source / TEFwindMod.txt

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0e 54 45 46 77 69 6e | 64 4d 6f 64 2e 74 78 74 |..TEFwin|dMod.txt|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 53 45 | 54 01 00 00 00 00 00 00 |.TEXTMSE|T.......|
|00000050| 00 00 00 00 00 21 41 00 | 00 01 77 aa ab 89 df aa |.....!A.|..w.....|
|00000060| ab 89 df 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 26 88 00 00 |........|....&...|
|00000080| 5c 20 31 35 4d 61 79 39 | 33 20 44 42 48 20 20 43 |\ 15May9|3 DBH  C|
|00000090| 68 61 6e 67 65 20 65 63 | 68 6f 76 65 63 20 70 65 |hange ec|hovec pe|
|000000a0| 72 20 6d 72 68 2e 20 20 | 53 65 70 61 72 61 74 65 |r mrh.  |Separate|
|000000b0| 20 54 45 53 63 72 6f 6c | 6c 65 72 20 61 6e 64 20 | TEScrol|ler and |
|000000c0| 54 45 77 69 6e 64 20 63 | 6f 64 65 0d 09 5c 20 69 |TEwind c|ode..\ i|
|000000d0| 6e 74 6f 20 64 69 66 66 | 65 72 65 6e 74 20 66 69 |nto diff|erent fi|
|000000e0| 6c 65 73 2e 20 20 49 6d | 70 6c 65 6d 65 6e 74 20 |les.  Im|plement |
|000000f0| 6c 69 6e 65 45 6e 64 3a | 20 6d 65 74 68 6f 64 20 |lineEnd:| method |
|00000100| 69 6e 20 69 6e 74 65 70 | 72 65 74 3a 0d 5c 20 31 |in intep|ret:.\ 1|
|00000110| 34 4d 61 79 39 33 20 44 | 42 48 20 44 72 6f 70 70 |4May93 D|BH Dropp|
|00000120| 65 64 20 6e 65 77 3a 20 | 61 6e 64 20 74 65 73 74 |ed new: |and test|
|00000130| 3a 20 6d 65 74 68 6f 64 | 73 2e 0d 09 5c 20 41 64 |: method|s...\ Ad|
|00000140| 64 65 64 20 65 6e 61 62 | 6c 65 3a 20 61 6e 64 20 |ded enab|le: and |
|00000150| 64 69 73 61 62 6c 65 3a | 20 6d 65 74 68 6f 64 73 |disable:| methods|
|00000160| 20 0d 09 5c 20 52 65 77 | 6f 72 6b 65 64 20 69 6e | ..\ Rew|orked in|
|00000170| 74 65 72 70 72 65 74 3a | 20 74 6f 20 65 6c 69 6d |terpret:| to elim|
|00000180| 69 6e 61 74 65 20 6c 6f | 63 61 6c 20 76 61 72 69 |inate lo|cal vari|
|00000190| 61 62 6c 65 73 2e 0d 09 | 5c 20 4d 61 64 65 20 74 |ables...|\ Made t|
|000001a0| 68 65 54 45 53 63 72 6f | 6c 6c 65 72 20 61 6e 20 |heTEScro|ller an |
|000001b0| 69 76 61 72 2e 20 20 4c | 6f 63 6b 3a 20 61 6e 64 |ivar.  L|ock: and|
|000001c0| 20 75 6e 6c 6f 63 6b 3a | 20 62 75 66 66 65 72 20 | unlock:| buffer |
|000001d0| 69 6e 20 69 6e 74 65 72 | 70 72 65 74 3a 0d 5c 20 |in inter|pret:.\ |
|000001e0| 31 31 4d 61 79 39 33 20 | 44 42 48 20 20 4e 65 77 |11May93 |DBH  New|
|000001f0| 45 76 65 6e 74 4c 6f 6f | 70 20 2d 3e 20 71 75 69 |EventLoo|p -> qui|
|00000200| 74 76 65 63 2e 0d 09 5c | 20 48 61 6e 64 6c 65 20 |tvec...\| Handle |
|00000210| 74 61 62 73 20 61 73 20 | 34 20 73 70 61 63 65 73 |tabs as |4 spaces|
|00000220| 2e 20 20 4d 61 6b 65 20 | 63 6f 64 65 20 69 6e 64 |.  Make |code ind|
|00000230| 65 70 65 6e 64 65 6e 74 | 20 6f 66 20 51 45 69 6e |ependent| of QEin|
|00000240| 69 74 20 66 69 6c 65 2e | 0d 5c 20 31 39 4d 61 79 |it file.|.\ 19May|
|00000250| 39 33 09 6d 72 68 09 4d | 61 64 65 20 74 68 65 54 |93.mrh.M|ade theT|
|00000260| 45 73 63 72 6f 6c 6c 65 | 72 20 61 20 73 75 62 76 |Escrolle|r a subv|
|00000270| 69 65 77 2e 20 20 41 64 | 64 65 64 20 74 68 65 53 |iew.  Ad|ded theS|
|00000280| 74 61 63 6b 2e 0d 5c 20 | 53 65 70 74 39 33 09 6d |tack..\ |Sept93.m|
|00000290| 72 68 09 72 65 76 69 73 | 65 64 20 66 6f 72 20 6e |rh.revis|ed for n|
|000002a0| 65 77 20 63 6f 6e 74 72 | 6f 6c 73 20 73 63 68 65 |ew contr|ols sche|
|000002b0| 6d 65 2e 0d 5c 20 4d 61 | 72 39 34 09 09 6d 72 68 |me..\ Ma|r94..mrh|
|000002c0| 20 61 64 61 70 74 65 64 | 20 66 6f 72 20 54 57 73 | adapted| for TWs|
|000002d0| 74 72 20 28 62 75 66 66 | 65 72 20 66 6f 72 20 6f |tr (buff|er for o|
|000002e0| 75 74 70 75 74 20 74 6f | 20 54 57 29 2e 20 20 41 |utput to| TW).  A|
|000002f0| 64 64 65 64 20 49 4e 49 | 54 46 4f 4e 54 0d 5c 09 |dded INI|TFONT.\.|
|00000300| 09 09 09 74 6f 20 44 53 | 3a 20 69 6e 20 53 74 61 |...to DS|: in Sta|
|00000310| 63 6b 56 69 65 77 2e 0d | 0d 0d 6e 65 65 64 09 54 |ckView..|..need.T|
|00000320| 45 53 63 72 6f 6c 6c 65 | 72 0d 5c 20 6e 65 65 64 |EScrolle|r.\ need|
|00000330| 09 61 6c 65 72 74 0d 0d | 54 45 73 63 72 6f 6c 6c |.alert..|TEscroll|
|00000340| 65 72 09 74 68 65 54 45 | 73 63 72 6f 6c 6c 65 72 |er.theTE|scroller|
|00000350| 0d 0d 28 2a 0d 5c 20 77 | 65 20 77 69 6c 6c 20 75 |..(*.\ w|e will u|
|00000360| 73 65 20 54 45 61 6c 65 | 72 74 20 77 68 65 6e 20 |se TEale|rt when |
|00000370| 74 68 65 20 54 45 20 73 | 69 7a 65 20 67 65 74 73 |the TE s|ize gets|
|00000380| 20 74 6f 6f 20 6c 61 72 | 67 65 0d 0d 31 20 61 6c | too lar|ge..1 al|
|00000390| 65 72 74 20 54 45 61 6c | 65 72 74 0d 0d 78 74 73 |ert TEal|ert..xts|
|000003a0| 7b 20 6e 75 6c 6c 20 7d | 20 39 30 30 20 69 6e 69 |{ null }| 900 ini|
|000003b0| 74 3a 20 54 45 61 6c 65 | 72 74 0d 0d 2a 29 0d 0d |t: TEale|rt..*)..|
|000003c0| 3a 20 54 45 53 69 7a 65 | 43 68 65 63 6b 20 20 28 |: TESize|Check  (|
|000003d0| 20 6e 20 2d 2d 20 29 09 | 09 5c 20 54 68 65 20 32 | n -- ).|.\ The 2|
|000003e0| 2e 34 20 61 6c 65 72 74 | 20 77 61 73 20 74 6f 6f |.4 alert| was too|
|000003f0| 20 6d 75 63 68 20 6f 66 | 20 61 20 70 65 73 74 2e | much of| a pest.|
|00000400| 20 20 4e 6f 77 0d 09 33 | 32 30 30 30 20 3e 09 09 |  Now..3|2000 >..|
|00000410| 09 09 09 5c 20 77 65 20 | 6a 75 73 74 20 71 75 69 |...\ we |just qui|
|00000420| 65 74 6c 79 20 64 65 6c | 65 74 65 20 73 6f 6d 65 |etly del|ete some|
|00000430| 20 74 65 78 74 20 66 72 | 6f 6d 20 74 68 65 0d 09 | text fr|om the..|
|00000440| 09 09 09 09 09 09 5c 20 | 66 72 6f 6e 74 2e 0d 09 |......\ |front...|
|00000450| 49 46 0d 09 09 30 20 20 | 32 30 30 30 20 20 73 65 |IF...0  |2000  se|
|00000460| 74 53 65 6c 65 63 74 3a | 20 74 68 65 54 45 73 63 |tSelect:| theTEsc|
|00000470| 72 6f 6c 6c 65 72 0d 09 | 09 63 6c 65 61 72 3a 20 |roller..|.clear: |
|00000480| 74 68 65 54 45 73 63 72 | 6f 6c 6c 65 72 0d 09 09 |theTEscr|oller...|
|00000490| 33 32 30 30 30 20 64 75 | 70 20 73 65 74 53 65 6c |32000 du|p setSel|
|000004a0| 65 63 74 3a 20 74 68 65 | 54 45 73 63 72 6f 6c 6c |ect: the|TEscroll|
|000004b0| 65 72 0d 0d 5c 09 09 63 | 75 74 3a 20 74 68 65 54 |er..\..c|ut: theT|
|000004c0| 45 73 63 72 6f 6c 6c 65 | 72 0d 5c 09 09 22 20 54 |Escrolle|r.\.." T|
|000004d0| 6f 6f 20 6d 75 63 68 20 | 74 65 78 74 20 69 6e 20 |oo much |text in |
|000004e0| 74 68 69 73 20 77 69 6e | 64 6f 77 21 20 20 57 65 |this win|dow!  We|
|000004f0| 27 76 65 20 43 75 74 20 | 61 20 62 69 74 20 66 72 |'ve Cut |a bit fr|
|00000500| 6f 6d 20 74 68 65 20 73 | 74 61 72 74 2e 22 0d 5c |om the s|tart.".\|
|00000510| 09 09 22 20 53 6f 72 72 | 79 2e 22 0d 5c 09 09 22 |.." Sorr|y.".\.."|
|00000520| 20 20 22 20 20 22 20 20 | 22 20 70 61 72 61 6d 54 |  "  "  |" paramT|
|00000530| 65 78 74 0d 5c 09 09 73 | 68 6f 77 3a 20 54 45 61 |ext.\..s|how: TEa|
|00000540| 6c 65 72 74 0d 5c 09 09 | 64 72 6f 70 20 20 51 55 |lert.\..|drop  QU|
|00000550| 49 54 0d 0d 09 54 48 45 | 4e 20 20 3b 0d 0d 0d 5c |IT...THE|N  ;...\|
|00000560| 20 73 75 70 70 6f 72 74 | 20 66 6f 72 20 69 6e 74 | support| for int|
|00000570| 65 72 70 72 65 74 61 74 | 69 6f 6e 0d 0d 3a 20 73 |erpretat|ion..: s|
|00000580| 6b 69 70 5f 6c 69 6e 65 | 0d 09 31 33 20 63 68 73 |kip_line|..13 chs|
|00000590| 65 61 72 63 68 3a 20 51 | 45 73 74 72 0d 09 6e 65 |earch: Q|Estr..ne|
|000005a0| 67 61 74 65 20 6d 6f 72 | 65 3a 20 51 45 73 74 72 |gate mor|e: QEstr|
|000005b0| 0d 09 64 65 6c 65 74 65 | 3a 20 51 45 73 74 72 20 |..delete|: QEstr |
|000005c0| 20 6e 6f 6c 69 6d 3a 20 | 51 45 73 74 72 20 3b 0d | nolim: |QEstr ;.|
|000005d0| 0d 3a 20 73 6b 69 70 31 | 0d 09 31 20 73 6b 69 70 |.: skip1|..1 skip|
|000005e0| 3a 20 51 45 73 74 72 20 | 3b 0d 0d 0d 3a 20 42 4c |: QEstr |;...: BL|
|000005f0| 2d 3e 43 52 2f 54 42 20 | 20 7b 20 5c 20 6e 6f 74 |->CR/TB | { \ not|
|00000600| 70 61 72 6d 73 20 2d 2d | 20 7d 0d 09 74 72 75 65 |parms --| }..true|
|00000610| 20 2d 3e 20 6e 6f 74 70 | 61 72 6d 73 0d 09 72 65 | -> notp|arms..re|
|00000620| 73 65 74 3a 20 51 45 73 | 74 72 0d 09 42 45 47 49 |set: QEs|tr..BEGI|
|00000630| 4e 0d 09 09 6c 65 6e 3a | 20 51 45 73 74 72 0d 09 |N...len:| QEstr..|
|00000640| 57 48 49 4c 45 0d 09 09 | 31 73 74 3a 20 51 45 73 |WHILE...|1st: QEs|
|00000650| 74 72 0d 09 09 43 41 53 | 45 5b 20 26 20 5c 20 5d |tr...CAS|E[ & \ ]|
|00000660| 3d 3e 20 20 6e 6f 74 70 | 61 72 6d 73 20 64 75 70 |=>  notp|arms dup|
|00000670| 20 64 72 6f 70 20 49 46 | 20 73 6b 69 70 5f 6c 69 | drop IF| skip_li|
|00000680| 6e 65 20 45 4c 53 45 20 | 73 6b 69 70 31 20 54 48 |ne ELSE |skip1 TH|
|00000690| 45 4e 0d 09 09 09 5b 20 | 26 20 7b 20 5d 3d 3e 20 |EN....[ |& { ]=> |
|000006a0| 20 66 61 6c 73 65 20 2d | 3e 20 6e 6f 74 70 61 72 | false -|> notpar|
|000006b0| 6d 73 20 73 6b 69 70 31 | 09 5c 20 64 6f 20 6e 6f |ms skip1|.\ do no|
|000006c0| 74 20 61 6c 6c 6f 77 20 | 73 6b 69 70 5f 6c 69 6e |t allow |skip_lin|
|000006d0| 65 20 61 66 74 65 72 20 | 61 20 27 7b 27 20 75 6e |e after |a '{' un|
|000006e0| 74 69 6c 20 27 7d 27 0d | 09 09 09 5b 20 26 20 7d |til '}'.|...[ & }|
|000006f0| 20 5d 3d 3e 20 20 74 72 | 75 65 20 20 2d 3e 20 6e | ]=>  tr|ue  -> n|
|00000700| 6f 74 70 61 72 6d 73 20 | 73 6b 69 70 31 09 5c 20 |otparms |skip1.\ |
|00000710| 6f 6b 20 74 6f 20 61 6c | 6c 6f 77 20 73 6b 69 70 |ok to al|low skip|
|00000720| 5f 6c 69 6e 65 20 61 66 | 74 65 72 20 61 20 27 7d |_line af|ter a '}|
|00000730| 27 0d 09 09 09 5b 20 30 | 20 33 31 20 52 41 4e 47 |'....[ 0| 31 RANG|
|00000740| 45 5d 3d 3e 20 33 32 20 | 63 68 6f 76 77 72 3a 20 |E]=> 32 |chovwr: |
|00000750| 51 45 73 74 72 0d 09 09 | 09 44 45 46 41 55 4c 54 |QEstr...|.DEFAULT|
|00000760| 3d 3e 20 64 72 6f 70 20 | 73 6b 69 70 31 0d 09 09 |=> drop |skip1...|
|00000770| 5d 43 41 53 45 0d 09 52 | 45 50 45 41 54 0d 09 72 |]CASE..R|EPEAT..r|
|00000780| 65 73 65 74 3a 20 51 45 | 73 74 72 20 3b 0d 0d 0d |eset: QE|str ;...|
|00000790| 0d 5c 20 53 74 61 63 6b | 56 69 65 77 20 69 73 20 |.\ Stack|View is |
|000007a0| 61 20 76 69 65 77 20 77 | 68 69 63 68 20 6a 75 73 |a view w|hich jus|
|000007b0| 74 20 64 69 73 70 6c 61 | 79 73 20 74 68 65 20 74 |t displa|ys the t|
|000007c0| 6f 70 20 66 65 77 20 73 | 74 61 63 6b 20 63 65 6c |op few s|tack cel|
|000007d0| 6c 73 2e 0d 5c 20 41 20 | 70 6f 73 73 69 62 6c 65 |ls..\ A |possible|
|000007e0| 20 70 72 6f 62 6c 65 6d | 20 69 73 20 74 68 61 74 | problem| is that|
|000007f0| 20 61 74 20 74 68 65 20 | 74 69 6d 65 20 6f 66 20 | at the |time of |
|00000800| 63 61 6c 6c 2c 20 4d 6f | 70 73 20 6d 61 79 20 68 |call, Mo|ps may h|
|00000810| 61 76 65 20 61 0d 5c 20 | 76 61 72 69 61 62 6c 65 |ave a.\ |variable|
|00000820| 20 6e 75 6d 62 65 72 20 | 6f 66 20 69 74 73 20 6f | number |of its o|
|00000830| 77 6e 20 71 75 61 6e 74 | 69 74 69 65 73 20 6f 6e |wn quant|ities on|
|00000840| 20 74 68 65 20 73 74 61 | 63 6b 2c 20 64 65 70 65 | the sta|ck, depe|
|00000850| 6e 64 69 6e 67 20 6f 6e | 20 74 68 65 0d 5c 20 63 |nding on| the.\ c|
|00000860| 69 72 63 75 6d 73 74 61 | 6e 63 65 73 20 6f 66 20 |ircumsta|nces of |
|00000870| 74 68 65 20 63 61 6c 6c | 2e 20 20 57 65 20 61 76 |the call|.  We av|
|00000880| 6f 69 64 20 74 68 69 73 | 20 62 79 20 64 65 66 69 |oid this| by defi|
|00000890| 6e 69 6e 67 20 74 68 65 | 20 73 74 61 6e 64 61 72 |ning the| standar|
|000008a0| 64 0d 5c 20 44 52 41 57 | 3a 20 6d 65 74 68 6f 64 |d.\ DRAW|: method|
|000008b0| 20 74 6f 20 64 6f 20 6e | 6f 74 68 69 6e 67 2c 20 | to do n|othing, |
|000008c0| 61 6e 64 20 61 63 74 75 | 61 6c 6c 79 20 64 6f 20 |and actu|ally do |
|000008d0| 74 68 65 20 64 72 61 77 | 69 6e 67 20 61 74 20 72 |the draw|ing at r|
|000008e0| 65 67 75 6c 61 72 0d 5c | 20 69 6e 74 65 72 76 61 |egular.\| interva|
|000008f0| 6c 73 20 6f 6e 20 61 6e | 20 69 64 6c 65 20 65 76 |ls on an| idle ev|
|00000900| 65 6e 74 2c 20 77 68 69 | 63 68 20 67 65 6e 65 72 |ent, whi|ch gener|
|00000910| 61 6c 6c 79 20 68 61 73 | 20 74 68 65 20 73 61 6d |ally has| the sam|
|00000920| 65 20 6e 75 6d 62 65 72 | 20 6f 66 0d 5c 20 4d 6f |e number| of.\ Mo|
|00000930| 70 73 27 20 71 75 61 6e | 74 69 74 69 65 73 20 6f |ps' quan|tities o|
|00000940| 6e 20 74 68 65 20 73 74 | 61 63 6b 20 28 63 75 72 |n the st|ack (cur|
|00000950| 72 65 6e 74 6c 79 20 32 | 29 2e 20 20 57 65 20 64 |rently 2|).  We d|
|00000960| 6f 20 61 20 66 65 77 20 | 74 72 69 63 6b 73 20 74 |o a few |tricks t|
|00000970| 6f 0d 5c 20 61 76 6f 69 | 64 20 75 6e 6e 65 63 65 |o.\ avoi|d unnece|
|00000980| 73 73 61 72 79 20 64 72 | 61 77 69 6e 67 20 73 6f |ssary dr|awing so|
|00000990| 20 74 68 65 20 76 69 65 | 77 20 64 6f 65 73 6e 27 | the vie|w doesn'|
|000009a0| 74 20 66 6c 69 63 6b 65 | 72 20 74 6f 6f 20 6d 75 |t flicke|r too mu|
|000009b0| 63 68 2e 20 20 57 65 0d | 5c 20 6f 6e 6c 79 20 64 |ch.  We.|\ only d|
|000009c0| 72 61 77 20 69 66 20 74 | 68 65 20 64 65 70 74 68 |raw if t|he depth|
|000009d0| 20 68 61 73 20 63 68 61 | 6e 67 65 64 20 73 69 6e | has cha|nged sin|
|000009e0| 63 65 20 74 68 65 20 6c | 61 73 74 20 69 64 6c 65 |ce the l|ast idle|
|000009f0| 2c 20 6f 72 20 69 66 20 | 74 68 65 0d 5c 20 76 61 |, or if |the.\ va|
|00000a00| 6c 75 65 20 64 72 61 77 | 53 74 61 63 6b 3f 20 68 |lue draw|Stack? h|
|00000a10| 61 73 20 62 65 65 6e 20 | 73 65 74 20 74 72 75 65 |as been |set true|
|00000a20| 2c 20 77 68 69 63 68 20 | 68 61 70 70 65 6e 73 20 |, which |happens |
|00000a30| 77 68 65 6e 20 77 65 20 | 69 6e 74 65 72 70 72 65 |when we |interpre|
|00000a40| 74 0d 5c 20 73 6f 6d 65 | 74 68 69 6e 67 20 28 61 |t.\ some|thing (a|
|00000a50| 6e 64 20 77 65 20 73 65 | 74 20 69 74 20 62 61 63 |nd we se|t it bac|
|00000a60| 6b 20 66 61 6c 73 65 20 | 72 65 61 64 79 20 66 6f |k false |ready fo|
|00000a70| 72 20 6e 65 78 74 20 74 | 69 6d 65 29 2e 0d 0d 09 |r next t|ime)....|
|00000a80| 30 09 76 61 6c 75 65 09 | 6c 61 73 74 44 65 70 74 |0.value.|lastDept|
|00000a90| 68 0d 09 30 09 76 61 6c | 75 65 09 69 64 6c 65 43 |h..0.val|ue.idleC|
|00000aa0| 6e 74 0d 66 61 6c 73 65 | 09 76 61 6c 75 65 09 64 |nt.false|.value.d|
|00000ab0| 72 61 77 53 74 61 63 6b | 3f 0d 0d 0d 0d 3a 20 45 |rawStack|?....: E|
|00000ac0| 76 61 6c 46 72 6f 6d 51 | 45 20 20 7b 20 5c 20 78 |valFromQ|E  { \ x|
|00000ad0| 31 20 2d 2d 20 78 31 20 | 7d 0d 09 09 5c 20 45 76 |1 -- x1 |}...\ Ev|
|00000ae0| 61 6c 75 61 74 65 73 20 | 63 6f 6e 74 65 6e 74 73 |aluates |contents|
|00000af0| 20 6f 66 20 51 45 73 74 | 72 2e 20 20 49 66 20 77 | of QEst|r.  If w|
|00000b00| 65 27 72 65 20 75 73 69 | 6e 67 0d 09 09 5c 20 66 |e're usi|ng...\ f|
|00000b10| 57 69 6e 64 2c 20 74 68 | 65 72 65 27 73 20 61 6e |Wind, th|ere's an|
|00000b20| 20 65 78 74 72 61 20 69 | 74 65 6d 20 6f 6e 20 74 | extra i|tem on t|
|00000b30| 68 65 20 73 74 61 63 6b | 0d 09 09 5c 20 74 68 61 |he stack|...\ tha|
|00000b40| 74 20 77 65 20 68 61 76 | 65 20 74 6f 20 73 61 76 |t we hav|e to sav|
|00000b50| 65 20 2d 20 64 6f 6e 27 | 74 20 61 73 6b 20 6d 65 |e - don'|t ask me|
|00000b60| 20 77 68 61 74 20 69 74 | 20 69 73 21 21 21 0d 09 | what it| is!!!..|
|00000b70| 0d 5c 09 66 57 69 6e 64 | 3f 20 49 46 20 2d 3e 20 |.\.fWind|? IF -> |
|00000b80| 78 31 20 20 54 48 45 4e | 0d 09 42 4c 2d 3e 43 52 |x1  THEN|..BL->CR|
|00000b90| 2f 54 42 0d 09 74 72 75 | 65 20 2d 3e 20 64 72 61 |/TB..tru|e -> dra|
|00000ba0| 77 53 74 61 63 6b 3f 09 | 09 09 5c 20 53 65 74 20 |wStack?.|..\ Set |
|00000bb0| 73 74 61 63 6b 20 64 69 | 73 70 6c 61 79 20 74 6f |stack di|splay to|
|00000bc0| 20 64 72 61 77 20 6f 6e | 20 6e 65 78 74 20 69 64 | draw on| next id|
|00000bd0| 6c 65 0d 09 6c 6f 63 6b | 3a 20 51 45 73 74 72 0d |le..lock|: QEstr.|
|00000be0| 09 67 65 74 3a 20 51 45 | 73 74 72 20 20 65 76 61 |.get: QE|str  eva|
|00000bf0| 6c 75 61 74 65 0d 09 75 | 6e 6c 6f 63 6b 3a 20 51 |luate..u|nlock: Q|
|00000c00| 45 73 74 72 0d 09 70 72 | 6f 6d 70 74 3f 20 66 57 |Estr..pr|ompt? fW|
|00000c10| 69 6e 64 3f 20 6f 72 20 | 49 46 20 20 6f 6b 20 20 |ind? or |IF  ok  |
|00000c20| 54 48 45 4e 0d 09 70 72 | 6f 6d 70 74 3f 20 49 46 |THEN..pr|ompt? IF|
|00000c30| 20 20 63 72 20 20 54 48 | 45 4e 09 09 5c 20 70 72 |  cr  TH|EN..\ pr|
|00000c40| 6f 6d 70 74 20 26 20 63 | 72 20 69 66 20 72 65 71 |ompt & c|r if req|
|00000c50| 75 69 72 65 64 0d 5c 09 | 66 57 69 6e 64 3f 20 49 |uired.\.|fWind? I|
|00000c60| 46 20 20 78 31 20 20 54 | 48 45 4e 20 20 3b 0d 3b |F  x1  T|HEN  ;.;|
|00000c70| 0d 0d 3a 20 2e 53 2b 0d | 09 2d 63 75 72 73 0d 09 |..: .S+.|.-curs..|
|00000c80| 2e 22 20 53 74 61 63 6b | 3a 20 20 22 0d 09 64 65 |." Stack|:  "..de|
|00000c90| 70 74 68 20 30 3c 3d 20 | 49 46 20 20 2e 22 20 65 |pth 0<= |IF  ." e|
|00000ca0| 6d 70 74 79 22 20 20 45 | 58 49 54 20 20 54 48 45 |mpty"  E|XIT  THE|
|00000cb0| 4e 0d 09 2e 22 20 64 65 | 70 74 68 20 22 20 20 64 |N..." de|pth "  d|
|00000cc0| 65 70 74 68 20 2e 20 20 | 63 72 0d 09 73 70 40 20 |epth .  |cr..sp@ |
|00000cd0| 64 65 70 74 68 20 31 2d | 20 46 4f 52 20 20 64 75 |depth 1-| FOR  du|
|00000ce0| 70 20 2e 63 65 6c 6c 20 | 63 72 20 20 34 2b 20 20 |p .cell |cr  4+  |
|00000cf0| 4e 45 58 54 20 20 64 72 | 6f 70 20 20 3b 0d 0d 0d |NEXT  dr|op  ;...|
|00000d00| 0d 3a 63 6c 61 73 73 20 | 20 53 54 41 43 4b 56 49 |.:class | STACKVI|
|00000d10| 45 57 20 20 73 75 70 65 | 72 7b 20 76 69 65 77 20 |EW  supe|r{ view |
|00000d20| 7d 0d 0d 3a 6d 20 44 53 | 3a 20 20 7b 20 5c 20 73 |}..:m DS|:  { \ s|
|00000d30| 76 50 6f 72 74 20 2d 2d | 20 7d 09 09 5c 20 44 6f |vPort --| }..\ Do|
|00000d40| 65 73 20 74 68 65 20 6d | 61 69 6e 20 77 6f 72 6b |es the m|ain work|
|00000d50| 20 66 6f 72 20 44 52 41 | 57 53 54 41 43 4b 3a 2e | for DRA|WSTACK:.|
|00000d60| 0d 0d 5c 20 46 69 72 73 | 74 2c 20 69 66 20 69 74 |..\ Firs|t, if it|
|00000d70| 27 73 20 74 69 6d 65 20 | 74 6f 20 64 72 61 77 20 |'s time |to draw |
|00000d80| 74 68 65 20 73 74 61 63 | 6b 2c 20 77 65 20 6d 61 |the stac|k, we ma|
|00000d90| 6b 65 20 73 75 72 65 20 | 77 65 27 76 65 20 66 6c |ke sure |we've fl|
|00000da0| 75 73 68 65 64 0d 5c 20 | 61 6e 79 20 70 65 6e 64 |ushed.\ |any pend|
|00000db0| 69 6e 67 20 6f 75 74 70 | 75 74 20 69 6e 20 74 68 |ing outp|ut in th|
|00000dc0| 65 20 6d 61 69 6e 20 76 | 69 65 77 2e 0d 0d 09 66 |e main v|iew....f|
|00000dd0| 6c 75 73 68 5f 54 57 73 | 74 72 0d 0d 5c 20 4e 6f |lush_TWs|tr..\ No|
|00000de0| 77 20 6c 65 74 27 73 20 | 64 72 61 77 20 74 68 61 |w let's |draw tha|
|00000df0| 74 20 73 74 61 63 6b 2e | 2e 2e 0d 0d 09 70 75 73 |t stack.|.....pus|
|00000e00| 68 50 6f 72 74 20 2d 3e | 20 73 76 50 6f 72 74 09 |hPort ->| svPort.|
|00000e10| 09 09 09 5c 20 50 6f 72 | 74 20 63 6f 75 6c 64 20 |...\ Por|t could |
|00000e20| 62 65 20 61 6e 79 74 68 | 69 6e 67 2c 20 73 6f 20 |be anyth|ing, so |
|00000e30| 77 65 20 68 61 76 65 20 | 74 6f 0d 09 67 65 74 3a |we have |to..get:|
|00000e40| 20 5e 6d 79 57 69 6e 64 | 20 20 73 65 74 3a 20 77 | ^myWind|  set: w|
|00000e50| 69 6e 64 6f 77 09 09 5c | 20 20 73 61 76 65 20 61 |indow..\|  save a|
|00000e60| 6e 64 20 72 65 73 74 6f | 72 65 0d 09 69 6e 69 74 |nd resto|re..init|
|00000e70| 46 6f 6e 74 09 09 09 09 | 09 09 5c 20 45 6e 73 75 |Font....|..\ Ensu|
|00000e80| 72 65 20 66 6f 6e 74 20 | 69 73 20 72 69 67 68 74 |re font |is right|
|00000e90| 0d 09 64 65 70 74 68 20 | 2d 3e 20 6c 61 73 74 44 |..depth |-> lastD|
|00000ea0| 65 70 74 68 0d 09 6f 6c | 64 56 65 63 73 0d 09 67 |epth..ol|dVecs..g|
|00000eb0| 65 74 3a 20 76 69 65 77 | 52 65 63 74 20 20 73 77 |et: view|Rect  sw|
|00000ec0| 61 70 20 31 35 20 2d 20 | 73 77 61 70 20 20 70 75 |ap 15 - |swap  pu|
|00000ed0| 74 3a 20 74 65 6d 70 52 | 65 63 74 0d 09 64 72 61 |t: tempR|ect..dra|
|00000ee0| 77 3a 20 74 65 6d 70 52 | 65 63 74 09 09 09 09 09 |w: tempR|ect.....|
|00000ef0| 5c 20 44 72 61 77 20 61 | 20 66 72 61 6d 65 0d 09 |\ Draw a| frame..|
|00000f00| 31 20 31 20 69 6e 73 65 | 74 3a 20 74 65 6d 70 52 |1 1 inse|t: tempR|
|00000f10| 65 63 74 0d 09 61 64 64 | 72 3a 20 74 65 6d 70 52 |ect..add|r: tempR|
|00000f20| 65 63 74 20 63 61 6c 6c | 20 43 6c 69 70 52 65 63 |ect call| ClipRec|
|00000f30| 74 0d 09 63 6c 65 61 72 | 3a 20 74 65 6d 70 52 65 |t..clear|: tempRe|
|00000f40| 63 74 0d 09 31 30 20 31 | 30 20 67 6f 74 6f 78 79 |ct..10 1|0 gotoxy|
|00000f50| 20 20 2e 73 2b 20 20 6e | 65 77 56 65 63 73 0d 09 |  .s+  n|ewVecs..|
|00000f60| 6e 6f 43 6c 69 70 09 09 | 09 09 09 09 09 5c 20 45 |noClip..|.....\ E|
|00000f70| 61 73 69 65 72 20 74 68 | 61 6e 20 73 61 76 69 6e |asier th|an savin|
|00000f80| 67 20 61 6e 64 20 72 65 | 73 74 6f 72 69 6e 67 21 |g and re|storing!|
|00000f90| 0d 09 73 76 50 6f 72 74 | 20 20 70 6f 70 50 6f 72 |..svPort|  popPor|
|00000fa0| 74 20 20 3b 6d 0d 0d 3a | 6d 20 44 52 41 57 3a 09 |t  ;m..:|m DRAW:.|
|00000fb0| 74 72 75 65 20 2d 3e 20 | 64 72 61 77 53 74 61 63 |true -> |drawStac|
|00000fc0| 6b 3f 20 20 3b 6d 0d 0d | 3a 6d 20 44 52 41 57 53 |k?  ;m..|:m DRAWS|
|00000fd0| 54 41 43 4b 3a 20 20 7b | 20 78 31 20 2d 2d 20 78 |TACK:  {| x1 -- x|
|00000fe0| 31 20 7d 20 5c 20 33 30 | 41 70 72 39 34 20 44 42 |1 } \ 30|Apr94 DB|
|00000ff0| 48 2c 20 6f 6e 65 20 6c | 65 73 73 20 73 74 61 63 |H, one l|ess stac|
|00001000| 6b 20 69 74 65 6d 20 74 | 6f 20 6d 61 6e 61 67 65 |k item t|o manage|
|00001010| 2e 0d 09 63 6c 72 53 74 | 6b 3f 20 0d 09 49 46 09 |...clrSt|k? ..IF.|
|00001020| 09 09 5c 20 57 65 27 76 | 65 20 62 65 65 6e 20 74 |..\ We'v|e been t|
|00001030| 6f 6c 64 20 74 6f 20 63 | 6c 65 61 72 20 74 68 65 |old to c|lear the|
|00001040| 20 73 74 61 63 6b 2c 20 | 73 6f 20 77 65 20 64 6f | stack, |so we do|
|00001050| 20 69 74 2c 0d 09 09 09 | 09 5c 20 20 64 72 61 77 | it,....|.\  draw|
|00001060| 20 69 74 2c 20 74 68 65 | 6e 20 67 65 74 20 6f 75 | it, the|n get ou|
|00001070| 74 2e 0d 09 09 73 70 30 | 20 73 70 21 20 20 64 73 |t....sp0| sp!  ds|
|00001080| 3a 20 73 65 6c 66 0d 09 | 09 66 61 6c 73 65 20 2d |: self..|.false -|
|00001090| 3e 20 63 6c 72 53 74 6b | 3f 0d 09 09 78 31 20 20 |> clrStk|?...x1  |
|000010a0| 45 58 49 54 0d 09 54 48 | 45 4e 0d 09 69 64 6c 65 |EXIT..TH|EN..idle|
|000010b0| 43 6e 74 09 4e 49 46 20 | 20 35 20 2d 3e 20 69 64 |Cnt.NIF | 5 -> id|
|000010c0| 6c 65 43 6e 74 20 20 45 | 4c 53 45 20 31 20 2d 2d |leCnt  E|LSE 1 --|
|000010d0| 3e 20 69 64 6c 65 43 6e | 74 20 20 54 48 45 4e 0d |> idleCn|t  THEN.|
|000010e0| 09 64 65 70 74 68 20 20 | 6c 61 73 74 44 65 70 74 |.depth  |lastDept|
|000010f0| 68 20 3c 3e 20 20 69 64 | 6c 65 43 6e 74 20 30 3d |h <>  id|leCnt 0=|
|00001100| 20 61 6e 64 09 5c 20 64 | 72 61 77 20 69 66 20 69 | and.\ d|raw if i|
|00001110| 74 27 73 20 74 69 6d 65 | 20 61 6e 64 20 64 65 70 |t's time| and dep|
|00001120| 74 68 20 69 73 20 64 69 | 66 66 74 0d 09 64 72 61 |th is di|fft..dra|
|00001130| 77 53 74 61 63 6b 3f 20 | 20 6f 72 20 20 66 61 6c |wStack? | or  fal|
|00001140| 73 65 20 2d 3e 20 64 72 | 61 77 53 74 61 63 6b 3f |se -> dr|awStack?|
|00001150| 09 5c 20 62 75 74 20 69 | 66 20 77 65 27 72 65 20 |.\ but i|f we're |
|00001160| 74 6f 6c 64 2c 20 77 65 | 20 64 72 61 77 20 61 6e |told, we| draw an|
|00001170| 79 77 61 79 0d 09 4e 49 | 46 20 20 78 31 20 20 45 |yway..NI|F  x1  E|
|00001180| 58 49 54 20 20 54 48 45 | 4e 0d 09 64 73 3a 20 73 |XIT  THE|N..ds: s|
|00001190| 65 6c 66 0d 09 78 31 20 | 3b 6d 0d 0d 3a 6d 20 49 |elf..x1 |;m..:m I|
|000011a0| 44 4c 45 3a 09 64 72 61 | 77 53 74 61 63 6b 3a 20 |DLE:.dra|wStack: |
|000011b0| 73 65 6c 66 20 20 3b 6d | 0d 0d 3a 6d 20 43 4c 41 |self  ;m|..:m CLA|
|000011c0| 53 53 49 4e 49 54 3a 0d | 09 70 61 72 4c 65 66 74 |SSINIT:.|.parLeft|
|000011d0| 20 70 61 72 54 6f 70 20 | 70 61 72 52 69 67 68 74 | parTop |parRight|
|000011e0| 20 70 61 72 54 6f 70 20 | 20 73 65 74 4a 75 73 74 | parTop | setJust|
|000011f0| 3a 20 73 65 6c 66 0d 09 | 30 20 30 20 30 20 31 30 |: self..|0 0 0 10|
|00001200| 30 20 20 73 65 74 42 6f | 75 6e 64 73 3a 20 73 65 |0  setBo|unds: se|
|00001210| 6c 66 20 20 3b 6d 0d 09 | 0d 3b 63 6c 61 73 73 0d |lf  ;m..|.;class.|
|00001220| 0d 0d 73 74 61 63 6b 56 | 69 65 77 09 74 68 65 53 |..stackV|iew.theS|
|00001230| 74 61 63 6b 0d 0d 3a 63 | 6c 61 73 73 09 54 45 46 |tack..:c|lass.TEF|
|00001240| 76 69 65 77 20 20 73 75 | 70 65 72 7b 20 76 69 65 |view  su|per{ vie|
|00001250| 77 20 7d 09 09 5c 20 46 | 6f 72 20 74 68 65 20 54 |w }..\ F|or the T|
|00001260| 45 46 77 69 6e 64 20 43 | 6f 6e 74 56 69 65 77 0d |EFwind C|ontView.|
|00001270| 0d 3a 6d 20 43 4c 41 53 | 53 49 4e 49 54 3a 0d 09 |.:m CLAS|SINIT:..|
|00001280| 63 6c 61 73 73 69 6e 69 | 74 3a 20 73 75 70 65 72 |classini|t: super|
|00001290| 0d 09 70 61 72 4c 65 66 | 74 20 70 61 72 54 6f 70 |..parLef|t parTop|
|000012a0| 20 70 61 72 52 69 67 68 | 74 20 70 61 72 42 6f 74 | parRigh|t parBot|
|000012b0| 74 6f 6d 20 20 73 65 74 | 4a 75 73 74 3a 20 74 68 |tom  set|Just: th|
|000012c0| 65 54 45 73 63 72 6f 6c | 6c 65 72 0d 09 30 20 31 |eTEscrol|ler..0 1|
|000012d0| 30 32 20 30 20 30 20 20 | 73 65 74 42 6f 75 6e 64 |02 0 0  |setBound|
|000012e0| 73 3a 20 74 68 65 54 45 | 73 63 72 6f 6c 6c 65 72 |s: theTE|scroller|
|000012f0| 20 20 3b 6d 0d 0d 3b 63 | 6c 61 73 73 0d 0d 0d 54 |  ;m..;c|lass...T|
|00001300| 45 46 76 69 65 77 09 09 | 54 46 56 09 09 09 5c 20 |EFview..|TFV...\ |
|00001310| 54 68 69 73 20 77 69 6c | 6c 20 62 65 20 74 68 65 |This wil|l be the|
|00001320| 20 43 6f 6e 74 56 69 65 | 77 0d 0d 0d 5c 20 3d 3d | ContVie|w...\ ==|
|00001330| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 20 48 65 72 65 |========|=== Here|
|00001340| 27 73 20 74 68 65 20 6d | 61 69 6e 20 54 45 46 77 |'s the m|ain TEFw|
|00001350| 69 6e 64 20 63 6c 61 73 | 73 20 3d 3d 3d 3d 3d 3d |ind clas|s ======|
|00001360| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 0d 0d 3a |========|=====..:|
|00001370| 63 6c 61 73 73 20 20 54 | 45 46 77 69 6e 64 20 20 |class  T|EFwind  |
|00001380| 73 75 70 65 72 7b 20 77 | 69 6e 64 6f 77 2b 20 7d |super{ w|indow+ }|
|00001390| 0d 0d 09 68 61 6e 64 6c | 65 09 42 55 46 46 45 52 |...handl|e.BUFFER|
|000013a0| 09 09 5c 20 6d 65 72 65 | 6c 79 20 61 20 70 6c 61 |..\ mere|ly a pla|
|000013b0| 63 65 20 74 6f 20 6d 61 | 6e 69 70 75 6c 61 74 65 |ce to ma|nipulate|
|000013c0| 20 74 68 65 20 54 45 73 | 63 72 61 70 20 68 61 6e | the TEs|crap han|
|000013d0| 64 6c 65 0d 0d 3a 6d 20 | 43 55 54 3a 0d 09 63 75 |dle..:m |CUT:..cu|
|000013e0| 74 3a 20 74 68 65 54 45 | 73 63 72 6f 6c 6c 65 72 |t: theTE|scroller|
|000013f0| 0d 09 66 69 78 50 61 6e | 52 65 63 74 3a 20 74 68 |..fixPan|Rect: th|
|00001400| 65 54 45 73 63 72 6f 6c | 6c 65 72 0d 09 63 61 72 |eTEscrol|ler..car|
|00001410| 65 74 49 6e 74 6f 56 69 | 65 77 3a 20 74 68 65 54 |etIntoVi|ew: theT|
|00001420| 45 73 63 72 6f 6c 6c 65 | 72 20 20 3b 6d 0d 0d 3a |Escrolle|r  ;m..:|
|00001430| 6d 20 43 4f 50 59 3a 0d | 09 63 6f 70 79 3a 20 74 |m COPY:.|.copy: t|
|00001440| 68 65 54 45 73 63 72 6f | 6c 6c 65 72 20 20 3b 6d |heTEscro|ller  ;m|
|00001450| 0d 0d 3a 6d 20 50 41 53 | 54 45 3a 0d 09 67 6c 6f |..:m PAS|TE:..glo|
|00001460| 62 61 6c 20 54 45 53 63 | 72 70 48 61 6e 64 6c 65 |bal TESc|rpHandle|
|00001470| 20 40 20 20 70 75 74 3a | 20 62 75 66 66 65 72 20 | @  put:| buffer |
|00001480| 20 73 69 7a 65 3a 20 62 | 75 66 66 65 72 0d 09 73 | size: b|uffer..s|
|00001490| 69 7a 65 3a 20 74 68 65 | 54 45 53 63 72 6f 6c 6c |ize: the|TEScroll|
|000014a0| 65 72 20 2b 20 20 54 45 | 53 69 7a 65 43 68 65 63 |er +  TE|SizeChec|
|000014b0| 6b 0d 09 70 61 73 74 65 | 3a 20 74 68 65 54 45 73 |k..paste|: theTEs|
|000014c0| 63 72 6f 6c 6c 65 72 0d | 09 66 69 78 50 61 6e 52 |croller.|.fixPanR|
|000014d0| 65 63 74 3a 20 74 68 65 | 54 45 73 63 72 6f 6c 6c |ect: the|TEscroll|
|000014e0| 65 72 0d 09 63 61 72 65 | 74 49 6e 74 6f 56 69 65 |er..care|tIntoVie|
|000014f0| 77 3a 20 74 68 65 54 45 | 73 63 72 6f 6c 6c 65 72 |w: theTE|scroller|
|00001500| 20 20 3b 6d 0d 0d 3a 6d | 20 43 4c 45 41 52 3a 0d |  ;m..:m| CLEAR:.|
|00001510| 09 63 6c 65 61 72 3a 20 | 74 68 65 54 45 73 63 72 |.clear: |theTEscr|
|00001520| 6f 6c 6c 65 72 0d 09 66 | 69 78 50 61 6e 52 65 63 |oller..f|ixPanRec|
|00001530| 74 3a 20 74 68 65 54 45 | 73 63 72 6f 6c 6c 65 72 |t: theTE|scroller|
|00001540| 0d 09 63 61 72 65 74 49 | 6e 74 6f 56 69 65 77 3a |..caretI|ntoView:|
|00001550| 20 74 68 65 54 45 73 63 | 72 6f 6c 6c 65 72 20 20 | theTEsc|roller  |
|00001560| 3b 6d 0d 0d 3a 6d 20 53 | 65 6c 41 6c 6c 3a 0d 09 |;m..:m S|elAll:..|
|00001570| 30 20 33 32 37 36 37 20 | 73 65 74 53 65 6c 65 63 |0 32767 |setSelec|
|00001580| 74 3a 20 74 68 65 54 45 | 73 63 72 6f 6c 6c 65 72 |t: theTE|scroller|
|00001590| 20 20 3b 6d 0d 0d 0d 3a | 6d 20 49 4e 53 45 52 54 |  ;m...:|m INSERT|
|000015a0| 3a 20 7b 20 61 64 64 72 | 20 6c 65 6e 20 2d 2d 20 |: { addr| len -- |
|000015b0| 7d 0d 09 73 69 7a 65 3a | 20 74 68 65 54 45 73 63 |}..size:| theTEsc|
|000015c0| 72 6f 6c 6c 65 72 20 20 | 6c 65 6e 20 2b 20 20 54 |roller  |len +  T|
|000015d0| 45 53 69 7a 65 43 68 65 | 63 6b 0d 09 61 64 64 72 |ESizeChe|ck..addr|
|000015e0| 20 6c 65 6e 20 20 69 6e | 73 65 72 74 3a 20 74 68 | len  in|sert: th|
|000015f0| 65 54 45 73 63 72 6f 6c | 6c 65 72 20 20 3b 6d 0d |eTEscrol|ler  ;m.|
|00001600| 0d 0d 3a 6d 20 49 4e 54 | 45 52 50 52 45 54 3a 20 |..:m INT|ERPRET: |
|00001610| 20 7b 20 5c 20 65 63 68 | 6f 43 52 3f 20 2d 2d 20 | { \ ech|oCR? -- |
|00001620| 7d 0d 09 73 65 6c 45 6e | 64 3a 20 74 68 65 54 45 |}..selEn|d: theTE|
|00001630| 73 63 72 6f 6c 6c 65 72 | 20 20 73 65 6c 53 74 61 |scroller|  selSta|
|00001640| 72 74 3a 20 74 68 65 54 | 45 73 63 72 6f 6c 6c 65 |rt: theT|Escrolle|
|00001650| 72 20 3d 0d 09 49 46 09 | 09 09 09 09 09 09 09 09 |r =..IF.|........|
|00001660| 5c 20 6e 6f 74 68 69 6e | 67 20 73 65 6c 65 63 74 |\ nothin|g select|
|00001670| 65 64 0d 09 09 67 65 74 | 4c 69 6e 65 3a 20 74 68 |ed...get|Line: th|
|00001680| 65 54 45 73 63 72 6f 6c | 6c 65 72 20 20 28 20 61 |eTEscrol|ler  ( a|
|00001690| 64 64 72 20 6c 65 6e 20 | 29 20 20 70 75 74 3a 20 |ddr len |)  put: |
|000016a0| 51 45 73 74 72 0d 09 09 | 74 72 75 65 20 2d 3e 20 |QEstr...|true -> |
|000016b0| 65 63 68 6f 43 52 3f 0d | 09 45 4c 53 45 09 09 09 |echoCR?.|.ELSE...|
|000016c0| 09 09 09 09 09 5c 20 77 | 65 20 68 61 76 65 20 61 |.....\ w|e have a|
|000016d0| 20 68 69 6c 69 74 65 64 | 20 73 65 6c 65 63 74 69 | hilited| selecti|
|000016e0| 6f 6e 0d 09 09 68 61 6e | 64 6c 65 3a 20 74 68 65 |on...han|dle: the|
|000016f0| 54 45 73 63 72 6f 6c 6c | 65 72 20 20 63 61 6c 6c |TEscroll|er  call|
|00001700| 20 54 45 43 6f 70 79 0d | 09 09 67 6c 6f 62 61 6c | TECopy.|..global|
|00001710| 20 54 45 53 63 72 70 48 | 61 6e 64 6c 65 20 40 20 | TEScrpH|andle @ |
|00001720| 70 75 74 3a 20 62 75 66 | 66 65 72 0d 09 09 6c 6f |put: buf|fer...lo|
|00001730| 63 6b 3a 20 62 75 66 66 | 65 72 0d 09 09 70 74 72 |ck: buff|er...ptr|
|00001740| 3a 20 62 75 66 66 65 72 | 20 20 73 69 7a 65 3a 20 |: buffer|  size: |
|00001750| 62 75 66 66 65 72 20 20 | 28 20 61 64 64 72 20 6c |buffer  |( addr l|
|00001760| 65 6e 20 29 20 20 70 75 | 74 3a 20 51 45 73 74 72 |en )  pu|t: QEstr|
|00001770| 0d 09 09 75 6e 6c 6f 63 | 6b 3a 20 62 75 66 66 65 |...unloc|k: buffe|
|00001780| 72 0d 09 09 66 61 6c 73 | 65 20 2d 3e 20 65 63 68 |r...fals|e -> ech|
|00001790| 6f 43 52 3f 0d 09 54 48 | 45 4e 0d 09 6c 69 6e 65 |oCR?..TH|EN..line|
|000017a0| 45 6e 64 3a 20 74 68 65 | 54 45 73 63 72 6f 6c 6c |End: the|TEscroll|
|000017b0| 65 72 20 64 75 70 20 73 | 65 74 73 65 6c 65 63 74 |er dup s|etselect|
|000017c0| 3a 20 74 68 65 54 45 73 | 63 72 6f 6c 6c 65 72 0d |: theTEs|croller.|
|000017d0| 09 65 63 68 6f 43 52 3f | 20 49 46 20 20 63 72 20 |.echoCR?| IF  cr |
|000017e0| 20 54 48 45 4e 0d 09 65 | 76 61 6c 46 72 6f 6d 51 | THEN..e|valFromQ|
|000017f0| 45 20 20 66 6c 75 73 68 | 5f 54 57 73 74 72 0d 3b |E  flush|_TWstr.;|
|00001800| 6d 0d 0d 0d 3a 6d 20 4b | 45 59 3a 09 09 5c 20 28 |m...:m K|EY:..\ (|
|00001810| 20 63 68 61 72 20 2d 2d | 20 29 0d 0d 09 43 41 53 | char --| )...CAS|
|00001820| 45 5b 20 33 20 28 20 65 | 6e 74 65 72 20 29 09 5d |E[ 3 ( e|nter ).]|
|00001830| 3d 3e 09 69 6e 74 65 72 | 70 72 65 74 3a 20 73 65 |=>.inter|pret: se|
|00001840| 6c 66 0d 09 09 5b 20 38 | 20 28 20 64 65 6c 65 74 |lf...[ 8| ( delet|
|00001850| 65 20 29 09 5d 3d 3e 20 | 38 20 6b 65 79 3a 20 74 |e ).]=> |8 key: t|
|00001860| 68 65 54 45 73 63 72 6f | 6c 6c 65 72 09 5c 20 64 |heTEscro|ller.\ d|
|00001870| 65 6c 65 74 65 0d 09 09 | 5b 20 39 20 28 20 74 61 |elete...|[ 9 ( ta|
|00001880| 62 20 29 09 09 5d 3d 3e | 09 34 20 73 70 61 63 65 |b )..]=>|.4 space|
|00001890| 73 0d 0d 09 09 44 45 46 | 41 55 4c 54 3d 3e 09 73 |s....DEF|AULT=>.s|
|000018a0| 69 7a 65 3a 20 74 68 65 | 54 45 73 63 72 6f 6c 6c |ize: the|TEscroll|
|000018b0| 65 72 20 31 2b 20 54 45 | 53 69 7a 65 43 68 65 63 |er 1+ TE|SizeChec|
|000018c0| 6b 0d 20 20 20 20 20 09 | 09 09 09 6b 65 79 3a 20 |k.     .|...key: |
|000018d0| 74 68 65 54 45 73 63 72 | 6f 6c 6c 65 72 0d 09 5d |theTEscr|oller..]|
|000018e0| 43 41 53 45 0d 3b 6d 0d | 0d 3a 6d 20 45 4e 41 42 |CASE.;m.|.:m ENAB|
|000018f0| 4c 45 3a 09 65 6e 61 62 | 6c 65 3a 20 73 75 70 65 |LE:.enab|le: supe|
|00001900| 72 09 6e 65 77 56 65 63 | 73 20 20 3b 6d 09 0d 3a |r.newVec|s  ;m..:|
|00001910| 6d 20 44 49 53 41 42 4c | 45 3a 09 64 69 73 61 62 |m DISABL|E:.disab|
|00001920| 6c 65 3a 20 73 75 70 65 | 72 20 20 3b 6d 0d 0d 3a |le: supe|r  ;m..:|
|00001930| 6d 20 44 52 41 57 3a 09 | 7b 20 5c 20 78 31 20 78 |m DRAW:.|{ \ x1 x|
|00001940| 32 20 78 33 20 78 34 20 | 2d 2d 20 7d 0d 09 2d 3e |2 x3 x4 |-- }..->|
|00001950| 20 78 34 20 2d 3e 20 78 | 33 20 2d 3e 20 78 32 20 | x4 -> x|3 -> x2 |
|00001960| 2d 3e 20 78 31 0d 09 63 | 6c 72 53 74 6b 3f 20 49 |-> x1..c|lrStk? I|
|00001970| 46 20 20 73 70 30 20 73 | 70 21 20 20 66 61 6c 73 |F  sp0 s|p!  fals|
|00001980| 65 20 2d 3e 20 63 6c 72 | 53 74 6b 3f 20 20 54 48 |e -> clr|Stk?  TH|
|00001990| 45 4e 0d 09 64 73 3a 20 | 74 68 65 53 74 61 63 6b |EN..ds: |theStack|
|000019a0| 0d 09 78 31 20 78 32 20 | 78 33 20 78 34 0d 09 28 |..x1 x2 |x3 x4..(|
|000019b0| 64 72 61 77 29 3a 20 73 | 75 70 65 72 20 20 3b 6d |draw): s|uper  ;m|
|000019c0| 0d 0d 3a 6d 20 54 65 78 | 74 48 61 6e 64 6c 65 3a |..:m Tex|tHandle:|
|000019d0| 09 74 65 78 74 48 61 6e | 64 6c 65 3a 20 74 68 65 |.textHan|dle: the|
|000019e0| 54 45 73 63 72 6f 6c 6c | 65 72 20 20 3b 6d 0d 0d |TEscroll|er  ;m..|
|000019f0| 0d 3a 6d 20 44 55 4d 50 | 3a 0d 09 64 75 6d 70 3a |.:m DUMP|:..dump:|
|00001a00| 20 74 68 65 54 45 73 63 | 72 6f 6c 6c 65 72 20 3b | theTEsc|roller ;|
|00001a10| 6d 0d 0d 3b 63 6c 61 73 | 73 0d 0d 09 09 09 09 0d |m..;clas|s.......|
|00001a20| 68 61 6e 64 6c 65 09 74 | 6d 70 48 6e 64 6c 0d 66 |handle.t|mpHndl.f|
|00001a30| 69 6c 65 09 57 6f 72 6b | 73 68 65 65 74 46 69 6c |ile.Work|sheetFil|
|00001a40| 65 0d 0d 30 09 76 61 6c | 75 65 09 5e 54 57 0d 0d |e..0.val|ue.^TW..|
|00001a50| 3a 20 53 41 56 45 57 4f | 52 4b 53 48 45 45 54 0d |: SAVEWO|RKSHEET.|
|00001a60| 09 22 20 57 6f 72 6b 73 | 68 65 65 74 22 20 20 6e |." Works|heet"  n|
|00001a70| 61 6d 65 3a 20 77 6f 72 | 6b 73 68 65 65 74 46 69 |ame: wor|ksheetFi|
|00001a80| 6c 65 0d 09 27 74 79 70 | 65 20 54 45 58 54 20 20 |le..'typ|e TEXT  |
|00001a90| 27 74 79 70 65 20 4d 53 | 45 54 20 20 73 65 74 3a |'type MS|ET  set:|
|00001aa0| 20 77 6f 72 6b 73 68 65 | 65 74 66 69 6c 65 0d 09 | workshe|etfile..|
|00001ab0| 63 72 65 61 74 65 3a 20 | 77 6f 72 6b 73 68 65 65 |create: |workshee|
|00001ac0| 74 46 69 6c 65 20 20 3f | 45 58 49 54 09 09 09 5c |tFile  ?|EXIT...\|
|00001ad0| 20 49 66 20 77 65 27 72 | 65 20 6f 6e 20 61 20 6e | If we'r|e on a n|
|00001ae0| 65 74 77 6f 72 6b 2c 20 | 74 68 69 73 0d 09 09 09 |etwork, |this....|
|00001af0| 09 09 09 09 09 09 09 09 | 5c 20 6d 61 79 20 66 61 |........|\ may fa|
|00001b00| 69 6c 2c 20 73 6f 20 77 | 65 20 6a 75 73 74 20 67 |il, so w|e just g|
|00001b10| 65 74 20 6f 75 74 2e 0d | 09 74 65 78 74 48 61 6e |et out..|.textHan|
|00001b20| 64 6c 65 3a 20 5e 54 57 | 20 20 70 75 74 3a 20 74 |dle: ^TW|  put: t|
|00001b30| 6d 70 48 6e 64 6c 20 20 | 6c 6f 63 6b 3a 20 74 6d |mpHndl  |lock: tm|
|00001b40| 70 48 6e 64 6c 0d 09 70 | 74 72 3a 20 74 6d 70 48 |pHndl..p|tr: tmpH|
|00001b50| 6e 64 6c 20 20 73 69 7a | 65 3a 20 74 6d 70 48 6e |ndl  siz|e: tmpHn|
|00001b60| 64 6c 20 20 77 72 69 74 | 65 3a 20 77 6f 72 6b 73 |dl  writ|e: works|
|00001b70| 68 65 65 74 46 69 6c 65 | 20 20 64 72 6f 70 0d 09 |heetFile|  drop..|
|00001b80| 72 65 6c 65 61 73 65 3a | 20 74 6d 70 48 6e 64 6c |release:| tmpHndl|
|00001b90| 0d 09 63 6c 6f 73 65 3a | 20 77 6f 72 6b 73 68 65 |..close:| workshe|
|00001ba0| 65 74 46 69 6c 65 20 20 | 64 72 6f 70 20 20 3b 0d |etFile  |drop  ;.|
|00001bb0| 0d 0d 3a 20 47 45 54 57 | 4f 52 4b 53 48 45 45 54 |..: GETW|ORKSHEET|
|00001bc0| 09 7b 20 5c 20 61 64 72 | 20 6e 20 2d 2d 20 7d 0d |.{ \ adr| n -- }.|
|00001bd0| 09 22 20 57 6f 72 6b 73 | 68 65 65 74 22 20 20 6e |." Works|heet"  n|
|00001be0| 61 6d 65 3a 20 77 6f 72 | 6b 73 68 65 65 74 46 69 |ame: wor|ksheetFi|
|00001bf0| 6c 65 0d 09 6f 70 65 6e | 3a 20 77 6f 72 6b 73 68 |le..open|: worksh|
|00001c00| 65 65 74 46 69 6c 65 0d | 09 49 46 20 20 2e 72 6f |eetFile.|.IF  .ro|
|00001c10| 6f 6d 20 20 45 58 49 54 | 20 20 54 48 45 4e 09 09 |om  EXIT|  THEN..|
|00001c20| 09 5c 20 49 66 20 69 74 | 20 64 6f 65 73 6e 27 74 |.\ If it| doesn't|
|00001c30| 20 65 78 69 73 74 2c 20 | 77 65 27 6c 6c 20 73 74 | exist, |we'll st|
|00001c40| 61 72 74 20 61 0d 09 09 | 09 09 09 09 09 09 09 5c |art a...|.......\|
|00001c50| 20 6e 65 77 20 6f 6e 65 | 20 77 69 74 68 20 61 20 | new one| with a |
|00001c60| 2e 72 6f 6f 6d 20 64 69 | 73 70 6c 61 79 2c 20 61 |.room di|splay, a|
|00001c70| 6e 64 20 6f 75 74 2e 0d | 09 73 69 7a 65 3a 20 77 |nd out..|.size: w|
|00001c80| 6f 72 6b 73 68 65 65 74 | 46 69 6c 65 20 20 2d 3e |orksheet|File  ->|
|00001c90| 20 6e 0d 09 6e 20 20 6e | 65 77 3a 20 74 6d 70 48 | n..n  n|ew: tmpH|
|00001ca0| 6e 64 6c 20 20 6c 6f 63 | 6b 3a 20 74 6d 70 48 6e |ndl  loc|k: tmpHn|
|00001cb0| 64 6c 0d 09 70 74 72 3a | 20 74 6d 70 48 6e 64 6c |dl..ptr:| tmpHndl|
|00001cc0| 20 20 2d 3e 20 61 64 72 | 0d 09 61 64 72 20 6e 20 |  -> adr|..adr n |
|00001cd0| 20 72 65 61 64 3a 20 77 | 6f 72 6b 73 68 65 65 74 | read: w|orksheet|
|00001ce0| 46 69 6c 65 0d 09 64 75 | 70 20 2d 33 39 20 3d 20 |File..du|p -39 = |
|00001cf0| 20 69 66 20 20 64 72 6f | 70 20 20 30 20 20 74 68 | if  dro|p  0  th|
|00001d00| 65 6e 20 20 4f 4b 3f 09 | 09 5c 20 57 65 20 64 6f |en  OK?.|.\ We do|
|00001d10| 6e 27 74 20 77 6f 72 72 | 79 20 69 66 20 74 68 65 |n't worr|y if the|
|00001d20| 20 65 72 72 6f 72 0d 09 | 09 09 09 09 09 09 09 09 | error..|........|
|00001d30| 09 09 5c 20 20 77 61 73 | 20 65 6e 64 66 69 6c 65 |..\  was| endfile|
|00001d40| 0d 09 62 79 74 65 73 52 | 65 61 64 3a 20 77 6f 72 |..bytesR|ead: wor|
|00001d50| 6b 73 68 65 65 74 46 69 | 6c 65 20 20 2d 3e 20 6e |ksheetFi|le  -> n|
|00001d60| 0d 09 63 6c 6f 73 65 3a | 20 77 6f 72 6b 73 68 65 |..close:| workshe|
|00001d70| 65 74 46 69 6c 65 20 20 | 64 72 6f 70 0d 09 61 64 |etFile  |drop..ad|
|00001d80| 72 20 6e 20 69 6e 73 65 | 72 74 3a 20 5e 54 57 0d |r n inse|rt: ^TW.|
|00001d90| 09 72 65 6c 65 61 73 65 | 3a 20 74 6d 70 48 6e 64 |.release|: tmpHnd|
|00001da0| 6c 20 20 3b 0d 0d 0d 3a | 20 44 4f 5f 52 55 4e 5f |l  ;...:| DO_RUN_|
|00001db0| 54 45 20 20 7b 20 54 57 | 2d 61 64 64 72 20 5c 20 |TE  { TW|-addr \ |
|00001dc0| 5e 76 69 65 77 20 6c 65 | 66 74 20 74 6f 70 20 72 |^view le|ft top r|
|00001dd0| 74 20 62 6f 74 20 73 52 | 74 20 73 42 6f 74 20 2d |t bot sR|t sBot -|
|00001de0| 2d 20 7d 0d 09 2d 63 75 | 72 73 20 20 2d 65 63 68 |- }..-cu|rs  -ech|
|00001df0| 6f 0d 09 54 57 2d 61 64 | 64 72 20 2d 3e 20 5e 54 |o..TW-ad|dr -> ^T|
|00001e00| 57 0d 09 64 65 65 70 5f | 63 6c 61 73 73 69 6e 69 |W..deep_|classini|
|00001e10| 74 3a 20 5e 54 57 0d 5c | 09 66 57 69 6e 64 3f 20 |t: ^TW.\|.fWind? |
|00001e20| 49 46 20 20 63 6c 6f 73 | 65 3a 20 66 57 69 6e 64 |IF  clos|e: fWind|
|00001e30| 20 20 54 48 45 4e 09 09 | 5c 20 73 61 79 20 67 6f |  THEN..|\ say go|
|00001e40| 6f 64 62 79 65 20 74 6f | 20 4d 72 2e 20 66 77 69 |odbye to| Mr. fwi|
|00001e50| 6e 64 0d 0d 09 74 68 65 | 53 74 61 63 6b 20 61 64 |nd...the|Stack ad|
|00001e60| 64 56 69 65 77 3a 20 54 | 46 56 20 20 74 68 65 54 |dView: T|FV  theT|
|00001e70| 45 73 63 72 6f 6c 6c 65 | 72 20 61 64 64 56 69 65 |Escrolle|r addVie|
|00001e80| 77 3a 20 54 46 56 0d 09 | 70 61 75 73 65 20 70 61 |w: TFV..|pause pa|
|00001e90| 75 73 65 20 70 61 75 73 | 65 09 09 09 09 09 5c 20 |use paus|e.....\ |
|00001ea0| 47 65 74 20 75 73 20 74 | 6f 20 74 68 65 20 66 72 |Get us t|o the fr|
|00001eb0| 6f 6e 74 20 75 6e 64 65 | 72 20 73 79 73 20 36 0d |ont unde|r sys 6.|
|00001ec0| 09 09 09 09 09 09 09 09 | 09 09 5c 20 20 6f 72 20 |........|..\  or |
|00001ed0| 74 68 65 20 73 79 73 74 | 65 6d 20 63 6c 6f 62 62 |the syst|em clobb|
|00001ee0| 65 72 73 20 73 63 72 6f | 6c 6c 20 62 61 72 73 0d |ers scro|ll bars.|
|00001ef0| 09 32 30 20 2d 3e 20 6c | 65 66 74 20 20 35 30 20 |.20 -> l|eft  50 |
|00001f00| 2d 3e 20 74 6f 70 0d 09 | 35 32 30 20 2d 3e 20 72 |-> top..|520 -> r|
|00001f10| 74 20 20 33 36 30 20 2d | 3e 20 62 6f 74 0d 09 73 |t  360 -|> bot..s|
|00001f20| 63 72 65 65 6e 62 69 74 | 73 20 20 2d 3e 20 73 42 |creenbit|s  -> sB|
|00001f30| 6f 74 20 20 2d 3e 20 73 | 52 74 20 20 32 64 72 6f |ot  -> s|Rt  2dro|
|00001f40| 70 0d 09 72 74 20 73 52 | 74 20 6d 69 6e 20 20 2d |p..rt sR|t min  -|
|00001f50| 3e 20 72 74 0d 09 62 6f | 74 20 73 42 6f 74 20 6d |> rt..bo|t sBot m|
|00001f60| 69 6e 20 20 2d 3e 20 62 | 6f 74 0d 09 6c 65 66 74 |in  -> b|ot..left|
|00001f70| 20 74 6f 70 20 72 74 20 | 62 6f 74 20 20 70 75 74 | top rt |bot  put|
|00001f80| 3a 20 74 65 6d 70 52 65 | 63 74 0d 09 73 63 72 65 |: tempRe|ct..scre|
|00001f90| 65 6e 62 69 74 73 20 74 | 72 75 65 20 73 65 74 47 |enbits t|rue setG|
|00001fa0| 72 6f 77 3a 20 5e 54 57 | 0d 09 73 63 72 65 65 6e |row: ^TW|..screen|
|00001fb0| 62 69 74 73 20 74 72 75 | 65 20 73 65 74 44 72 61 |bits tru|e setDra|
|00001fc0| 67 3a 20 5e 54 57 0d 09 | 74 72 75 65 20 20 73 65 |g: ^TW..|true  se|
|00001fd0| 74 5a 6f 6f 6d 3a 20 5e | 54 57 0d 09 74 65 6d 70 |tZoom: ^|TW..temp|
|00001fe0| 52 65 63 74 20 20 6d 79 | 44 6f 63 20 20 64 6f 63 |Rect  my|Doc  doc|
|00001ff0| 57 69 6e 64 20 20 74 72 | 75 65 20 66 61 6c 73 65 |Wind  tr|ue false|
|00002000| 20 20 54 46 56 20 20 6e | 65 77 3a 20 5e 54 57 0d |  TFV  n|ew: ^TW.|
|00002010| 09 6e 65 77 76 65 63 73 | 0d 09 74 72 75 65 20 2d |.newvecs|..true -|
|00002020| 3e 20 65 6d 69 74 3f 09 | 09 09 09 5c 20 45 4d 49 |> emit?.|...\ EMI|
|00002030| 54 20 69 73 20 6e 6f 77 | 20 73 61 66 65 20 73 69 |T is now| safe si|
|00002040| 6e 63 65 20 77 65 20 68 | 61 76 65 20 61 20 77 69 |nce we h|ave a wi|
|00002050| 6e 64 6f 77 0d 5c 09 74 | 72 75 65 20 2d 3e 20 72 |ndow.\.t|rue -> r|
|00002060| 65 6c 6f 63 43 68 6b 3f | 0d 09 78 74 73 7b 20 20 |elocChk?|..xts{  |
|00002070| 78 55 6e 64 6f 20 6e 75 | 6c 6c 20 78 43 75 74 20 |xUndo nu|ll xCut |
|00002080| 78 43 6f 70 79 20 78 50 | 61 73 74 65 20 78 43 6c |xCopy xP|aste xCl|
|00002090| 65 61 72 20 78 53 65 6c | 41 6c 6c 20 6e 75 6c 6c |ear xSel|All null|
|000020a0| 20 64 6f 50 72 65 66 20 | 7d 0d 09 09 09 09 09 09 | doPref |}.......|
|000020b0| 09 09 09 09 09 09 09 09 | 33 20 20 69 6e 69 74 3a |........|3  init:|
|000020c0| 20 45 64 69 74 4d 65 6e | 0d 09 67 65 74 77 6f 72 | EditMen|..getwor|
|000020d0| 6b 73 68 65 65 74 0d 09 | 66 61 6c 73 65 20 2d 3e |ksheet..|false ->|
|000020e0| 20 66 57 69 6e 64 41 63 | 74 69 76 65 3f 09 09 5c | fWindAc|tive?..\|
|000020f0| 20 4d 75 73 74 6e 27 74 | 20 66 6f 72 67 65 74 20 | Mustn't| forget |
|00002100| 74 68 69 73 21 21 0d 09 | 65 76 65 6e 74 4c 6f 6f |this!!..|eventLoo|
|00002110| 70 0d 3b 0d 0d 3a 20 42 | 59 45 2b 09 09 73 61 76 |p.;..: B|YE+..sav|
|00002120| 65 57 6f 72 6b 73 68 65 | 65 74 20 20 62 79 65 20 |eWorkshe|et  bye |
|00002130| 20 3b 0d 0d 3a 20 78 43 | 75 74 09 09 63 75 74 3a | ;..: xC|ut..cut:|
|00002140| 20 5e 54 57 20 20 3b 0d | 3a 20 78 43 6f 70 79 09 | ^TW  ;.|: xCopy.|
|00002150| 09 63 6f 70 79 3a 20 5e | 54 57 20 20 3b 0d 3a 20 |.copy: ^|TW  ;.: |
|00002160| 78 50 61 73 74 65 09 70 | 61 73 74 65 3a 20 5e 54 |xPaste.p|aste: ^T|
|00002170| 57 20 20 3b 0d 3a 20 78 | 43 6c 65 61 72 09 63 6c |W  ;.: x|Clear.cl|
|00002180| 65 61 72 3a 20 5e 54 57 | 20 20 3b 0d 3a 20 78 55 |ear: ^TW|  ;.: xU|
|00002190| 6e 64 6f 09 09 6e 69 6d | 70 6c 20 20 3b 0d 3a 20 |ndo..nim|pl  ;.: |
|000021a0| 78 53 65 6c 41 6c 6c 09 | 73 65 6c 41 6c 6c 3a 20 |xSelAll.|selAll: |
|000021b0| 5e 54 57 20 20 3b 0d 0d | 0d 65 6e 64 6c 6f 61 64 |^TW  ;..|.endload|
|000021c0| 0d 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000021d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000021e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000021f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002200| 00 00 01 00 00 00 01 3c | 00 00 00 3c 00 00 00 3b |.......<|...<...;|
|00002210| ba 43 6d 14 20 03 5f 00 | f9 f4 4a 28 44 2f 66 ea |.Cm. ._.|..J(D/f.|
|00002220| 51 c2 00 f5 2c 09 ee 03 | 5a da 79 24 60 02 11 30 |Q...,...|Z.y$`..0|
|00002230| 0e 54 45 46 77 69 6e 64 | 4d 6f 64 2e 74 78 74 54 |.TEFwind|Mod.txtT|
|00002240| 02 00 00 00 50 61 72 74 | 53 49 54 78 00 00 00 00 |....Part|SITx....|
|00002250| 00 00 50 61 72 74 53 49 | 54 78 00 00 00 00 00 00 |..PartSI|Tx......|
|00002260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002270| 00 00 ab 06 23 3e 00 00 | 00 00 00 00 01 77 04 a6 |....#>..|.....w..|
|00002280| 91 30 0f 07 4e 5c 01 b0 | 2e 04 a6 67 66 e6 08 04 |.0..N\..|...gf...|
|00002290| a6 29 50 fe f4 29 68 04 | fe f8 41 ec fe fc 6e 30 |.)P..)h.|..A...n0|
|000022a0| bc 50 8b e8 63 07 8c 04 | 20 2c 01 fe f8 29 40 fe |.P..c...| ,...)@.|
|000022b0| f0 5b 6c fe f0 51 6c fe | f2 9e 24 fe f0 a8 70 9e |.[l..Ql.|..$...p.|
|000022c0| fe f4 a8 70 9e fe f8 a8 | 70 d5 16 9e fe fc c1 fe |...p....|p.......|
|000022d0| f0 9e fe f4 2c f3 2c 03 | 07 13 0b 01 a8 30 53 1b |....,.,.|.....0S.|
|000022e0| a0 66 04 a6 01 00 00 0f | 14 a8 9f 65 72 00 12 09 |.f......|...er...|
|000022f0| 01 00 00 11 fa 00 02 00 | 00 00 02 cb bd 00 50 41 |........|......PA|
|00002300| 00 00 00 38 00 00 00 00 | 00 00 14 8f 00 00 00 00 |...8....|........|
|00002310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 03 ce |........|........|
|00002330| 00 00 03 ce 00 00 00 00 | 00 00 00 00 00 00 01 00 |........|........|
|00002340| 00 00 01 3c 00 00 00 3c | 00 00 00 3b 00 71 f3 b8 |...<...<|...;.q..|
|00002350| 0e b2 00 00 00 1c 00 32 | 00 00 4d 49 46 4f 00 00 |.......2|..MIFO..|
|00002360| 00 0a 00 80 00 00 00 00 | 00 00 00 71 fb 00 08 4d |........|...q...M|
|00002370| 69 73 63 49 6e 66 6f 00 | 00 00 00 00 00 00 00 00 |iscInfo.|........|
+--------+-------------------------+-------------------------+--------+--------+