home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1994-11-03 | 97.1 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1e f4 20 54 68 | 69 73 20 69 73 20 54 61 |..... Th|is is Ta|
|00000010| 75 20 76 65 72 73 69 6f | 6e 20 31 2e 32 30 0d 00 |u versio|n 1.20..|
|00000020| 14 1a ee 85 20 f1 f6 24 | 2b 22 20 61 74 20 6c 69 |.... ..$|+" at li|
|00000030| 6e 65 20 22 3b 9e 3a e0 | 0d 00 1e 42 e7 c0 f6 24 |ne ";.:.|...B...$|
|00000040| 2c 31 36 29 3c 3e 22 41 | 52 4d 20 42 42 43 20 42 |,16)<>"A|RM BBC B|
|00000050| 41 53 49 43 20 56 20 22 | 20 8c 85 30 2c 22 54 61 |ASIC V "| ..0,"Ta|
|00000060| 75 20 63 61 6e 20 6f 6e | 6c 79 20 72 75 6e 20 6f |u can on|ly run o|
|00000070| 6e 20 42 61 73 69 63 20 | 56 22 0d 00 28 2c f4 20 |n Basic |V"..(,. |
|00000080| 2d 2d 2d 20 63 6f 6e 73 | 74 61 6e 74 73 20 61 6e |--- cons|tants an|
|00000090| 64 20 61 72 72 61 79 20 | 64 69 6d 65 6e 73 69 6f |d array |dimensio|
|000000a0| 6e 73 20 2d 2d 2d 0d 00 | 32 25 6d 61 78 43 31 25 |ns ---..|2%maxC1%|
|000000b0| 3d 36 34 3a 72 6f 6f 6d | 25 3d 31 36 2a 32 30 34 |=64:room|%=16*204|
|000000c0| 38 3a 6d 69 6e 50 31 25 | 3d 31 36 0d 00 3c 11 43 |8:minP1%|=16..<.C|
|000000d0| 25 3d 31 35 3a 50 25 3d | 32 30 34 37 0d 00 46 24 |%=15:P%=|2047..F$|
|000000e0| 43 31 25 3d 43 25 2b 31 | 3a 50 31 25 3d 50 25 2b |C1%=C%+1|:P1%=P%+|
|000000f0| 31 3a 6d 61 78 43 25 3d | 6d 61 78 43 31 25 2d 31 |1:maxC%=|maxC1%-1|
|00000100| 0d 00 50 2a 66 69 6c 65 | 76 65 72 73 69 6f 6e 24 |..P*file|version$|
|00000110| 3d 22 31 32 30 22 3a 77 | 6f 72 6b 73 70 61 63 65 |="120":w|orkspace|
|00000120| 73 69 7a 65 25 3d 37 30 | 30 30 0d 00 5a 64 de 20 |size%=70|00..Zd. |
|00000130| 62 6c 6f 63 6b 25 20 33 | 35 30 30 2c 20 62 6c 6f |block% 3|500, blo|
|00000140| 63 6b 31 25 20 32 35 35 | 2c 20 62 6c 6f 63 6b 32 |ck1% 255|, block2|
|00000150| 25 20 32 35 35 2c 20 62 | 6c 6f 63 6b 33 25 20 32 |% 255, b|lock3% 2|
|00000160| 35 35 2c 20 77 6f 72 6b | 73 70 61 63 65 30 25 20 |55, work|space0% |
|00000170| 77 6f 72 6b 73 70 61 63 | 65 73 69 7a 65 25 2c 20 |workspac|esize%, |
|00000180| 73 70 72 69 74 65 6e 61 | 6d 65 25 20 31 32 0d 00 |spritena|me% 12..|
|00000190| 64 13 de 20 73 25 28 36 | 30 29 2c 67 25 28 36 30 |d.. s%(6|0),g%(60|
|000001a0| 29 0d 00 6e b2 de 20 43 | 6f 6c 75 6d 6e 50 6c 6f |)..n.. C|olumnPlo|
|000001b0| 74 25 28 6d 61 78 43 25 | 29 2c 43 6f 6c 75 6d 6e |t%(maxC%|),Column|
|000001c0| 4d 65 61 6e 69 6e 67 24 | 28 6d 61 78 43 25 29 2c |Meaning$|(maxC%),|
|000001d0| 43 6f 6c 75 6d 6e 4c 69 | 6e 65 25 28 6d 61 78 43 |ColumnLi|ne%(maxC|
|000001e0| 25 29 2c 43 6f 6c 75 6d | 6e 54 68 69 63 6b 28 6d |%),Colum|nThick(m|
|000001f0| 61 78 43 25 29 2c 43 6f | 6c 75 6d 6e 44 61 73 68 |axC%),Co|lumnDash|
|00000200| 28 6d 61 78 43 25 29 2c | 43 6f 6c 75 6d 6e 47 61 |(maxC%),|ColumnGa|
|00000210| 70 28 6d 61 78 43 25 29 | 2c 43 6f 6c 75 6d 6e 46 |p(maxC%)|,ColumnF|
|00000220| 69 6c 6c 25 28 6d 61 78 | 43 25 29 2c 43 6f 6c 75 |ill%(max|C%),Colu|
|00000230| 6d 6e 4b 65 79 54 65 78 | 74 24 28 6d 61 78 43 25 |mnKeyTex|t$(maxC%|
|00000240| 29 2c 77 6f 72 6b 68 6f | 72 73 65 25 28 6d 61 78 |),workho|rse%(max|
|00000250| 43 25 29 0d 00 78 b9 de | 20 43 6f 6c 75 6d 6e 50 |C%)..x..| ColumnP|
|00000260| 6f 69 6e 74 73 25 28 6d | 61 78 43 25 29 2c 43 6f |oints%(m|axC%),Co|
|00000270| 6c 75 6d 6e 43 68 61 72 | 25 28 6d 61 78 43 25 29 |lumnChar|%(maxC%)|
|00000280| 2c 43 6f 6c 75 6d 6e 57 | 69 64 74 68 28 6d 61 78 |,ColumnW|idth(max|
|00000290| 43 25 29 2c 43 6f 6c 75 | 6d 6e 48 65 69 67 68 74 |C%),Colu|mnHeight|
|000002a0| 28 6d 61 78 43 25 29 2c | 43 6f 6c 75 6d 6e 45 72 |(maxC%),|ColumnEr|
|000002b0| 72 6f 72 25 28 6d 61 78 | 43 25 29 2c 43 6f 6c 75 |ror%(max|C%),Colu|
|000002c0| 6d 6e 45 72 72 6f 72 54 | 68 69 63 6b 28 6d 61 78 |mnErrorT|hick(max|
|000002d0| 43 25 29 2c 43 6f 6c 75 | 6d 6e 45 72 72 6f 72 43 |C%),Colu|mnErrorC|
|000002e0| 61 70 28 6d 61 78 43 25 | 29 2c 43 6f 6c 75 6d 6e |ap(maxC%|),Column|
|000002f0| 43 6f 6c 6f 75 72 25 28 | 6d 61 78 43 25 29 2c 64 |Colour%(|maxC%),d|
|00000300| 72 61 77 6e 25 28 6d 61 | 78 43 25 29 0d 00 82 29 |rawn%(ma|xC%)...)|
|00000310| de 20 44 61 74 61 25 20 | 35 2a 43 31 25 2a 50 31 |. Data% |5*C1%*P1|
|00000320| 25 2c 44 61 74 61 53 74 | 61 74 75 73 25 20 43 31 |%,DataSt|atus% C1|
|00000330| 25 2a 50 31 25 0d 00 8c | 2a e3 69 25 3d 30 20 b8 |%*P1%...|*.i%=0 .|
|00000340| 43 31 25 2a 50 31 25 2d | 34 20 88 34 3a 44 61 74 |C1%*P1%-|4 .4:Dat|
|00000350| 61 53 74 61 74 75 73 25 | 21 69 25 3d 30 3a ed 0d |aStatus%|!i%=0:..|
|00000360| 00 96 27 de 20 53 61 76 | 65 24 28 35 29 2c 46 69 |..'. Sav|e$(5),Fi|
|00000370| 6c 65 54 79 70 65 24 28 | 35 29 2c 4f 6c 64 53 61 |leType$(|5),OldSa|
|00000380| 76 65 24 28 35 29 0d 00 | a0 15 de 20 67 72 6f 75 |ve$(5)..|... grou|
|00000390| 70 68 65 61 64 65 72 25 | 28 33 29 0d 00 aa 14 f2 |pheader%|(3).....|
|000003a0| 64 65 66 61 75 6c 74 73 | 61 76 65 76 61 72 73 0d |defaults|avevars.|
|000003b0| 00 b4 1a 73 65 6c 25 3d | 31 3c 3c 32 31 3a 67 72 |...sel%=|1<<21:gr|
|000003c0| 65 79 25 3d 31 3c 3c 32 | 32 0d 00 be 37 6c 65 66 |ey%=1<<2|2...7lef|
|000003d0| 74 77 69 64 74 68 25 3d | 39 36 3a 74 6f 70 68 65 |twidth%=|96:tophe|
|000003e0| 69 67 68 74 25 3d 38 30 | 3a 6f 78 25 3d 30 3a 78 |ight%=80|:ox%=0:x|
|000003f0| 25 3d 6f 78 25 2b 6c 65 | 66 74 77 69 64 74 68 25 |%=ox%+le|ftwidth%|
|00000400| 0d 00 c8 2a f4 20 2d 2d | 2d 20 69 6e 69 74 69 61 |...*. --|- initia|
|00000410| 6c 20 76 61 6c 75 65 73 | 20 66 6f 72 20 76 61 72 |l values| for var|
|00000420| 69 61 62 6c 65 73 20 2d | 2d 2d 0d 00 d2 32 71 75 |iables -|--...2qu|
|00000430| 69 74 25 3d a3 3a 66 69 | 6c 65 6f 70 65 6e 25 3d |it%=.:fi|leopen%=|
|00000440| 30 3a 6a 75 73 74 73 74 | 61 72 74 65 64 25 3d b9 |0:justst|arted%=.|
|00000450| 3a 6d 61 69 6e 6f 70 65 | 6e 25 3d a3 0d 00 dc 35 |:mainope|n%=....5|
|00000460| 63 61 72 65 74 63 6f 6c | 75 6d 6e 25 3d 30 3a 63 |caretcol|umn%=0:c|
|00000470| 61 72 65 74 72 6f 77 25 | 3d 30 3a 6d 61 78 63 6f |aretrow%|=0:maxco|
|00000480| 6c 75 6d 6e 25 3d 30 3a | 6d 61 78 72 6f 77 25 3d |lumn%=0:|maxrow%=|
|00000490| 30 0d 00 e6 37 63 61 72 | 65 74 24 3d 22 20 20 20 |0...7car|et$=" |
|000004a0| 20 20 20 20 20 20 20 20 | 20 20 20 22 3a 63 61 72 | | ":car|
|000004b0| 65 74 6f 66 66 73 65 74 | 25 3d 31 31 3a 67 6f 74 |etoffset|%=11:got|
|000004c0| 63 61 72 65 74 25 3d a3 | 0d 00 f0 2f 63 61 72 65 |caret%=.|.../care|
|000004d0| 74 78 31 25 3d 30 3a 63 | 61 72 65 74 78 32 25 3d |tx1%=0:c|aretx2%=|
|000004e0| 30 3a 63 61 72 65 74 79 | 31 25 3d 30 3a 63 61 72 |0:carety|1%=0:car|
|000004f0| 65 74 79 32 25 3d 30 0d | 00 fa 28 63 68 61 6e 67 |ety2%=0.|..(chang|
|00000500| 65 64 25 3d a3 3a 54 61 | 75 46 69 6c 65 4e 61 6d |ed%=.:Ta|uFileNam|
|00000510| 65 24 3d 22 3c 55 6e 74 | 69 74 6c 65 64 3e 22 0d |e$="<Unt|itled>".|
|00000520| 01 04 10 f2 64 65 66 61 | 75 6c 74 76 61 72 73 0d |....defa|ultvars.|
|00000530| 01 0e 1d f4 20 2d 2d 2d | 20 69 6e 69 74 69 61 6c |.... ---| initial|
|00000540| 20 61 63 74 69 6f 6e 73 | 20 2d 2d 2d 0d 01 18 25 | actions| ---...%|
|00000550| 2a 46 6f 6e 74 43 61 74 | 20 7b 20 3e 20 3c 54 61 |*FontCat| { > <Ta|
|00000560| 75 24 44 69 72 3e 2e 46 | 6f 6e 74 4c 69 73 74 20 |u$Dir>.F|ontList |
|00000570| 7d 0d 01 22 39 c8 99 22 | 57 69 6d 70 5f 49 6e 69 |}.."9.."|Wimp_Ini|
|00000580| 74 69 61 6c 69 73 65 22 | 2c 32 30 30 2c 26 34 42 |tialise"|,200,&4B|
|00000590| 35 33 34 31 35 34 2c 22 | 54 61 75 22 20 b8 2c 74 |534154,"|Tau" .,t|
|000005a0| 61 73 6b 68 61 6e 64 6c | 65 25 0d 01 2c 0e ee 85 |askhandl|e%..,...|
|000005b0| 20 f2 65 72 72 6f 72 31 | 0d 01 36 3b ef 32 33 2c | .error1|..6;.23,|
|000005c0| 32 35 35 2c 32 35 35 2c | 32 35 35 2c 32 35 35 2c |255,255,|255,255,|
|000005d0| 32 35 35 2c 32 35 35 2c | 32 35 35 2c 32 35 35 2c |255,255,|255,255,|
|000005e0| 32 35 35 3a 66 69 6c 6c | 24 3d c4 31 34 2c bd 32 |255:fill|$=.14,.2|
|000005f0| 35 35 29 0d 01 40 0e f2 | 74 65 6d 70 6c 61 74 65 |55)..@..|template|
|00000600| 73 0d 01 4a 10 f2 64 65 | 66 69 6e 65 6d 65 6e 75 |s..J..de|finemenu|
|00000610| 73 0d 01 54 10 f2 69 63 | 6f 6e 62 61 72 69 63 6f |s..T..ic|onbarico|
|00000620| 6e 0d 01 5e 24 f2 6f 70 | 65 6e 64 61 74 61 77 69 |n..^$.op|endatawi|
|00000630| 6e 64 6f 77 3a f2 63 61 | 72 65 74 73 74 72 69 6e |ndow:.ca|retstrin|
|00000640| 67 28 2d 31 29 0d 01 68 | 32 e7 6a 75 73 74 73 74 |g(-1)..h|2.justst|
|00000650| 61 72 74 65 64 25 20 6a | 75 73 74 73 74 61 72 74 |arted% j|uststart|
|00000660| 65 64 25 3d a3 3a e7 a4 | 54 61 75 74 6f 6c 6f 61 |ed%=.:..|Tautoloa|
|00000670| 64 20 f2 6c 6f 61 64 0d | 01 72 0d ee 85 20 f2 65 |d .load.|.r... .e|
|00000680| 72 72 6f 72 0d 01 7c 04 | 0d 01 86 05 f5 0d 01 90 |rror..|.|........|
|00000690| 2a c8 99 22 57 69 6d 70 | 5f 50 6f 6c 6c 22 2c 25 |*.."Wimp|_Poll",%|
|000006a0| 31 31 30 30 30 31 2c 62 | 6c 6f 63 6b 25 20 b8 20 |110001,b|lock% . |
|000006b0| 72 65 61 73 6f 6e 25 0d | 01 9a 10 c8 8e 20 72 65 |reason%.|..... re|
|000006c0| 61 73 6f 6e 25 20 ca 0d | 01 a4 04 0d 01 ae 1e c9 |ason% ..|........|
|000006d0| 31 3a f4 20 75 73 65 72 | 20 72 65 64 72 61 77 20 |1:. user| redraw |
|000006e0| 6f 66 20 77 69 6e 64 6f | 77 0d 01 b8 2a 20 c8 99 |of windo|w...* ..|
|000006f0| 22 57 69 6d 70 5f 52 65 | 64 72 61 77 57 69 6e 64 |"Wimp_Re|drawWind|
|00000700| 6f 77 22 2c 2c 62 6c 6f | 63 6b 25 20 b8 20 66 6c |ow",,blo|ck% . fl|
|00000710| 61 67 25 0d 01 c2 0d 20 | c8 95 20 66 6c 61 67 25 |ag%.... |.. flag%|
|00000720| 0d 01 cc 34 20 e7 21 62 | 6c 6f 63 6b 25 3d 63 6f |...4 .!b|lock%=co|
|00000730| 6c 75 6d 6e 68 61 6e 64 | 6c 65 25 20 f2 72 65 64 |lumnhand|le% .red|
|00000740| 72 61 77 63 6f 6c 75 6d | 6e 20 8b f2 75 73 65 72 |rawcolum|n ..user|
|00000750| 64 72 61 77 0d 01 d6 2a | 20 c8 99 22 57 69 6d 70 |draw...*| .."Wimp|
|00000760| 5f 47 65 74 52 65 63 74 | 61 6e 67 6c 65 22 2c 2c |_GetRect|angle",,|
|00000770| 62 6c 6f 63 6b 25 20 b8 | 20 66 6c 61 67 25 0d 01 |block% .| flag%..|
|00000780| e0 06 20 ce 0d 01 ea 04 | 0d 01 f4 14 c9 32 3a f4 |.. .....|.....2:.|
|00000790| 20 6f 70 65 6e 20 77 69 | 6e 64 6f 77 0d 01 fe 11 | open wi|ndow....|
|000007a0| 20 c8 8e 20 21 62 6c 6f | 63 6b 25 20 ca 0d 02 08 | .. !blo|ck% ....|
|000007b0| 23 20 c9 20 6d 61 69 6e | 68 61 6e 64 6c 65 25 3a |# . main|handle%:|
|000007c0| f2 64 61 74 61 77 69 6e | 64 6f 77 6d 6f 76 65 64 |.datawin|dowmoved|
|000007d0| 0d 02 12 22 20 7f 3a c8 | 99 22 57 69 6d 70 5f 4f |..." .:.|."Wimp_O|
|000007e0| 70 65 6e 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |penWindo|w",,bloc|
|000007f0| 6b 25 0d 02 1c 06 20 cb | 0d 02 26 04 0d 02 30 15 |k%.... .|..&...0.|
|00000800| c9 33 3a f4 20 63 6c 6f | 73 65 20 77 69 6e 64 6f |.3:. clo|se windo|
|00000810| 77 0d 02 3a 1b 20 e7 21 | 62 6c 6f 63 6b 25 3d 6d |w..:. .!|block%=m|
|00000820| 61 69 6e 68 61 6e 64 6c | 65 25 20 8c 0d 02 44 11 |ainhandl|e% ...D.|
|00000830| 20 20 e7 63 68 61 6e 67 | 65 64 25 20 8c 0d 02 4e | .chang|ed% ...N|
|00000840| 1e 20 20 20 e7 a4 54 6a | 65 6f 70 61 72 64 79 20 |. ..Tj|eopardy |
|00000850| 6d 61 69 6e 6f 70 65 6e | 25 3d a3 0d 02 58 07 20 |mainopen|%=...X. |
|00000860| 20 cc 0d 02 62 12 20 20 | 20 6d 61 69 6e 6f 70 65 | ...b. | mainope|
|00000870| 6e 25 3d a3 0d 02 6c 07 | 20 20 cd 0d 02 76 14 20 |n%=...l.| ...v. |
|00000880| 20 e7 6d 61 69 6e 6f 70 | 65 6e 25 3d a3 20 8c 0d | .mainop|en%=. ..|
|00000890| 02 80 11 20 20 20 f2 63 | 6c 65 61 72 64 61 74 61 |... .c|leardata|
|000008a0| 0d 02 8a 16 20 20 20 f2 | 72 65 63 6f 72 64 63 61 |.... .|recordca|
|000008b0| 72 65 74 28 a3 29 0d 02 | 94 22 20 20 20 f2 63 6c |ret(.)..|." .cl|
|000008c0| 6f 73 65 77 69 6e 64 6f | 77 28 63 6f 72 6e 65 72 |osewindo|w(corner|
|000008d0| 68 61 6e 64 6c 65 25 29 | 0d 02 9e 1f 20 20 20 f2 |handle%)|.... .|
|000008e0| 63 6c 6f 73 65 77 69 6e | 64 6f 77 28 74 6f 70 68 |closewin|dow(toph|
|000008f0| 61 6e 64 6c 65 25 29 0d | 02 a8 20 20 20 20 f2 63 |andle%).|.. .c|
|00000900| 6c 6f 73 65 77 69 6e 64 | 6f 77 28 6c 65 66 74 68 |losewind|ow(lefth|
|00000910| 61 6e 64 6c 65 25 29 0d | 02 b2 20 20 20 20 f2 63 |andle%).|.. .c|
|00000920| 6c 6f 73 65 77 69 6e 64 | 6f 77 28 6d 61 69 6e 68 |losewind|ow(mainh|
|00000930| 61 6e 64 6c 65 25 29 0d | 02 bc 07 20 20 cd 0d 02 |andle%).|... ...|
|00000940| c6 06 20 cd 0d 02 d0 04 | 0d 02 da 14 c9 36 3a f4 |.. .....|.....6:.|
|00000950| 20 6d 6f 75 73 65 20 63 | 6c 69 63 6b 0d 02 e4 4e | mouse c|lick...N|
|00000960| 20 78 25 3d 21 62 6c 6f | 63 6b 25 3a 79 25 3d 62 | x%=!blo|ck%:y%=b|
|00000970| 6c 6f 63 6b 25 21 34 3a | 62 75 74 74 6f 6e 25 3d |lock%!4:|button%=|
|00000980| 62 6c 6f 63 6b 25 21 38 | 3a 77 69 6e 64 6f 77 25 |block%!8|:window%|
|00000990| 3d 62 6c 6f 63 6b 25 21 | 31 32 3a 69 63 6f 6e 25 |=block%!|12:icon%|
|000009a0| 3d 62 6c 6f 63 6b 25 21 | 31 36 0d 02 ee 29 20 e7 |=block%!|16...) .|
|000009b0| 77 69 6e 64 6f 77 25 3d | 6d 61 69 6e 68 61 6e 64 |window%=|mainhand|
|000009c0| 6c 65 25 20 f2 72 65 63 | 6f 72 64 63 61 72 65 74 |le% .rec|ordcaret|
|000009d0| 28 a3 29 0d 02 f8 11 20 | c8 8e 20 62 75 74 74 6f |(.).... |.. butto|
|000009e0| 6e 25 20 ca 0d 03 02 16 | 20 c9 32 3a f4 20 6d 65 |n% .....| .2:. me|
|000009f0| 6e 75 20 63 6c 69 63 6b | 65 64 0d 03 0c 12 20 20 |nu click|ed.... |
|00000a00| c8 8e 20 77 69 6e 64 6f | 77 25 20 ca 0d 03 16 38 |.. windo|w% ....8|
|00000a10| 20 20 c9 20 6d 61 69 6e | 68 61 6e 64 6c 65 25 2c | . main|handle%,|
|00000a20| 74 6f 70 68 61 6e 64 6c | 65 25 2c 6c 65 66 74 68 |tophandl|e%,lefth|
|00000a30| 61 6e 64 6c 65 25 2c 63 | 6f 72 6e 65 72 68 61 6e |andle%,c|ornerhan|
|00000a40| 64 6c 65 25 0d 03 20 40 | 20 20 20 3f 57 61 72 6e |dle%.. @| ?Warn|
|00000a50| 69 6e 67 49 74 65 6d 25 | 3d 28 3f 57 61 72 6e 69 |ingItem%|=(?Warni|
|00000a60| 6e 67 49 74 65 6d 25 20 | 80 26 46 45 29 20 84 28 |ngItem% |.&FE) .(|
|00000a70| 4a 65 6f 70 61 72 64 79 | 57 61 72 6e 69 6e 67 25 |Jeopardy|Warning%|
|00000a80| 20 80 31 29 0d 03 2a 2e | 20 20 20 c8 99 22 57 69 | .1)..*.| .."Wi|
|00000a90| 6d 70 5f 43 72 65 61 74 | 65 4d 65 6e 75 22 2c 2c |mp_Creat|eMenu",,|
|00000aa0| 6d 61 69 6e 6d 65 6e 75 | 25 2c 78 25 2d 36 34 2c |mainmenu|%,x%-64,|
|00000ab0| 79 25 0d 03 34 17 20 20 | 20 6d 65 6e 75 74 72 65 |y%..4. | menutre|
|00000ac0| 65 24 3d 22 6d 61 69 6e | 22 0d 03 3e 0b 20 20 c9 |e$="main|"..>. .|
|00000ad0| 20 2d 32 3a 0d 03 48 36 | 20 20 20 c8 99 22 57 69 | -2:..H6| .."Wi|
|00000ae0| 6d 70 5f 43 72 65 61 74 | 65 4d 65 6e 75 22 2c 2c |mp_Creat|eMenu",,|
|00000af0| 69 63 6f 6e 62 61 72 6d | 65 6e 75 25 2c 78 25 2d |iconbarm|enu%,x%-|
|00000b00| 36 34 2c 39 36 2b 32 2a | 34 34 0d 03 52 1a 20 20 |64,96+2*|44..R. |
|00000b10| 20 6d 65 6e 75 74 72 65 | 65 24 3d 22 69 63 6f 6e | menutre|e$="icon|
|00000b20| 62 61 72 22 0d 03 5c 07 | 20 20 cb 0d 03 66 4c 20 |bar"..\.| ...fL |
|00000b30| c9 31 2c 34 3a f4 20 61 | 64 6a 75 73 74 2c 73 65 |.1,4:. a|djust,se|
|00000b40| 6c 65 63 74 20 63 6c 69 | 63 6b 65 64 20 28 6f 72 |lect cli|cked (or|
|00000b50| 20 64 6f 75 62 6c 65 2d | 63 6c 69 63 6b 65 64 20 | double-|clicked |
|00000b60| 69 6e 73 74 65 61 64 20 | 66 6f 72 20 6d 61 69 6e |instead |for main|
|00000b70| 68 61 6e 64 6c 65 29 0d | 03 70 12 20 20 c8 8e 20 |handle).|.p. .. |
|00000b80| 77 69 6e 64 6f 77 25 20 | ca 0d 03 7a 2a 20 20 c9 |window% |...z* .|
|00000b90| 2d 32 3a f2 6f 70 65 6e | 64 61 74 61 77 69 6e 64 |-2:.open|datawind|
|00000ba0| 6f 77 3a f2 63 61 72 65 | 74 73 74 72 69 6e 67 28 |ow:.care|tstring(|
|00000bb0| 2d 31 29 0d 03 84 13 20 | 20 c9 6d 61 69 6e 68 61 |-1).... | .mainha|
|00000bc0| 6e 64 6c 65 25 3a 0d 03 | 8e 13 20 20 20 e7 62 75 |ndle%:..|.. .bu|
|00000bd0| 74 74 6f 6e 25 3d 34 20 | 8c 0d 03 98 6e 20 20 20 |tton%=4 |....n |
|00000be0| 20 e7 a4 54 73 68 69 66 | 74 20 f2 68 69 67 68 6c | ..Tshif|t .highl|
|00000bf0| 69 67 68 74 28 30 2c 6d | 61 78 63 6f 6c 75 6d 6e |ight(0,m|axcolumn|
|00000c00| 25 2c 63 61 72 65 74 72 | 6f 77 25 2c 63 61 72 65 |%,caretr|ow%,care|
|00000c10| 74 72 6f 77 25 29 20 8b | f2 68 69 67 68 6c 69 67 |trow%) .|.highlig|
|00000c20| 68 74 28 63 61 72 65 74 | 63 6f 6c 75 6d 6e 25 2c |ht(caret|column%,|
|00000c30| 63 61 72 65 74 63 6f 6c | 75 6d 6e 25 2c 30 2c 6d |caretcol|umn%,0,m|
|00000c40| 61 78 72 6f 77 25 29 0d | 03 a2 08 20 20 20 cd 0d |axrow%).|... ..|
|00000c50| 03 ac 08 20 20 7f 3a 0d | 03 b6 1a 20 20 20 e7 69 |... .:.|... .i|
|00000c60| 63 6f 6e 25 3d 31 20 84 | 69 63 6f 6e 25 3d 32 20 |con%=1 .|icon%=2 |
|00000c70| 8c 0d 03 c0 11 20 20 20 | 20 f2 63 61 6e 63 65 6c |..... | .cancel|
|00000c80| 4f 4b 0d 03 ca 08 20 20 | 20 cc 0d 03 d4 27 20 20 |OK.... | ....' |
|00000c90| 20 20 f2 73 65 6c 65 63 | 74 76 61 72 69 61 62 6c | .selec|tvariabl|
|00000ca0| 65 73 28 77 69 6e 64 6f | 77 25 2c 69 63 6f 6e 25 |es(windo|w%,icon%|
|00000cb0| 29 0d 03 de 08 20 20 20 | cd 0d 03 e8 07 20 20 cb |).... |..... .|
|00000cc0| 0d 03 f2 12 20 c9 31 36 | 2c 36 34 3a f4 20 64 72 |.... .16|,64:. dr|
|00000cd0| 61 67 0d 03 fc 25 20 20 | e7 77 69 6e 64 6f 77 25 |ag...% |.window%|
|00000ce0| 3d 73 61 76 65 68 61 6e | 64 6c 65 25 20 80 69 63 |=savehan|dle% .ic|
|00000cf0| 6f 6e 25 3d 30 20 8c 0d | 04 06 3a 20 20 20 21 62 |on%=0 ..|..: !b|
|00000d00| 6c 6f 63 6b 25 3d 73 61 | 76 65 68 61 6e 64 6c 65 |lock%=sa|vehandle|
|00000d10| 25 3a c8 99 22 57 69 6d | 70 5f 47 65 74 57 69 6e |%:.."Wim|p_GetWin|
|00000d20| 64 6f 77 53 74 61 74 65 | 22 2c 2c 62 6c 6f 63 6b |dowState|",,block|
|00000d30| 25 0d 04 10 33 20 20 20 | 78 25 3d 62 6c 6f 63 6b |%...3 |x%=block|
|00000d40| 25 21 34 2d 62 6c 6f 63 | 6b 25 21 32 30 3a 79 25 |%!4-bloc|k%!20:y%|
|00000d50| 3d 62 6c 6f 63 6b 25 21 | 31 36 2d 62 6c 6f 63 6b |=block%!|16-block|
|00000d60| 25 21 32 34 0d 04 1a 33 | 20 20 20 62 6c 6f 63 6b |%!24...3| block|
|00000d70| 25 21 34 3d 69 63 6f 6e | 25 3a c8 99 22 57 69 6d |%!4=icon|%:.."Wim|
|00000d80| 70 5f 47 65 74 49 63 6f | 6e 53 74 61 74 65 22 2c |p_GetIco|nState",|
|00000d90| 2c 62 6c 6f 63 6b 25 0d | 04 24 51 20 20 20 78 6d |,block%.|.$Q xm|
|00000da0| 69 6e 25 3d 78 25 2b 62 | 6c 6f 63 6b 25 21 38 3a |in%=x%+b|lock%!8:|
|00000db0| 79 6d 69 6e 25 3d 79 25 | 2b 62 6c 6f 63 6b 25 21 |ymin%=y%|+block%!|
|00000dc0| 31 32 3a 78 6d 61 78 25 | 3d 78 25 2b 62 6c 6f 63 |12:xmax%|=x%+bloc|
|00000dd0| 6b 25 21 31 36 3a 79 6d | 61 78 25 3d 79 25 2b 62 |k%!16:ym|ax%=y%+b|
|00000de0| 6c 6f 63 6b 25 21 32 30 | 0d 04 2e 50 20 20 20 62 |lock%!20|...P b|
|00000df0| 6c 6f 63 6b 25 21 34 3d | 35 3a 62 6c 6f 63 6b 25 |lock%!4=|5:block%|
|00000e00| 21 38 3d 78 6d 69 6e 25 | 3a 62 6c 6f 63 6b 25 21 |!8=xmin%|:block%!|
|00000e10| 31 32 3d 79 6d 69 6e 25 | 3a 62 6c 6f 63 6b 25 21 |12=ymin%|:block%!|
|00000e20| 31 36 3d 78 6d 61 78 25 | 3a 62 6c 6f 63 6b 25 21 |16=xmax%|:block%!|
|00000e30| 32 30 3d 79 6d 61 78 25 | 0d 04 38 46 20 20 20 62 |20=ymax%|..8F b|
|00000e40| 6c 6f 63 6b 25 21 32 34 | 3d 30 3a 62 6c 6f 63 6b |lock%!24|=0:block|
|00000e50| 25 21 32 38 3d 30 3a 62 | 6c 6f 63 6b 25 21 33 32 |%!28=0:b|lock%!32|
|00000e60| 3d 26 37 46 46 46 46 46 | 46 46 3a 62 6c 6f 63 6b |=&7FFFFF|FF:block|
|00000e70| 25 21 33 36 3d 26 37 46 | 46 46 46 46 46 46 0d 04 |%!36=&7F|FFFFFF..|
|00000e80| 42 1f 20 20 20 c8 99 22 | 57 69 6d 70 5f 44 72 61 |B. .."|Wimp_Dra|
|00000e90| 67 42 6f 78 22 2c 2c 62 | 6c 6f 63 6b 25 0d 04 4c |gBox",,b|lock%..L|
|00000ea0| 07 20 20 cd 0d 04 56 32 | 20 c9 32 35 36 2c 31 30 |. ...V2| .256,10|
|00000eb0| 32 34 3a f4 20 63 6c 69 | 63 6b 20 77 68 65 6e 20 |24:. cli|ck when |
|00000ec0| 64 6f 75 62 6c 65 2d 63 | 6c 69 63 6b 20 69 73 20 |double-c|lick is |
|00000ed0| 61 63 74 69 76 65 0d 04 | 60 1c 20 20 e7 77 69 6e |active..|`. .win|
|00000ee0| 64 6f 77 25 3d 6d 61 69 | 6e 68 61 6e 64 6c 65 25 |dow%=mai|nhandle%|
|00000ef0| 20 8c 0d 04 6a 1a 20 20 | 20 21 62 6c 6f 63 6b 25 | ...j. | !block%|
|00000f00| 3d 6d 61 69 6e 68 61 6e | 64 6c 65 25 0d 04 74 26 |=mainhan|dle%..t&|
|00000f10| 20 20 20 c8 99 22 57 69 | 6d 70 5f 47 65 74 57 69 | .."Wi|mp_GetWi|
|00000f20| 6e 64 6f 77 53 74 61 74 | 65 22 2c 2c 62 6c 6f 63 |ndowStat|e",,bloc|
|00000f30| 6b 25 0d 04 7e 35 20 20 | 20 6f 78 25 3d 62 6c 6f |k%..~5 | ox%=blo|
|00000f40| 63 6b 25 21 34 2d 62 6c | 6f 63 6b 25 21 32 30 3a |ck%!4-bl|ock%!20:|
|00000f50| 6f 79 25 3d 62 6c 6f 63 | 6b 25 21 31 36 2d 62 6c |oy%=bloc|k%!16-bl|
|00000f60| 6f 63 6b 25 21 32 34 0d | 04 88 48 20 20 20 63 6f |ock%!24.|..H co|
|00000f70| 6c 75 6d 6e 25 3d 28 78 | 25 2d 6f 78 25 2d 6c 65 |lumn%=(x|%-ox%-le|
|00000f80| 66 74 77 69 64 74 68 25 | 29 20 81 28 31 34 2a 31 |ftwidth%|) .(14*1|
|00000f90| 36 29 3a 72 6f 77 25 3d | 28 6f 79 25 2d 79 25 2d |6):row%=|(oy%-y%-|
|00000fa0| 74 6f 70 68 65 69 67 68 | 74 25 29 20 81 33 32 0d |topheigh|t%) .32.|
|00000fb0| 04 92 33 20 20 20 e7 63 | 6f 6c 75 6d 6e 25 3e 43 |..3 .c|olumn%>C|
|00000fc0| 25 20 63 6f 6c 75 6d 6e | 25 3d 43 25 20 8b e7 63 |% column|%=C% ..c|
|00000fd0| 6f 6c 75 6d 6e 25 3c 30 | 20 63 6f 6c 75 6d 6e 25 |olumn%<0| column%|
|00000fe0| 3d 30 0d 04 9c 28 20 20 | 20 e7 72 6f 77 25 3e 50 |=0...( | .row%>P|
|00000ff0| 25 20 72 6f 77 25 3d 50 | 25 20 8b e7 72 6f 77 25 |% row%=P|% ..row%|
|00001000| 3c 30 20 63 72 6f 77 25 | 3d 30 0d 04 a6 37 20 20 |<0 crow%|=0...7 |
|00001010| 20 f2 72 65 64 72 61 77 | 6d 61 69 6e 28 63 61 72 | .redraw|main(car|
|00001020| 65 74 78 31 25 2c 63 61 | 72 65 74 78 32 25 2c 63 |etx1%,ca|retx2%,c|
|00001030| 61 72 65 74 79 31 25 2c | 63 61 72 65 74 79 32 25 |arety1%,|carety2%|
|00001040| 29 0d 04 b0 15 20 20 20 | e7 62 75 74 74 6f 6e 25 |).... |.button%|
|00001050| 3d 32 35 36 20 8c 0d 04 | ba 4f 20 20 20 20 63 61 |=256 ...|.O ca|
|00001060| 72 65 74 78 31 25 3d 63 | 61 72 65 74 63 6f 6c 75 |retx1%=c|aretcolu|
|00001070| 6d 6e 25 3a 63 61 72 65 | 74 78 32 25 3d 63 6f 6c |mn%:care|tx2%=col|
|00001080| 75 6d 6e 25 3a 63 61 72 | 65 74 79 31 25 3d 63 61 |umn%:car|ety1%=ca|
|00001090| 72 65 74 72 6f 77 25 3a | 63 61 72 65 74 79 32 25 |retrow%:|carety2%|
|000010a0| 3d 72 6f 77 25 0d 04 c4 | 41 20 20 20 20 e7 63 61 |=row%...|A .ca|
|000010b0| 72 65 74 78 31 25 3e 63 | 61 72 65 74 78 32 25 20 |retx1%>c|aretx2% |
|000010c0| 63 61 72 65 74 78 32 25 | 3d 63 61 72 65 74 63 6f |caretx2%|=caretco|
|000010d0| 6c 75 6d 6e 25 3a 63 61 | 72 65 74 78 31 25 3d 63 |lumn%:ca|retx1%=c|
|000010e0| 6f 6c 75 6d 6e 25 0d 04 | ce 3b 20 20 20 20 e7 63 |olumn%..|.; .c|
|000010f0| 61 72 65 74 79 31 25 3e | 63 61 72 65 74 79 32 25 |arety1%>|carety2%|
|00001100| 20 63 61 72 65 74 79 32 | 25 3d 63 61 72 65 74 72 | carety2|%=caretr|
|00001110| 6f 77 25 3a 63 61 72 65 | 74 79 31 25 3d 72 6f 77 |ow%:care|ty1%=row|
|00001120| 25 0d 04 d8 18 20 20 20 | 20 f2 63 61 72 65 74 73 |%.... | .carets|
|00001130| 74 72 69 6e 67 28 2d 31 | 29 0d 04 e2 08 20 20 20 |tring(-1|).... |
|00001140| cc 0d 04 ec 4a 20 20 20 | 20 63 61 72 65 74 78 31 |....J | caretx1|
|00001150| 25 3d 63 6f 6c 75 6d 6e | 25 3a 63 61 72 65 74 79 |%=column|%:carety|
|00001160| 31 25 3d 72 6f 77 25 3a | 63 61 72 65 74 78 32 25 |1%=row%:|caretx2%|
|00001170| 3d 63 61 72 65 74 78 31 | 25 3a 63 61 72 65 74 79 |=caretx1|%:carety|
|00001180| 32 25 3d 63 61 72 65 74 | 79 31 25 0d 04 f6 2b 20 |2%=caret|y1%...+ |
|00001190| 20 20 20 63 61 72 65 74 | 63 6f 6c 75 6d 6e 25 3d | caret|column%=|
|000011a0| 63 6f 6c 75 6d 6e 25 3a | 63 61 72 65 74 72 6f 77 |column%:|caretrow|
|000011b0| 25 3d 72 6f 77 25 0d 05 | 00 35 20 20 20 20 f2 63 |%=row%..|.5 .c|
|000011c0| 61 72 65 74 73 74 72 69 | 6e 67 28 28 28 78 25 2d |aretstri|ng(((x%-|
|000011d0| 6f 78 25 2d 6c 65 66 74 | 77 69 64 74 68 25 2d 38 |ox%-left|width%-8|
|000011e0| 29 20 81 31 36 29 20 83 | 31 34 29 0d 05 0a 08 20 |) .16) .|14).... |
|000011f0| 20 20 cd 0d 05 14 37 20 | 20 20 f2 72 65 64 72 61 | ....7 | .redra|
|00001200| 77 6d 61 69 6e 28 63 61 | 72 65 74 78 31 25 2c 63 |wmain(ca|retx1%,c|
|00001210| 61 72 65 74 78 32 25 2c | 63 61 72 65 74 79 31 25 |aretx2%,|carety1%|
|00001220| 2c 63 61 72 65 74 79 32 | 25 29 0d 05 1e 07 20 20 |,carety2|%).... |
|00001230| cd 0d 05 28 06 20 cb 0d | 05 32 04 0d 05 3c 11 c9 |...(. ..|.2...<..|
|00001240| 37 3a f4 20 64 72 61 67 | 20 62 6f 78 0d 05 46 0d |7:. drag| box..F.|
|00001250| 20 f2 70 75 74 73 61 76 | 65 0d 05 50 2a 20 53 61 | .putsav|e..P* Sa|
|00001260| 76 65 24 3d 53 61 76 65 | 24 28 53 61 76 65 54 79 |ve$=Save|$(SaveTy|
|00001270| 70 65 25 29 3a 69 25 3d | a7 53 61 76 65 24 2c 22 |pe%):i%=|.Save$,"|
|00001280| 2e 22 29 0d 05 5a 0b 20 | c8 95 69 25 3e 30 0d 05 |.")..Z. |..i%>0..|
|00001290| 64 18 20 20 53 61 76 65 | 24 3d c1 53 61 76 65 24 |d. Save|$=.Save$|
|000012a0| 2c 69 25 2b 31 29 0d 05 | 6e 14 20 20 69 25 3d a7 |,i%+1)..|n. i%=.|
|000012b0| 53 61 76 65 24 2c 22 2e | 22 29 0d 05 78 06 20 ce |Save$,".|")..x. .|
|000012c0| 0d 05 82 24 20 c8 99 22 | 57 69 6d 70 5f 47 65 74 |...$ .."|Wimp_Get|
|000012d0| 50 6f 69 6e 74 65 72 49 | 6e 66 6f 22 2c 2c 62 6c |PointerI|nfo",,bl|
|000012e0| 6f 63 6b 25 0d 05 8c 4d | 20 64 65 73 74 78 25 3d |ock%...M| destx%=|
|000012f0| 21 62 6c 6f 63 6b 25 3a | 64 65 73 74 79 25 3d 62 |!block%:|desty%=b|
|00001300| 6c 6f 63 6b 25 21 34 3a | 64 65 73 74 68 61 6e 64 |lock%!4:|desthand|
|00001310| 6c 65 25 3d 62 6c 6f 63 | 6b 25 21 31 32 3a 64 65 |le%=bloc|k%!12:de|
|00001320| 73 74 69 63 6f 6e 25 3d | 62 6c 6f 63 6b 25 21 31 |sticon%=|block%!1|
|00001330| 36 0d 05 96 1f 20 21 62 | 6c 6f 63 6b 25 3d 34 2a |6.... !b|lock%=4*|
|00001340| 28 28 34 39 2b a9 53 61 | 76 65 24 29 20 81 34 29 |((49+.Sa|ve$) .4)|
|00001350| 0d 05 a0 46 20 62 6c 6f | 63 6b 25 21 31 32 3d 30 |...F blo|ck%!12=0|
|00001360| 3a 62 6c 6f 63 6b 25 21 | 31 36 3d 31 3a 62 6c 6f |:block%!|16=1:blo|
|00001370| 63 6b 25 21 32 30 3d 64 | 65 73 74 68 61 6e 64 6c |ck%!20=d|esthandl|
|00001380| 65 25 3a 62 6c 6f 63 6b | 25 21 32 34 3d 64 65 73 |e%:block|%!24=des|
|00001390| 74 69 63 6f 6e 25 0d 05 | aa 37 20 62 6c 6f 63 6b |ticon%..|.7 block|
|000013a0| 25 21 32 38 3d 64 65 73 | 74 78 25 3a 62 6c 6f 63 |%!28=des|tx%:bloc|
|000013b0| 6b 25 21 33 32 3d 64 65 | 73 74 79 25 3a 62 6c 6f |k%!32=de|sty%:blo|
|000013c0| 63 6b 25 21 33 36 3d 26 | 31 30 30 30 30 0d 05 b4 |ck%!36=&|10000...|
|000013d0| 2e 20 62 6c 6f 63 6b 25 | 21 34 30 3d a0 28 22 26 |. block%|!40=.("&|
|000013e0| 22 2b c2 46 69 6c 65 54 | 79 70 65 24 28 53 61 76 |"+.FileT|ype$(Sav|
|000013f0| 65 54 79 70 65 25 29 2c | 33 29 29 0d 05 be 1a 20 |eType%),|3)).... |
|00001400| 24 28 62 6c 6f 63 6b 25 | 2b 34 34 29 3d 53 61 76 |$(block%|+44)=Sav|
|00001410| 65 24 2b bd 30 0d 05 c8 | 39 20 c8 99 22 57 69 6d |e$+.0...|9 .."Wim|
|00001420| 70 5f 53 65 6e 64 4d 65 | 73 73 61 67 65 22 2c 31 |p_SendMe|ssage",1|
|00001430| 38 2c 62 6c 6f 63 6b 25 | 2c 64 65 73 74 68 61 6e |8,block%|,desthan|
|00001440| 64 6c 65 25 2c 64 65 73 | 74 69 63 6f 6e 25 0d 05 |dle%,des|ticon%..|
|00001450| d2 04 0d 05 dc 14 c9 38 | 3a f4 20 6b 65 79 20 70 |.......8|:. key p|
|00001460| 72 65 73 73 65 64 0d 05 | e6 23 20 6b 65 79 25 3d |ressed..|.# key%=|
|00001470| 62 6c 6f 63 6b 25 21 32 | 34 3a 77 69 6e 64 6f 77 |block%!2|4:window|
|00001480| 25 3d 21 62 6c 6f 63 6b | 25 0d 05 f0 1b 20 e7 21 |%=!block|%.... .!|
|00001490| 62 6c 6f 63 6b 25 3d 6d | 61 69 6e 68 61 6e 64 6c |block%=m|ainhandl|
|000014a0| 65 25 20 8c 0d 05 fa 0c | 20 20 f2 66 6c 75 73 68 |e% .....| .flush|
|000014b0| 0d 06 04 0f 20 20 c8 8e | 20 6b 65 79 25 20 ca 0d |.... ..| key% ..|
|000014c0| 06 0e 18 20 20 c9 26 31 | 38 45 3a f4 20 64 6f 77 |... .&1|8E:. dow|
|000014d0| 6e 20 61 72 72 6f 77 0d | 06 18 6f 20 20 20 e7 63 |n arrow.|..o .c|
|000014e0| 61 72 65 74 72 6f 77 25 | 3c 50 25 20 f2 72 65 63 |aretrow%|<P% .rec|
|000014f0| 6f 72 64 63 61 72 65 74 | 28 a3 29 3a 63 61 72 65 |ordcaret|(.):care|
|00001500| 74 72 6f 77 25 2b 3d 31 | 3a f2 6f 6e 65 73 65 6c |trow%+=1|:.onesel|
|00001510| 65 63 74 28 2d 31 29 3a | f2 67 65 74 6d 61 69 6e |ect(-1):|.getmain|
|00001520| 69 6e 66 6f 3a e7 63 61 | 72 65 74 72 6f 77 25 3e |info:.ca|retrow%>|
|00001530| 62 72 6f 77 25 2d 32 20 | f2 73 63 72 6f 6c 6c 61 |brow%-2 |.scrolla|
|00001540| 72 65 61 28 31 29 0d 06 | 22 16 20 20 c9 26 31 38 |rea(1)..|". .&18|
|00001550| 46 3a f4 20 75 70 20 61 | 72 72 6f 77 0d 06 2c 6e |F:. up a|rrow..,n|
|00001560| 20 20 20 e7 63 61 72 65 | 74 72 6f 77 25 3e 30 20 | .care|trow%>0 |
|00001570| f2 72 65 63 6f 72 64 63 | 61 72 65 74 28 a3 29 3a |.recordc|aret(.):|
|00001580| 63 61 72 65 74 72 6f 77 | 25 2d 3d 31 3a f2 6f 6e |caretrow|%-=1:.on|
|00001590| 65 73 65 6c 65 63 74 28 | 2d 31 29 3a f2 67 65 74 |eselect(|-1):.get|
|000015a0| 6d 61 69 6e 69 6e 66 6f | 3a e7 63 61 72 65 74 72 |maininfo|:.caretr|
|000015b0| 6f 77 25 3c 74 72 6f 77 | 25 2b 32 20 f2 73 63 72 |ow%<trow|%+2 .scr|
|000015c0| 6f 6c 6c 61 72 65 61 28 | 32 29 0d 06 36 17 20 20 |ollarea(|2)..6. |
|000015d0| c9 26 31 41 45 3a f4 20 | 43 54 52 4c 2d 64 6f 77 |.&1AE:. |CTRL-dow|
|000015e0| 6e 0d 06 40 41 20 20 20 | f2 72 65 63 6f 72 64 63 |n..@A |.recordc|
|000015f0| 61 72 65 74 28 a3 29 3a | 63 61 72 65 74 72 6f 77 |aret(.):|caretrow|
|00001600| 25 3d 50 25 3a f2 73 63 | 72 6f 6c 6c 61 72 65 61 |%=P%:.sc|rollarea|
|00001610| 28 35 29 3a f2 6f 6e 65 | 73 65 6c 65 63 74 28 2d |(5):.one|select(-|
|00001620| 31 29 0d 06 4a 15 20 20 | c9 26 31 41 46 3a f4 20 |1)..J. |.&1AF:. |
|00001630| 43 54 52 4c 2d 75 70 0d | 06 54 40 20 20 20 f2 72 |CTRL-up.|.T@ .r|
|00001640| 65 63 6f 72 64 63 61 72 | 65 74 28 a3 29 3a 63 61 |ecordcar|et(.):ca|
|00001650| 72 65 74 72 6f 77 25 3d | 30 3a f2 73 63 72 6f 6c |retrow%=|0:.scrol|
|00001660| 6c 61 72 65 61 28 36 29 | 3a f2 6f 6e 65 73 65 6c |larea(6)|:.onesel|
|00001670| 65 63 74 28 2d 31 29 0d | 06 5e 18 20 20 c9 26 31 |ect(-1).|.^. .&1|
|00001680| 39 43 3a f4 20 53 48 49 | 46 54 2d 6c 65 66 74 0d |9C:. SHI|FT-left.|
|00001690| 06 68 19 20 20 20 f2 67 | 65 74 6d 61 69 6e 69 6e |.h. .g|etmainin|
|000016a0| 66 6f 3a 69 25 3d 2d 31 | 0d 06 72 5a 20 20 20 e7 |fo:i%=-1|..rZ .|
|000016b0| 63 61 72 65 74 78 32 25 | 3e 63 61 72 65 74 63 6f |caretx2%|>caretco|
|000016c0| 6c 75 6d 6e 25 20 69 25 | 3d 63 61 72 65 74 78 32 |lumn% i%|=caretx2|
|000016d0| 25 3a 63 61 72 65 74 78 | 32 25 2d 3d 31 20 8b e7 |%:caretx|2%-=1 ..|
|000016e0| 63 61 72 65 74 78 31 25 | 3e 30 20 63 61 72 65 74 |caretx1%|>0 caret|
|000016f0| 78 31 25 2d 3d 31 3a 69 | 25 3d 63 61 72 65 74 78 |x1%-=1:i|%=caretx|
|00001700| 31 25 0d 06 7c 50 20 20 | 20 e7 69 25 3e 2d 31 20 |1%..|P | .i%>-1 |
|00001710| f2 72 65 64 72 61 77 6d | 61 69 6e 28 69 25 2c 69 |.redrawm|ain(i%,i|
|00001720| 25 2c 63 61 72 65 74 79 | 31 25 2c 63 61 72 65 74 |%,carety|1%,caret|
|00001730| 79 32 25 29 3a e7 69 25 | 3c 6c 63 6f 6c 75 6d 6e |y2%):.i%|<lcolumn|
|00001740| 25 2b 31 20 f2 73 63 72 | 6f 6c 6c 61 72 65 61 28 |%+1 .scr|ollarea(|
|00001750| 34 29 0d 06 86 19 20 20 | c9 26 31 39 44 3a f4 20 |4).... |.&19D:. |
|00001760| 53 48 49 46 54 2d 72 69 | 67 68 74 0d 06 90 19 20 |SHIFT-ri|ght.... |
|00001770| 20 20 f2 67 65 74 6d 61 | 69 6e 69 6e 66 6f 3a 69 | .getma|ininfo:i|
|00001780| 25 3d 2d 31 0d 06 9a 5b | 20 20 20 e7 63 61 72 65 |%=-1...[| .care|
|00001790| 74 78 31 25 3c 63 61 72 | 65 74 63 6f 6c 75 6d 6e |tx1%<car|etcolumn|
|000017a0| 25 20 69 25 3d 63 61 72 | 65 74 78 31 25 3a 63 61 |% i%=car|etx1%:ca|
|000017b0| 72 65 74 78 31 25 2b 3d | 31 20 8b e7 63 61 72 65 |retx1%+=|1 ..care|
|000017c0| 74 78 32 25 3c 43 25 20 | 63 61 72 65 74 78 32 25 |tx2%<C% |caretx2%|
|000017d0| 2b 3d 31 3a 69 25 3d 63 | 61 72 65 74 78 32 25 0d |+=1:i%=c|aretx2%.|
|000017e0| 06 a4 50 20 20 20 e7 69 | 25 3e 2d 31 20 f2 72 65 |..P .i|%>-1 .re|
|000017f0| 64 72 61 77 6d 61 69 6e | 28 69 25 2c 69 25 2c 63 |drawmain|(i%,i%,c|
|00001800| 61 72 65 74 79 31 25 2c | 63 61 72 65 74 79 32 25 |arety1%,|carety2%|
|00001810| 29 3a e7 69 25 3e 72 63 | 6f 6c 75 6d 6e 25 2d 31 |):.i%>rc|olumn%-1|
|00001820| 20 f2 73 63 72 6f 6c 6c | 61 72 65 61 28 33 29 0d | .scroll|area(3).|
|00001830| 06 ae 18 20 20 c9 26 31 | 39 45 3a f4 20 53 48 49 |... .&1|9E:. SHI|
|00001840| 46 54 2d 64 6f 77 6e 0d | 06 b8 19 20 20 20 f2 67 |FT-down.|... .g|
|00001850| 65 74 6d 61 69 6e 69 6e | 66 6f 3a 69 25 3d 2d 31 |etmainin|fo:i%=-1|
|00001860| 0d 06 c2 58 20 20 20 e7 | 63 61 72 65 74 79 31 25 |...X .|carety1%|
|00001870| 3c 63 61 72 65 74 72 6f | 77 25 20 69 25 3d 63 61 |<caretro|w% i%=ca|
|00001880| 72 65 74 79 31 25 3a 63 | 61 72 65 74 79 31 25 2b |rety1%:c|arety1%+|
|00001890| 3d 31 20 8b e7 63 61 72 | 65 74 79 32 25 3c 50 25 |=1 ..car|ety2%<P%|
|000018a0| 20 63 61 72 65 74 79 32 | 25 2b 3d 31 3a 69 25 3d | carety2|%+=1:i%=|
|000018b0| 63 61 72 65 74 79 32 25 | 0d 06 cc 4d 20 20 20 e7 |carety2%|...M .|
|000018c0| 69 25 3e 2d 31 20 f2 72 | 65 64 72 61 77 6d 61 69 |i%>-1 .r|edrawmai|
|000018d0| 6e 28 63 61 72 65 74 78 | 31 25 2c 63 61 72 65 74 |n(caretx|1%,caret|
|000018e0| 78 32 25 2c 69 25 2c 69 | 25 29 3a e7 69 25 3e 62 |x2%,i%,i|%):.i%>b|
|000018f0| 72 6f 77 25 2d 32 20 f2 | 73 63 72 6f 6c 6c 61 72 |row%-2 .|scrollar|
|00001900| 65 61 28 31 29 0d 06 d6 | 16 20 20 c9 26 31 39 46 |ea(1)...|. .&19F|
|00001910| 3a f4 20 53 48 49 46 54 | 2d 75 70 0d 06 e0 19 20 |:. SHIFT|-up.... |
|00001920| 20 20 f2 67 65 74 6d 61 | 69 6e 69 6e 66 6f 3a 69 | .getma|ininfo:i|
|00001930| 25 3d 2d 31 0d 06 ea 57 | 20 20 20 e7 63 61 72 65 |%=-1...W| .care|
|00001940| 74 79 32 25 3e 63 61 72 | 65 74 72 6f 77 25 20 69 |ty2%>car|etrow% i|
|00001950| 25 3d 63 61 72 65 74 79 | 32 25 3a 63 61 72 65 74 |%=carety|2%:caret|
|00001960| 79 32 25 2d 3d 31 20 8b | e7 63 61 72 65 74 79 31 |y2%-=1 .|.carety1|
|00001970| 25 3e 30 20 63 61 72 65 | 74 79 31 25 2d 3d 31 3a |%>0 care|ty1%-=1:|
|00001980| 69 25 3d 63 61 72 65 74 | 79 31 25 0d 06 f4 4d 20 |i%=caret|y1%...M |
|00001990| 20 20 e7 69 25 3e 2d 31 | 20 f2 72 65 64 72 61 77 | .i%>-1| .redraw|
|000019a0| 6d 61 69 6e 28 63 61 72 | 65 74 78 31 25 2c 63 61 |main(car|etx1%,ca|
|000019b0| 72 65 74 78 32 25 2c 69 | 25 2c 69 25 29 3a e7 69 |retx2%,i|%,i%):.i|
|000019c0| 25 3c 74 72 6f 77 25 2b | 32 20 f2 73 63 72 6f 6c |%<trow%+|2 .scrol|
|000019d0| 6c 61 72 65 61 28 32 29 | 0d 06 fe 11 20 20 c9 26 |larea(2)|.... .&|
|000019e0| 31 38 41 3a f4 20 54 41 | 42 0d 07 08 29 20 20 20 |18A:. TA|B...) |
|000019f0| f2 72 65 63 6f 72 64 63 | 61 72 65 74 28 a3 29 3a |.recordc|aret(.):|
|00001a00| e7 63 61 72 65 74 63 6f | 6c 75 6d 6e 25 3c 43 25 |.caretco|lumn%<C%|
|00001a10| 20 8c 0d 07 12 5b 20 20 | 20 20 63 61 72 65 74 63 | ....[ | caretc|
|00001a20| 6f 6c 75 6d 6e 25 2b 3d | 31 3a f2 6f 6e 65 73 65 |olumn%+=|1:.onese|
|00001a30| 6c 65 63 74 28 31 31 29 | 3a f2 67 65 74 6d 61 69 |lect(11)|:.getmai|
|00001a40| 6e 69 6e 66 6f 3a e7 63 | 61 72 65 74 63 6f 6c 75 |ninfo:.c|aretcolu|
|00001a50| 6d 6e 25 3e 72 63 6f 6c | 75 6d 6e 25 2d 31 20 f2 |mn%>rcol|umn%-1 .|
|00001a60| 73 63 72 6f 6c 6c 61 72 | 65 61 28 33 29 0d 07 1c |scrollar|ea(3)...|
|00001a70| 08 20 20 20 cc 0d 07 26 | 4f 20 20 20 20 e7 63 61 |. ...&|O .ca|
|00001a80| 72 65 74 72 6f 77 25 3c | 50 25 20 63 61 72 65 74 |retrow%<|P% caret|
|00001a90| 63 6f 6c 75 6d 6e 25 3d | 30 3a 63 61 72 65 74 72 |column%=|0:caretr|
|00001aa0| 6f 77 25 2b 3d 31 3a f2 | 6f 6e 65 73 65 6c 65 63 |ow%+=1:.|oneselec|
|00001ab0| 74 28 31 31 29 3a f2 73 | 63 72 6f 6c 6c 61 72 65 |t(11):.s|crollare|
|00001ac0| 61 28 39 29 0d 07 30 08 | 20 20 20 cd 0d 07 3a 17 |a(9)..0.| ...:.|
|00001ad0| 20 20 c9 26 31 39 41 3a | f4 20 53 48 49 46 54 2d | .&19A:|. SHIFT-|
|00001ae0| 54 41 42 0d 07 44 28 20 | 20 20 f2 72 65 63 6f 72 |TAB..D( | .recor|
|00001af0| 64 63 61 72 65 74 28 a3 | 29 3a e7 63 61 72 65 74 |dcaret(.|):.caret|
|00001b00| 63 6f 6c 75 6d 6e 25 3e | 30 20 8c 0d 07 4e 5b 20 |column%>|0 ...N[ |
|00001b10| 20 20 20 63 61 72 65 74 | 63 6f 6c 75 6d 6e 25 2d | caret|column%-|
|00001b20| 3d 31 3a f2 6f 6e 65 73 | 65 6c 65 63 74 28 31 31 |=1:.ones|elect(11|
|00001b30| 29 3a f2 67 65 74 6d 61 | 69 6e 69 6e 66 6f 3a e7 |):.getma|ininfo:.|
|00001b40| 63 61 72 65 74 63 6f 6c | 75 6d 6e 25 3c 6c 63 6f |caretcol|umn%<lco|
|00001b50| 6c 75 6d 6e 25 2b 31 20 | f2 73 63 72 6f 6c 6c 61 |lumn%+1 |.scrolla|
|00001b60| 72 65 61 28 34 29 0d 07 | 58 08 20 20 20 cc 0d 07 |rea(4)..|X. ...|
|00001b70| 62 50 20 20 20 20 e7 63 | 61 72 65 74 72 6f 77 25 |bP .c|aretrow%|
|00001b80| 3e 30 20 63 61 72 65 74 | 63 6f 6c 75 6d 6e 25 3d |>0 caret|column%=|
|00001b90| 43 25 3a 63 61 72 65 74 | 72 6f 77 25 2d 3d 31 3a |C%:caret|row%-=1:|
|00001ba0| f2 6f 6e 65 73 65 6c 65 | 63 74 28 31 31 29 3a f2 |.onesele|ct(11):.|
|00001bb0| 73 63 72 6f 6c 6c 61 72 | 65 61 28 31 30 29 0d 07 |scrollar|ea(10)..|
|00001bc0| 6c 08 20 20 20 cd 0d 07 | 76 10 20 20 c9 33 30 3a |l. ...|v. .30:|
|00001bd0| f4 20 68 6f 6d 65 0d 07 | 80 4f 20 20 20 f2 72 65 |. home..|.O .re|
|00001be0| 63 6f 72 64 63 61 72 65 | 74 28 a3 29 3a 63 61 72 |cordcare|t(.):car|
|00001bf0| 65 74 63 6f 6c 75 6d 6e | 25 3d 30 3a 63 61 72 65 |etcolumn|%=0:care|
|00001c00| 74 72 6f 77 25 3d 30 3a | f2 6f 6e 65 73 65 6c 65 |trow%=0:|.onesele|
|00001c10| 63 74 28 31 31 29 3a f2 | 73 63 72 6f 6c 6c 61 72 |ct(11):.|scrollar|
|00001c20| 65 61 28 37 29 0d 07 8a | 1c 20 20 c9 26 31 39 42 |ea(7)...|. .&19B|
|00001c30| 3a f4 20 53 48 49 46 54 | 2d 63 6f 70 79 2f 65 6e |:. SHIFT|-copy/en|
|00001c40| 64 0d 07 94 5e 20 20 20 | f2 72 65 63 6f 72 64 63 |d...^ |.recordc|
|00001c50| 61 72 65 74 28 a3 29 3a | 63 61 72 65 74 63 6f 6c |aret(.):|caretcol|
|00001c60| 75 6d 6e 25 3d 6d 61 78 | 63 6f 6c 75 6d 6e 25 3a |umn%=max|column%:|
|00001c70| 63 61 72 65 74 72 6f 77 | 25 3d 6d 61 78 72 6f 77 |caretrow|%=maxrow|
|00001c80| 25 3a f2 6f 6e 65 73 65 | 6c 65 63 74 28 31 31 29 |%:.onese|lect(11)|
|00001c90| 3a f2 73 63 72 6f 6c 6c | 61 72 65 61 28 38 29 0d |:.scroll|area(8).|
|00001ca0| 07 9e 19 20 20 c9 26 31 | 38 44 3a f4 20 72 69 67 |... .&1|8D:. rig|
|00001cb0| 68 74 20 61 72 72 6f 77 | 0d 07 a8 19 20 20 20 e7 |ht arrow|.... .|
|00001cc0| 63 61 72 65 74 6f 66 66 | 73 65 74 25 3c 31 31 20 |caretoff|set%<11 |
|00001cd0| 8c 0d 07 b2 22 20 20 20 | 20 63 61 72 65 74 6f 66 |...." | caretof|
|00001ce0| 66 73 65 74 25 2b 3d 31 | 3a f2 6d 6f 76 65 63 61 |fset%+=1|:.moveca|
|00001cf0| 72 65 74 0d 07 bc 08 20 | 20 20 cc 0d 07 c6 7b 20 |ret.... | ....{ |
|00001d00| 20 20 20 e7 63 61 72 65 | 74 63 6f 6c 75 6d 6e 25 | .care|tcolumn%|
|00001d10| 3c 43 25 20 f2 72 65 63 | 6f 72 64 63 61 72 65 74 |<C% .rec|ordcaret|
|00001d20| 28 a3 29 3a 63 61 72 65 | 74 63 6f 6c 75 6d 6e 25 |(.):care|tcolumn%|
|00001d30| 2b 3d 31 3a f2 6f 6e 65 | 73 65 6c 65 63 74 28 30 |+=1:.one|select(0|
|00001d40| 29 3a f2 67 65 74 6d 61 | 69 6e 69 6e 66 6f 3a e7 |):.getma|ininfo:.|
|00001d50| 63 61 72 65 74 63 6f 6c | 75 6d 6e 25 3e 72 63 6f |caretcol|umn%>rco|
|00001d60| 6c 75 6d 6e 25 2d 31 20 | f2 73 63 72 6f 6c 6c 61 |lumn%-1 |.scrolla|
|00001d70| 72 65 61 28 33 29 0d 07 | d0 08 20 20 20 cd 0d 07 |rea(3)..|.. ...|
|00001d80| da 18 20 20 c9 26 31 38 | 43 3a f4 20 6c 65 66 74 |.. .&18|C:. left|
|00001d90| 20 61 72 72 6f 77 0d 07 | e4 26 20 20 20 e7 63 61 | arrow..|.& .ca|
|00001da0| 72 65 74 6f 66 66 73 65 | 74 25 3e 31 31 2d a9 63 |retoffse|t%>11-.c|
|00001db0| 61 72 65 74 73 68 6f 72 | 74 24 20 8c 0d 07 ee 22 |aretshor|t$ ...."|
|00001dc0| 20 20 20 20 63 61 72 65 | 74 6f 66 66 73 65 74 25 | care|toffset%|
|00001dd0| 2d 3d 31 3a f2 6d 6f 76 | 65 63 61 72 65 74 0d 07 |-=1:.mov|ecaret..|
|00001de0| f8 08 20 20 20 cc 0d 08 | 02 7b 20 20 20 20 e7 63 |.. ...|.{ .c|
|00001df0| 61 72 65 74 63 6f 6c 75 | 6d 6e 25 3e 30 20 f2 72 |aretcolu|mn%>0 .r|
|00001e00| 65 63 6f 72 64 63 61 72 | 65 74 28 a3 29 3a 63 61 |ecordcar|et(.):ca|
|00001e10| 72 65 74 63 6f 6c 75 6d | 6e 25 2d 3d 31 3a f2 6f |retcolum|n%-=1:.o|
|00001e20| 6e 65 73 65 6c 65 63 74 | 28 31 31 29 3a f2 67 65 |neselect|(11):.ge|
|00001e30| 74 6d 61 69 6e 69 6e 66 | 6f 3a e7 63 61 72 65 74 |tmaininf|o:.caret|
|00001e40| 63 6f 6c 75 6d 6e 25 3c | 6c 63 6f 6c 75 6d 6e 25 |column%<|lcolumn%|
|00001e50| 2b 31 20 f2 73 63 72 6f | 6c 6c 61 72 65 61 28 34 |+1 .scro|llarea(4|
|00001e60| 29 0d 08 0c 08 20 20 20 | cd 0d 08 16 14 20 20 c9 |).... |..... .|
|00001e70| 38 3a f4 20 62 61 63 6b | 73 70 61 63 65 0d 08 20 |8:. back|space.. |
|00001e80| 28 20 20 20 70 6f 73 25 | 3d a9 63 61 72 65 74 73 |( pos%|=.carets|
|00001e90| 68 6f 72 74 24 2d 31 31 | 2b 63 61 72 65 74 6f 66 |hort$-11|+caretof|
|00001ea0| 66 73 65 74 25 0d 08 2a | 44 20 20 20 e7 70 6f 73 |fset%..*|D .pos|
|00001eb0| 25 3e 30 20 63 61 72 65 | 74 73 68 6f 72 74 24 3d |%>0 care|tshort$=|
|00001ec0| c0 63 61 72 65 74 73 68 | 6f 72 74 24 2c 70 6f 73 |.caretsh|ort$,pos|
|00001ed0| 25 2d 31 29 2b c1 63 61 | 72 65 74 73 68 6f 72 74 |%-1)+.ca|retshort|
|00001ee0| 24 2c 70 6f 73 25 2b 31 | 29 0d 08 34 33 20 20 20 |$,pos%+1|)..43 |
|00001ef0| 63 61 72 65 74 24 3d c2 | 22 20 20 20 20 20 20 20 |caret$=.|" |
|00001f00| 20 20 20 20 20 20 22 2b | 63 61 72 65 74 73 68 6f | "+|caretsho|
|00001f10| 72 74 24 2b 22 20 20 22 | 2c 31 34 29 0d 08 3e 41 |rt$+" "|,14)..>A|
|00001f20| 20 20 20 f2 72 65 64 72 | 61 77 6d 61 69 6e 28 63 | .redr|awmain(c|
|00001f30| 61 72 65 74 63 6f 6c 75 | 6d 6e 25 2c 63 61 72 65 |aretcolu|mn%,care|
|00001f40| 74 63 6f 6c 75 6d 6e 25 | 2c 63 61 72 65 74 72 6f |tcolumn%|,caretro|
|00001f50| 77 25 2c 63 61 72 65 74 | 72 6f 77 25 29 0d 08 48 |w%,caret|row%)..H|
|00001f60| 12 20 20 c9 31 33 3a f4 | 20 72 65 74 75 72 6e 0d |. .13:.| return.|
|00001f70| 08 52 25 20 20 20 f2 72 | 65 63 6f 72 64 63 61 72 |.R% .r|ecordcar|
|00001f80| 65 74 28 b9 29 3a f2 6f | 6e 65 73 65 6c 65 63 74 |et(.):.o|neselect|
|00001f90| 28 31 31 29 0d 08 5c 11 | 20 20 20 e7 a4 54 73 68 |(11)..\.| ..Tsh|
|00001fa0| 69 66 74 20 8c 0d 08 66 | 1a 20 20 20 20 e7 63 61 |ift ...f|. .ca|
|00001fb0| 72 65 74 63 6f 6c 75 6d | 6e 25 3c 43 25 20 8c 0d |retcolum|n%<C% ..|
|00001fc0| 08 70 5c 20 20 20 20 20 | 63 61 72 65 74 63 6f 6c |.p\ |caretcol|
|00001fd0| 75 6d 6e 25 2b 3d 31 3a | f2 6f 6e 65 73 65 6c 65 |umn%+=1:|.onesele|
|00001fe0| 63 74 28 31 31 29 3a f2 | 67 65 74 6d 61 69 6e 69 |ct(11):.|getmaini|
|00001ff0| 6e 66 6f 3a e7 63 61 72 | 65 74 63 6f 6c 75 6d 6e |nfo:.car|etcolumn|
|00002000| 25 3e 72 63 6f 6c 75 6d | 6e 25 2d 31 20 f2 73 63 |%>rcolum|n%-1 .sc|
|00002010| 72 6f 6c 6c 61 72 65 61 | 28 33 29 0d 08 7a 09 20 |rollarea|(3)..z. |
|00002020| 20 20 20 cc 0d 08 84 50 | 20 20 20 20 20 e7 63 61 | ....P| .ca|
|00002030| 72 65 74 72 6f 77 25 3c | 50 25 20 63 61 72 65 74 |retrow%<|P% caret|
|00002040| 63 6f 6c 75 6d 6e 25 3d | 30 3a 63 61 72 65 74 72 |column%=|0:caretr|
|00002050| 6f 77 25 2b 3d 31 3a f2 | 6f 6e 65 73 65 6c 65 63 |ow%+=1:.|oneselec|
|00002060| 74 28 31 31 29 3a f2 73 | 63 72 6f 6c 6c 61 72 65 |t(11):.s|crollare|
|00002070| 61 28 39 29 0d 08 8e 09 | 20 20 20 20 cd 0d 08 98 |a(9)....| ....|
|00002080| 08 20 20 20 cc 0d 08 a2 | 11 20 20 20 20 e7 a4 54 |. ....|. ..T|
|00002090| 63 74 72 6c 20 8c 0d 08 | ac 50 20 20 20 20 20 e7 |ctrl ...|.P .|
|000020a0| 63 61 72 65 74 72 6f 77 | 25 3c 50 25 20 63 61 72 |caretrow|%<P% car|
|000020b0| 65 74 63 6f 6c 75 6d 6e | 25 3d 30 3a 63 61 72 65 |etcolumn|%=0:care|
|000020c0| 74 72 6f 77 25 2b 3d 31 | 3a f2 6f 6e 65 73 65 6c |trow%+=1|:.onesel|
|000020d0| 65 63 74 28 31 31 29 3a | f2 73 63 72 6f 6c 6c 61 |ect(11):|.scrolla|
|000020e0| 72 65 61 28 39 29 0d 08 | b6 09 20 20 20 20 cc 0d |rea(9)..|.. ..|
|000020f0| 08 c0 5f 20 20 20 e7 63 | 61 72 65 74 72 6f 77 25 |.._ .c|aretrow%|
|00002100| 3c 50 25 20 63 61 72 65 | 74 72 6f 77 25 2b 3d 31 |<P% care|trow%+=1|
|00002110| 3a f2 6f 6e 65 73 65 6c | 65 63 74 28 31 31 29 3a |:.onesel|ect(11):|
|00002120| f2 67 65 74 6d 61 69 6e | 69 6e 66 6f 3a e7 63 61 |.getmain|info:.ca|
|00002130| 72 65 74 72 6f 77 25 3e | 62 72 6f 77 25 2d 32 20 |retrow%>|brow%-2 |
|00002140| f2 73 63 72 6f 6c 6c 61 | 72 65 61 28 31 29 0d 08 |.scrolla|rea(1)..|
|00002150| ca 09 20 20 20 20 cd 0d | 08 d4 08 20 20 20 cd 0d |.. ..|... ..|
|00002160| 08 de 13 20 20 c9 31 32 | 37 3a f4 20 64 65 6c 65 |... .12|7:. dele|
|00002170| 74 65 0d 08 e8 11 20 20 | 20 e7 a4 54 73 68 69 66 |te.... | ..Tshif|
|00002180| 74 20 8c 0d 08 f2 1d 20 | 20 20 20 e7 63 61 72 65 |t ..... | .care|
|00002190| 74 72 6f 77 25 3c 3d 6d | 61 78 72 6f 77 25 20 8c |trow%<=m|axrow% .|
|000021a0| 0d 08 fc 14 20 20 20 20 | 20 f2 63 68 61 6e 67 65 |.... | .change|
|000021b0| 64 28 b9 29 0d 09 06 38 | 20 20 20 20 20 e3 6a 25 |d(.)...8| .j%|
|000021c0| 3d 63 61 72 65 74 78 31 | 25 20 b8 63 61 72 65 74 |=caretx1|% .caret|
|000021d0| 78 32 25 3a e3 69 25 3d | 63 61 72 65 74 72 6f 77 |x2%:.i%=|caretrow|
|000021e0| 25 20 b8 6d 61 78 72 6f | 77 25 2d 31 0d 09 10 25 |% .maxro|w%-1...%|
|000021f0| 20 20 20 20 20 f2 64 61 | 74 61 28 6a 25 2c 69 25 | .da|ta(j%,i%|
|00002200| 2c a4 54 64 61 74 61 28 | 6a 25 2c 69 25 2b 31 29 |,.Tdata(|j%,i%+1)|
|00002210| 29 0d 09 1a 3c 20 20 20 | 20 20 44 61 74 61 53 74 |)...< | DataSt|
|00002220| 61 74 75 73 25 3f 28 6a | 25 2b 43 31 25 2a 69 25 |atus%?(j|%+C1%*i%|
|00002230| 29 3d 44 61 74 61 53 74 | 61 74 75 73 25 3f 28 6a |)=DataSt|atus%?(j|
|00002240| 25 2b 43 31 25 2a 28 69 | 25 2b 31 29 29 0d 09 24 |%+C1%*(i|%+1))..$|
|00002250| 2b 20 20 20 20 20 ed 3a | 44 61 74 61 53 74 61 74 |+ .:|DataStat|
|00002260| 75 73 25 3f 28 6a 25 2b | 43 31 25 2a 6d 61 78 72 |us%?(j%+|C1%*maxr|
|00002270| 6f 77 25 29 3d 30 3a ed | 0d 09 2e 39 20 20 20 20 |ow%)=0:.|...9 |
|00002280| 20 6d 61 78 72 6f 77 25 | 2d 3d 31 3a f2 63 61 72 | maxrow%|-=1:.car|
|00002290| 65 74 73 74 72 69 6e 67 | 28 31 31 29 3a f2 75 70 |etstring|(11):.up|
|000022a0| 64 61 74 65 28 6d 61 69 | 6e 68 61 6e 64 6c 65 25 |date(mai|nhandle%|
|000022b0| 29 0d 09 38 09 20 20 20 | 20 cd 0d 09 42 08 20 20 |)..8. | ...B. |
|000022c0| 20 cc 0d 09 4c 29 20 20 | 20 20 70 6f 73 25 3d a9 | ...L) | pos%=.|
|000022d0| 63 61 72 65 74 73 68 6f | 72 74 24 2d 31 31 2b 63 |caretsho|rt$-11+c|
|000022e0| 61 72 65 74 6f 66 66 73 | 65 74 25 0d 09 56 45 20 |aretoffs|et%..VE |
|000022f0| 20 20 20 e7 70 6f 73 25 | 3e 30 20 63 61 72 65 74 | .pos%|>0 caret|
|00002300| 73 68 6f 72 74 24 3d c0 | 63 61 72 65 74 73 68 6f |short$=.|caretsho|
|00002310| 72 74 24 2c 70 6f 73 25 | 2d 31 29 2b c1 63 61 72 |rt$,pos%|-1)+.car|
|00002320| 65 74 73 68 6f 72 74 24 | 2c 70 6f 73 25 2b 31 29 |etshort$|,pos%+1)|
|00002330| 0d 09 60 34 20 20 20 20 | 63 61 72 65 74 24 3d c2 |..`4 |caret$=.|
|00002340| 22 20 20 20 20 20 20 20 | 20 20 20 20 20 20 22 2b |" | "+|
|00002350| 63 61 72 65 74 73 68 6f | 72 74 24 2b 22 20 20 22 |caretsho|rt$+" "|
|00002360| 2c 31 34 29 0d 09 6a 42 | 20 20 20 20 f2 72 65 64 |,14)..jB| .red|
|00002370| 72 61 77 6d 61 69 6e 28 | 63 61 72 65 74 63 6f 6c |rawmain(|caretcol|
|00002380| 75 6d 6e 25 2c 63 61 72 | 65 74 63 6f 6c 75 6d 6e |umn%,car|etcolumn|
|00002390| 25 2c 63 61 72 65 74 72 | 6f 77 25 2c 63 61 72 65 |%,caretr|ow%,care|
|000023a0| 74 72 6f 77 25 29 0d 09 | 74 08 20 20 20 cd 0d 09 |trow%)..|t. ...|
|000023b0| 7e 14 20 20 c9 26 31 43 | 44 3a f4 20 69 6e 73 65 |~. .&1C|D:. inse|
|000023c0| 72 74 0d 09 88 2a 20 20 | 20 e7 63 61 72 65 74 72 |rt...* | .caretr|
|000023d0| 6f 77 25 3c 50 25 20 80 | 63 61 72 65 74 72 6f 77 |ow%<P% .|caretrow|
|000023e0| 25 3c 3d 6d 61 78 72 6f | 77 25 20 8c 0d 09 92 1e |%<=maxro|w% .....|
|000023f0| 20 20 20 20 f2 63 68 61 | 6e 67 65 64 28 b9 29 3a | .cha|nged(.):|
|00002400| 6d 61 78 72 6f 77 25 2b | 3d 31 0d 09 9c 3b 20 20 |maxrow%+|=1...; |
|00002410| 20 20 e3 6a 25 3d 63 61 | 72 65 74 78 31 25 20 b8 | .j%=ca|retx1% .|
|00002420| 63 61 72 65 74 78 32 25 | 3a e3 69 25 3d 6d 61 78 |caretx2%|:.i%=max|
|00002430| 72 6f 77 25 20 b8 63 61 | 72 65 74 72 6f 77 25 2b |row% .ca|retrow%+|
|00002440| 31 20 88 2d 31 0d 09 a6 | 24 20 20 20 20 f2 64 61 |1 .-1...|$ .da|
|00002450| 74 61 28 6a 25 2c 69 25 | 2c a4 54 64 61 74 61 28 |ta(j%,i%|,.Tdata(|
|00002460| 6a 25 2c 69 25 2d 31 29 | 29 0d 09 b0 3b 20 20 20 |j%,i%-1)|)...; |
|00002470| 20 44 61 74 61 53 74 61 | 74 75 73 25 3f 28 6a 25 | DataSta|tus%?(j%|
|00002480| 2b 43 31 25 2a 69 25 29 | 3d 44 61 74 61 53 74 61 |+C1%*i%)|=DataSta|
|00002490| 74 75 73 25 3f 28 6a 25 | 2b 43 31 25 2a 28 69 25 |tus%?(j%|+C1%*(i%|
|000024a0| 2d 31 29 29 0d 09 ba 2c | 20 20 20 20 ed 3a 44 61 |-1))...,| .:Da|
|000024b0| 74 61 53 74 61 74 75 73 | 25 3f 28 6a 25 2b 43 31 |taStatus|%?(j%+C1|
|000024c0| 25 2a 63 61 72 65 74 72 | 6f 77 25 29 3d 30 3a ed |%*caretr|ow%)=0:.|
|000024d0| 0d 09 c4 45 20 20 20 20 | 63 61 72 65 74 72 6f 77 |...E |caretrow|
|000024e0| 25 2b 3d 31 3a 63 61 72 | 65 74 79 31 25 3d 63 61 |%+=1:car|ety1%=ca|
|000024f0| 72 65 74 72 6f 77 25 3a | 63 61 72 65 74 79 32 25 |retrow%:|carety2%|
|00002500| 3d 63 61 72 65 74 72 6f | 77 25 3a f2 6d 6f 76 65 |=caretro|w%:.move|
|00002510| 63 61 72 65 74 0d 09 ce | 36 20 20 20 20 f2 67 65 |caret...|6 .ge|
|00002520| 74 6d 61 69 6e 69 6e 66 | 6f 3a e7 63 61 72 65 74 |tmaininf|o:.caret|
|00002530| 72 6f 77 25 3e 62 72 6f | 77 25 2d 32 20 f2 73 63 |row%>bro|w%-2 .sc|
|00002540| 72 6f 6c 6c 61 72 65 61 | 28 31 29 0d 09 d8 1c 20 |rollarea|(1).... |
|00002550| 20 20 20 f2 75 70 64 61 | 74 65 28 6d 61 69 6e 68 | .upda|te(mainh|
|00002560| 61 6e 64 6c 65 25 29 0d | 09 e2 08 20 20 20 cd 0d |andle%).|... ..|
|00002570| 09 ec 12 20 20 c9 32 31 | 3a f4 20 43 54 52 4c 2d |... .21|:. CTRL-|
|00002580| 55 0d 09 f6 34 20 20 20 | e3 69 25 3d 63 61 72 65 |U...4 |.i%=care|
|00002590| 74 78 31 25 20 b8 63 61 | 72 65 74 78 32 25 3a e3 |tx1% .ca|retx2%:.|
|000025a0| 6a 25 3d 63 61 72 65 74 | 79 31 25 20 b8 63 61 72 |j%=caret|y1% .car|
|000025b0| 65 74 79 32 25 0d 0a 00 | 23 20 20 20 44 61 74 61 |ety2%...|# Data|
|000025c0| 53 74 61 74 75 73 25 3f | 28 69 25 2b 43 31 25 2a |Status%?|(i%+C1%*|
|000025d0| 6a 25 29 3d 30 3a ed 2c | 0d 0a 0a 48 20 20 20 f2 |j%)=0:.,|...H .|
|000025e0| 63 61 72 65 74 73 74 72 | 69 6e 67 28 31 31 29 3a |caretstr|ing(11):|
|000025f0| f2 72 65 64 72 61 77 6d | 61 69 6e 28 63 61 72 65 |.redrawm|ain(care|
|00002600| 74 78 31 25 2c 63 61 72 | 65 74 78 32 25 2c 63 61 |tx1%,car|etx2%,ca|
|00002610| 72 65 74 79 31 25 2c 63 | 61 72 65 74 79 32 25 29 |rety1%,c|arety2%)|
|00002620| 0d 0a 14 20 20 20 20 f2 | 63 68 61 6e 67 65 64 28 |... .|changed(|
|00002630| b9 29 3a f2 6d 61 78 63 | 6f 6c 75 6d 6e 72 6f 77 |.):.maxc|olumnrow|
|00002640| 0d 0a 1e 24 20 20 7f 3a | f4 20 69 6e 63 6c 75 64 |...$ .:|. includ|
|00002650| 69 6e 67 20 76 61 6c 69 | 64 20 63 68 61 72 61 63 |ing vali|d charac|
|00002660| 74 65 72 73 0d 0a 28 26 | 20 20 20 e7 a7 22 4d 6d |ters..(&| .."Mm|
|00002670| 30 31 32 33 34 35 36 37 | 38 39 2e 45 2d 20 22 2c |01234567|89.E- ",|
|00002680| bd 6b 65 79 25 29 3d 30 | 20 8c 0d 0a 32 20 20 20 |.key%)=0| ...2 |
|00002690| 20 20 c8 99 22 57 69 6d | 70 5f 50 72 6f 63 65 73 | .."Wim|p_Proces|
|000026a0| 73 4b 65 79 22 2c 6b 65 | 79 25 0d 0a 3c 08 20 20 |sKey",ke|y%..<. |
|000026b0| 20 cc 0d 0a 46 29 20 20 | 20 20 70 6f 73 25 3d a9 | ...F) | pos%=.|
|000026c0| 63 61 72 65 74 73 68 6f | 72 74 24 2d 31 31 2b 63 |caretsho|rt$-11+c|
|000026d0| 61 72 65 74 6f 66 66 73 | 65 74 25 0d 0a 50 41 20 |aretoffs|et%..PA |
|000026e0| 20 20 20 63 61 72 65 74 | 73 68 6f 72 74 24 3d c0 | caret|short$=.|
|000026f0| 63 61 72 65 74 73 68 6f | 72 74 24 2c 70 6f 73 25 |caretsho|rt$,pos%|
|00002700| 29 2b bd 6b 65 79 25 2b | c1 63 61 72 65 74 73 68 |)+.key%+|.caretsh|
|00002710| 6f 72 74 24 2c 70 6f 73 | 25 2b 31 29 0d 0a 5a 34 |ort$,pos|%+1)..Z4|
|00002720| 20 20 20 20 e7 a9 63 61 | 72 65 74 73 68 6f 72 74 | ..ca|retshort|
|00002730| 24 3e 31 30 20 63 61 72 | 65 74 73 68 6f 72 74 24 |$>10 car|etshort$|
|00002740| 3d c1 63 61 72 65 74 73 | 68 6f 72 74 24 2c 32 29 |=.carets|hort$,2)|
|00002750| 0d 0a 64 34 20 20 20 20 | 63 61 72 65 74 24 3d c2 |..d4 |caret$=.|
|00002760| 22 20 20 20 20 20 20 20 | 20 20 20 20 20 20 22 2b |" | "+|
|00002770| 63 61 72 65 74 73 68 6f | 72 74 24 2b 22 20 20 22 |caretsho|rt$+" "|
|00002780| 2c 31 34 29 0d 0a 6e 42 | 20 20 20 20 f2 72 65 64 |,14)..nB| .red|
|00002790| 72 61 77 6d 61 69 6e 28 | 63 61 72 65 74 63 6f 6c |rawmain(|caretcol|
|000027a0| 75 6d 6e 25 2c 63 61 72 | 65 74 63 6f 6c 75 6d 6e |umn%,car|etcolumn|
|000027b0| 25 2c 63 61 72 65 74 72 | 6f 77 25 2c 63 61 72 65 |%,caretr|ow%,care|
|000027c0| 74 72 6f 77 25 29 0d 0a | 78 08 20 20 20 cd 0d 0a |trow%)..|x. ...|
|000027d0| 82 07 20 20 cb 0d 0a 8c | 06 20 cc 0d 0a 96 0f 20 |.. ....|. ..... |
|000027e0| 20 c8 8e 20 6b 65 79 25 | 20 ca 0d 0a a0 12 20 20 | .. key%| ..... |
|000027f0| c9 31 33 3a f4 20 72 65 | 74 75 72 6e 0d 0a aa 22 |.13:. re|turn..."|
|00002800| 20 20 20 62 75 74 74 6f | 6e 25 3d 34 3a 69 63 6f | butto|n%=4:ico|
|00002810| 6e 25 3d 31 3a f2 63 61 | 6e 63 65 6c 4f 4b 0d 0a |n%=1:.ca|ncelOK..|
|00002820| b4 20 20 20 7f 3a c8 99 | 22 57 69 6d 70 5f 50 72 |. .:..|"Wimp_Pr|
|00002830| 6f 63 65 73 73 4b 65 79 | 22 2c 6b 65 79 25 0d 0a |ocessKey|",key%..|
|00002840| be 07 20 20 cb 0d 0a c8 | 06 20 cd 0d 0a d2 04 0d |.. ....|. ......|
|00002850| 0a dc 17 c9 39 3a f4 20 | 6d 65 6e 75 20 73 65 6c |....9:. |menu sel|
|00002860| 65 63 74 69 6f 6e 0d 0a | e6 25 20 c8 99 22 57 69 |ection..|.% .."Wi|
|00002870| 6d 70 5f 47 65 74 50 6f | 69 6e 74 65 72 49 6e 66 |mp_GetPo|interInf|
|00002880| 6f 22 2c 2c 62 6c 6f 63 | 6b 31 25 0d 0a f0 53 20 |o",,bloc|k1%...S |
|00002890| 78 25 3d 21 62 6c 6f 63 | 6b 31 25 3a 79 25 3d 62 |x%=!bloc|k1%:y%=b|
|000028a0| 6c 6f 63 6b 31 25 21 34 | 3a 62 75 74 74 6f 6e 25 |lock1%!4|:button%|
|000028b0| 3d 62 6c 6f 63 6b 31 25 | 21 38 3a 77 69 6e 64 6f |=block1%|!8:windo|
|000028c0| 77 25 3d 62 6c 6f 63 6b | 31 25 21 31 32 3a 69 63 |w%=block|1%!12:ic|
|000028d0| 6f 6e 25 3d 62 6c 6f 63 | 6b 31 25 21 31 36 0d 0a |on%=bloc|k1%!16..|
|000028e0| fa 18 20 61 64 6a 75 73 | 74 25 3d 28 62 75 74 74 |.. adjus|t%=(butt|
|000028f0| 6f 6e 25 3d 31 29 0d 0b | 04 1b 20 e7 6d 65 6e 75 |on%=1)..|.. .menu|
|00002900| 74 72 65 65 24 3d 22 69 | 63 6f 6e 62 61 72 22 20 |tree$="i|conbar" |
|00002910| 8c 0d 0b 0e 12 20 20 c8 | 8e 20 21 62 6c 6f 63 6b |..... .|. !block|
|00002920| 25 20 ca 0d 0b 18 18 20 | 20 c9 31 3a f4 20 71 75 |% ..... | .1:. qu|
|00002930| 69 74 20 73 65 6c 65 63 | 74 65 64 0d 0b 22 12 20 |it selec|ted..". |
|00002940| 20 20 e7 63 68 61 6e 67 | 65 64 25 20 8c 0d 0b 2c | .chang|ed% ...,|
|00002950| 18 20 20 20 20 71 75 69 | 74 25 3d a4 54 6a 65 6f |. qui|t%=.Tjeo|
|00002960| 70 61 72 64 79 0d 0b 36 | 08 20 20 20 cc 0d 0b 40 |pardy..6|. ...@|
|00002970| 0f 20 20 20 20 71 75 69 | 74 25 3d b9 0d 0b 4a 08 |. qui|t%=...J.|
|00002980| 20 20 20 cd 0d 0b 54 07 | 20 20 cb 0d 0b 5e 30 20 | ...T.| ...^0 |
|00002990| 20 e7 61 64 6a 75 73 74 | 25 20 c8 99 22 57 69 6d | .adjust|% .."Wim|
|000029a0| 70 5f 43 72 65 61 74 65 | 4d 65 6e 75 22 2c 2c 69 |p_Create|Menu",,i|
|000029b0| 63 6f 6e 62 61 72 6d 65 | 6e 75 25 0d 0b 68 06 20 |conbarme|nu%..h. |
|000029c0| cc 0d 0b 72 12 20 20 c8 | 8e 20 21 62 6c 6f 63 6b |...r. .|. !block|
|000029d0| 25 20 ca 0d 0b 7c 11 20 | 20 c9 32 3a f4 20 43 6f |% ...|. | .2:. Co|
|000029e0| 6c 75 6d 6e 0d 0b 86 1d | 20 20 20 e7 62 6c 6f 63 |lumn....| .bloc|
|000029f0| 6b 25 21 34 3d 33 20 f2 | 63 61 6c 63 75 6c 61 74 |k%!4=3 .|calculat|
|00002a00| 65 0d 0b 90 1d 20 20 20 | e7 62 6c 6f 63 6b 25 21 |e.... |.block%!|
|00002a10| 34 3d 35 20 f2 6e 6f 72 | 6d 61 6c 69 73 65 0d 0b |4=5 .nor|malise..|
|00002a20| 9a 18 20 20 20 e7 62 6c | 6f 63 6b 25 21 34 3d 36 |.. .bl|ock%!4=6|
|00002a30| 20 f2 73 6f 72 74 0d 0b | a4 0f 20 20 c9 33 3a f4 | .sort..|.. .3:.|
|00002a40| 20 53 61 76 65 0d 0b ae | 19 20 20 20 53 61 76 65 | Save...|. Save|
|00002a50| 54 79 70 65 25 3d 62 6c | 6f 63 6b 25 21 34 0d 0b |Type%=bl|ock%!4..|
|00002a60| b8 0c 20 20 20 f2 73 61 | 76 65 0d 0b c2 10 20 20 |.. .sa|ve.... |
|00002a70| c9 35 3a f4 20 43 65 6c | 6c 73 0d 0b cc 14 20 20 |.5:. Cel|ls.... |
|00002a80| 20 c8 8e 20 62 6c 6f 63 | 6b 25 21 34 20 ca 0d 0b | .. bloc|k%!4 ...|
|00002a90| d6 16 20 20 20 20 c9 30 | 3a f4 20 77 68 6f 6c 65 |.. .0|:. whole|
|00002aa0| 20 72 6f 77 0d 0b e0 35 | 20 20 20 20 20 f2 68 69 | row...5| .hi|
|00002ab0| 67 68 6c 69 67 68 74 28 | 30 2c 6d 61 78 63 6f 6c |ghlight(|0,maxcol|
|00002ac0| 75 6d 6e 25 2c 63 61 72 | 65 74 72 6f 77 25 2c 63 |umn%,car|etrow%,c|
|00002ad0| 61 72 65 74 72 6f 77 25 | 29 0d 0b ea 19 20 20 20 |aretrow%|).... |
|00002ae0| 20 c9 31 3a f4 20 77 68 | 6f 6c 65 20 63 6f 6c 75 | .1:. wh|ole colu|
|00002af0| 6d 6e 0d 0b f4 38 20 20 | 20 20 20 f2 68 69 67 68 |mn...8 | .high|
|00002b00| 6c 69 67 68 74 28 63 61 | 72 65 74 63 6f 6c 75 6d |light(ca|retcolum|
|00002b10| 6e 25 2c 63 61 72 65 74 | 63 6f 6c 75 6d 6e 25 2c |n%,caret|column%,|
|00002b20| 30 2c 6d 61 78 72 6f 77 | 25 29 0d 0b fe 13 20 20 |0,maxrow|%).... |
|00002b30| 20 20 c9 32 3a f4 20 74 | 6f 20 74 6f 70 0d 0c 08 | .2:. t|o top...|
|00002b40| 3a 20 20 20 20 20 f2 68 | 69 67 68 6c 69 67 68 74 |: .h|ighlight|
|00002b50| 28 63 61 72 65 74 63 6f | 6c 75 6d 6e 25 2c 63 61 |(caretco|lumn%,ca|
|00002b60| 72 65 74 63 6f 6c 75 6d | 6e 25 2c 30 2c 63 61 72 |retcolum|n%,0,car|
|00002b70| 65 74 72 6f 77 25 29 0d | 0c 12 16 20 20 20 20 c9 |etrow%).|... .|
|00002b80| 33 3a f4 20 74 6f 20 62 | 6f 74 74 6f 6d 0d 0c 1c |3:. to b|ottom...|
|00002b90| 40 20 20 20 20 20 f2 68 | 69 67 68 6c 69 67 68 74 |@ .h|ighlight|
|00002ba0| 28 63 61 72 65 74 63 6f | 6c 75 6d 6e 25 2c 63 61 |(caretco|lumn%,ca|
|00002bb0| 72 65 74 63 6f 6c 75 6d | 6e 25 2c 63 61 72 65 74 |retcolum|n%,caret|
|00002bc0| 72 6f 77 25 2c 6d 61 78 | 72 6f 77 25 29 0d 0c 26 |row%,max|row%)..&|
|00002bd0| 15 20 20 20 20 c9 35 3a | f4 20 61 6c 6c 20 64 61 |. .5:|. all da|
|00002be0| 74 61 0d 0c 30 2b 20 20 | 20 20 20 f2 68 69 67 68 |ta..0+ | .high|
|00002bf0| 6c 69 67 68 74 28 30 2c | 6d 61 78 63 6f 6c 75 6d |light(0,|maxcolum|
|00002c00| 6e 25 2c 30 2c 6d 61 78 | 72 6f 77 25 29 0d 0c 3a |n%,0,max|row%)..:|
|00002c10| 08 20 20 20 cb 0d 0c 44 | 11 20 20 c9 36 3a f4 20 |. ...D|. .6:. |
|00002c20| 52 65 64 75 63 65 0d 0c | 4e 14 20 20 20 c8 8e 20 |Reduce..|N. .. |
|00002c30| 62 6c 6f 63 6b 25 21 34 | 20 ca 0d 0c 58 13 20 20 |block%!4| ...X. |
|00002c40| 20 c9 31 3a f4 20 43 6f | 6d 70 61 63 74 0d 0c 62 | .1:. Co|mpact..b|
|00002c50| 10 20 20 20 20 f2 63 6f | 6d 70 61 63 74 0d 0c 6c |. .co|mpact..l|
|00002c60| 11 20 20 20 c9 32 3a f4 | 20 43 6c 65 61 72 0d 0c |. .2:.| Clear..|
|00002c70| 76 13 20 20 20 20 e7 63 | 68 61 6e 67 65 64 25 20 |v. .c|hanged% |
|00002c80| 8c 0d 0c 80 1f 20 20 20 | 20 20 e7 a4 54 6a 65 6f |..... | ..Tjeo|
|00002c90| 70 61 72 64 79 20 f2 63 | 6c 65 61 72 64 61 74 61 |pardy .c|leardata|
|00002ca0| 0d 0c 8a 09 20 20 20 20 | cc 0d 0c 94 13 20 20 20 |.... |..... |
|00002cb0| 20 20 f2 63 6c 65 61 72 | 64 61 74 61 0d 0c 9e 09 | .clear|data....|
|00002cc0| 20 20 20 20 cd 0d 0c a8 | 14 20 20 20 c9 33 3a f4 | ....|. .3:.|
|00002cd0| 20 57 61 72 6e 69 6e 67 | 73 0d 0c b2 2a 20 20 20 | Warning|s...* |
|00002ce0| 20 4a 65 6f 70 61 72 64 | 79 57 61 72 6e 69 6e 67 | Jeopard|yWarning|
|00002cf0| 25 3d ac 4a 65 6f 70 61 | 72 64 79 57 61 72 6e 69 |%=.Jeopa|rdyWarni|
|00002d00| 6e 67 25 0d 0c bc 08 20 | 20 20 cb 0d 0c c6 07 20 |ng%.... | ..... |
|00002d10| 20 cb 0d 0c d0 67 20 20 | e7 61 64 6a 75 73 74 25 | ....g |.adjust%|
|00002d20| 20 3f 57 61 72 6e 69 6e | 67 49 74 65 6d 25 3d 28 | ?Warnin|gItem%=(|
|00002d30| 3f 57 61 72 6e 69 6e 67 | 49 74 65 6d 25 20 80 26 |?Warning|Item% .&|
|00002d40| 46 45 29 20 84 28 4a 65 | 6f 70 61 72 64 79 57 61 |FE) .(Je|opardyWa|
|00002d50| 72 6e 69 6e 67 25 20 80 | 31 29 3a c8 99 22 57 69 |rning% .|1):.."Wi|
|00002d60| 6d 70 5f 43 72 65 61 74 | 65 4d 65 6e 75 22 2c 2c |mp_Creat|eMenu",,|
|00002d70| 6d 61 69 6e 6d 65 6e 75 | 25 0d 0c da 06 20 cd 0d |mainmenu|%.... ..|
|00002d80| 0c e4 04 0d 0c ee 14 c9 | 31 31 3a f4 20 6c 6f 73 |........|11:. los|
|00002d90| 65 20 63 61 72 65 74 0d | 0c f8 13 f2 72 65 63 6f |e caret.|....reco|
|00002da0| 72 64 63 61 72 65 74 28 | a3 29 0d 0d 02 0f 67 6f |rdcaret(|.)....go|
|00002db0| 74 63 61 72 65 74 25 3d | a3 0d 0d 0c 04 0d 0d 16 |tcaret%=|........|
|00002dc0| 14 c9 31 32 3a f4 20 67 | 61 69 6e 20 63 61 72 65 |..12:. g|ain care|
|00002dd0| 74 0d 0d 20 0f 67 6f 74 | 63 61 72 65 74 25 3d b9 |t.. .got|caret%=.|
|00002de0| 0d 0d 2a 04 0d 0d 34 1b | c9 31 37 2c 31 38 3a f4 |..*...4.|.17,18:.|
|00002df0| 20 6d 65 73 73 61 67 65 | 20 73 79 73 74 65 6d 0d | message| system.|
|00002e00| 0d 3e 13 20 c8 8e 20 62 | 6c 6f 63 6b 25 21 31 36 |.>. .. b|lock%!16|
|00002e10| 20 ca 0d 0d 48 0e 20 c9 | 30 3a f4 20 71 75 69 74 | ...H. .|0:. quit|
|00002e20| 0d 0d 52 0d 20 20 71 75 | 69 74 25 3d b9 0d 0d 5c |..R. qu|it%=...\|
|00002e30| 12 20 c9 38 3a f4 20 70 | 72 65 2d 71 75 69 74 0d |. .8:. p|re-quit.|
|00002e40| 0d 66 11 20 20 e7 63 68 | 61 6e 67 65 64 25 20 8c |.f. .ch|anged% .|
|00002e50| 0d 0d 70 15 20 20 20 e7 | ac a4 54 6a 65 6f 70 61 |..p. .|..Tjeopa|
|00002e60| 72 64 79 20 8c 0d 0d 7a | 1a 20 20 20 20 62 6c 6f |rdy ...z|. blo|
|00002e70| 63 6b 25 21 31 32 3d 62 | 6c 6f 63 6b 25 21 38 0d |ck%!12=b|lock%!8.|
|00002e80| 0d 84 28 20 20 20 20 c8 | 99 22 57 69 6d 70 5f 53 |..( .|."Wimp_S|
|00002e90| 65 6e 64 4d 65 73 73 61 | 67 65 22 2c 31 39 2c 62 |endMessa|ge",19,b|
|00002ea0| 6c 6f 63 6b 25 2c 30 0d | 0d 8e 08 20 20 20 cd 0d |lock%,0.|... ..|
|00002eb0| 0d 98 07 20 20 cd 0d 0d | a2 1a 20 c9 26 34 30 30 |... ...|.. .&400|
|00002ec0| 43 31 3a f4 20 6d 6f 64 | 65 20 63 68 61 6e 67 65 |C1:. mod|e change|
|00002ed0| 0d 0d ac 1b 20 c9 26 34 | 30 30 43 30 3a f4 20 6d |.... .&4|00C0:. m|
|00002ee0| 65 6e 75 20 77 61 72 6e | 69 6e 67 0d 0d b6 31 20 |enu warn|ing...1 |
|00002ef0| 20 68 61 6e 64 6c 65 25 | 3d 62 6c 6f 63 6b 25 21 | handle%|=block%!|
|00002f00| 32 30 3a 78 25 3d 62 6c | 6f 63 6b 25 21 32 34 3a |20:x%=bl|ock%!24:|
|00002f10| 79 25 3d 62 6c 6f 63 6b | 25 21 32 38 0d 0d c0 2e |y%=block|%!28....|
|00002f20| 20 20 e7 68 61 6e 64 6c | 65 25 3d 73 61 76 65 68 | .handl|e%=saveh|
|00002f30| 61 6e 64 6c 65 25 20 53 | 61 76 65 54 79 70 65 25 |andle% S|aveType%|
|00002f40| 3d 62 6c 6f 63 6b 25 21 | 33 36 0d 0d ca 1c 20 20 |=block%!|36.... |
|00002f50| f2 67 65 74 76 61 72 69 | 61 62 6c 65 73 28 68 61 |.getvari|ables(ha|
|00002f60| 6e 64 6c 65 25 29 0d 0d | d4 2b 20 20 c8 99 22 57 |ndle%)..|.+ .."W|
|00002f70| 69 6d 70 5f 43 72 65 61 | 74 65 53 75 62 4d 65 6e |imp_Crea|teSubMen|
|00002f80| 75 22 2c 2c 68 61 6e 64 | 6c 65 25 2c 78 25 2c 79 |u",,hand|le%,x%,y|
|00002f90| 25 0d 0d de 12 20 c9 33 | 3a f4 20 44 61 74 61 4c |%.... .3|:. DataL|
|00002fa0| 6f 61 64 0d 0d e8 2d 20 | 20 66 69 6c 65 24 3d a4 |oad...- | file$=.|
|00002fb0| 54 7a 65 72 6f 74 65 72 | 6d 69 6e 61 74 65 64 73 |Tzeroter|minateds|
|00002fc0| 74 72 69 6e 67 28 62 6c | 6f 63 6b 25 2b 34 34 29 |tring(bl|ock%+44)|
|00002fd0| 0d 0d f2 19 20 20 66 69 | 6c 65 74 79 70 65 25 3d |.... fi|letype%=|
|00002fe0| 62 6c 6f 63 6b 25 21 34 | 30 0d 0d fc 0b 20 20 f2 |block%!4|0.... .|
|00002ff0| 6c 6f 61 64 0d 0e 06 15 | 20 c9 32 3a f4 20 44 61 |load....| .2:. Da|
|00003000| 74 61 53 61 76 65 41 63 | 6b 0d 0e 10 38 20 20 53 |taSaveAc|k...8 S|
|00003010| 61 76 65 24 28 53 61 76 | 65 54 79 70 65 25 29 3d |ave$(Sav|eType%)=|
|00003020| a4 54 7a 65 72 6f 74 65 | 72 6d 69 6e 61 74 65 64 |.Tzerote|rminated|
|00003030| 73 74 72 69 6e 67 28 62 | 6c 6f 63 6b 25 2b 34 34 |string(b|lock%+44|
|00003040| 29 0d 0e 1a 23 20 20 f4 | 20 6e 6f 77 20 73 65 6e |)...# .| now sen|
|00003050| 64 20 61 20 44 61 74 61 | 4c 6f 61 64 20 6d 65 73 |d a Data|Load mes|
|00003060| 73 61 67 65 0d 0e 24 24 | 20 20 62 6c 6f 63 6b 25 |sage..$$| block%|
|00003070| 21 31 32 3d 62 6c 6f 63 | 6b 25 21 38 3a 62 6c 6f |!12=bloc|k%!8:blo|
|00003080| 63 6b 25 21 31 36 3d 33 | 0d 0e 2e 2d 20 20 c8 99 |ck%!16=3|...- ..|
|00003090| 22 57 69 6d 70 5f 53 65 | 6e 64 4d 65 73 73 61 67 |"Wimp_Se|ndMessag|
|000030a0| 65 22 2c 31 38 2c 62 6c | 6f 63 6b 25 2c 62 6c 6f |e",18,bl|ock%,blo|
|000030b0| 63 6b 25 21 34 0d 0e 38 | 0e 20 20 f2 67 65 74 73 |ck%!4..8|. .gets|
|000030c0| 61 76 65 0d 0e 42 1a 20 | 20 f2 75 70 64 61 74 65 |ave..B. | .update|
|000030d0| 28 73 61 76 65 68 61 6e | 64 6c 65 25 29 0d 0e 4c |(savehan|dle%)..L|
|000030e0| 0b 20 20 f2 73 61 76 65 | 0d 0e 56 1d 20 20 c8 99 |. .save|..V. ..|
|000030f0| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 4d 65 6e 75 |"Wimp_Cr|eateMenu|
|00003100| 22 2c 2c 2d 31 0d 0e 60 | 06 20 cb 0d 0e 6a 04 0d |",,-1..`|. ...j..|
|00003110| 0e 74 05 cb 0d 0e 7e 0a | fd 71 75 69 74 25 0d 0e |.t....~.|.quit%..|
|00003120| 88 16 c8 99 22 57 69 6d | 70 5f 43 6c 6f 73 65 44 |...."Wim|p_CloseD|
|00003130| 6f 77 6e 22 0d 0e 92 05 | e0 0d 0e 9c 04 0d 0e a6 |own"....|........|
|00003140| 19 dd f2 64 61 74 61 28 | 63 6f 6c 25 2c 72 6f 77 |...data(|col%,row|
|00003150| 25 2c 76 61 6c 29 0d 0e | b0 22 7c 28 44 61 74 61 |%,val)..|."|(Data|
|00003160| 25 2b 35 2a 63 6f 6c 25 | 2b 35 2a 43 31 25 2a 72 |%+5*col%|+5*C1%*r|
|00003170| 6f 77 25 29 3d 76 61 6c | 0d 0e ba 05 e1 0d 0e c4 |ow%)=val|........|
|00003180| 04 0d 0e ce 16 dd a4 54 | 64 61 74 61 28 63 6f 6c |.......T|data(col|
|00003190| 25 2c 72 6f 77 25 29 0d | 0e d8 1f 3d 7c 28 44 61 |%,row%).|...=|(Da|
|000031a0| 74 61 25 2b 35 2a 63 6f | 6c 25 2b 35 2a 43 31 25 |ta%+5*co|l%+5*C1%|
|000031b0| 2a 72 6f 77 25 29 0d 0e | e2 04 0d 0e ec 14 dd f2 |*row%)..|........|
|000031c0| 65 72 72 6f 72 31 3a 40 | 25 3d 26 39 30 41 0d 0e |error1:@|%=&90A..|
|000031d0| f6 36 f2 72 65 70 6f 72 | 74 28 22 66 61 74 61 6c |.6.repor|t("fatal|
|000031e0| 20 65 72 72 6f 72 3a 20 | 22 2b f6 24 2b 22 20 28 | error: |"+.$+" (|
|000031f0| 65 72 72 6f 72 20 63 6f | 64 65 20 22 2b c3 9e 2b |error co|de "+..+|
|00003200| 22 29 22 29 0d 0f 00 16 | c8 99 22 57 69 6d 70 5f |")")....|.."Wimp_|
|00003210| 43 6c 6f 73 65 44 6f 77 | 6e 22 0d 0f 0a 05 e0 0d |CloseDow|n"......|
|00003220| 0f 14 05 e1 0d 0f 1e 04 | 0d 0f 28 13 dd f2 65 72 |........|..(...er|
|00003230| 72 6f 72 3a 40 25 3d 26 | 39 30 41 0d 0f 32 26 f2 |ror:@%=&|90A..2&.|
|00003240| 72 65 70 6f 72 74 28 f6 | 24 2b 22 20 28 65 72 72 |report(.|$+" (err|
|00003250| 6f 72 20 63 6f 64 65 20 | 22 2b c3 9e 2b 22 29 22 |or code |"+..+")"|
|00003260| 29 0d 0f 3c 26 e7 66 69 | 6c 65 6f 70 65 6e 25 20 |)..<&.fi|leopen% |
|00003270| d9 23 66 69 6c 65 6f 70 | 65 6e 25 3a 66 69 6c 65 |.#fileop|en%:file|
|00003280| 6f 70 65 6e 25 3d 30 0d | 0f 46 1b c8 99 22 57 69 |open%=0.|.F..."Wi|
|00003290| 6d 70 5f 43 72 65 61 74 | 65 4d 65 6e 75 22 2c 2c |mp_Creat|eMenu",,|
|000032a0| 2d 31 0d 0f 50 05 e1 0d | 0f 5a 04 0d 0f 64 10 dd |-1..P...|.Z...d..|
|000032b0| f2 72 65 70 6f 72 74 28 | 69 24 29 0d 0f 6e 23 21 |.report(|i$)..n#!|
|000032c0| 62 6c 6f 63 6b 33 25 3d | 32 35 35 3a 24 28 62 6c |block3%=|255:$(bl|
|000032d0| 6f 63 6b 33 25 2b 34 29 | 3d 69 24 2b bd 30 0d 0f |ock3%+4)|=i$+.0..|
|000032e0| 78 28 c8 99 22 57 69 6d | 70 5f 52 65 70 6f 72 74 |x(.."Wim|p_Report|
|000032f0| 45 72 72 6f 72 22 2c 62 | 6c 6f 63 6b 33 25 2c 31 |Error",b|lock3%,1|
|00003300| 2c 22 54 61 75 22 0d 0f | 82 05 e1 0d 0f 8c 04 0d |,"Tau"..|........|
|00003310| 0f 96 0f dd a4 54 6a 65 | 6f 70 61 72 64 79 0d 0f |.....Tje|opardy..|
|00003320| a0 1b e7 ac 4a 65 6f 70 | 61 72 64 79 57 61 72 6e |....Jeop|ardyWarn|
|00003330| 69 6e 67 25 20 8c 20 3d | b9 0d 0f aa 10 21 62 6c |ing% . =|.....!bl|
|00003340| 6f 63 6b 33 25 3d 32 35 | 35 0d 0f b4 2f 24 28 62 |ock3%=25|5.../$(b|
|00003350| 6c 6f 63 6b 33 25 2b 34 | 29 3d 22 44 61 74 61 20 |lock3%+4|)="Data |
|00003360| 69 6e 20 6a 65 6f 70 61 | 72 64 79 20 2d 20 70 72 |in jeopa|rdy - pr|
|00003370| 6f 63 65 65 64 20 3f 22 | 0d 0f be 36 c8 99 22 57 |oceed ?"|...6.."W|
|00003380| 69 6d 70 5f 52 65 70 6f | 72 74 45 72 72 6f 72 22 |imp_Repo|rtError"|
|00003390| 2c 62 6c 6f 63 6b 33 25 | 2c 26 31 33 2c 22 54 61 |,block3%|,&13,"Ta|
|000033a0| 75 22 20 b8 2c 72 65 73 | 70 6f 6e 73 65 25 0d 0f |u" .,res|ponse%..|
|000033b0| c8 12 3d 28 72 65 73 70 | 6f 6e 73 65 25 3d 31 29 |..=(resp|onse%=1)|
|000033c0| 0d 0f d2 04 0d 0f dc 0f | dd f2 74 65 6d 70 6c 61 |........|..templa|
|000033d0| 74 65 73 0d 0f e6 1a 77 | 6f 72 6b 73 70 61 63 65 |tes....w|orkspace|
|000033e0| 25 3d 77 6f 72 6b 73 70 | 61 63 65 30 25 0d 0f f0 |%=worksp|ace0%...|
|000033f0| 27 65 6e 64 77 6f 72 6b | 25 3d 77 6f 72 6b 73 70 |'endwork|%=worksp|
|00003400| 61 63 65 30 25 2b 77 6f | 72 6b 73 70 61 63 65 73 |ace0%+wo|rkspaces|
|00003410| 69 7a 65 25 0d 0f fa 30 | c8 99 22 57 69 6d 70 5f |ize%...0|.."Wimp_|
|00003420| 4f 70 65 6e 54 65 6d 70 | 6c 61 74 65 22 2c 2c 22 |OpenTemp|late",,"|
|00003430| 3c 54 61 75 24 44 69 72 | 3e 2e 54 65 6d 70 6c 61 |<Tau$Dir|>.Templa|
|00003440| 74 65 73 22 0d 10 04 29 | 6d 61 69 6e 68 61 6e 64 |tes"...)|mainhand|
|00003450| 6c 65 25 3d a4 54 67 65 | 74 74 65 6d 70 6c 61 74 |le%=.Tge|ttemplat|
|00003460| 65 28 22 44 61 74 61 4d | 61 69 6e 22 29 0d 10 0e |e("DataM|ain")...|
|00003470| 27 74 6f 70 68 61 6e 64 | 6c 65 25 3d a4 54 67 65 |'tophand|le%=.Tge|
|00003480| 74 74 65 6d 70 6c 61 74 | 65 28 22 44 61 74 61 54 |ttemplat|e("DataT|
|00003490| 6f 70 22 29 0d 10 18 29 | 6c 65 66 74 68 61 6e 64 |op")...)|lefthand|
|000034a0| 6c 65 25 3d a4 54 67 65 | 74 74 65 6d 70 6c 61 74 |le%=.Tge|ttemplat|
|000034b0| 65 28 22 44 61 74 61 4c | 65 66 74 22 29 0d 10 22 |e("DataL|eft").."|
|000034c0| 3b 58 31 25 3d 62 6c 6f | 63 6b 25 21 34 30 3a 59 |;X1%=blo|ck%!40:Y|
|000034d0| 31 25 3d 62 6c 6f 63 6b | 25 21 34 34 3a 58 32 25 |1%=block|%!44:X2%|
|000034e0| 3d 62 6c 6f 63 6b 25 21 | 34 38 3a 59 32 25 3d 62 |=block%!|48:Y2%=b|
|000034f0| 6c 6f 63 6b 25 21 35 32 | 0d 10 2c 27 66 72 61 6d |lock%!52|..,'fram|
|00003500| 65 68 61 6e 64 6c 65 25 | 3d a4 54 67 65 74 74 65 |ehandle%|=.Tgette|
|00003510| 6d 70 6c 61 74 65 28 22 | 46 72 61 6d 65 22 29 0d |mplate("|Frame").|
|00003520| 10 36 27 74 69 63 6b 73 | 68 61 6e 64 6c 65 25 3d |.6'ticks|handle%=|
|00003530| a4 54 67 65 74 74 65 6d | 70 6c 61 74 65 28 22 54 |.Tgettem|plate("T|
|00003540| 69 63 6b 73 22 29 0d 10 | 40 27 67 72 69 64 73 68 |icks")..|@'gridsh|
|00003550| 61 6e 64 6c 65 25 3d a4 | 54 67 65 74 74 65 6d 70 |andle%=.|Tgettemp|
|00003560| 6c 61 74 65 28 22 47 72 | 69 64 73 22 29 0d 10 4a |late("Gr|ids")..J|
|00003570| 29 6c 61 62 65 6c 73 68 | 61 6e 64 6c 65 25 3d a4 |)labelsh|andle%=.|
|00003580| 54 67 65 74 74 65 6d 70 | 6c 61 74 65 28 22 4c 61 |Tgettemp|late("La|
|00003590| 62 65 6c 73 22 29 0d 10 | 54 25 73 69 7a 65 68 61 |bels")..|T%sizeha|
|000035a0| 6e 64 6c 65 25 3d a4 54 | 67 65 74 74 65 6d 70 6c |ndle%=.T|gettempl|
|000035b0| 61 74 65 28 22 53 69 7a | 65 22 29 0d 10 5e 2b 73 |ate("Siz|e")..^+s|
|000035c0| 63 61 6c 69 6e 67 68 61 | 6e 64 6c 65 25 3d a4 54 |calingha|ndle%=.T|
|000035d0| 67 65 74 74 65 6d 70 6c | 61 74 65 28 22 53 63 61 |gettempl|ate("Sca|
|000035e0| 6c 69 6e 67 22 29 0d 10 | 68 29 63 6f 6c 75 6d 6e |ling")..|h)column|
|000035f0| 68 61 6e 64 6c 65 25 3d | a4 54 67 65 74 74 65 6d |handle%=|.Tgettem|
|00003600| 70 6c 61 74 65 28 22 43 | 6f 6c 75 6d 6e 22 29 0d |plate("C|olumn").|
|00003610| 10 72 25 73 61 76 65 68 | 61 6e 64 6c 65 25 3d a4 |.r%saveh|andle%=.|
|00003620| 54 67 65 74 74 65 6d 70 | 6c 61 74 65 28 22 53 61 |Tgettemp|late("Sa|
|00003630| 76 65 22 29 0d 10 7c 25 | 69 6e 66 6f 68 61 6e 64 |ve")..|%|infohand|
|00003640| 6c 65 25 3d a4 54 67 65 | 74 74 65 6d 70 6c 61 74 |le%=.Tge|ttemplat|
|00003650| 65 28 22 49 6e 66 6f 22 | 29 0d 10 86 2f 63 61 6c |e("Info"|).../cal|
|00003660| 63 75 6c 61 74 65 68 61 | 6e 64 6c 65 25 3d a4 54 |culateha|ndle%=.T|
|00003670| 67 65 74 74 65 6d 70 6c | 61 74 65 28 22 43 61 6c |gettempl|ate("Cal|
|00003680| 63 75 6c 61 74 65 22 29 | 0d 10 90 2b 6f 70 74 69 |culate")|...+opti|
|00003690| 6f 6e 73 68 61 6e 64 6c | 65 25 3d a4 54 67 65 74 |onshandl|e%=.Tget|
|000036a0| 74 65 6d 70 6c 61 74 65 | 28 22 4f 70 74 69 6f 6e |template|("Option|
|000036b0| 73 22 29 0d 10 9a 2b 62 | 65 73 74 66 69 74 68 61 |s")...+b|estfitha|
|000036c0| 6e 64 6c 65 25 3d a4 54 | 67 65 74 74 65 6d 70 6c |ndle%=.T|gettempl|
|000036d0| 61 74 65 28 22 42 65 73 | 74 46 69 74 22 29 0d 10 |ate("Bes|tFit")..|
|000036e0| a4 27 66 6f 6e 74 73 68 | 61 6e 64 6c 65 25 3d a4 |.'fontsh|andle%=.|
|000036f0| 54 67 65 74 74 65 6d 70 | 6c 61 74 65 28 22 46 6f |Tgettemp|late("Fo|
|00003700| 6e 74 73 22 29 0d 10 ae | 2d 63 6f 72 6e 65 72 68 |nts")...|-cornerh|
|00003710| 61 6e 64 6c 65 25 3d a4 | 54 67 65 74 74 65 6d 70 |andle%=.|Tgettemp|
|00003720| 6c 61 74 65 28 22 44 61 | 74 61 43 6f 72 6e 65 72 |late("Da|taCorner|
|00003730| 22 29 0d 10 b8 2d 61 78 | 69 73 74 65 78 74 68 61 |")...-ax|istextha|
|00003740| 6e 64 6c 65 25 3d a4 54 | 67 65 74 74 65 6d 70 6c |ndle%=.T|gettempl|
|00003750| 61 74 65 28 22 41 78 69 | 73 54 65 78 74 22 29 0d |ate("Axi|sText").|
|00003760| 10 c2 2b 6d 61 67 6e 69 | 66 79 68 61 6e 64 6c 65 |..+magni|fyhandle|
|00003770| 25 3d a4 54 67 65 74 74 | 65 6d 70 6c 61 74 65 28 |%=.Tgett|emplate(|
|00003780| 22 4d 61 67 6e 69 66 79 | 22 29 0d 10 cc 2b 6d 65 |"Magnify|")...+me|
|00003790| 61 6e 69 6e 67 68 61 6e | 64 6c 65 25 3d a4 54 67 |aninghan|dle%=.Tg|
|000037a0| 65 74 74 65 6d 70 6c 61 | 74 65 28 22 4d 65 61 6e |ettempla|te("Mean|
|000037b0| 69 6e 67 22 29 0d 10 d6 | 25 77 65 65 64 68 61 6e |ing")...|%weedhan|
|000037c0| 64 6c 65 25 3d a4 54 67 | 65 74 74 65 6d 70 6c 61 |dle%=.Tg|ettempla|
|000037d0| 74 65 28 22 57 65 65 64 | 22 29 0d 10 e0 29 69 6d |te("Weed|")...)im|
|000037e0| 70 6f 72 74 68 61 6e 64 | 6c 65 25 3d a4 54 67 65 |porthand|le%=.Tge|
|000037f0| 74 74 65 6d 70 6c 61 74 | 65 28 22 49 6d 70 6f 72 |ttemplat|e("Impor|
|00003800| 74 22 29 0d 10 ea 29 64 | 6f 77 6e 74 6f 68 61 6e |t")...)d|owntohan|
|00003810| 64 6c 65 25 3d a4 54 67 | 65 74 74 65 6d 70 6c 61 |dle%=.Tg|ettempla|
|00003820| 74 65 28 22 44 6f 77 6e | 74 6f 22 29 0d 10 f4 25 |te("Down|to")...%|
|00003830| 6d 61 6e 79 68 61 6e 64 | 6c 65 25 3d a4 54 67 65 |manyhand|le%=.Tge|
|00003840| 74 74 65 6d 70 6c 61 74 | 65 28 22 4d 61 6e 79 22 |ttemplat|e("Many"|
|00003850| 29 0d 10 fe 2f 77 6f 72 | 6b 73 68 65 65 74 68 61 |).../wor|ksheetha|
|00003860| 6e 64 6c 65 25 3d a4 54 | 67 65 74 74 65 6d 70 6c |ndle%=.T|gettempl|
|00003870| 61 74 65 28 22 57 6f 72 | 6b 73 68 65 65 74 22 29 |ate("Wor|ksheet")|
|00003880| 0d 11 08 1a c8 99 22 57 | 69 6d 70 5f 43 6c 6f 73 |......"W|imp_Clos|
|00003890| 65 54 65 6d 70 6c 61 74 | 65 22 0d 11 12 17 21 62 |eTemplat|e"....!b|
|000038a0| 6c 6f 63 6b 25 3d 6d 61 | 69 6e 68 61 6e 64 6c 65 |lock%=ma|inhandle|
|000038b0| 25 0d 11 1c 22 c8 99 22 | 57 69 6d 70 5f 47 65 74 |%...".."|Wimp_Get|
|000038c0| 57 69 6e 64 6f 77 49 6e | 66 6f 22 2c 2c 62 6c 6f |WindowIn|fo",,blo|
|000038d0| 63 6b 25 0d 11 26 1a 74 | 69 74 6c 65 62 75 66 66 |ck%..&.t|itlebuff|
|000038e0| 65 72 25 3d 62 6c 6f 63 | 6b 25 21 37 36 0d 11 30 |er%=bloc|k%!76..0|
|000038f0| 0f f2 63 68 61 6e 67 65 | 64 28 a3 29 0d 11 3a 4c |..change|d(.)..:L|
|00003900| 21 62 6c 6f 63 6b 31 25 | 3d 74 6f 70 68 61 6e 64 |!block1%|=tophand|
|00003910| 6c 65 25 3a c8 99 22 57 | 69 6d 70 5f 47 65 74 57 |le%:.."W|imp_GetW|
|00003920| 69 6e 64 6f 77 53 74 61 | 74 65 22 2c 2c 62 6c 6f |indowSta|te",,blo|
|00003930| 63 6b 31 25 3a 74 6f 70 | 66 6c 61 67 25 3d 62 6c |ck1%:top|flag%=bl|
|00003940| 6f 63 6b 31 25 21 33 32 | 0d 11 44 4e 21 62 6c 6f |ock1%!32|..DN!blo|
|00003950| 63 6b 32 25 3d 6c 65 66 | 74 68 61 6e 64 6c 65 25 |ck2%=lef|thandle%|
|00003960| 3a c8 99 22 57 69 6d 70 | 5f 47 65 74 57 69 6e 64 |:.."Wimp|_GetWind|
|00003970| 6f 77 53 74 61 74 65 22 | 2c 2c 62 6c 6f 63 6b 32 |owState"|,,block2|
|00003980| 25 3a 6c 65 66 74 66 6c | 61 67 25 3d 62 6c 6f 63 |%:leftfl|ag%=bloc|
|00003990| 6b 32 25 21 33 32 0d 11 | 4e 52 21 62 6c 6f 63 6b |k2%!32..|NR!block|
|000039a0| 33 25 3d 63 6f 72 6e 65 | 72 68 61 6e 64 6c 65 25 |3%=corne|rhandle%|
|000039b0| 3a c8 99 22 57 69 6d 70 | 5f 47 65 74 57 69 6e 64 |:.."Wimp|_GetWind|
|000039c0| 6f 77 53 74 61 74 65 22 | 2c 2c 62 6c 6f 63 6b 33 |owState"|,,block3|
|000039d0| 25 3a 63 6f 72 6e 65 72 | 66 6c 61 67 25 3d 62 6c |%:corner|flag%=bl|
|000039e0| 6f 63 6b 33 25 21 33 32 | 0d 11 58 0e f2 73 65 74 |ock3%!32|..X..set|
|000039f0| 65 78 74 65 6e 74 0d 11 | 62 05 e1 0d 11 6c 04 0d |extent..|b....l..|
|00003a00| 11 76 19 dd a4 54 67 65 | 74 74 65 6d 70 6c 61 74 |.v...Tge|ttemplat|
|00003a10| 65 28 74 65 6d 70 24 29 | 0d 11 80 12 24 62 6c 6f |e(temp$)|....$blo|
|00003a20| 63 6b 32 25 3d 74 65 6d | 70 24 0d 11 8a 50 c8 99 |ck2%=tem|p$...P..|
|00003a30| 22 57 69 6d 70 5f 4c 6f | 61 64 54 65 6d 70 6c 61 |"Wimp_Lo|adTempla|
|00003a40| 74 65 22 2c 2c 62 6c 6f | 63 6b 25 2c 77 6f 72 6b |te",,blo|ck%,work|
|00003a50| 73 70 61 63 65 25 2c 65 | 6e 64 77 6f 72 6b 25 2c |space%,e|ndwork%,|
|00003a60| 2d 31 2c 62 6c 6f 63 6b | 32 25 2c 30 20 b8 2c 2c |-1,block|2%,0 .,,|
|00003a70| 77 6f 72 6b 73 70 61 63 | 65 25 0d 11 94 35 e7 74 |workspac|e%...5.t|
|00003a80| 65 6d 70 24 3d 22 53 61 | 76 65 22 20 62 6c 6f 63 |emp$="Sa|ve" bloc|
|00003a90| 6b 25 21 31 31 32 3d 31 | 3a f4 20 73 70 65 63 69 |k%!112=1|:. speci|
|00003aa0| 61 6c 20 70 6c 65 61 64 | 69 6e 67 20 21 21 21 0d |al plead|ing !!!.|
|00003ab0| 11 9e 2b c8 99 22 57 69 | 6d 70 5f 43 72 65 61 74 |..+.."Wi|mp_Creat|
|00003ac0| 65 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |eWindow"|,,block%|
|00003ad0| 20 b8 20 68 61 6e 64 6c | 65 25 0d 11 a8 0c 3d 68 | . handl|e%....=h|
|00003ae0| 61 6e 64 6c 65 25 0d 11 | b2 04 0d 11 bc 0f dd f2 |andle%..|........|
|00003af0| 73 65 74 65 78 74 65 6e | 74 0d 11 c6 45 f4 20 61 |setexten|t...E. a|
|00003b00| 73 73 75 6d 65 73 20 43 | 25 20 61 6e 64 20 50 25 |ssumes C|% and P%|
|00003b10| 20 28 61 6e 64 20 43 31 | 25 20 61 6e 64 20 50 31 | (and C1|% and P1|
|00003b20| 25 29 20 61 72 65 20 73 | 65 74 20 74 6f 20 76 61 |%) are s|et to va|
|00003b30| 6c 69 64 20 6e 65 77 20 | 76 61 6c 75 65 73 0d 11 |lid new |values..|
|00003b40| d0 3f f4 20 61 6e 64 20 | 74 68 61 74 20 61 6e 79 |.?. and |that any|
|00003b50| 20 64 61 74 61 20 69 73 | 20 63 6c 65 61 72 65 64 | data is| cleared|
|00003b60| 20 28 77 69 74 68 20 74 | 68 65 20 75 73 65 72 27 | (with t|he user'|
|00003b70| 73 20 61 67 72 65 65 6d | 65 6e 74 29 2e 0d 11 da |s agreem|ent)....|
|00003b80| 29 21 62 6c 6f 63 6b 25 | 3d 30 3a 62 6c 6f 63 6b |)!block%|=0:block|
|00003b90| 25 21 34 3d 2d 74 6f 70 | 68 65 69 67 68 74 25 2d |%!4=-top|height%-|
|00003ba0| 33 32 2a 50 31 25 0d 11 | e4 2d 62 6c 6f 63 6b 25 |32*P1%..|.-block%|
|00003bb0| 21 38 3d 6c 65 66 74 77 | 69 64 74 68 25 2b 31 34 |!8=leftw|idth%+14|
|00003bc0| 2a 31 36 2a 43 31 25 3a | 62 6c 6f 63 6b 25 21 31 |*16*C1%:|block%!1|
|00003bd0| 32 3d 30 0d 11 ee 29 c8 | 99 22 57 69 6d 70 5f 53 |2=0...).|."Wimp_S|
|00003be0| 65 74 45 78 74 65 6e 74 | 22 2c 6d 61 69 6e 68 61 |etExtent|",mainha|
|00003bf0| 6e 64 6c 65 25 2c 62 6c | 6f 63 6b 25 0d 11 f8 28 |ndle%,bl|ock%...(|
|00003c00| 62 6c 6f 63 6b 25 21 34 | 3d 2d 33 32 2a 50 31 25 |block%!4|=-32*P1%|
|00003c10| 3a 62 6c 6f 63 6b 25 21 | 38 3d 6c 65 66 74 77 69 |:block%!|8=leftwi|
|00003c20| 64 74 68 25 0d 12 02 29 | c8 99 22 57 69 6d 70 5f |dth%...)|.."Wimp_|
|00003c30| 53 65 74 45 78 74 65 6e | 74 22 2c 6c 65 66 74 68 |SetExten|t",lefth|
|00003c40| 61 6e 64 6c 65 25 2c 62 | 6c 6f 63 6b 25 0d 12 0c |andle%,b|lock%...|
|00003c50| 2b 62 6c 6f 63 6b 25 21 | 34 3d 2d 74 6f 70 68 65 |+block%!|4=-tophe|
|00003c60| 69 67 68 74 25 3a 62 6c | 6f 63 6b 25 21 38 3d 31 |ight%:bl|ock%!8=1|
|00003c70| 34 2a 31 36 2a 43 31 25 | 0d 12 16 28 c8 99 22 57 |4*16*C1%|...(.."W|
|00003c80| 69 6d 70 5f 53 65 74 45 | 78 74 65 6e 74 22 2c 74 |imp_SetE|xtent",t|
|00003c90| 6f 70 68 61 6e 64 6c 65 | 25 2c 62 6c 6f 63 6b 25 |ophandle|%,block%|
|00003ca0| 0d 12 20 17 21 62 6c 6f | 63 6b 25 3d 6d 61 69 6e |.. .!blo|ck%=main|
|00003cb0| 68 61 6e 64 6c 65 25 0d | 12 2a 23 c8 99 22 57 69 |handle%.|.*#.."Wi|
|00003cc0| 6d 70 5f 47 65 74 57 69 | 6e 64 6f 77 53 74 61 74 |mp_GetWi|ndowStat|
|00003cd0| 65 22 2c 2c 62 6c 6f 63 | 6b 25 0d 12 34 14 f2 64 |e",,bloc|k%..4..d|
|00003ce0| 61 74 61 77 69 6e 64 6f | 77 6d 6f 76 65 64 0d 12 |atawindo|wmoved..|
|00003cf0| 3e 05 e1 0d 12 48 04 0d | 12 52 11 dd f2 63 68 61 |>....H..|.R...cha|
|00003d00| 6e 67 65 64 28 69 25 29 | 0d 12 5c 0f 63 68 61 6e |nged(i%)|..\.chan|
|00003d10| 67 65 64 25 3d 69 25 0d | 12 66 49 e7 63 68 61 6e |ged%=i%.|.fI.chan|
|00003d20| 67 65 64 25 20 24 74 69 | 74 6c 65 62 75 66 66 65 |ged% $ti|tlebuffe|
|00003d30| 72 25 3d 54 61 75 46 69 | 6c 65 4e 61 6d 65 24 2b |r%=TauFi|leName$+|
|00003d40| 22 20 2a 22 20 8b 24 74 | 69 74 6c 65 62 75 66 66 |" *" .$t|itlebuff|
|00003d50| 65 72 25 3d 54 61 75 46 | 69 6c 65 4e 61 6d 65 24 |er%=TauF|ileName$|
|00003d60| 0d 12 70 17 21 62 6c 6f | 63 6b 25 3d 6d 61 69 6e |..p.!blo|ck%=main|
|00003d70| 68 61 6e 64 6c 65 25 0d | 12 7a 23 c8 99 22 57 69 |handle%.|.z#.."Wi|
|00003d80| 6d 70 5f 47 65 74 57 69 | 6e 64 6f 77 53 74 61 74 |mp_GetWi|ndowStat|
|00003d90| 65 22 2c 2c 62 6c 6f 63 | 6b 25 0d 12 84 2c 78 31 |e",,bloc|k%...,x1|
|00003da0| 25 3d 62 6c 6f 63 6b 25 | 21 34 3a 78 32 25 3d 62 |%=block%|!4:x2%=b|
|00003db0| 6c 6f 63 6b 25 21 31 32 | 3a 79 32 25 3d 62 6c 6f |lock%!12|:y2%=blo|
|00003dc0| 63 6b 25 21 31 36 0d 12 | 8e 2e c8 99 22 57 69 6d |ck%!16..|...."Wim|
|00003dd0| 70 5f 46 6f 72 63 65 52 | 65 64 72 61 77 22 2c 2d |p_ForceR|edraw",-|
|00003de0| 31 2c 78 31 25 2c 79 32 | 25 2c 78 32 25 2c 79 32 |1,x1%,y2|%,x2%,y2|
|00003df0| 25 2b 34 34 0d 12 98 05 | e1 0d 12 a2 04 0d 12 ac |%+44....|........|
|00003e00| 14 dd f2 6f 70 65 6e 64 | 61 74 61 77 69 6e 64 6f |...opend|atawindo|
|00003e10| 77 0d 12 b6 0f 6d 61 69 | 6e 6f 70 65 6e 25 3d b9 |w....mai|nopen%=.|
|00003e20| 0d 12 c0 1b f2 6f 70 65 | 6e 77 69 6e 64 6f 77 28 |.....ope|nwindow(|
|00003e30| 74 6f 70 68 61 6e 64 6c | 65 25 29 0d 12 ca 1c f2 |tophandl|e%).....|
|00003e40| 6f 70 65 6e 77 69 6e 64 | 6f 77 28 6c 65 66 74 68 |openwind|ow(lefth|
|00003e50| 61 6e 64 6c 65 25 29 0d | 12 d4 1e f2 6f 70 65 6e |andle%).|....open|
|00003e60| 77 69 6e 64 6f 77 28 63 | 6f 72 6e 65 72 68 61 6e |window(c|ornerhan|
|00003e70| 64 6c 65 25 29 0d 12 de | 1c f2 6f 70 65 6e 77 69 |dle%)...|..openwi|
|00003e80| 6e 64 6f 77 28 6d 61 69 | 6e 68 61 6e 64 6c 65 25 |ndow(mai|nhandle%|
|00003e90| 29 0d 12 e8 37 21 62 6c | 6f 63 6b 25 3d 6d 61 69 |)...7!bl|ock%=mai|
|00003ea0| 6e 68 61 6e 64 6c 65 25 | 3a c8 99 22 57 69 6d 70 |nhandle%|:.."Wimp|
|00003eb0| 5f 47 65 74 57 69 6e 64 | 6f 77 53 74 61 74 65 22 |_GetWind|owState"|
|00003ec0| 2c 2c 62 6c 6f 63 6b 25 | 0d 12 f2 10 62 6c 6f 63 |,,block%|....bloc|
|00003ed0| 6b 25 21 32 38 3d 2d 31 | 0d 12 fc 14 f2 64 61 74 |k%!28=-1|.....dat|
|00003ee0| 61 77 69 6e 64 6f 77 6d | 6f 76 65 64 0d 13 06 05 |awindowm|oved....|
|00003ef0| e1 0d 13 10 04 0d 13 1a | 19 dd f2 6f 70 65 6e 77 |........|...openw|
|00003f00| 69 6e 64 6f 77 28 68 61 | 6e 64 6c 65 25 29 0d 13 |indow(ha|ndle%)..|
|00003f10| 24 13 21 62 6c 6f 63 6b | 25 3d 68 61 6e 64 6c 65 |$.!block|%=handle|
|00003f20| 25 0d 13 2e 23 c8 99 22 | 57 69 6d 70 5f 47 65 74 |%...#.."|Wimp_Get|
|00003f30| 57 69 6e 64 6f 77 53 74 | 61 74 65 22 2c 2c 62 6c |WindowSt|ate",,bl|
|00003f40| 6f 63 6b 25 0d 13 38 1f | c8 99 22 57 69 6d 70 5f |ock%..8.|.."Wimp_|
|00003f50| 4f 70 65 6e 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |OpenWind|ow",,blo|
|00003f60| 63 6b 25 0d 13 42 05 e1 | 0d 13 4c 04 0d 13 56 15 |ck%..B..|..L...V.|
|00003f70| dd f2 64 61 74 61 77 69 | 6e 64 6f 77 6d 6f 76 65 |..datawi|ndowmove|
|00003f80| 64 0d 13 60 10 ea 72 65 | 6f 70 65 6e 6d 61 69 6e |d..`..re|openmain|
|00003f90| 25 0d 13 6a 11 72 65 6f | 70 65 6e 6d 61 69 6e 25 |%..j.reo|penmain%|
|00003fa0| 3d a3 0d 13 74 38 21 62 | 6c 6f 63 6b 31 25 3d 74 |=...t8!b|lock1%=t|
|00003fb0| 6f 70 68 61 6e 64 6c 65 | 25 3a c8 99 22 57 69 6d |ophandle|%:.."Wim|
|00003fc0| 70 5f 47 65 74 57 69 6e | 64 6f 77 53 74 61 74 65 |p_GetWin|dowState|
|00003fd0| 22 2c 2c 62 6c 6f 63 6b | 31 25 0d 13 7e 22 6e 65 |",,block|1%..~"ne|
|00003fe0| 77 25 3d 62 6c 6f 63 6b | 25 21 32 38 3a 6f 6c 64 |w%=block|%!28:old|
|00003ff0| 25 3d 62 6c 6f 63 6b 31 | 25 21 32 38 0d 13 88 36 |%=block1|%!28...6|
|00004000| e7 6e 65 77 25 3c 3e 6f | 6c 64 25 20 72 65 6f 70 |.new%<>o|ld% reop|
|00004010| 65 6e 6d 61 69 6e 25 3d | b9 20 8b 62 6c 6f 63 6b |enmain%=|. .block|
|00004020| 25 21 32 38 3d 63 6f 72 | 6e 65 72 68 61 6e 64 6c |%!28=cor|nerhandl|
|00004030| 65 25 0d 13 92 1f c8 99 | 22 57 69 6d 70 5f 4f 70 |e%......|"Wimp_Op|
|00004040| 65 6e 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |enWindow|",,block|
|00004050| 25 0d 13 9c 2f 21 62 6c | 6f 63 6b 32 25 3d 6c 65 |%.../!bl|ock2%=le|
|00004060| 66 74 68 61 6e 64 6c 65 | 25 3a 21 62 6c 6f 63 6b |fthandle|%:!block|
|00004070| 33 25 3d 63 6f 72 6e 65 | 72 68 61 6e 64 6c 65 25 |3%=corne|rhandle%|
|00004080| 0d 13 a6 47 62 6c 6f 63 | 6b 31 25 21 34 3d 62 6c |...Gbloc|k1%!4=bl|
|00004090| 6f 63 6b 25 21 34 2b 6c | 65 66 74 77 69 64 74 68 |ock%!4+l|eftwidth|
|000040a0| 25 3a 62 6c 6f 63 6b 32 | 25 21 34 3d 62 6c 6f 63 |%:block2|%!4=bloc|
|000040b0| 6b 25 21 34 3a 62 6c 6f | 63 6b 33 25 21 34 3d 62 |k%!4:blo|ck3%!4=b|
|000040c0| 6c 6f 63 6b 25 21 34 0d | 13 b0 54 62 6c 6f 63 6b |lock%!4.|..Tblock|
|000040d0| 31 25 21 38 3d 62 6c 6f | 63 6b 25 21 31 36 2d 74 |1%!8=blo|ck%!16-t|
|000040e0| 6f 70 68 65 69 67 68 74 | 25 3a 62 6c 6f 63 6b 32 |opheight|%:block2|
|000040f0| 25 21 38 3d 62 6c 6f 63 | 6b 25 21 38 3a 62 6c 6f |%!8=bloc|k%!8:blo|
|00004100| 63 6b 33 25 21 38 3d 62 | 6c 6f 63 6b 25 21 31 36 |ck3%!8=b|lock%!16|
|00004110| 2d 74 6f 70 68 65 69 67 | 68 74 25 0d 13 ba 56 62 |-topheig|ht%...Vb|
|00004120| 6c 6f 63 6b 31 25 21 31 | 32 3d 62 6c 6f 63 6b 25 |lock1%!1|2=block%|
|00004130| 21 31 32 3a 62 6c 6f 63 | 6b 32 25 21 31 32 3d 62 |!12:bloc|k2%!12=b|
|00004140| 6c 6f 63 6b 25 21 34 2b | 6c 65 66 74 77 69 64 74 |lock%!4+|leftwidt|
|00004150| 68 25 3a 62 6c 6f 63 6b | 33 25 21 31 32 3d 62 6c |h%:block|3%!12=bl|
|00004160| 6f 63 6b 25 21 34 2b 6c | 65 66 74 77 69 64 74 68 |ock%!4+l|eftwidth|
|00004170| 25 0d 13 c4 4d 62 6c 6f | 63 6b 31 25 21 31 36 3d |%...Mblo|ck1%!16=|
|00004180| 62 6c 6f 63 6b 25 21 31 | 36 3a 62 6c 6f 63 6b 32 |block%!1|6:block2|
|00004190| 25 21 31 36 3d 62 6c 6f | 63 6b 25 21 31 36 2d 74 |%!16=blo|ck%!16-t|
|000041a0| 6f 70 68 65 69 67 68 74 | 25 3a 62 6c 6f 63 6b 33 |opheight|%:block3|
|000041b0| 25 21 31 36 3d 62 6c 6f | 63 6b 25 21 31 36 0d 13 |%!16=blo|ck%!16..|
|000041c0| ce 32 62 6c 6f 63 6b 31 | 25 21 32 30 3d 62 6c 6f |.2block1|%!20=blo|
|000041d0| 63 6b 25 21 32 30 3a 62 | 6c 6f 63 6b 32 25 21 32 |ck%!20:b|lock2%!2|
|000041e0| 30 3d 30 3a 62 6c 6f 63 | 6b 33 25 21 32 30 3d 30 |0=0:bloc|k3%!20=0|
|000041f0| 0d 13 d8 32 62 6c 6f 63 | 6b 31 25 21 32 34 3d 30 |...2bloc|k1%!24=0|
|00004200| 3a 62 6c 6f 63 6b 32 25 | 21 32 34 3d 62 6c 6f 63 |:block2%|!24=bloc|
|00004210| 6b 25 21 32 34 3a 62 6c | 6f 63 6b 33 25 21 32 34 |k%!24:bl|ock3%!24|
|00004220| 3d 30 0d 13 e2 43 62 6c | 6f 63 6b 31 25 21 33 32 |=0...Cbl|ock1%!32|
|00004230| 3d 74 6f 70 66 6c 61 67 | 25 3a 62 6c 6f 63 6b 32 |=topflag|%:block2|
|00004240| 25 21 33 32 3d 6c 65 66 | 74 66 6c 61 67 25 3a 62 |%!32=lef|tflag%:b|
|00004250| 6c 6f 63 6b 33 25 21 33 | 32 3d 63 6f 72 6e 65 72 |lock3%!3|2=corner|
|00004260| 66 6c 61 67 25 0d 13 ec | 40 62 6c 6f 63 6b 31 25 |flag%...|@block1%|
|00004270| 21 32 38 3d 6e 65 77 25 | 3a 62 6c 6f 63 6b 32 25 |!28=new%|:block2%|
|00004280| 21 32 38 3d 74 6f 70 68 | 61 6e 64 6c 65 25 3a 62 |!28=toph|andle%:b|
|00004290| 6c 6f 63 6b 33 25 21 32 | 38 3d 6c 65 66 74 68 61 |lock3%!2|8=leftha|
|000042a0| 6e 64 6c 65 25 0d 13 f6 | 20 c8 99 22 57 69 6d 70 |ndle%...| .."Wimp|
|000042b0| 5f 4f 70 65 6e 57 69 6e | 64 6f 77 22 2c 2c 62 6c |_OpenWin|dow",,bl|
|000042c0| 6f 63 6b 31 25 0d 14 00 | 20 c8 99 22 57 69 6d 70 |ock1%...| .."Wimp|
|000042d0| 5f 4f 70 65 6e 57 69 6e | 64 6f 77 22 2c 2c 62 6c |_OpenWin|dow",,bl|
|000042e0| 6f 63 6b 32 25 0d 14 0a | 20 c8 99 22 57 69 6d 70 |ock2%...| .."Wimp|
|000042f0| 5f 4f 70 65 6e 57 69 6e | 64 6f 77 22 2c 2c 62 6c |_OpenWin|dow",,bl|
|00004300| 6f 63 6b 33 25 0d 14 14 | 44 e7 72 65 6f 70 65 6e |ock3%...|D.reopen|
|00004310| 6d 61 69 6e 25 20 62 6c | 6f 63 6b 25 21 32 38 3d |main% bl|ock%!28=|
|00004320| 63 6f 72 6e 65 72 68 61 | 6e 64 6c 65 25 3a c8 99 |cornerha|ndle%:..|
|00004330| 22 57 69 6d 70 5f 4f 70 | 65 6e 57 69 6e 64 6f 77 |"Wimp_Op|enWindow|
|00004340| 22 2c 2c 62 6c 6f 63 6b | 25 0d 14 1e 05 e1 0d 14 |",,block|%.......|
|00004350| 28 04 0d 14 32 1a dd f2 | 63 6c 6f 73 65 77 69 6e |(...2...|closewin|
|00004360| 64 6f 77 28 68 61 6e 64 | 6c 65 25 29 0d 14 3c 13 |dow(hand|le%)..<.|
|00004370| 21 62 6c 6f 63 6b 25 3d | 68 61 6e 64 6c 65 25 0d |!block%=|handle%.|
|00004380| 14 46 20 c8 99 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |.F .."Wi|mp_Close|
|00004390| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 25 0d |Window",|,block%.|
|000043a0| 14 50 05 e1 0d 14 5a 04 | 0d 14 64 0c dd a4 54 73 |.P....Z.|..d...Ts|
|000043b0| 68 69 66 74 0d 14 6e 23 | c8 99 22 4f 53 5f 42 79 |hift..n#|.."OS_By|
|000043c0| 74 65 22 2c 32 30 32 2c | 30 2c 32 35 35 20 b8 2c |te",202,|0,255 .,|
|000043d0| 73 74 61 74 75 73 25 0d | 14 78 11 3d 28 73 74 61 |status%.|.x.=(sta|
|000043e0| 74 75 73 25 20 80 38 29 | 0d 14 82 04 0d 14 8c 0b |tus% .8)|........|
|000043f0| dd a4 54 63 74 72 6c 0d | 14 96 23 c8 99 22 4f 53 |..Tctrl.|..#.."OS|
|00004400| 5f 42 79 74 65 22 2c 32 | 30 32 2c 30 2c 32 35 35 |_Byte",2|02,0,255|
|00004410| 20 b8 2c 73 74 61 74 75 | 73 25 0d 14 a0 12 3d 28 | .,statu|s%....=(|
|00004420| 73 74 61 74 75 73 25 20 | 80 36 34 29 0d 14 aa 04 |status% |.64)....|
|00004430| 0d 14 b4 12 dd f2 6d 61 | 78 63 6f 6c 75 6d 6e 72 |......ma|xcolumnr|
|00004440| 6f 77 0d 14 be 0a ea 6a | 25 2c 6b 25 0d 14 c8 45 |ow.....j|%,k%...E|
|00004450| 6b 25 3d a3 3a e3 6a 25 | 3d 30 20 b8 6d 61 78 72 |k%=.:.j%|=0 .maxr|
|00004460| 6f 77 25 3a 6b 25 3d 6b | 25 20 84 28 44 61 74 61 |ow%:k%=k|% .(Data|
|00004470| 53 74 61 74 75 73 25 3f | 28 6d 61 78 63 6f 6c 75 |Status%?|(maxcolu|
|00004480| 6d 6e 25 2b 43 31 25 2a | 6a 25 29 3c 3e 30 29 3a |mn%+C1%*|j%)<>0):|
|00004490| ed 0d 14 d2 19 c8 95 28 | 6d 61 78 63 6f 6c 75 6d |.......(|maxcolum|
|000044a0| 6e 25 3e 30 29 20 80 ac | 6b 25 0d 14 dc 12 20 6d |n%>0) ..|k%.... m|
|000044b0| 61 78 63 6f 6c 75 6d 6e | 25 2d 3d 31 0d 14 e6 46 |axcolumn|%-=1...F|
|000044c0| 20 6b 25 3d a3 3a e3 6a | 25 3d 30 20 b8 6d 61 78 | k%=.:.j|%=0 .max|
|000044d0| 72 6f 77 25 3a 6b 25 3d | 6b 25 20 84 28 44 61 74 |row%:k%=|k% .(Dat|
|000044e0| 61 53 74 61 74 75 73 25 | 3f 28 6d 61 78 63 6f 6c |aStatus%|?(maxcol|
|000044f0| 75 6d 6e 25 2b 43 31 25 | 2a 6a 25 29 3c 3e 30 29 |umn%+C1%|*j%)<>0)|
|00004500| 3a ed 0d 14 f0 05 ce 0d | 14 fa 45 6b 25 3d a3 3a |:.......|..Ek%=.:|
|00004510| e3 6a 25 3d 30 20 b8 6d | 61 78 63 6f 6c 75 6d 6e |.j%=0 .m|axcolumn|
|00004520| 25 3a 6b 25 3d 6b 25 20 | 84 28 44 61 74 61 53 74 |%:k%=k% |.(DataSt|
|00004530| 61 74 75 73 25 3f 28 6a | 25 2b 43 31 25 2a 6d 61 |atus%?(j|%+C1%*ma|
|00004540| 78 72 6f 77 25 29 3c 3e | 30 29 3a ed 0d 15 04 16 |xrow%)<>|0):.....|
|00004550| c8 95 28 6d 61 78 72 6f | 77 25 3e 30 29 20 80 ac |..(maxro|w%>0) ..|
|00004560| 6b 25 0d 15 0e 0f 20 6d | 61 78 72 6f 77 25 2d 3d |k%.... m|axrow%-=|
|00004570| 31 0d 15 18 46 20 6b 25 | 3d a3 3a e3 6a 25 3d 30 |1...F k%|=.:.j%=0|
|00004580| 20 b8 6d 61 78 63 6f 6c | 75 6d 6e 25 3a 6b 25 3d | .maxcol|umn%:k%=|
|00004590| 6b 25 20 84 28 44 61 74 | 61 53 74 61 74 75 73 25 |k% .(Dat|aStatus%|
|000045a0| 3f 28 6a 25 2b 43 31 25 | 2a 6d 61 78 72 6f 77 25 |?(j%+C1%|*maxrow%|
|000045b0| 29 3c 3e 30 29 3a ed 0d | 15 22 05 ce 0d 15 2c 05 |)<>0):..|."....,.|
|000045c0| e1 0d 15 36 04 0d 15 40 | 11 dd f2 67 65 74 6d 61 |...6...@|...getma|
|000045d0| 69 6e 69 6e 66 6f 0d 15 | 4a 17 21 62 6c 6f 63 6b |ininfo..|J.!block|
|000045e0| 25 3d 6d 61 69 6e 68 61 | 6e 64 6c 65 25 0d 15 54 |%=mainha|ndle%..T|
|000045f0| 23 c8 99 22 57 69 6d 70 | 5f 47 65 74 57 69 6e 64 |#.."Wimp|_GetWind|
|00004600| 6f 77 53 74 61 74 65 22 | 2c 2c 62 6c 6f 63 6b 25 |owState"|,,block%|
|00004610| 0d 15 5e 32 6f 78 25 3d | 62 6c 6f 63 6b 25 21 34 |..^2ox%=|block%!4|
|00004620| 2d 62 6c 6f 63 6b 25 21 | 32 30 3a 6f 79 25 3d 62 |-block%!|20:oy%=b|
|00004630| 6c 6f 63 6b 25 21 31 36 | 2d 62 6c 6f 63 6b 25 21 |lock%!16|-block%!|
|00004640| 32 34 0d 15 68 39 78 31 | 25 3d 62 6c 6f 63 6b 25 |24..h9x1|%=block%|
|00004650| 21 34 3a 78 32 25 3d 62 | 6c 6f 63 6b 25 21 31 32 |!4:x2%=b|lock%!12|
|00004660| 3a 79 31 25 3d 62 6c 6f | 63 6b 25 21 38 3a 79 32 |:y1%=blo|ck%!8:y2|
|00004670| 25 3d 62 6c 6f 63 6b 25 | 21 31 36 0d 15 72 1f 6c |%=block%|!16..r.l|
|00004680| 63 6f 6c 75 6d 6e 25 3d | 28 78 31 25 2d 6f 78 25 |column%=|(x1%-ox%|
|00004690| 29 20 81 28 31 36 2a 31 | 34 29 0d 15 7c 2a 72 63 |) .(16*1|4)..|*rc|
|000046a0| 6f 6c 75 6d 6e 25 3d 28 | 78 32 25 2d 6f 78 25 2d |olumn%=(|x2%-ox%-|
|000046b0| 6c 65 66 74 77 69 64 74 | 68 25 29 20 81 28 31 36 |leftwidt|h%) .(16|
|000046c0| 2a 31 34 29 0d 15 86 17 | 74 72 6f 77 25 3d 28 6f |*14)....|trow%=(o|
|000046d0| 79 25 2d 79 32 25 29 20 | 81 33 32 0d 15 90 22 62 |y%-y2%) |.32..."b|
|000046e0| 72 6f 77 25 3d 28 6f 79 | 25 2d 79 31 25 2d 74 6f |row%=(oy|%-y1%-to|
|000046f0| 70 68 65 69 67 68 74 25 | 29 20 81 33 32 0d 15 9a |pheight%|) .32...|
|00004700| 05 e1 0d 15 a4 04 0d 15 | ae 17 dd f2 73 63 72 6f |........|....scro|
|00004710| 6c 6c 61 72 65 61 28 74 | 79 70 65 25 29 0d 15 b8 |llarea(t|ype%)...|
|00004720| 37 f4 20 63 68 61 6e 67 | 65 20 74 68 65 20 6d 61 |7. chang|e the ma|
|00004730| 69 6e 20 77 69 6e 64 6f | 77 27 73 20 76 69 73 69 |in windo|w's visi|
|00004740| 62 6c 65 20 61 72 65 61 | 20 69 6e 20 73 6f 6d 65 |ble area| in some|
|00004750| 20 77 61 79 0d 15 c2 17 | 21 62 6c 6f 63 6b 25 3d | way....|!block%=|
|00004760| 6d 61 69 6e 68 61 6e 64 | 6c 65 25 0d 15 cc 23 c8 |mainhand|le%...#.|
|00004770| 99 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 |."Wimp_G|etWindow|
|00004780| 53 74 61 74 65 22 2c 2c | 62 6c 6f 63 6b 25 0d 15 |State",,|block%..|
|00004790| d6 0e c8 8e 20 74 79 70 | 65 25 20 ca 0d 15 e0 2b |.... typ|e% ....+|
|000047a0| c9 31 3a 62 6c 6f 63 6b | 25 21 32 34 3d 62 6c 6f |.1:block|%!24=blo|
|000047b0| 63 6b 25 21 32 34 2d 33 | 32 3a f4 20 73 63 72 6f |ck%!24-3|2:. scro|
|000047c0| 6c 6c 20 64 6f 77 6e 0d | 15 ea 29 c9 32 3a 62 6c |ll down.|..).2:bl|
|000047d0| 6f 63 6b 25 21 32 34 3d | 62 6c 6f 63 6b 25 21 32 |ock%!24=|block%!2|
|000047e0| 34 2b 33 32 3a f4 20 73 | 63 72 6f 6c 6c 20 75 70 |4+32:. s|croll up|
|000047f0| 0d 15 f4 2f c9 33 3a 62 | 6c 6f 63 6b 25 21 32 30 |.../.3:b|lock%!20|
|00004800| 3d 62 6c 6f 63 6b 25 21 | 32 30 2b 31 36 2a 31 34 |=block%!|20+16*14|
|00004810| 3a f4 20 73 63 72 6f 6c | 6c 20 72 69 67 68 74 0d |:. scrol|l right.|
|00004820| 15 fe 2e c9 34 3a 62 6c | 6f 63 6b 25 21 32 30 3d |....4:bl|ock%!20=|
|00004830| 62 6c 6f 63 6b 25 21 32 | 30 2d 31 36 2a 31 34 3a |block%!2|0-16*14:|
|00004840| f4 20 73 63 72 6f 6c 6c | 20 6c 65 66 74 0d 16 08 |. scroll| left...|
|00004850| 2c c9 35 3a 62 6c 6f 63 | 6b 25 21 32 34 3d 2d 33 |,.5:bloc|k%!24=-3|
|00004860| 32 2a 50 31 25 2d 74 6f | 70 68 65 69 67 68 74 25 |2*P1%-to|pheight%|
|00004870| 3a f4 20 62 6f 74 74 6f | 6d 0d 16 12 18 c9 36 3a |:. botto|m.....6:|
|00004880| 62 6c 6f 63 6b 25 21 32 | 34 3d 30 3a f4 20 74 6f |block%!2|4=0:. to|
|00004890| 70 0d 16 1c 25 c9 37 3a | 62 6c 6f 63 6b 25 21 32 |p...%.7:|block%!2|
|000048a0| 34 3d 30 3a 62 6c 6f 63 | 6b 25 21 32 30 3d 30 3a |4=0:bloc|k%!20=0:|
|000048b0| f4 20 68 6f 6d 65 0d 16 | 26 85 c9 38 3a 62 6c 6f |. home..|&..8:blo|
|000048c0| 63 6b 25 21 32 34 3d 2d | 33 32 2a 28 6d 61 78 72 |ck%!24=-|32*(maxr|
|000048d0| 6f 77 25 2b 32 29 2b 28 | 62 6c 6f 63 6b 25 21 31 |ow%+2)+(|block%!1|
|000048e0| 36 2d 62 6c 6f 63 6b 25 | 21 38 29 2d 74 6f 70 68 |6-block%|!8)-toph|
|000048f0| 65 69 67 68 74 25 3a 62 | 6c 6f 63 6b 25 21 32 30 |eight%:b|lock%!20|
|00004900| 3d 31 36 2a 31 34 2a 28 | 6d 61 78 63 6f 6c 75 6d |=16*14*(|maxcolum|
|00004910| 6e 25 2b 31 29 2d 28 62 | 6c 6f 63 6b 25 21 31 32 |n%+1)-(b|lock%!12|
|00004920| 2d 62 6c 6f 63 6b 25 21 | 34 29 2b 6c 65 66 74 77 |-block%!|4)+leftw|
|00004930| 69 64 74 68 25 3a f4 20 | 65 6e 64 0d 16 30 42 c9 |idth%:. |end..0B.|
|00004940| 39 3a 62 6c 6f 63 6b 25 | 21 32 34 3d 62 6c 6f 63 |9:block%|!24=bloc|
|00004950| 6b 25 21 32 34 2d 33 32 | 3a 62 6c 6f 63 6b 25 21 |k%!24-32|:block%!|
|00004960| 32 30 3d 30 3a f4 20 62 | 65 67 69 6e 6e 69 6e 67 |20=0:. b|eginning|
|00004970| 20 6f 66 20 6e 65 78 74 | 20 6c 69 6e 65 0d 16 3a | of next| line..:|
|00004980| 50 c9 31 30 3a 62 6c 6f | 63 6b 25 21 32 34 3d 62 |P.10:blo|ck%!24=b|
|00004990| 6c 6f 63 6b 25 21 32 34 | 2b 33 32 3a 62 6c 6f 63 |lock%!24|+32:bloc|
|000049a0| 6b 25 21 32 30 3d 31 34 | 2a 31 36 2a 43 31 25 2b |k%!20=14|*16*C1%+|
|000049b0| 6c 65 66 74 77 69 64 74 | 68 25 3a f4 20 65 6e 64 |leftwidt|h%:. end|
|000049c0| 20 6f 66 20 6c 61 73 74 | 20 6c 69 6e 65 0d 16 44 | of last| line..D|
|000049d0| 05 cb 0d 16 4e 1c e7 62 | 6c 6f 63 6b 25 21 32 30 |....N..b|lock%!20|
|000049e0| 3c 30 20 62 6c 6f 63 6b | 25 21 32 30 3d 30 0d 16 |<0 block|%!20=0..|
|000049f0| 58 6c e7 62 6c 6f 63 6b | 25 21 32 30 3e 31 34 2a |Xl.block|%!20>14*|
|00004a00| 31 36 2a 43 31 25 2b 6c | 65 66 74 77 69 64 74 68 |16*C1%+l|eftwidth|
|00004a10| 25 2d 28 62 6c 6f 63 6b | 25 21 31 32 2d 62 6c 6f |%-(block|%!12-blo|
|00004a20| 63 6b 25 21 34 29 20 62 | 6c 6f 63 6b 25 21 32 30 |ck%!4) b|lock%!20|
|00004a30| 3d 31 34 2a 31 36 2a 43 | 31 25 2b 6c 65 66 74 77 |=14*16*C|1%+leftw|
|00004a40| 69 64 74 68 25 2d 28 62 | 6c 6f 63 6b 25 21 31 32 |idth%-(b|lock%!12|
|00004a50| 2d 62 6c 6f 63 6b 25 21 | 34 29 0d 16 62 1c e7 62 |-block%!|4)..b..b|
|00004a60| 6c 6f 63 6b 25 21 32 34 | 3e 30 20 62 6c 6f 63 6b |lock%!24|>0 block|
|00004a70| 25 21 32 34 3d 30 0d 16 | 6c 68 e7 62 6c 6f 63 6b |%!24=0..|lh.block|
|00004a80| 25 21 32 34 3c 2d 33 32 | 2a 50 31 25 2d 74 6f 70 |%!24<-32|*P1%-top|
|00004a90| 68 65 69 67 68 74 25 2b | 28 62 6c 6f 63 6b 25 21 |height%+|(block%!|
|00004aa0| 31 36 2d 62 6c 6f 63 6b | 25 21 38 29 20 62 6c 6f |16-block|%!8) blo|
|00004ab0| 63 6b 25 21 32 34 3d 2d | 33 32 2a 50 31 25 2d 74 |ck%!24=-|32*P1%-t|
|00004ac0| 6f 70 68 65 69 67 68 74 | 25 2b 28 62 6c 6f 63 6b |opheight|%+(block|
|00004ad0| 25 21 31 36 2d 62 6c 6f | 63 6b 25 21 38 29 0d 16 |%!16-blo|ck%!8)..|
|00004ae0| 76 14 f2 64 61 74 61 77 | 69 6e 64 6f 77 6d 6f 76 |v..dataw|indowmov|
|00004af0| 65 64 0d 16 80 05 e1 0d | 16 8a 04 0d 16 94 14 dd |ed......|........|
|00004b00| f2 6f 6e 65 73 65 6c 65 | 63 74 28 63 6f 25 29 0d |.onesele|ct(co%).|
|00004b10| 16 9e 37 f4 20 63 6f 6c | 6c 61 70 73 65 20 74 68 |..7. col|lapse th|
|00004b20| 65 20 73 65 6c 65 63 74 | 65 64 20 61 72 65 61 20 |e select|ed area |
|00004b30| 74 6f 20 74 68 65 20 63 | 61 72 65 74 20 63 65 6c |to the c|aret cel|
|00004b40| 6c 20 6f 6e 6c 79 0d 16 | a8 34 f2 72 65 64 72 61 |l only..|.4.redra|
|00004b50| 77 6d 61 69 6e 28 63 61 | 72 65 74 78 31 25 2c 63 |wmain(ca|retx1%,c|
|00004b60| 61 72 65 74 78 32 25 2c | 63 61 72 65 74 79 31 25 |aretx2%,|carety1%|
|00004b70| 2c 63 61 72 65 74 79 32 | 25 29 0d 16 b2 2b 63 61 |,carety2|%)...+ca|
|00004b80| 72 65 74 78 31 25 3d 63 | 61 72 65 74 63 6f 6c 75 |retx1%=c|aretcolu|
|00004b90| 6d 6e 25 3a 63 61 72 65 | 74 78 32 25 3d 63 61 72 |mn%:care|tx2%=car|
|00004ba0| 65 74 78 31 25 0d 16 bc | 28 63 61 72 65 74 79 31 |etx1%...|(carety1|
|00004bb0| 25 3d 63 61 72 65 74 72 | 6f 77 25 3a 63 61 72 65 |%=caretr|ow%:care|
|00004bc0| 74 79 32 25 3d 63 61 72 | 65 74 79 31 25 0d 16 c6 |ty2%=car|ety1%...|
|00004bd0| 34 f2 72 65 64 72 61 77 | 6d 61 69 6e 28 63 61 72 |4.redraw|main(car|
|00004be0| 65 74 78 31 25 2c 63 61 | 72 65 74 78 32 25 2c 63 |etx1%,ca|retx2%,c|
|00004bf0| 61 72 65 74 79 31 25 2c | 63 61 72 65 74 79 32 25 |arety1%,|carety2%|
|00004c00| 29 0d 16 d0 15 f2 63 61 | 72 65 74 73 74 72 69 6e |).....ca|retstrin|
|00004c10| 67 28 63 6f 25 29 0d 16 | da 05 e1 0d 16 e4 04 0d |g(co%)..|........|
|00004c20| 16 ee 16 dd f2 63 61 72 | 65 74 73 74 72 69 6e 67 |.....car|etstring|
|00004c30| 28 63 6f 25 29 0d 16 f8 | 4c f4 20 64 65 66 69 6e |(co%)...|L. defin|
|00004c40| 65 20 74 68 65 20 63 61 | 72 65 74 20 76 61 72 69 |e the ca|ret vari|
|00004c50| 61 62 6c 65 73 20 66 6f | 72 20 74 68 65 20 63 61 |ables fo|r the ca|
|00004c60| 72 65 74 20 63 65 6c 6c | 2c 20 61 6e 64 20 70 75 |ret cell|, and pu|
|00004c70| 74 20 74 68 65 20 63 61 | 72 65 74 20 74 68 65 72 |t the ca|ret ther|
|00004c80| 65 0d 17 02 31 c8 8e 20 | 44 61 74 61 53 74 61 74 |e...1.. |DataStat|
|00004c90| 75 73 25 3f 28 63 61 72 | 65 74 63 6f 6c 75 6d 6e |us%?(car|etcolumn|
|00004ca0| 25 2b 43 31 25 2a 63 61 | 72 65 74 72 6f 77 25 29 |%+C1%*ca|retrow%)|
|00004cb0| 20 ca 0d 17 0c 12 c9 32 | 3a f4 20 6d 6f 76 65 20 | ......2|:. move |
|00004cc0| 66 6c 61 67 0d 17 16 14 | 20 63 61 72 65 74 73 68 |flag....| caretsh|
|00004cd0| 6f 72 74 24 3d 22 4d 22 | 0d 17 20 14 20 63 61 72 |ort$="M"|.. . car|
|00004ce0| 65 74 6f 66 66 73 65 74 | 25 3d 31 31 0d 17 2a 18 |etoffset|%=11..*.|
|00004cf0| c9 31 3a f4 20 6e 75 6d | 65 72 69 63 61 6c 20 76 |.1:. num|erical v|
|00004d00| 61 6c 75 65 0d 17 34 10 | 20 40 25 3d 26 31 30 30 |alue..4.| @%=&100|
|00004d10| 30 36 30 44 0d 17 3e 32 | 20 63 61 72 65 74 73 68 |060D..>2| caretsh|
|00004d20| 6f 72 74 24 3d c3 28 a4 | 54 64 61 74 61 28 63 61 |ort$=.(.|Tdata(ca|
|00004d30| 72 65 74 63 6f 6c 75 6d | 6e 25 2c 63 61 72 65 74 |retcolum|n%,caret|
|00004d40| 72 6f 77 25 29 29 0d 17 | 48 1d 20 e7 63 6f 25 3e |row%))..|H. .co%>|
|00004d50| 3d 30 20 63 61 72 65 74 | 6f 66 66 73 65 74 25 3d |=0 caret|offset%=|
|00004d60| 63 6f 25 0d 17 52 13 c9 | 30 3a f4 20 65 6d 70 74 |co%..R..|0:. empt|
|00004d70| 79 20 63 65 6c 6c 0d 17 | 5c 13 20 63 61 72 65 74 |y cell..|\. caret|
|00004d80| 73 68 6f 72 74 24 3d 22 | 22 0d 17 66 14 20 63 61 |short$="|"..f. ca|
|00004d90| 72 65 74 6f 66 66 73 65 | 74 25 3d 31 31 0d 17 70 |retoffse|t%=11..p|
|00004da0| 2e 7f 3a 85 32 35 35 2c | 22 42 61 64 20 44 61 74 |..:.255,|"Bad Dat|
|00004db0| 61 53 74 61 74 75 73 20 | 69 6e 20 50 52 4f 43 63 |aStatus |in PROCc|
|00004dc0| 61 72 65 74 73 74 72 69 | 6e 67 22 0d 17 7a 05 cb |aretstri|ng"..z..|
|00004dd0| 0d 17 84 30 63 61 72 65 | 74 24 3d c2 22 20 20 20 |...0care|t$=." |
|00004de0| 20 20 20 20 20 20 20 20 | 20 20 22 2b 63 61 72 65 | | "+care|
|00004df0| 74 73 68 6f 72 74 24 2b | 22 20 20 22 2c 31 34 29 |tshort$+|" ",14)|
|00004e00| 0d 17 8e 0e f2 6d 6f 76 | 65 63 61 72 65 74 0d 17 |.....mov|ecaret..|
|00004e10| 98 05 e1 0d 17 a2 04 0d | 17 ac 1b dd f2 72 65 63 |........|.....rec|
|00004e20| 6f 72 64 63 61 72 65 74 | 28 62 69 67 61 72 65 61 |ordcaret|(bigarea|
|00004e30| 25 29 0d 17 b6 38 f4 20 | 61 6e 20 65 64 69 74 20 |%)...8. |an edit |
|00004e40| 6f 66 20 61 20 63 65 6c | 6c 20 68 61 73 20 66 69 |of a cel|l has fi|
|00004e50| 6e 69 73 68 65 64 20 2d | 20 72 65 63 6f 72 64 20 |nished -| record |
|00004e60| 74 68 65 20 72 65 73 75 | 6c 74 0d 17 c0 17 ea 61 |the resu|lt.....a|
|00004e70| 6c 74 65 72 65 64 25 2c | 64 73 25 2c 64 2c 63 73 |ltered%,|ds%,d,cs|
|00004e80| 24 0d 17 ca 36 f4 20 66 | 6c 61 67 2c 20 6e 65 77 |$...6. f|lag, new|
|00004e90| 20 44 61 74 61 53 74 61 | 74 75 73 25 2c 20 6e 65 | DataSta|tus%, ne|
|00004ea0| 77 20 44 61 74 61 2c 20 | 6f 6c 64 20 63 61 72 65 |w Data, |old care|
|00004eb0| 74 73 68 6f 72 74 24 0d | 17 d4 14 61 6c 74 65 72 |tshort$.|...alter|
|00004ec0| 65 64 25 3d a3 3a 64 73 | 25 3d 31 0d 17 de 2f e7 |ed%=.:ds|%=1.../.|
|00004ed0| a7 63 61 72 65 74 73 68 | 6f 72 74 24 2c 22 4d 22 |.caretsh|ort$,"M"|
|00004ee0| 29 20 84 a7 63 61 72 65 | 74 73 68 6f 72 74 24 2c |) ..care|tshort$,|
|00004ef0| 22 6d 22 29 20 64 73 25 | 3d 32 0d 17 e8 29 e7 63 |"m") ds%|=2...).c|
|00004f00| 61 72 65 74 73 68 6f 72 | 74 24 3d c4 a9 63 61 72 |aretshor|t$=..car|
|00004f10| 65 74 73 68 6f 72 74 24 | 2c 22 20 22 29 20 64 73 |etshort$|," ") ds|
|00004f20| 25 3d 30 0d 17 f2 12 64 | 3d bb 63 61 72 65 74 73 |%=0....d|=.carets|
|00004f30| 68 6f 72 74 24 0d 17 fc | 0f e7 62 69 67 61 72 65 |hort$...|..bigare|
|00004f40| 61 25 20 8c 0d 18 06 38 | 20 78 31 25 3d 63 61 72 |a% ....8| x1%=car|
|00004f50| 65 74 78 31 25 3a 78 32 | 25 3d 63 61 72 65 74 78 |etx1%:x2|%=caretx|
|00004f60| 32 25 3a 79 31 25 3d 63 | 61 72 65 74 79 31 25 3a |2%:y1%=c|arety1%:|
|00004f70| 79 32 25 3d 63 61 72 65 | 74 79 32 25 0d 18 10 05 |y2%=care|ty2%....|
|00004f80| cc 0d 18 1a 33 20 78 31 | 25 3d 63 61 72 65 74 63 |....3 x1|%=caretc|
|00004f90| 6f 6c 75 6d 6e 25 3a 78 | 32 25 3d 78 31 25 3a 79 |olumn%:x|2%=x1%:y|
|00004fa0| 31 25 3d 63 61 72 65 74 | 72 6f 77 25 3a 79 32 25 |1%=caret|row%:y2%|
|00004fb0| 3d 79 31 25 0d 18 24 05 | cd 0d 18 2e 10 e3 69 25 |=y1%..$.|......i%|
|00004fc0| 3d 78 31 25 20 b8 78 32 | 25 0d 18 38 10 e3 6a 25 |=x1% .x2|%..8..j%|
|00004fd0| 3d 79 31 25 20 b8 79 32 | 25 0d 18 42 24 40 25 3d |=y1% .y2|%..B$@%=|
|00004fe0| 26 31 30 30 30 36 30 44 | 3a 63 73 24 3d c3 28 a4 |&100060D|:cs$=.(.|
|00004ff0| 54 64 61 74 61 28 69 25 | 2c 6a 25 29 29 0d 18 4c |Tdata(i%|,j%))..L|
|00005000| 47 e7 44 61 74 61 53 74 | 61 74 75 73 25 3f 28 69 |G.DataSt|atus%?(i|
|00005010| 25 2b 43 31 25 2a 6a 25 | 29 3c 3e 64 73 25 20 84 |%+C1%*j%|)<>ds% .|
|00005020| 28 64 73 25 3d 31 20 80 | 63 73 24 3c 3e 63 61 72 |(ds%=1 .|cs$<>car|
|00005030| 65 74 73 68 6f 72 74 24 | 29 20 61 6c 74 65 72 65 |etshort$|) altere|
|00005040| 64 25 3d b9 0d 18 56 2e | f2 64 61 74 61 28 69 25 |d%=...V.|.data(i%|
|00005050| 2c 6a 25 2c 64 29 3a 44 | 61 74 61 53 74 61 74 75 |,j%,d):D|ataStatu|
|00005060| 73 25 3f 28 69 25 2b 43 | 31 25 2a 6a 25 29 3d 64 |s%?(i%+C|1%*j%)=d|
|00005070| 73 25 0d 18 60 06 ed 2c | 0d 18 6a 0f e7 61 6c 74 |s%..`..,|..j..alt|
|00005080| 65 72 65 64 25 20 8c 0d | 18 74 2d 20 e7 63 61 72 |ered% ..|.t- .car|
|00005090| 65 74 78 32 25 3e 6d 61 | 78 63 6f 6c 75 6d 6e 25 |etx2%>ma|xcolumn%|
|000050a0| 20 6d 61 78 63 6f 6c 75 | 6d 6e 25 3d 63 61 72 65 | maxcolu|mn%=care|
|000050b0| 74 78 32 25 0d 18 7e 27 | 20 e7 63 61 72 65 74 79 |tx2%..~'| .carety|
|000050c0| 32 25 3e 6d 61 78 72 6f | 77 25 20 6d 61 78 72 6f |2%>maxro|w% maxro|
|000050d0| 77 25 3d 63 61 72 65 74 | 79 32 25 0d 18 88 10 20 |w%=caret|y2%.... |
|000050e0| f2 63 68 61 6e 67 65 64 | 28 b9 29 0d 18 92 05 cd |.changed|(.).....|
|000050f0| 0d 18 9c 05 e1 0d 18 a6 | 04 0d 18 b0 0f dd f2 6d |........|.......m|
|00005100| 6f 76 65 63 61 72 65 74 | 0d 18 ba 60 e7 63 61 72 |ovecaret|...`.car|
|00005110| 65 74 6f 66 66 73 65 74 | 25 3c 31 31 2d a9 63 61 |etoffset|%<11-.ca|
|00005120| 72 65 74 73 68 6f 72 74 | 24 20 63 61 72 65 74 6f |retshort|$ careto|
|00005130| 66 66 73 65 74 25 3d 31 | 31 2d a9 63 61 72 65 74 |ffset%=1|1-.caret|
|00005140| 73 68 6f 72 74 24 20 8b | e7 63 61 72 65 74 6f 66 |short$ .|.caretof|
|00005150| 66 73 65 74 25 3e 31 31 | 20 63 61 72 65 74 6f 66 |fset%>11| caretof|
|00005160| 66 73 65 74 25 3d 31 31 | 0d 18 c4 11 e7 ac 6d 61 |fset%=11|......ma|
|00005170| 69 6e 6f 70 65 6e 25 20 | e1 0d 18 ce 86 c8 99 22 |inopen% |......."|
|00005180| 57 69 6d 70 5f 53 65 74 | 43 61 72 65 74 50 6f 73 |Wimp_Set|CaretPos|
|00005190| 69 74 69 6f 6e 22 2c 6d | 61 69 6e 68 61 6e 64 6c |ition",m|ainhandl|
|000051a0| 65 25 2c 2d 31 2c 63 61 | 72 65 74 63 6f 6c 75 6d |e%,-1,ca|retcolum|
|000051b0| 6e 25 2a 31 36 2a 31 34 | 2b 31 36 2a 28 63 61 72 |n%*16*14|+16*(car|
|000051c0| 65 74 6f 66 66 73 65 74 | 25 2b 31 29 2b 6c 65 66 |etoffset|%+1)+lef|
|000051d0| 74 77 69 64 74 68 25 2c | 2d 63 61 72 65 74 72 6f |twidth%,|-caretro|
|000051e0| 77 25 2a 33 32 2d 33 36 | 2d 74 6f 70 68 65 69 67 |w%*32-36|-topheig|
|000051f0| 68 74 25 2c 26 34 30 42 | 30 30 32 38 2c 2d 31 0d |ht%,&40B|0028,-1.|
|00005200| 18 d8 05 e1 0d 18 e2 04 | 0d 18 ec 0e dd f2 75 73 |........|......us|
|00005210| 65 72 64 72 61 77 0d 18 | f6 30 f4 20 73 63 72 65 |erdraw..|.0. scre|
|00005220| 65 6e 20 63 6f 2d 6f 72 | 64 73 20 6f 66 20 6c 6f |en co-or|ds of lo|
|00005230| 70 20 6c 65 66 74 20 6f | 66 20 76 69 73 69 62 6c |p left o|f visibl|
|00005240| 65 20 61 72 65 61 0d 19 | 00 2a 74 6f 70 6c 65 66 |e area..|.*toplef|
|00005250| 74 78 25 3d 62 6c 6f 63 | 6b 25 21 34 3a 74 6f 70 |tx%=bloc|k%!4:top|
|00005260| 6c 65 66 74 79 25 3d 62 | 6c 6f 63 6b 25 21 31 36 |lefty%=b|lock%!16|
|00005270| 0d 19 0a 3e f4 20 6f 66 | 66 73 65 74 20 6f 66 20 |...>. of|fset of |
|00005280| 74 6f 70 20 6c 65 66 74 | 20 6f 66 20 76 69 73 69 |top left| of visi|
|00005290| 62 6c 65 20 61 72 65 61 | 20 66 72 6f 6d 20 77 6f |ble area| from wo|
|000052a0| 72 6b 20 61 72 65 61 20 | 6f 72 69 67 69 6e 0d 19 |rk area |origin..|
|000052b0| 14 29 73 63 72 6f 6c 6c | 78 25 3d 62 6c 6f 63 6b |.)scroll|x%=block|
|000052c0| 25 21 32 30 3a 73 63 72 | 6f 6c 6c 79 25 3d 62 6c |%!20:scr|olly%=bl|
|000052d0| 6f 63 6b 25 21 32 34 0d | 19 1e 28 f4 20 73 63 72 |ock%!24.|..(. scr|
|000052e0| 65 65 6e 20 63 6f 2d 6f | 72 64 73 20 6f 66 20 72 |een co-o|rds of r|
|000052f0| 65 64 72 61 77 20 72 65 | 63 74 61 6e 67 6c 65 0d |edraw re|ctangle.|
|00005300| 19 28 3b 78 31 25 3d 62 | 6c 6f 63 6b 25 21 32 38 |.(;x1%=b|lock%!28|
|00005310| 3a 79 31 25 3d 62 6c 6f | 63 6b 25 21 33 32 3a 78 |:y1%=blo|ck%!32:x|
|00005320| 32 25 3d 62 6c 6f 63 6b | 25 21 33 36 3a 79 32 25 |2%=block|%!36:y2%|
|00005330| 3d 62 6c 6f 63 6b 25 21 | 34 30 0d 19 32 28 f4 20 |=block%!|40..2(. |
|00005340| 73 63 72 65 65 6e 20 63 | 6f 2d 6f 72 64 73 20 6f |screen c|o-ords o|
|00005350| 66 20 77 6f 72 6b 20 61 | 72 65 61 20 6f 72 69 67 |f work a|rea orig|
|00005360| 69 6e 0d 19 3c 37 77 6f | 72 6b 78 25 3d 74 6f 70 |in..<7wo|rkx%=top|
|00005370| 6c 65 66 74 78 25 2d 73 | 63 72 6f 6c 6c 78 25 3a |leftx%-s|crollx%:|
|00005380| 77 6f 72 6b 79 25 3d 74 | 6f 70 6c 65 66 74 79 25 |worky%=t|oplefty%|
|00005390| 2d 73 63 72 6f 6c 6c 79 | 25 0d 19 46 4d f4 20 64 |-scrolly|%..FM. d|
|000053a0| 69 73 74 61 6e 63 65 2c | 20 6f 66 20 74 6f 70 20 |istance,| of top |
|000053b0| 6c 65 66 74 20 63 6f 72 | 6e 65 72 20 6f 66 20 72 |left cor|ner of r|
|000053c0| 65 64 72 61 77 20 72 65 | 63 74 61 6e 67 6c 65 2c |edraw re|ctangle,|
|000053d0| 20 66 72 6f 6d 20 77 6f | 72 6b 20 61 72 65 61 20 | from wo|rk area |
|000053e0| 6f 72 69 67 69 6e 0d 19 | 50 2f 72 65 63 74 77 6f |origin..|P/rectwo|
|000053f0| 72 6b 78 25 3d 78 31 25 | 2d 77 6f 72 6b 78 25 3a |rkx%=x1%|-workx%:|
|00005400| 72 65 63 74 77 6f 72 6b | 79 25 3d 77 6f 72 6b 79 |rectwork|y%=worky|
|00005410| 25 2d 79 32 25 0d 19 5a | 10 c8 8e 20 21 62 6c 6f |%-y2%..Z|... !blo|
|00005420| 63 6b 25 20 ca 0d 19 64 | 12 c9 20 6d 61 69 6e 68 |ck% ...d|.. mainh|
|00005430| 61 6e 64 6c 65 25 3a 0d | 19 6e 45 20 f4 20 63 68 |andle%:.|.nE . ch|
|00005440| 61 72 61 63 74 65 72 20 | 70 6f 73 69 74 69 6f 6e |aracter |position|
|00005450| 73 20 66 72 6f 6d 20 77 | 6f 72 6b 20 61 72 65 61 |s from w|ork area|
|00005460| 20 6f 72 69 67 69 6e 2c | 20 73 74 61 72 74 20 61 | origin,| start a|
|00005470| 6e 64 20 6d 61 78 20 77 | 69 64 74 68 0d 19 78 4c |nd max w|idth..xL|
|00005480| 20 73 74 61 72 74 78 25 | 3d 28 72 65 63 74 77 6f | startx%|=(rectwo|
|00005490| 72 6b 78 25 2d 6c 65 66 | 74 77 69 64 74 68 25 29 |rkx%-lef|twidth%)|
|000054a0| 20 81 31 36 3a 73 74 61 | 72 74 79 25 3d 28 72 65 | .16:sta|rty%=(re|
|000054b0| 63 74 77 6f 72 6b 79 25 | 2d 74 6f 70 68 65 69 67 |ctworky%|-topheig|
|000054c0| 68 74 25 29 20 81 33 32 | 0d 19 82 34 20 77 69 64 |ht%) .32|...4 wid|
|000054d0| 74 68 78 25 3d 31 2b 28 | 78 32 25 2d 78 31 25 29 |thx%=1+(|x2%-x1%)|
|000054e0| 20 81 31 36 3a 77 69 64 | 74 68 79 25 3d 31 2b 28 | .16:wid|thy%=1+(|
|000054f0| 79 32 25 2d 79 31 25 29 | 20 81 33 32 0d 19 8c 19 |y2%-y1%)| .32....|
|00005500| 20 e7 73 74 61 72 74 78 | 25 3c 30 20 73 74 61 72 | .startx|%<0 star|
|00005510| 74 78 25 3d 30 0d 19 96 | 19 20 e7 73 74 61 72 74 |tx%=0...|. .start|
|00005520| 79 25 3c 30 20 73 74 61 | 72 74 79 25 3d 30 0d 19 |y%<0 sta|rty%=0..|
|00005530| a0 2b 20 e7 77 69 64 74 | 68 79 25 3e 50 25 2d 73 |.+ .widt|hy%>P%-s|
|00005540| 74 61 72 74 79 25 20 77 | 69 64 74 68 79 25 3d 50 |tarty% w|idthy%=P|
|00005550| 25 2d 73 74 61 72 74 79 | 25 0d 19 aa 1a 20 65 6e |%-starty|%.... en|
|00005560| 64 79 25 3d 73 74 61 72 | 74 79 25 2b 77 69 64 74 |dy%=star|ty%+widt|
|00005570| 68 79 25 0d 19 b4 10 20 | 40 25 3d 26 31 30 30 30 |hy%.... |@%=&1000|
|00005580| 36 30 44 0d 19 be 1d 20 | 73 74 61 72 74 63 6f 6c |60D.... |startcol|
|00005590| 75 6d 6e 25 3d 73 74 61 | 72 74 78 25 20 81 31 34 |umn%=sta|rtx% .14|
|000055a0| 0d 19 c8 47 20 65 6e 64 | 63 6f 6c 75 6d 6e 25 3d |...G end|column%=|
|000055b0| 73 74 61 72 74 63 6f 6c | 75 6d 6e 25 2b 31 2b 77 |startcol|umn%+1+w|
|000055c0| 69 64 74 68 78 25 20 81 | 31 34 3a e7 65 6e 64 63 |idthx% .|14:.endc|
|000055d0| 6f 6c 75 6d 6e 25 3e 43 | 25 20 65 6e 64 63 6f 6c |olumn%>C|% endcol|
|000055e0| 75 6d 6e 25 3d 43 25 0d | 19 d2 17 20 e3 69 25 3d |umn%=C%.|... .i%=|
|000055f0| 73 74 61 72 74 79 25 20 | b8 65 6e 64 79 25 0d 19 |starty% |.endy%..|
|00005600| dc 22 20 e3 6a 25 3d 73 | 74 61 72 74 63 6f 6c 75 |." .j%=s|tartcolu|
|00005610| 6d 6e 25 20 b8 20 65 6e | 64 63 6f 6c 75 6d 6e 25 |mn% . en|dcolumn%|
|00005620| 0d 19 e6 4b 20 73 65 6c | 65 63 74 25 3d 28 6a 25 |...K sel|ect%=(j%|
|00005630| 3e 3d 63 61 72 65 74 78 | 31 25 29 20 80 28 6a 25 |>=caretx|1%) .(j%|
|00005640| 3c 3d 63 61 72 65 74 78 | 32 25 29 20 80 28 69 25 |<=caretx|2%) .(i%|
|00005650| 3e 3d 63 61 72 65 74 79 | 31 25 29 20 80 28 69 25 |>=carety|1%) .(i%|
|00005660| 3c 3d 63 61 72 65 74 79 | 32 25 29 0d 19 f0 0f 20 |<=carety|2%).... |
|00005670| e7 73 65 6c 65 63 74 25 | 20 8c 0d 19 fa 3c 20 20 |.select%| ....< |
|00005680| ec 20 77 6f 72 6b 78 25 | 2b 31 36 2a 31 34 2a 6a |. workx%|+16*14*j|
|00005690| 25 2b 6c 65 66 74 77 69 | 64 74 68 25 2c 77 6f 72 |%+leftwi|dth%,wor|
|000056a0| 6b 79 25 2d 33 32 2a 69 | 25 2d 34 2d 74 6f 70 68 |ky%-32*i|%-4-toph|
|000056b0| 65 69 67 68 74 25 0d 1a | 04 0d 20 20 f1 66 69 6c |eight%..|.. .fil|
|000056c0| 6c 24 3b 0d 1a 0e 1a 20 | 20 c8 99 22 57 69 6d 70 |l$;.... | .."Wimp|
|000056d0| 5f 53 65 74 43 6f 6c 6f | 75 72 22 2c 38 0d 1a 18 |_SetColo|ur",8...|
|000056e0| 06 20 cd 0d 1a 22 25 20 | e7 69 25 3d 63 61 72 65 |. ..."% |.i%=care|
|000056f0| 74 72 6f 77 25 20 80 6a | 25 3d 63 61 72 65 74 63 |trow% .j|%=caretc|
|00005700| 6f 6c 75 6d 6e 25 20 8c | 0d 1a 2c 3c 20 20 ec 20 |olumn% .|..,< . |
|00005710| 77 6f 72 6b 78 25 2b 31 | 36 2a 31 34 2a 6a 25 2b |workx%+1|6*14*j%+|
|00005720| 6c 65 66 74 77 69 64 74 | 68 25 2c 77 6f 72 6b 79 |leftwidt|h%,worky|
|00005730| 25 2d 33 32 2a 69 25 2d | 34 2d 74 6f 70 68 65 69 |%-32*i%-|4-tophei|
|00005740| 67 68 74 25 0d 1a 36 0e | 20 20 f1 63 61 72 65 74 |ght%..6.| .caret|
|00005750| 24 3b 0d 1a 40 06 20 cc | 0d 1a 4a 22 20 20 e7 44 |$;..@. .|..J" .D|
|00005760| 61 74 61 53 74 61 74 75 | 73 25 3f 28 6a 25 2b 43 |ataStatu|s%?(j%+C|
|00005770| 31 25 2a 69 25 29 3d 31 | 20 8c 0d 1a 54 3d 20 20 |1%*i%)=1| ...T= |
|00005780| 20 ec 20 77 6f 72 6b 78 | 25 2b 31 36 2a 31 34 2a | . workx|%+16*14*|
|00005790| 6a 25 2b 6c 65 66 74 77 | 69 64 74 68 25 2c 77 6f |j%+leftw|idth%,wo|
|000057a0| 72 6b 79 25 2d 33 32 2a | 69 25 2d 34 2d 74 6f 70 |rky%-32*|i%-4-top|
|000057b0| 68 65 69 67 68 74 25 0d | 1a 5e 33 20 20 20 f1 c2 |height%.|.^3 ..|
|000057c0| 22 20 20 20 20 20 20 20 | 20 20 20 20 20 20 22 2b |" | "+|
|000057d0| c3 28 a4 54 64 61 74 61 | 28 6a 25 2c 69 25 29 29 |.(.Tdata|(j%,i%))|
|000057e0| 2b 22 20 20 22 2c 31 34 | 29 3b 0d 1a 68 07 20 20 |+" ",14|);..h. |
|000057f0| cd 0d 1a 72 22 20 20 e7 | 44 61 74 61 53 74 61 74 |...r" .|DataStat|
|00005800| 75 73 25 3f 28 6a 25 2b | 43 31 25 2a 69 25 29 3d |us%?(j%+|C1%*i%)=|
|00005810| 32 20 8c 0d 1a 7c 3d 20 | 20 20 ec 20 77 6f 72 6b |2 ...|= | . work|
|00005820| 78 25 2b 31 36 2a 31 34 | 2a 6a 25 2b 6c 65 66 74 |x%+16*14|*j%+left|
|00005830| 77 69 64 74 68 25 2c 77 | 6f 72 6b 79 25 2d 33 32 |width%,w|orky%-32|
|00005840| 2a 69 25 2d 34 2d 74 6f | 70 68 65 69 67 68 74 25 |*i%-4-to|pheight%|
|00005850| 0d 1a 86 20 20 20 20 f1 | c2 22 20 20 20 20 20 20 |... .|." |
|00005860| 20 20 20 20 20 20 20 4d | 20 20 22 2c 31 34 29 3b | M| ",14);|
|00005870| 0d 1a 90 07 20 20 cd 0d | 1a 9a 06 20 cd 0d 1a a4 |.... ..|... ....|
|00005880| 22 20 e7 73 65 6c 65 63 | 74 25 20 c8 99 22 57 69 |" .selec|t% .."Wi|
|00005890| 6d 70 5f 53 65 74 43 6f | 6c 6f 75 72 22 2c 30 0d |mp_SetCo|lour",0.|
|000058a0| 1a ae 07 20 ed 2c 0d 1a | b8 12 c9 20 6c 65 66 74 |... .,..|... left|
|000058b0| 68 61 6e 64 6c 65 25 3a | 0d 1a c2 45 20 f4 20 63 |handle%:|...E . c|
|000058c0| 68 61 72 61 63 74 65 72 | 20 70 6f 73 69 74 69 6f |haracter| positio|
|000058d0| 6e 73 20 66 72 6f 6d 20 | 77 6f 72 6b 20 61 72 65 |ns from |work are|
|000058e0| 61 20 6f 72 69 67 69 6e | 2c 20 73 74 61 72 74 20 |a origin|, start |
|000058f0| 61 6e 64 20 6d 61 78 20 | 77 69 64 74 68 0d 1a cc |and max |width...|
|00005900| 1b 20 73 74 61 72 74 79 | 25 3d 72 65 63 74 77 6f |. starty|%=rectwo|
|00005910| 72 6b 79 25 20 81 33 32 | 0d 1a d6 1c 20 77 69 64 |rky% .32|.... wid|
|00005920| 74 68 79 25 3d 31 2b 28 | 79 32 25 2d 79 31 25 29 |thy%=1+(|y2%-y1%)|
|00005930| 20 81 33 32 0d 1a e0 2b | 20 e7 77 69 64 74 68 79 | .32...+| .widthy|
|00005940| 25 3e 50 25 2d 73 74 61 | 72 74 79 25 20 77 69 64 |%>P%-sta|rty% wid|
|00005950| 74 68 79 25 3d 50 25 2d | 73 74 61 72 74 79 25 0d |thy%=P%-|starty%.|
|00005960| 1a ea 1a 20 65 6e 64 79 | 25 3d 73 74 61 72 74 79 |... endy|%=starty|
|00005970| 25 2b 77 69 64 74 68 79 | 25 0d 1a f4 17 20 e3 69 |%+widthy|%.... .i|
|00005980| 25 3d 73 74 61 72 74 79 | 25 20 b8 65 6e 64 79 25 |%=starty|% .endy%|
|00005990| 0d 1a fe 21 20 ec 74 6f | 70 6c 65 66 74 78 25 2b |...! .to|pleftx%+|
|000059a0| 31 36 2c 77 6f 72 6b 79 | 25 2d 33 32 2a 69 25 2d |16,worky|%-32*i%-|
|000059b0| 34 0d 1b 08 15 20 f1 c2 | 22 20 20 20 22 2b c3 28 |4.... ..|" "+.(|
|000059c0| 69 25 29 2c 34 29 0d 1b | 12 06 20 ed 0d 1b 1c 12 |i%),4)..|.. .....|
|000059d0| c9 20 6c 65 66 74 68 61 | 6e 64 6c 65 25 3a 0d 1b |. leftha|ndle%:..|
|000059e0| 26 45 20 f4 20 63 68 61 | 72 61 63 74 65 72 20 70 |&E . cha|racter p|
|000059f0| 6f 73 69 74 69 6f 6e 73 | 20 66 72 6f 6d 20 77 6f |ositions| from wo|
|00005a00| 72 6b 20 61 72 65 61 20 | 6f 72 69 67 69 6e 2c 20 |rk area |origin, |
|00005a10| 73 74 61 72 74 20 61 6e | 64 20 6d 61 78 20 77 69 |start an|d max wi|
|00005a20| 64 74 68 0d 1b 30 1b 20 | 73 74 61 72 74 79 25 3d |dth..0. |starty%=|
|00005a30| 72 65 63 74 77 6f 72 6b | 79 25 20 81 33 32 0d 1b |rectwork|y% .32..|
|00005a40| 3a 1c 20 77 69 64 74 68 | 79 25 3d 31 2b 28 79 32 |:. width|y%=1+(y2|
|00005a50| 25 2d 79 31 25 29 20 81 | 33 32 0d 1b 44 2b 20 e7 |%-y1%) .|32..D+ .|
|00005a60| 77 69 64 74 68 79 25 3e | 50 25 2d 73 74 61 72 74 |widthy%>|P%-start|
|00005a70| 79 25 20 77 69 64 74 68 | 79 25 3d 50 25 2d 73 74 |y% width|y%=P%-st|
|00005a80| 61 72 74 79 25 0d 1b 4e | 1a 20 65 6e 64 79 25 3d |arty%..N|. endy%=|
|00005a90| 73 74 61 72 74 79 25 2b | 77 69 64 74 68 79 25 0d |starty%+|widthy%.|
|00005aa0| 1b 58 17 20 e3 69 25 3d | 73 74 61 72 74 79 25 20 |.X. .i%=|starty% |
|00005ab0| b8 65 6e 64 79 25 0d 1b | 62 21 20 ec 74 6f 70 6c |.endy%..|b! .topl|
|00005ac0| 65 66 74 78 25 2b 31 36 | 2c 77 6f 72 6b 79 25 2d |eftx%+16|,worky%-|
|00005ad0| 33 32 2a 69 25 2d 34 0d | 1b 6c 15 20 f1 c2 22 20 |32*i%-4.|.l. .." |
|00005ae0| 20 20 22 2b c3 28 69 25 | 29 2c 34 29 0d 1b 76 06 | "+.(i%|),4)..v.|
|00005af0| 20 ed 0d 1b 80 11 c9 20 | 74 6f 70 68 61 6e 64 6c | ...... |tophandl|
|00005b00| 65 25 3a 0d 1b 8a 45 20 | f4 20 63 68 61 72 61 63 |e%:...E |. charac|
|00005b10| 74 65 72 20 70 6f 73 69 | 74 69 6f 6e 73 20 66 72 |ter posi|tions fr|
|00005b20| 6f 6d 20 77 6f 72 6b 20 | 61 72 65 61 20 6f 72 69 |om work |area ori|
|00005b30| 67 69 6e 2c 20 73 74 61 | 72 74 20 61 6e 64 20 6d |gin, sta|rt and m|
|00005b40| 61 78 20 77 69 64 74 68 | 0d 1b 94 0e 20 e3 69 25 |ax width|.... .i%|
|00005b50| 3d 30 20 b8 43 25 0d 1b | 9e 28 20 ec 77 6f 72 6b |=0 .C%..|.( .work|
|00005b60| 78 25 2b 31 34 2a 31 36 | 2a 69 25 2b 39 2a 31 36 |x%+14*16|*i%+9*16|
|00005b70| 2b 38 2c 74 6f 70 6c 65 | 66 74 79 25 2d 38 0d 1b |+8,tople|fty%-8..|
|00005b80| a8 11 20 f1 c2 22 20 22 | 2b c3 69 25 2c 32 29 0d |.. .." "|+.i%,2).|
|00005b90| 1b b2 29 20 ec 77 6f 72 | 6b 78 25 2b 31 34 2a 31 |..) .wor|kx%+14*1|
|00005ba0| 36 2a 69 25 2b 38 2a 31 | 36 2b 38 2c 74 6f 70 6c |6*i%+8*1|6+8,topl|
|00005bb0| 65 66 74 79 25 2d 34 34 | 0d 1b bc 21 20 f1 c2 22 |efty%-44|...! .."|
|00005bc0| 20 20 22 2b 43 6f 6c 75 | 6d 6e 4d 65 61 6e 69 6e | "+Colu|mnMeanin|
|00005bd0| 67 24 28 69 25 29 2c 33 | 29 0d 1b c6 06 20 ed 0d |g$(i%),3|).... ..|
|00005be0| 1b d0 1f 7f 3a 85 32 35 | 35 2c 22 42 61 64 20 72 |....:.25|5,"Bad r|
|00005bf0| 65 64 72 61 77 20 72 65 | 71 75 65 73 74 22 0d 1b |edraw re|quest"..|
|00005c00| da 05 cb 0d 1b e4 05 e1 | 0d 1b ee 04 0d 1b f8 21 |........|.......!|
|00005c10| dd f2 72 65 64 72 61 77 | 6d 61 69 6e 28 78 31 25 |..redraw|main(x1%|
|00005c20| 2c 78 32 25 2c 79 31 25 | 2c 79 32 25 29 0d 1c 02 |,x2%,y1%|,y2%)...|
|00005c30| 43 78 6d 69 6e 25 3d 78 | 31 25 2a 31 34 2a 31 36 |Cxmin%=x|1%*14*16|
|00005c40| 2d 34 2b 6c 65 66 74 77 | 69 64 74 68 25 3a 78 6d |-4+leftw|idth%:xm|
|00005c50| 61 78 25 3d 78 32 25 2a | 31 34 2a 31 36 2b 31 34 |ax%=x2%*|14*16+14|
|00005c60| 2a 31 36 2b 34 2b 6c 65 | 66 74 77 69 64 74 68 25 |*16+4+le|ftwidth%|
|00005c70| 0d 1c 0c 3a 79 6d 61 78 | 25 3d 2d 79 31 25 2a 33 |...:ymax|%=-y1%*3|
|00005c80| 32 2b 38 2d 74 6f 70 68 | 65 69 67 68 74 25 3a 79 |2+8-toph|eight%:y|
|00005c90| 6d 69 6e 25 3d 2d 79 32 | 25 2a 33 32 2d 34 30 2d |min%=-y2|%*32-40-|
|00005ca0| 74 6f 70 68 65 69 67 68 | 74 25 0d 1c 16 3c c8 99 |topheigh|t%...<..|
|00005cb0| 22 57 69 6d 70 5f 46 6f | 72 63 65 52 65 64 72 61 |"Wimp_Fo|rceRedra|
|00005cc0| 77 22 2c 6d 61 69 6e 68 | 61 6e 64 6c 65 25 2c 78 |w",mainh|andle%,x|
|00005cd0| 6d 69 6e 25 2c 79 6d 69 | 6e 25 2c 78 6d 61 78 25 |min%,ymi|n%,xmax%|
|00005ce0| 2c 79 6d 61 78 25 0d 1c | 20 05 e1 0d 1c 2a 04 0d |,ymax%..| ....*..|
|00005cf0| 1c 34 15 dd f2 75 70 64 | 61 74 65 28 68 61 6e 64 |.4...upd|ate(hand|
|00005d00| 6c 65 25 29 0d 1c 3e 14 | 21 62 6c 6f 63 6b 31 25 |le%)..>.|!block1%|
|00005d10| 3d 68 61 6e 64 6c 65 25 | 0d 1c 48 24 c8 99 22 57 |=handle%|..H$.."W|
|00005d20| 69 6d 70 5f 47 65 74 57 | 69 6e 64 6f 77 53 74 61 |imp_GetW|indowSta|
|00005d30| 74 65 22 2c 2c 62 6c 6f | 63 6b 31 25 0d 1c 52 25 |te",,blo|ck1%..R%|
|00005d40| 78 6d 69 6e 25 3d 62 6c | 6f 63 6b 31 25 21 32 30 |xmin%=bl|ock1%!20|
|00005d50| 3a 79 6d 61 78 25 3d 62 | 6c 6f 63 6b 31 25 21 32 |:ymax%=b|lock1%!2|
|00005d60| 34 0d 1c 5c 45 78 6d 61 | 78 25 3d 78 6d 69 6e 25 |4..\Exma|x%=xmin%|
|00005d70| 2b 62 6c 6f 63 6b 31 25 | 21 31 32 2d 62 6c 6f 63 |+block1%|!12-bloc|
|00005d80| 6b 31 25 21 34 3a 79 6d | 69 6e 25 3d 79 6d 61 78 |k1%!4:ym|in%=ymax|
|00005d90| 25 2b 62 6c 6f 63 6b 31 | 25 21 38 2d 62 6c 6f 63 |%+block1|%!8-bloc|
|00005da0| 6b 31 25 21 31 36 0d 1c | 66 38 c8 99 22 57 69 6d |k1%!16..|f8.."Wim|
|00005db0| 70 5f 46 6f 72 63 65 52 | 65 64 72 61 77 22 2c 68 |p_ForceR|edraw",h|
|00005dc0| 61 6e 64 6c 65 25 2c 78 | 6d 69 6e 25 2c 79 6d 69 |andle%,x|min%,ymi|
|00005dd0| 6e 25 2c 78 6d 61 78 25 | 2c 79 6d 61 78 25 0d 1c |n%,xmax%|,ymax%..|
|00005de0| 70 05 e1 0d 1c 7a 04 0d | 1c 84 20 dd f2 68 69 67 |p....z..|.. ..hig|
|00005df0| 68 6c 69 67 68 74 28 78 | 31 25 2c 78 32 25 2c 79 |hlight(x|1%,x2%,y|
|00005e00| 31 25 2c 79 32 25 29 0d | 1c 8e 34 f2 72 65 64 72 |1%,y2%).|..4.redr|
|00005e10| 61 77 6d 61 69 6e 28 63 | 61 72 65 74 78 31 25 2c |awmain(c|aretx1%,|
|00005e20| 63 61 72 65 74 78 32 25 | 2c 63 61 72 65 74 79 31 |caretx2%|,carety1|
|00005e30| 25 2c 63 61 72 65 74 79 | 32 25 29 0d 1c 98 37 63 |%,carety|2%)...7c|
|00005e40| 61 72 65 74 78 31 25 3d | 78 31 25 3a 63 61 72 65 |aretx1%=|x1%:care|
|00005e50| 74 78 32 25 3d 78 32 25 | 3a 63 61 72 65 74 79 31 |tx2%=x2%|:carety1|
|00005e60| 25 3d 79 31 25 3a 63 61 | 72 65 74 79 32 25 3d 79 |%=y1%:ca|rety2%=y|
|00005e70| 32 25 0d 1c a2 31 f2 63 | 61 72 65 74 73 74 72 69 |2%...1.c|aretstri|
|00005e80| 6e 67 28 28 28 78 25 2d | 6f 78 25 2d 6c 65 66 74 |ng(((x%-|ox%-left|
|00005e90| 77 69 64 74 68 25 2d 38 | 29 20 81 31 36 29 20 83 |width%-8|) .16) .|
|00005ea0| 31 34 29 0d 1c ac 34 f2 | 72 65 64 72 61 77 6d 61 |14)...4.|redrawma|
|00005eb0| 69 6e 28 63 61 72 65 74 | 78 31 25 2c 63 61 72 65 |in(caret|x1%,care|
|00005ec0| 74 78 32 25 2c 63 61 72 | 65 74 79 31 25 2c 63 61 |tx2%,car|ety1%,ca|
|00005ed0| 72 65 74 79 32 25 29 0d | 1c b6 05 e1 0d 1c c0 04 |rety2%).|........|
|00005ee0| 0d 1c ca 0b dd f2 66 6c | 75 73 68 0d 1c d4 14 c8 |......fl|ush.....|
|00005ef0| 99 22 4f 53 5f 42 79 74 | 65 22 2c 32 31 2c 30 0d |."OS_Byt|e",21,0.|
|00005f00| 1c de 05 e1 0d 1c e8 04 | 0d 1c f2 0d dd f2 63 6f |........|......co|
|00005f10| 6d 70 61 63 74 0d 1c fc | 22 ea 72 6f 77 25 2c 73 |mpact...|".row%,s|
|00005f20| 74 61 74 75 73 25 2c 6a | 25 2c 63 6f 75 6e 74 25 |tatus%,j|%,count%|
|00005f30| 2c 73 74 61 72 74 25 0d | 1d 06 14 c8 99 22 48 6f |,start%.|....."Ho|
|00005f40| 75 72 67 6c 61 73 73 5f | 4f 6e 22 0d 1d 10 11 f2 |urglass_|On".....|
|00005f50| 6d 61 78 63 6f 6c 75 6d | 6e 72 6f 77 0d 1d 1a 16 |maxcolum|nrow....|
|00005f60| 63 6f 75 6e 74 25 3d 30 | 3a 73 74 61 72 74 25 3d |count%=0|:start%=|
|00005f70| 2d 31 0d 1d 24 14 e3 72 | 6f 77 25 3d 30 20 b8 6d |-1..$..r|ow%=0 .m|
|00005f80| 61 78 72 6f 77 25 0d 1d | 2e 0e 20 73 74 61 74 75 |axrow%..|.. statu|
|00005f90| 73 25 3d a3 0d 1d 38 16 | 20 e3 6a 25 3d 30 20 b8 |s%=...8.| .j%=0 .|
|00005fa0| 6d 61 78 63 6f 6c 75 6d | 6e 25 0d 1d 42 2a 20 20 |maxcolum|n%..B* |
|00005fb0| e7 44 61 74 61 53 74 61 | 74 75 73 25 3f 28 6a 25 |.DataSta|tus%?(j%|
|00005fc0| 2b 43 31 25 2a 72 6f 77 | 25 29 20 73 74 61 74 75 |+C1%*row|%) statu|
|00005fd0| 73 25 3d b9 0d 1d 4c 06 | 20 ed 0d 1d 56 18 20 62 |s%=...L.| ...V. b|
|00005fe0| 6c 6f 63 6b 25 3f 72 6f | 77 25 3d 73 74 61 74 75 |lock%?ro|w%=statu|
|00005ff0| 73 25 0d 1d 60 30 20 e7 | 73 74 61 74 75 73 25 3d |s%..`0 .|status%=|
|00006000| a3 20 63 6f 75 6e 74 25 | 2b 3d 31 3a e7 73 74 61 |. count%|+=1:.sta|
|00006010| 72 74 25 3d 2d 31 20 73 | 74 61 72 74 25 3d 72 6f |rt%=-1 s|tart%=ro|
|00006020| 77 25 0d 1d 6a 05 ed 0d | 1d 74 1d f2 64 6f 63 6f |w%..j...|.t..doco|
|00006030| 6d 70 61 63 74 28 63 6f | 75 6e 74 25 2c 73 74 61 |mpact(co|unt%,sta|
|00006040| 72 74 25 29 0d 1d 7e 17 | c8 99 22 48 6f 75 72 67 |rt%)..~.|.."Hourg|
|00006050| 6c 61 73 73 5f 53 6d 61 | 73 68 22 0d 1d 88 29 f2 |lass_Sma|sh"...).|
|00006060| 63 61 72 65 74 73 74 72 | 69 6e 67 28 31 31 29 3a |caretstr|ing(11):|
|00006070| f2 75 70 64 61 74 65 28 | 6d 61 69 6e 68 61 6e 64 |.update(|mainhand|
|00006080| 6c 65 25 29 0d 1d 92 05 | e1 0d 1d 9c 04 0d 1d a6 |le%)....|........|
|00006090| 0c dd f2 64 6f 77 65 65 | 64 0d 1d b0 1a ea 69 25 |...dowee|d.....i%|
|000060a0| 2c 63 6f 75 6e 74 25 2c | 73 74 61 72 74 25 2c 65 |,count%,|start%,e|
|000060b0| 6e 64 25 0d 1d ba 42 f4 | 20 72 65 74 61 69 6e 20 |nd%...B.| retain |
|000060c0| 73 74 61 72 74 25 20 61 | 6e 64 20 74 68 65 6e 20 |start% a|nd then |
|000060d0| 65 76 65 72 79 20 57 65 | 65 64 47 61 70 25 20 75 |every We|edGap% u|
|000060e0| 6e 74 69 6c 20 65 6e 64 | 25 20 28 6b 65 65 70 20 |ntil end|% (keep |
|000060f0| 65 6e 64 25 29 0d 1d c4 | 11 f2 6d 61 78 63 6f 6c |end%)...|..maxcol|
|00006100| 75 6d 6e 72 6f 77 0d 1d | ce 19 73 74 61 72 74 25 |umnrow..|..start%|
|00006110| 3d 30 3a 65 6e 64 25 3d | 6d 61 78 72 6f 77 25 0d |=0:end%=|maxrow%.|
|00006120| 1d d8 31 e7 57 65 65 64 | 53 65 6c 65 63 74 69 6f |..1.Weed|Selectio|
|00006130| 6e 25 20 73 74 61 72 74 | 25 3d 63 61 72 65 74 79 |n% start|%=carety|
|00006140| 31 25 3a 65 6e 64 25 3d | 63 61 72 65 74 79 32 25 |1%:end%=|carety2%|
|00006150| 0d 1d e2 1e e7 65 6e 64 | 25 3e 6d 61 78 72 6f 77 |.....end|%>maxrow|
|00006160| 25 20 65 6e 64 25 3d 6d | 61 78 72 6f 77 25 0d 1d |% end%=m|axrow%..|
|00006170| ec 20 e7 57 65 65 64 47 | 61 70 25 3c 32 20 84 65 |. .WeedG|ap%<2 .e|
|00006180| 6e 64 25 2d 73 74 61 72 | 74 25 3c 32 20 e1 0d 1d |nd%-star|t%<2 ...|
|00006190| f6 14 c8 99 22 48 6f 75 | 72 67 6c 61 73 73 5f 4f |...."Hou|rglass_O|
|000061a0| 6e 22 0d 1e 00 1f e3 69 | 25 3d 30 20 b8 73 74 61 |n".....i|%=0 .sta|
|000061b0| 72 74 25 3a 62 6c 6f 63 | 6b 25 3f 69 25 3d b9 3a |rt%:bloc|k%?i%=.:|
|000061c0| ed 0d 1e 0a 23 e3 69 25 | 3d 65 6e 64 25 20 b8 6d |....#.i%|=end% .m|
|000061d0| 61 78 72 6f 77 25 3a 62 | 6c 6f 63 6b 25 3f 69 25 |axrow%:b|lock%?i%|
|000061e0| 3d b9 3a ed 0d 1e 14 0c | 63 6f 75 6e 74 25 3d 30 |=.:.....|count%=0|
|000061f0| 0d 1e 1e 18 e3 69 25 3d | 73 74 61 72 74 25 2b 31 |.....i%=|start%+1|
|00006200| 20 b8 65 6e 64 25 2d 31 | 0d 1e 28 40 20 e7 28 69 | .end%-1|..(@ .(i|
|00006210| 25 2d 73 74 61 72 74 25 | 29 20 83 57 65 65 64 47 |%-start%|) .WeedG|
|00006220| 61 70 25 3d 30 20 62 6c | 6f 63 6b 25 3f 69 25 3d |ap%=0 bl|ock%?i%=|
|00006230| b9 20 8b 62 6c 6f 63 6b | 25 3f 69 25 3d a3 3a 63 |. .block|%?i%=.:c|
|00006240| 6f 75 6e 74 25 2b 3d 31 | 0d 1e 32 05 ed 0d 1e 3c |ount%+=1|..2....<|
|00006250| 1f f2 64 6f 63 6f 6d 70 | 61 63 74 28 63 6f 75 6e |..docomp|act(coun|
|00006260| 74 25 2c 73 74 61 72 74 | 25 2b 31 29 0d 1e 46 17 |t%,start|%+1)..F.|
|00006270| c8 99 22 48 6f 75 72 67 | 6c 61 73 73 5f 53 6d 61 |.."Hourg|lass_Sma|
|00006280| 73 68 22 0d 1e 50 29 f2 | 63 61 72 65 74 73 74 72 |sh"..P).|caretstr|
|00006290| 69 6e 67 28 31 31 29 3a | f2 75 70 64 61 74 65 28 |ing(11):|.update(|
|000062a0| 6d 61 69 6e 68 61 6e 64 | 6c 65 25 29 0d 1e 5a 0f |mainhand|le%)..Z.|
|000062b0| f2 63 68 61 6e 67 65 64 | 28 b9 29 0d 1e 64 05 e1 |.changed|(.)..d..|
|000062c0| 0d 1e 6e 04 0d 1e 78 1e | dd f2 64 6f 63 6f 6d 70 |..n...x.|..docomp|
|000062d0| 61 63 74 28 63 6f 75 6e | 74 25 2c 73 74 61 72 74 |act(coun|t%,start|
|000062e0| 25 29 0d 1e 82 11 ea 6f | 6c 64 25 2c 72 6f 77 25 |%).....o|ld%,row%|
|000062f0| 2c 6a 25 0d 1e 8c 3a f4 | 20 61 73 73 75 6d 65 73 |,j%...:.| assumes|
|00006300| 20 62 6c 6f 63 6b 25 20 | 69 73 20 61 20 74 61 62 | block% |is a tab|
|00006310| 6c 65 20 6f 66 20 77 68 | 69 63 68 20 72 6f 77 73 |le of wh|ich rows|
|00006320| 20 63 6f 6e 74 61 69 6e | 20 64 61 74 61 0d 1e 96 | contain| data...|
|00006330| 39 f4 20 77 69 74 68 20 | 63 6f 75 6e 74 25 20 67 |9. with |count% g|
|00006340| 61 70 73 2c 20 74 68 65 | 20 66 69 72 73 74 20 62 |aps, the| first b|
|00006350| 65 69 6e 67 20 72 6f 77 | 20 6e 75 6d 62 65 72 20 |eing row| number |
|00006360| 73 74 61 72 74 25 0d 1e | a0 0f e7 63 6f 75 6e 74 |start%..|...count|
|00006370| 25 3d 30 20 e1 0d 1e aa | 0f 6f 6c 64 25 3d 73 74 |%=0 ....|.old%=st|
|00006380| 61 72 74 25 0d 1e b4 20 | e3 72 6f 77 25 3d 73 74 |art%... |.row%=st|
|00006390| 61 72 74 25 20 b8 6d 61 | 78 72 6f 77 25 2d 63 6f |art% .ma|xrow%-co|
|000063a0| 75 6e 74 25 0d 1e be 1e | 20 c8 95 62 6c 6f 63 6b |unt%....| ..block|
|000063b0| 25 3f 6f 6c 64 25 3d a3 | 20 6f 6c 64 25 2b 3d 31 |%?old%=.| old%+=1|
|000063c0| 3a ce 0d 1e c8 12 20 e7 | 72 6f 77 25 3c 3e 6f 6c |:..... .|row%<>ol|
|000063d0| 64 25 20 8c 0d 1e d2 17 | 20 20 e3 6a 25 3d 30 20 |d% .....| .j%=0 |
|000063e0| b8 6d 61 78 63 6f 6c 75 | 6d 6e 25 0d 1e dc 24 20 |.maxcolu|mn%...$ |
|000063f0| 20 f2 64 61 74 61 28 6a | 25 2c 72 6f 77 25 2c a4 | .data(j|%,row%,.|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
