home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1996-04-12 | 48.6 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 0b f4 20 3e 54 | 69 6c 65 0d 00 14 05 3a |..... >T|ile....:|
|00000010| 0d 00 1e 17 f4 20 50 72 | 6f 67 72 61 6d 20 62 72 |..... Pr|ogram br|
|00000020| 65 61 6b 64 6f 77 6e 0d | 00 28 24 f4 20 49 6e 69 |eakdown.|.($. Ini|
|00000030| 74 69 61 6c 69 73 65 20 | 2d 2d 2d 2d 2d 2d 2d 2d |tialise |--------|
|00000040| 2d 2d 20 4c 69 6e 65 20 | 34 32 30 0d 00 32 25 f4 |-- Line |420..2%.|
|00000050| 20 53 65 74 20 75 70 20 | 46 69 72 73 74 20 53 63 | Set up |First Sc|
|00000060| 72 65 65 6e 20 2d 20 4c | 69 6e 65 20 31 33 33 30 |reen - L|ine 1330|
|00000070| 0d 00 3c 25 f4 20 53 68 | 61 70 65 20 53 63 72 65 |..<%. Sh|ape Scre|
|00000080| 65 6e 20 2d 2d 2d 2d 2d | 2d 2d 2d 20 4c 69 6e 65 |en -----|--- Line|
|00000090| 20 32 31 32 30 0d 00 46 | 25 f4 20 46 6f 72 6d 20 | 2120..F|%. Form |
|000000a0| 54 69 6c 65 20 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |Tile ---|--------|
|000000b0| 20 4c 69 6e 65 20 32 37 | 36 30 0d 00 50 25 f4 20 | Line 27|60..P%. |
|000000c0| 44 65 63 6f 72 61 74 65 | 20 54 69 6c 65 20 2d 2d |Decorate| Tile --|
|000000d0| 2d 2d 2d 2d 2d 20 4c 69 | 6e 65 20 37 30 37 30 0d |----- Li|ne 7070.|
|000000e0| 00 5a 25 f4 20 45 72 61 | 73 65 20 2d 2d 2d 2d 2d |.Z%. Era|se -----|
|000000f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 20 4c 69 6e 65 20 |--------|-- Line |
|00000100| 37 34 35 30 0d 00 64 25 | f4 20 46 6f 72 6d 20 54 |7450..d%|. Form T|
|00000110| 69 6c 65 20 43 6c 75 73 | 74 65 72 20 2d 2d 2d 20 |ile Clus|ter --- |
|00000120| 4c 69 6e 65 20 38 33 38 | 30 0d 00 6e 25 f4 20 43 |Line 838|0..n%. C|
|00000130| 6f 6c 6f 75 72 20 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |olour --|--------|
|00000140| 2d 2d 2d 2d 20 4c 69 6e | 65 20 39 30 38 30 0d 00 |---- Lin|e 9080..|
|00000150| 78 26 f4 20 54 69 6c 65 | 20 2d 2d 2d 2d 2d 2d 2d |x&. Tile| -------|
|00000160| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 20 4c 69 6e 65 20 31 |--------|- Line 1|
|00000170| 30 34 33 30 0d 00 82 26 | f4 20 52 65 70 6f 73 69 |0430...&|. Reposi|
|00000180| 74 69 6f 6e 20 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 20 |tion ---|------- |
|00000190| 4c 69 6e 65 20 31 31 33 | 30 30 0d 00 8c 26 f4 20 |Line 113|00...&. |
|000001a0| 52 65 64 65 73 69 67 6e | 20 2d 2d 2d 2d 2d 2d 2d |Redesign| -------|
|000001b0| 2d 2d 2d 2d 2d 20 4c 69 | 6e 65 20 31 31 39 33 30 |----- Li|ne 11930|
|000001c0| 0d 00 96 26 f4 20 53 61 | 76 65 20 44 65 73 69 67 |...&. Sa|ve Desig|
|000001d0| 6e 20 44 61 74 61 20 2d | 2d 2d 2d 20 4c 69 6e 65 |n Data -|--- Line|
|000001e0| 20 31 32 31 35 30 0d 00 | a0 26 f4 20 4c 6f 61 64 | 12150..|.&. Load|
|000001f0| 20 44 65 73 69 67 6e 20 | 44 61 74 61 20 2d 2d 2d | Design |Data ---|
|00000200| 2d 20 4c 69 6e 65 20 31 | 32 35 36 30 0d 00 aa 26 |- Line 1|2560...&|
|00000210| f4 20 51 75 69 74 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d |. Quit -|--------|
|00000220| 2d 2d 2d 2d 2d 2d 2d 20 | 4c 69 6e 65 20 31 32 37 |------- |Line 127|
|00000230| 38 30 0d 00 b4 26 f4 20 | 43 6f 6c 6f 75 72 20 45 |80...&. |Colour E|
|00000240| 64 69 74 6f 72 20 2d 2d | 2d 2d 2d 2d 2d 20 4c 69 |ditor --|----- Li|
|00000250| 6e 65 20 31 33 31 39 30 | 0d 00 be 26 f4 20 53 61 |ne 13190|...&. Sa|
|00000260| 76 65 20 54 69 6c 69 6e | 67 20 2d 2d 2d 2d 2d 2d |ve Tilin|g ------|
|00000270| 2d 2d 2d 20 4c 69 6e 65 | 20 31 35 30 32 30 0d 00 |--- Line| 15020..|
|00000280| c8 26 f4 20 4d 61 6b 65 | 20 48 61 72 64 63 6f 70 |.&. Make| Hardcop|
|00000290| 79 20 2d 2d 2d 2d 2d 2d | 2d 20 4c 69 6e 65 20 31 |y ------|- Line 1|
|000002a0| 35 35 35 30 0d 00 d2 26 | f4 20 4d 65 6e 75 73 20 |5550...&|. Menus |
|000002b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 20 |--------|------- |
|000002c0| 4c 69 6e 65 20 31 35 38 | 32 30 0d 00 dc 26 f4 20 |Line 158|20...&. |
|000002d0| 46 6f 6e 74 20 50 72 69 | 6e 74 69 6e 67 20 2d 2d |Font Pri|nting --|
|000002e0| 2d 2d 2d 2d 2d 20 4c 69 | 6e 65 20 31 37 37 30 30 |----- Li|ne 17700|
|000002f0| 0d 00 e6 26 f4 20 46 6f | 6e 74 20 49 6e 70 75 74 |...&. Fo|nt Input|
|00000300| 20 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 20 4c 69 6e 65 | -------|--- Line|
|00000310| 20 31 37 38 31 30 0d 00 | f0 05 3a 0d 00 fa 1b ee | 17810..|..:.....|
|00000320| 20 85 20 3a f6 3a f1 22 | 20 61 74 20 6c 69 6e 65 | . :.:."| at line|
|00000330| 20 22 3b 9e 3a e0 0d 01 | 04 0b c8 8e 20 41 25 20 | ";.:...|.... A% |
|00000340| ca 0d 01 0e 0b 20 c9 20 | 30 2c 32 3a 0d 01 18 17 |..... . |0,2:....|
|00000350| 20 20 20 20 20 20 20 20 | f2 69 6e 69 74 69 61 6c | |.initial|
|00000360| 69 73 65 0d 01 22 17 20 | 20 20 20 20 20 20 20 f2 |ise..". | .|
|00000370| 73 63 72 65 65 6e 5f 6f | 6e 65 0d 01 2c 1d 20 20 |screen_o|ne..,. |
|00000380| 20 20 20 20 20 20 f2 6d | 6f 74 69 66 70 72 6f 70 | .m|otifprop|
|00000390| 6f 72 74 69 6f 6e 73 0d | 01 36 17 20 20 20 20 20 |ortions.|.6. |
|000003a0| 20 20 20 f2 73 63 72 65 | 65 6e 5f 74 77 6f 0d 01 | .scre|en_two..|
|000003b0| 40 15 20 20 20 20 20 20 | 20 20 f2 66 6f 72 6d 74 |@. | .formt|
|000003c0| 69 6c 65 0d 01 4a 09 20 | c9 20 31 3a 0d 01 54 17 |ile..J. |. 1:..T.|
|000003d0| 20 20 20 20 20 20 20 20 | f2 69 6e 69 74 69 61 6c | |.initial|
|000003e0| 69 73 65 0d 01 5e 14 20 | 20 20 20 20 20 20 20 f2 |ise..^. | .|
|000003f0| 64 69 61 67 72 61 6d 0d | 01 68 17 20 20 20 20 20 |diagram.|.h. |
|00000400| 20 20 20 f2 6c 6f 61 64 | 64 65 73 69 67 6e 0d 01 | .load|design..|
|00000410| 72 1d 20 20 20 20 20 20 | 20 20 f2 74 69 6c 69 6e |r. | .tilin|
|00000420| 67 70 61 72 61 6d 65 74 | 65 72 73 0d 01 7c 15 20 |gparamet|ers..|. |
|00000430| 20 20 20 20 20 20 20 f2 | 72 65 64 65 73 69 67 6e | .|redesign|
|00000440| 0d 01 86 05 cb 0d 01 90 | 05 e0 0d 01 9a 05 3a 0d |........|......:.|
|00000450| 01 a4 33 3a 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |..3:====|========|
|00000460| 3d 3d 3d 3d 20 f4 20 49 | 6e 69 74 69 61 6c 69 73 |==== . I|nitialis|
|00000470| 65 20 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |e ======|========|
|00000480| 3d 3d 0d 01 ae 05 3a 0d | 01 b8 11 dd 20 f2 69 6e |==....:.|.... .in|
|00000490| 69 74 69 61 6c 69 73 65 | 0d 01 c2 1d 20 47 3d 8e |itialise|.... G=.|
|000004a0| 20 22 3c 54 69 6c 69 6e | 67 73 24 44 69 72 3e 2e | "<Tilin|gs$Dir>.|
|000004b0| 4d 6f 64 65 22 0d 01 cc | 0c 20 e8 23 20 47 2c 4d |Mode"...|. .# G,M|
|000004c0| 25 0d 01 d6 09 20 d9 23 | 20 47 0d 01 e0 0b 20 eb |%.... .#| G.... .|
|000004d0| 20 4d 25 3a 87 0d 01 ea | 1e 20 2a 3c 54 69 6c 69 | M%:....|. *<Tili|
|000004e0| 6e 67 73 24 44 69 72 3e | 2e 21 54 6c 50 61 6c 65 |ngs$Dir>|.!TlPale|
|000004f0| 74 74 65 0d 01 f4 1c 20 | ef 20 32 33 2c 32 35 2c |tte.... |. 23,25,|
|00000500| 30 2c 30 2c 30 2c 30 2c | 30 2c 30 2c 30 2c 30 0d |0,0,0,0,|0,0,0,0.|
|00000510| 01 fe 37 20 de 20 44 28 | 33 2c 31 29 2c 4d 28 33 |..7 . D(|3,1),M(3|
|00000520| 2c 31 29 2c 4e 28 33 2c | 31 29 2c 50 28 33 2c 31 |,1),N(3,|1),P(3,1|
|00000530| 29 2c 51 28 33 2c 31 29 | 2c 52 28 33 2c 31 29 2c |),Q(3,1)|,R(3,1),|
|00000540| 70 28 33 2c 31 29 0d 02 | 08 18 20 de 20 41 28 33 |p(3,1)..|.. . A(3|
|00000550| 2c 31 2c 35 29 2c 42 28 | 33 2c 31 2c 35 29 0d 02 |,1,5),B(|3,1,5)..|
|00000560| 12 20 20 de 20 61 72 65 | 61 25 28 39 29 2c 44 25 |. . are|a%(9),D%|
|00000570| 28 33 29 2c 73 68 61 64 | 65 25 28 31 35 29 0d 02 |(3),shad|e%(15)..|
|00000580| 1c 18 20 de 20 6d 6f 70 | 24 28 32 30 29 2c 73 75 |.. . mop|$(20),su|
|00000590| 62 24 28 32 30 29 0d 02 | 26 1b 20 de 20 6e 61 6d |b$(20)..|&. . nam|
|000005a0| 65 25 20 31 30 2c 20 72 | 65 73 75 6c 74 25 20 31 |e% 10, r|esult% 1|
|000005b0| 30 0d 02 30 06 20 3a 0d | 02 3a 23 20 de 20 73 63 |0..0. :.|.:# . sc|
|000005c0| 72 65 65 6e 20 26 33 30 | 30 30 30 3a 21 73 63 72 |reen &30|000:!scr|
|000005d0| 65 65 6e 3d 26 33 30 30 | 30 30 0d 02 44 29 20 20 |een=&300|00..D) |
|000005e0| 73 63 72 65 65 6e 21 34 | 3d 30 3a 73 63 72 65 65 |screen!4|=0:scree|
|000005f0| 6e 21 38 3d 31 36 3a 73 | 63 72 65 65 6e 21 31 32 |n!8=16:s|creen!12|
|00000600| 3d 31 36 0d 02 4e 25 20 | de 20 63 6c 75 73 74 65 |=16..N% |. cluste|
|00000610| 72 20 26 32 30 30 30 30 | 3a 21 63 6c 75 73 74 65 |r &20000|:!cluste|
|00000620| 72 3d 26 32 30 30 30 30 | 0d 02 58 2c 20 20 63 6c |r=&20000|..X, cl|
|00000630| 75 73 74 65 72 21 34 3d | 30 3a 63 6c 75 73 74 65 |uster!4=|0:cluste|
|00000640| 72 21 38 3d 31 36 3a 63 | 6c 75 73 74 65 72 21 31 |r!8=16:c|luster!1|
|00000650| 32 3d 31 36 0d 02 62 0d | 20 de 20 73 63 6c 20 31 |2=16..b.| . scl 1|
|00000660| 36 0d 02 6c 0f 20 20 21 | 73 63 6c 3d 20 31 35 30 |6..l. !|scl= 150|
|00000670| 0d 02 76 0f 20 20 73 63 | 6c 21 34 3d 31 35 30 0d |..v. sc|l!4=150.|
|00000680| 02 80 0f 20 20 73 63 6c | 21 38 3d 31 35 30 0d 02 |... scl|!8=150..|
|00000690| 8a 10 20 20 73 63 6c 21 | 31 32 3d 31 35 30 0d 02 |.. scl!|12=150..|
|000006a0| 94 0e 20 20 74 73 63 61 | 6c 65 3d 31 0d 02 9e 1f |.. tsca|le=1....|
|000006b0| 20 de 20 70 61 74 63 68 | 20 26 36 30 30 30 3a 21 | . patch| &6000:!|
|000006c0| 70 61 74 63 68 3d 26 36 | 30 30 30 0d 02 a8 26 20 |patch=&6|000...& |
|000006d0| 20 70 61 74 63 68 21 34 | 3d 30 3a 70 61 74 63 68 | patch!4|=0:patch|
|000006e0| 21 38 3d 31 36 3a 70 61 | 74 63 68 21 31 32 3d 31 |!8=16:pa|tch!12=1|
|000006f0| 36 0d 02 b2 21 20 de 20 | 63 6f 6c 65 64 20 26 34 |6...! . |coled &4|
|00000700| 30 30 30 20 3a 20 21 63 | 6f 6c 65 64 3d 26 34 30 |000 : !c|oled=&40|
|00000710| 30 30 0d 02 bc 26 20 20 | 63 6f 6c 65 64 21 34 3d |00...& |coled!4=|
|00000720| 30 3a 63 6f 6c 65 64 21 | 38 3d 31 36 3a 63 6f 6c |0:coled!|8=16:col|
|00000730| 65 64 21 31 32 3d 31 36 | 0d 02 c6 1c 20 64 6d 65 |ed!12=16|.... dme|
|00000740| 6e 75 73 25 3d a4 63 6f | 75 6e 74 5f 6d 65 6e 75 |nus%=.co|unt_menu|
|00000750| 73 28 31 29 0d 02 d0 18 | 20 de 20 64 6d 65 6e 75 |s(1)....| . dmenu|
|00000760| 24 28 64 6d 65 6e 75 73 | 25 2d 31 29 0d 02 da 17 |$(dmenus|%-1)....|
|00000770| 20 f2 72 65 73 74 6f 72 | 65 28 22 44 65 73 69 67 | .restor|e("Desig|
|00000780| 6e 22 29 0d 02 e4 17 20 | e3 20 69 25 3d 30 20 b8 |n").... |. i%=0 .|
|00000790| 20 64 6d 65 6e 75 73 25 | 2d 31 0d 02 ee 20 20 20 | dmenus%|-1... |
|000007a0| f3 20 64 6d 65 6e 75 24 | 3a 64 6d 65 6e 75 24 28 |. dmenu$|:dmenu$(|
|000007b0| 69 25 29 3d 64 6d 65 6e | 75 24 0d 02 f8 09 20 ed |i%)=dmen|u$.... .|
|000007c0| 20 69 25 0d 03 02 0f 20 | dc 20 22 44 65 73 69 67 | i%.... |. "Desig|
|000007d0| 6e 22 0d 03 0c 97 20 dc | 20 22 20 44 65 73 69 67 |n".... .| " Desig|
|000007e0| 6e 20 4d 65 6e 75 2c 20 | 53 68 61 70 65 2c 20 44 |n Menu, |Shape, D|
|000007f0| 65 63 6f 72 61 74 65 2c | 20 45 72 61 73 65 2c 20 |ecorate,| Erase, |
|00000800| 20 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2c 20 52 65 6d | -------|---, Rem|
|00000810| 6f 76 65 2f 53 68 6f 77 | 2c 20 20 47 72 69 64 2c |ove/Show|, Grid,|
|00000820| 20 20 42 61 73 69 63 20 | 4d 6f 74 69 66 2c 20 20 | Basic |Motif, |
|00000830| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2c 20 53 68 6f 77 |--------|--, Show|
|00000840| 20 43 6c 75 73 74 65 72 | 2c 20 53 61 76 65 20 44 | Cluster|, Save D|
|00000850| 65 73 69 67 6e 2c 20 20 | 2d 2d 2d 2d 2d 2d 2d 2d |esign, |--------|
|00000860| 2d 2d 2c 20 51 75 69 74 | 22 0d 03 16 0c 20 dc 20 |--, Quit|".... . |
|00000870| 22 45 4e 44 22 0d 03 20 | 06 20 3a 0d 03 2a 1c 20 |"END".. |. :..*. |
|00000880| 63 6d 65 6e 75 73 25 3d | a4 63 6f 75 6e 74 5f 6d |cmenus%=|.count_m|
|00000890| 65 6e 75 73 28 32 29 0d | 03 34 18 20 de 20 63 6d |enus(2).|.4. . cm|
|000008a0| 65 6e 75 24 28 63 6d 65 | 6e 75 73 25 2d 31 29 0d |enu$(cme|nus%-1).|
|000008b0| 03 3e 18 20 f2 72 65 73 | 74 6f 72 65 28 22 43 6c |.>. .res|tore("Cl|
|000008c0| 75 73 74 65 72 22 29 0d | 03 48 17 20 e3 20 6a 25 |uster").|.H. . j%|
|000008d0| 3d 30 20 b8 20 63 6d 65 | 6e 75 73 25 2d 31 0d 03 |=0 . cme|nus%-1..|
|000008e0| 52 20 20 20 f3 20 63 6d | 65 6e 75 24 3a 63 6d 65 |R . cm|enu$:cme|
|000008f0| 6e 75 24 28 6a 25 29 3d | 63 6d 65 6e 75 24 0d 03 |nu$(j%)=|cmenu$..|
|00000900| 5c 09 20 ed 20 6a 25 0d | 03 66 10 20 dc 20 22 43 |\. . j%.|.f. . "C|
|00000910| 6c 75 73 74 65 72 22 0d | 03 70 6d 20 dc 20 22 20 |luster".|.pm . " |
|00000920| 43 6c 75 73 74 65 72 20 | 4d 65 6e 75 2c 20 20 43 |Cluster |Menu, C|
|00000930| 6f 6c 6f 75 72 2c 20 20 | 54 69 6c 65 2c 20 20 2d |olour, |Tile, -|
|00000940| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2c 20 20 52 65 70 6f |--------|-, Repo|
|00000950| 73 69 74 69 6f 6e 2c 20 | 20 20 2d 2d 2d 2d 2d 2d |sition, | ------|
|00000960| 2d 2d 2d 2d 2c 20 20 52 | 65 64 65 73 69 67 6e 2c |----, R|edesign,|
|00000970| 20 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2c 20 20 51 | ------|----, Q|
|00000980| 75 69 74 22 0d 03 7a 0c | 20 dc 20 22 45 4e 44 22 |uit"..z.| . "END"|
|00000990| 0d 03 84 06 20 3a 0d 03 | 8e 19 20 de 20 74 69 6c |.... :..|.. . til|
|000009a0| 69 6e 67 5f 6d 65 6e 75 | 25 20 31 35 30 30 30 0d |ing_menu|% 15000.|
|000009b0| 03 98 1a 20 20 74 69 6c | 69 6e 67 5f 6d 65 6e 75 |... til|ing_menu|
|000009c0| 25 21 30 3d 31 35 30 30 | 30 0d 03 a2 16 20 20 74 |%!0=1500|0.... t|
|000009d0| 69 6c 69 6e 67 5f 6d 65 | 6e 75 25 21 34 3d 30 0d |iling_me|nu%!4=0.|
|000009e0| 03 ac 17 20 20 74 69 6c | 69 6e 67 5f 6d 65 6e 75 |... til|ing_menu|
|000009f0| 25 21 38 3d 31 36 0d 03 | b6 18 20 20 74 69 6c 69 |%!8=16..|.. tili|
|00000a00| 6e 67 5f 6d 65 6e 75 25 | 21 31 32 3d 31 36 0d 03 |ng_menu%|!12=16..|
|00000a10| c0 1c 20 74 6d 65 6e 75 | 73 25 3d a4 63 6f 75 6e |.. tmenu|s%=.coun|
|00000a20| 74 5f 6d 65 6e 75 73 28 | 33 29 0d 03 ca 18 20 de |t_menus(|3).... .|
|00000a30| 20 74 6d 65 6e 75 24 28 | 74 6d 65 6e 75 73 25 2d | tmenu$(|tmenus%-|
|00000a40| 31 29 0d 03 d4 17 20 f2 | 72 65 73 74 6f 72 65 28 |1).... .|restore(|
|00000a50| 22 54 69 6c 69 6e 67 22 | 29 0d 03 de 17 20 e3 20 |"Tiling"|).... . |
|00000a60| 6a 25 3d 30 20 b8 20 74 | 6d 65 6e 75 73 25 2d 31 |j%=0 . t|menus%-1|
|00000a70| 0d 03 e8 20 20 20 f3 20 | 74 6d 65 6e 75 24 3a 74 |... . |tmenu$:t|
|00000a80| 6d 65 6e 75 24 28 6a 25 | 29 3d 74 6d 65 6e 75 24 |menu$(j%|)=tmenu$|
|00000a90| 0d 03 f2 09 20 ed 20 6a | 25 0d 03 fc 0f 20 dc 20 |.... . j|%.... . |
|00000aa0| 22 54 69 6c 69 6e 67 22 | 0d 04 06 69 20 dc 20 22 |"Tiling"|...i . "|
|00000ab0| 20 20 20 54 69 6c 69 6e | 67 20 4d 65 6e 75 2c 20 | Tilin|g Menu, |
|00000ac0| 52 65 63 6f 6c 6f 75 72 | 2c 20 53 61 76 65 20 54 |Recolour|, Save T|
|00000ad0| 69 6c 69 6e 67 2c 20 53 | 68 6f 77 20 43 6c 75 73 |iling, S|how Clus|
|00000ae0| 74 65 72 2c 20 4d 61 6b | 65 20 48 61 72 64 63 6f |ter, Mak|e Hardco|
|00000af0| 70 79 20 2c 20 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2c |py , ---|-------,|
|00000b00| 20 4b 69 6c 6c 20 4d 65 | 6e 75 2c 20 51 75 69 74 | Kill Me|nu, Quit|
|00000b10| 22 0d 04 10 0c 20 dc 20 | 22 45 4e 44 22 0d 04 1a |".... . |"END"...|
|00000b20| 06 20 3a 0d 04 24 26 20 | 64 65 73 69 67 6e 6d 6f |. :..$& |designmo|
|00000b30| 64 65 25 3d 31 3a 64 65 | 73 69 67 6e 6d 6f 64 65 |de%=1:de|signmode|
|00000b40| 24 3d 22 53 68 61 70 65 | 22 0d 04 2e 36 20 64 78 |$="Shape|"...6 dx|
|00000b50| 25 3d 30 3a 64 79 25 3d | 30 3a 6e 6f 72 6d 61 6c |%=0:dy%=|0:normal|
|00000b60| 25 3d b9 3a 64 65 63 25 | 3d 30 3a 78 25 3d 30 3a |%=.:dec%|=0:x%=0:|
|00000b70| 79 25 3d 31 3a 65 64 69 | 74 64 65 63 25 3d a3 0d |y%=1:edi|tdec%=..|
|00000b80| 04 38 06 20 3a 0d 04 42 | 22 20 c8 9b 20 22 3c 54 |.8. :..B|" .. "<T|
|00000b90| 69 6c 65 53 79 73 24 44 | 69 72 3e 2e 54 69 6c 65 |ileSys$D|ir>.Tile|
|00000ba0| 44 65 74 61 69 6c 22 0d | 04 4c 05 e1 0d 04 56 35 |Detail".|.L....V5|
|00000bb0| 3a 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |:-------|--------|
|00000bc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000bd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000be0| 2d 0d 04 60 16 dd 20 f2 | 72 65 73 74 6f 72 65 28 |-..`.. .|restore(|
|00000bf0| 6c 61 62 65 6c 24 29 0d | 04 6a 06 20 f7 0d 04 74 |label$).|.j. ...t|
|00000c00| 06 20 f5 0d 04 7e 0f 20 | 20 f3 20 73 74 72 69 6e |. ...~. | . strin|
|00000c10| 67 24 0d 04 88 15 20 fd | 20 73 74 72 69 6e 67 24 |g$.... .| string$|
|00000c20| 3d 6c 61 62 65 6c 24 0d | 04 92 05 e1 0d 04 9c 05 |=label$.|........|
|00000c30| 3a 0d 04 a6 19 dd 20 a4 | 63 6f 75 6e 74 5f 6d 65 |:..... .|count_me|
|00000c40| 6e 75 73 28 64 61 74 61 | 25 29 0d 04 b0 17 20 ea |nus(data|%).... .|
|00000c50| 20 6d 65 6e 75 73 25 2c | 6d 65 6e 75 24 3a ea 20 | menus%,|menu$:. |
|00000c60| dc 0d 04 ba 0f 20 c8 8e | 20 64 61 74 61 25 20 ca |..... ..| data% .|
|00000c70| 0d 04 c4 10 20 20 c9 20 | 31 3a f7 20 8d 54 4c 43 |.... . |1:. .TLC|
|00000c80| 0d 04 ce 10 20 20 c9 20 | 32 3a f7 20 8d 44 70 43 |.... . |2:. .DpC|
|00000c90| 0d 04 d8 10 20 20 c9 20 | 33 3a f7 20 8d 54 46 44 |.... . |3:. .TFD|
|00000ca0| 0d 04 e2 06 20 cb 0d 04 | ec 15 20 6d 65 6e 75 73 |.... ...|.. menus|
|00000cb0| 25 3d 30 3a f3 20 6d 65 | 6e 75 24 0d 04 f6 14 20 |%=0:. me|nu$.... |
|00000cc0| c8 95 20 6d 65 6e 75 24 | 3c 3e 22 45 4e 44 22 0d |.. menu$|<>"END".|
|00000cd0| 05 00 17 20 20 6d 65 6e | 75 73 25 2b 3d 31 3a f3 |... men|us%+=1:.|
|00000ce0| 20 6d 65 6e 75 24 0d 05 | 0a 06 20 ce 0d 05 14 0b | menu$..|.. .....|
|00000cf0| 3d 6d 65 6e 75 73 25 0d | 05 1e 05 3a 0d 05 28 33 |=menus%.|...:..(3|
|00000d00| 3a 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |:=======|========|
|00000d10| 3d 20 f4 20 46 69 72 73 | 74 20 53 63 72 65 65 6e |= . Firs|t Screen|
|00000d20| 20 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 0d | =======|=======.|
|00000d30| 05 32 05 3a 0d 05 3c 11 | dd 20 f2 73 63 72 65 65 |.2.:..<.|. .scree|
|00000d40| 6e 5f 6f 6e 65 0d 05 46 | 23 20 e6 20 31 32 3a c8 |n_one..F|# . 12:.|
|00000d50| 93 20 c8 90 20 31 30 30 | 30 2c 30 2c 32 38 30 2c |. .. 100|0,0,280,|
|00000d60| 31 30 32 34 3a e6 20 37 | 0d 05 50 19 20 f2 6d 65 |1024:. 7|..P. .me|
|00000d70| 73 68 28 30 2c 30 2c 31 | 30 30 30 2c 31 30 32 34 |sh(0,0,1|000,1024|
|00000d80| 29 0d 05 5a 0d 20 f2 64 | 69 61 67 72 61 6d 0d 05 |)..Z. .d|iagram..|
|00000d90| 64 05 e1 0d 05 6e 35 3a | 2d 2d 2d 2d 2d 2d 2d 2d |d....n5:|--------|
|00000da0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000db0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000dc0| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 05 78 18 dd 20 f2 6d |--------|..x.. .m|
|00000dd0| 65 73 68 28 58 25 2c 59 | 25 2c 57 25 2c 48 25 29 |esh(X%,Y|%,W%,H%)|
|00000de0| 0d 05 82 0a 20 e6 20 33 | 2c 32 0d 05 8c 13 20 c8 |.... . 3|,2.... .|
|00000df0| 93 20 58 25 2c 59 25 2c | 57 25 2c 48 25 0d 05 96 |. X%,Y%,|W%,H%...|
|00000e00| 1a 20 e3 20 69 25 3d 58 | 25 20 b8 20 58 25 2b 57 |. . i%=X|% . X%+W|
|00000e10| 25 20 88 20 31 30 30 0d | 05 a0 1b 20 20 e3 20 6a |% . 100.|... . j|
|00000e20| 25 3d 59 25 20 b8 20 59 | 25 2b 48 25 20 88 20 31 |%=Y% . Y|%+H% . 1|
|00000e30| 30 30 0d 05 aa 14 20 20 | 20 f2 63 72 6f 73 73 28 |00.... | .cross(|
|00000e40| 69 25 2c 6a 25 29 0d 05 | b4 07 20 20 ed 0d 05 be |i%,j%)..|.. ....|
|00000e50| 06 20 ed 0d 05 c8 19 20 | e3 20 6d 25 3d 58 25 20 |. ..... |. m%=X% |
|00000e60| b8 20 58 25 2b 57 25 20 | 88 20 32 30 0d 05 d2 1a |. X%+W% |. 20....|
|00000e70| 20 20 e3 20 6e 25 3d 59 | 25 20 b8 20 59 25 2b 48 | . n%=Y|% . Y%+H|
|00000e80| 25 20 88 20 32 30 0d 05 | dc 0f 20 20 20 c8 92 20 |% . 20..|.. .. |
|00000e90| 6d 25 2c 6e 25 0d 05 e6 | 07 20 20 ed 0d 05 f0 06 |m%,n%...|. .....|
|00000ea0| 20 ed 0d 05 fa 08 20 e6 | 20 37 0d 06 04 17 20 86 | ..... .| 7.... .|
|00000eb0| 20 31 30 30 30 2c 30 2c | 31 30 30 30 2c 31 30 32 | 1000,0,|1000,102|
|00000ec0| 34 0d 06 0e 05 e1 0d 06 | 18 05 3a 0d 06 22 13 dd |4.......|..:.."..|
|00000ed0| 20 f2 63 72 6f 73 73 28 | 69 25 2c 6a 25 29 0d 06 | .cross(|i%,j%)..|
|00000ee0| 2c 16 20 86 20 69 25 2d | 35 2c 6a 25 2c 69 25 2b |,. . i%-|5,j%,i%+|
|00000ef0| 35 2c 6a 25 0d 06 36 16 | 20 86 20 69 25 2c 6a 25 |5,j%..6.| . i%,j%|
|00000f00| 2d 35 2c 69 25 2c 6a 25 | 2b 35 0d 06 40 05 e1 0d |-5,i%,j%|+5..@...|
|00000f10| 06 4a 35 3a 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.J5:----|--------|
|00000f20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000f30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000f40| 2d 2d 2d 2d 0d 06 54 20 | f4 20 44 45 46 20 50 52 |----..T |. DEF PR|
|00000f50| 4f 43 64 69 61 67 72 61 | 6d 20 2d 20 61 70 70 65 |OCdiagra|m - appe|
|00000f60| 6e 64 65 64 0d 06 5e 06 | 20 3a 0d 06 68 10 dd 20 |nded..^.| :..h.. |
|00000f70| f2 64 69 6d 65 6e 73 69 | 6f 6e 0d 06 72 32 20 de |.dimensi|on..r2 .|
|00000f80| 20 78 70 25 28 73 65 67 | 6d 65 6e 74 73 25 29 2c | xp%(seg|ments%),|
|00000f90| 79 70 25 28 73 65 67 6d | 65 6e 74 73 25 29 2c 58 |yp%(segm|ents%),X|
|00000fa0| 70 25 28 30 29 2c 59 70 | 25 28 30 29 0d 06 7c 3e |p%(0),Yp|%(0)..|>|
|00000fb0| 20 de 20 68 61 6e 64 25 | 28 73 65 67 6d 65 6e 74 | . hand%|(segment|
|00000fc0| 73 25 2d 31 29 2c 64 69 | 72 25 28 73 65 67 6d 65 |s%-1),di|r%(segme|
|00000fd0| 6e 74 73 25 2d 31 29 2c | 63 6f 72 72 25 28 73 65 |nts%-1),|corr%(se|
|00000fe0| 67 6d 65 6e 74 73 25 2d | 31 29 0d 06 86 7a 20 de |gments%-|1)...z .|
|00000ff0| 20 78 6d 69 64 25 28 73 | 65 67 6d 65 6e 74 73 25 | xmid%(s|egments%|
|00001000| 2d 31 29 2c 79 6d 69 64 | 25 28 73 65 67 6d 65 6e |-1),ymid|%(segmen|
|00001010| 74 73 25 2d 31 29 2c 78 | 63 65 6e 74 72 65 25 28 |ts%-1),x|centre%(|
|00001020| 73 65 67 6d 65 6e 74 73 | 25 2d 31 29 2c 79 63 65 |segments|%-1),yce|
|00001030| 6e 74 72 65 25 28 73 65 | 67 6d 65 6e 74 73 25 2d |ntre%(se|gments%-|
|00001040| 31 29 2c 74 28 73 65 67 | 6d 65 6e 74 73 25 2d 31 |1),t(seg|ments%-1|
|00001050| 29 2c 61 6e 67 6c 65 28 | 73 65 67 6d 65 6e 74 73 |),angle(|segments|
|00001060| 25 2d 31 29 0d 06 90 18 | 20 de 20 63 6f 6c 25 28 |%-1)....| . col%(|
|00001070| 73 65 67 6d 65 6e 74 73 | 25 2d 31 29 0d 06 9a 36 |segments|%-1)...6|
|00001080| 20 de 20 58 25 28 73 65 | 67 6d 65 6e 74 73 25 2c | . X%(se|gments%,|
|00001090| 73 65 67 6d 65 6e 74 73 | 25 29 2c 59 25 28 73 65 |segments|%),Y%(se|
|000010a0| 67 6d 65 6e 74 73 25 2c | 73 65 67 6d 65 6e 74 73 |gments%,|segments|
|000010b0| 25 29 0d 06 a4 42 20 78 | 70 25 28 30 29 3d 30 3a |%)...B x|p%(0)=0:|
|000010c0| 79 70 25 28 30 29 3d 30 | 3a 78 70 25 28 73 65 67 |yp%(0)=0|:xp%(seg|
|000010d0| 6d 65 6e 74 73 25 29 3d | 78 70 25 28 30 29 3a 79 |ments%)=|xp%(0):y|
|000010e0| 70 25 28 73 65 67 6d 65 | 6e 74 73 25 29 3d 79 70 |p%(segme|nts%)=yp|
|000010f0| 25 28 30 29 0d 06 ae 40 | 20 de 20 78 28 73 65 67 |%(0)...@| . x(seg|
|00001100| 6d 65 6e 74 73 25 2b 34 | 30 2c 33 30 29 2c 79 28 |ments%+4|0,30),y(|
|00001110| 73 65 67 6d 65 6e 74 73 | 25 2b 34 30 2c 33 30 29 |segments|%+40,30)|
|00001120| 2c 70 6d 61 78 25 28 73 | 65 67 6d 65 6e 74 73 25 |,pmax%(s|egments%|
|00001130| 2b 34 30 29 0d 06 b8 21 | 20 de 20 6e 6f 74 66 69 |+40)...!| . notfi|
|00001140| 72 73 74 74 69 6d 65 25 | 28 73 65 67 6d 65 6e 74 |rsttime%|(segment|
|00001150| 73 25 2d 31 29 0d 06 c2 | 05 e1 0d 06 cc 05 3a 0d |s%-1)...|......:.|
|00001160| 06 d6 21 f4 20 44 45 46 | 20 50 52 4f 43 22 66 69 |..!. DEF| PROC"fi|
|00001170| 67 75 72 65 22 20 2d 20 | 61 70 70 65 6e 64 65 64 |gure" - |appended|
|00001180| 0d 06 e0 05 3a 0d 06 ea | 1c dd 20 f2 64 61 73 68 |....:...|.. .dash|
|00001190| 6c 69 6e 65 28 61 25 2c | 62 25 2c 75 25 2c 76 25 |line(a%,|b%,u%,v%|
|000011a0| 29 0d 06 f4 0d 20 ea 20 | 78 2c 79 2c 6e 25 0d 06 |).... . |x,y,n%..|
|000011b0| fe 1e 20 78 3d 28 75 25 | 2d 61 25 29 2f 31 39 3a |.. x=(u%|-a%)/19:|
|000011c0| 79 3d 28 76 25 2d 62 25 | 29 2f 31 39 0d 07 08 0f |y=(v%-b%|)/19....|
|000011d0| 20 e3 20 6e 25 3d 30 20 | b8 20 39 0d 07 12 37 20 | . n%=0 |. 9...7 |
|000011e0| 20 86 20 61 25 2b 32 2a | 6e 25 2a 78 2c 62 25 2b | . a%+2*|n%*x,b%+|
|000011f0| 32 2a 6e 25 2a 79 2c 61 | 25 2b 28 32 2a 6e 25 2b |2*n%*y,a|%+(2*n%+|
|00001200| 31 29 2a 78 2c 62 25 2b | 28 32 2a 6e 25 2b 31 29 |1)*x,b%+|(2*n%+1)|
|00001210| 2a 79 0d 07 1c 06 20 ed | 0d 07 26 05 e1 0d 07 30 |*y.... .|..&....0|
|00001220| 05 3a 0d 07 3a 1a dd 20 | f2 61 72 72 6f 77 6c 69 |.:..:.. |.arrowli|
|00001230| 6e 65 28 6e 25 2c 73 63 | 61 6c 65 29 0d 07 44 12 |ne(n%,sc|ale)..D.|
|00001240| 20 c8 8e 20 64 69 72 25 | 28 6e 25 29 20 ca 0d 07 | .. dir%|(n%) ...|
|00001250| 4e 56 20 20 c9 20 31 20 | 3a 78 31 25 3d 78 70 25 |NV . 1 |:x1%=xp%|
|00001260| 28 6e 25 29 2a 73 63 61 | 6c 65 3a 79 31 25 3d 79 |(n%)*sca|le:y1%=y|
|00001270| 70 25 28 6e 25 29 2a 73 | 63 61 6c 65 3a 78 32 25 |p%(n%)*s|cale:x2%|
|00001280| 3d 78 70 25 28 6e 25 2b | 31 29 2a 73 63 61 6c 65 |=xp%(n%+|1)*scale|
|00001290| 3a 79 32 25 3d 79 70 25 | 28 6e 25 2b 31 29 2a 73 |:y2%=yp%|(n%+1)*s|
|000012a0| 63 61 6c 65 0d 07 58 56 | 20 20 c9 20 2d 31 3a 78 |cale..XV| . -1:x|
|000012b0| 31 25 3d 78 70 25 28 6e | 25 2b 31 29 2a 73 63 61 |1%=xp%(n|%+1)*sca|
|000012c0| 6c 65 3a 79 31 25 3d 79 | 70 25 28 6e 25 2b 31 29 |le:y1%=y|p%(n%+1)|
|000012d0| 2a 73 63 61 6c 65 3a 78 | 32 25 3d 78 70 25 28 6e |*scale:x|2%=xp%(n|
|000012e0| 25 29 2a 73 63 61 6c 65 | 3a 79 32 25 3d 79 70 25 |%)*scale|:y2%=yp%|
|000012f0| 28 6e 25 29 2a 73 63 61 | 6c 65 0d 07 62 06 20 cb |(n%)*sca|le..b. .|
|00001300| 0d 07 6c 08 20 e6 20 37 | 0d 07 76 24 20 c8 8f 20 |..l. . 7|..v$ .. |
|00001310| c8 90 20 78 31 25 2c 79 | 31 25 2c 36 3a c8 8f 20 |.. x1%,y|1%,6:.. |
|00001320| c8 90 20 78 32 25 2c 79 | 32 25 2c 36 0d 07 80 18 |.. x2%,y|2%,6....|
|00001330| 20 ec 20 78 31 25 2c 79 | 31 25 3a df 20 78 32 25 | . x1%,y|1%:. x2%|
|00001340| 2c 79 32 25 0d 07 8a 30 | 20 78 6d 69 64 25 28 6e |,y2%...0| xmid%(n|
|00001350| 25 29 3d 28 78 31 25 2b | 78 32 25 29 2f 32 3a 79 |%)=(x1%+|x2%)/2:y|
|00001360| 6d 69 64 25 28 6e 25 29 | 3d 28 79 31 25 2b 79 32 |mid%(n%)|=(y1%+y2|
|00001370| 25 29 2f 32 0d 07 94 52 | 20 e7 20 78 31 25 3c 3e |%)/2...R| . x1%<>|
|00001380| 78 32 25 20 8c 20 74 28 | 6e 25 29 3d 28 79 32 25 |x2% . t(|n%)=(y2%|
|00001390| 2d 79 31 25 29 2f 28 78 | 32 25 2d 78 31 25 29 20 |-y1%)/(x|2%-x1%) |
|000013a0| 8b 20 e7 20 79 32 25 3e | 79 31 25 20 8c 20 74 28 |. . y2%>|y1% . t(|
|000013b0| 6e 25 29 3d 31 30 5e 36 | 20 8b 20 74 28 6e 25 29 |n%)=10^6| . t(n%)|
|000013c0| 3d 2d 31 30 5e 36 0d 07 | 9e 0c 20 74 3d 74 28 6e |=-10^6..|.. t=t(n|
|000013d0| 25 29 0d 07 a8 11 20 64 | 3d 31 2f b6 28 31 2b 74 |%).... d|=1/.(1+t|
|000013e0| 2a 74 29 0d 07 b2 20 20 | e7 20 74 3e 30 20 80 20 |*t)... |. t>0 . |
|000013f0| 79 32 25 3e 79 31 25 20 | 8c 20 73 3d 74 2a 64 3a |y2%>y1% |. s=t*d:|
|00001400| 63 3d 64 0d 07 bc 22 20 | e7 20 74 3e 30 20 80 20 |c=d..." |. t>0 . |
|00001410| 79 32 25 3c 79 31 25 20 | 8c 20 73 3d 2d 74 2a 64 |y2%<y1% |. s=-t*d|
|00001420| 3a 63 3d 2d 64 0d 07 c6 | 22 20 e7 20 74 3c 30 20 |:c=-d...|" . t<0 |
|00001430| 80 20 79 32 25 3e 79 31 | 25 20 8c 20 73 3d 2d 74 |. y2%>y1|% . s=-t|
|00001440| 2a 64 3a 63 3d 2d 64 0d | 07 d0 20 20 e7 20 74 3c |*d:c=-d.|.. . t<|
|00001450| 30 20 80 20 79 32 25 3c | 79 31 25 20 8c 20 73 3d |0 . y2%<|y1% . s=|
|00001460| 74 2a 64 3a 63 3d 64 0d | 07 da 1e 20 e7 20 74 3d |t*d:c=d.|... . t=|
|00001470| 30 20 80 20 78 32 25 3e | 78 31 25 20 8c 20 73 3d |0 . x2%>|x1% . s=|
|00001480| 30 3a 63 3d 31 0d 07 e4 | 1f 20 e7 20 74 3d 30 20 |0:c=1...|. . t=0 |
|00001490| 80 20 78 32 25 3c 78 31 | 25 20 8c 20 73 3d 30 3a |. x2%<x1|% . s=0:|
|000014a0| 63 3d 2d 31 0d 07 ee 0f | 20 e6 20 63 6f 6c 25 28 |c=-1....| . col%(|
|000014b0| 6e 25 29 0d 07 f8 44 20 | ec 20 78 6d 69 64 25 28 |n%)...D |. xmid%(|
|000014c0| 6e 25 29 2d 32 32 2a 63 | 2c 79 6d 69 64 25 28 6e |n%)-22*c|,ymid%(n|
|000014d0| 25 29 2d 32 32 2a 73 3a | ec 20 78 6d 69 64 25 28 |%)-22*s:|. xmid%(|
|000014e0| 6e 25 29 2b 32 32 2a 63 | 2c 79 6d 69 64 25 28 6e |n%)+22*c|,ymid%(n|
|000014f0| 25 29 2b 32 32 2a 73 0d | 08 02 4f 20 f0 20 38 35 |%)+22*s.|..O . 85|
|00001500| 2c 78 6d 69 64 25 28 6e | 25 29 2b 31 38 2a 68 61 |,xmid%(n|%)+18*ha|
|00001510| 6e 64 25 28 6e 25 29 2a | 73 2d 28 31 38 2b 32 32 |nd%(n%)*|s-(18+22|
|00001520| 29 2a 63 2c 79 6d 69 64 | 25 28 6e 25 29 2d 28 31 |)*c,ymid|%(n%)-(1|
|00001530| 38 2b 32 32 29 2a 73 2d | 31 38 2a 68 61 6e 64 25 |8+22)*s-|18*hand%|
|00001540| 28 6e 25 29 2a 63 0d 08 | 0c 05 e1 0d 08 16 05 3a |(n%)*c..|.......:|
|00001550| 0d 08 20 33 3a 3d 3d 3d | 3d 3d 3d 3d 3d 20 f4 20 |.. 3:===|===== . |
|00001560| 53 65 74 20 42 61 73 69 | 63 20 4d 6f 74 69 66 20 |Set Basi|c Motif |
|00001570| 50 72 6f 70 6f 72 74 69 | 6f 6e 73 20 3d 3d 3d 3d |Proporti|ons ====|
|00001580| 3d 3d 3d 0d 08 2a 05 3a | 0d 08 34 29 f4 20 44 45 |===..*.:|..4). DE|
|00001590| 46 20 50 52 4f 43 6d 6f | 74 69 66 70 72 6f 70 6f |F PROCmo|tifpropo|
|000015a0| 72 74 69 6f 6e 73 20 2d | 20 61 70 70 65 6e 64 65 |rtions -| appende|
|000015b0| 64 0d 08 3e 05 3a 0d 08 | 48 33 3a 3d 3d 3d 3d 3d |d..>.:..|H3:=====|
|000015c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 20 f4 20 53 68 61 |========|== . Sha|
|000015d0| 70 65 20 53 63 72 65 65 | 6e 20 3d 3d 3d 3d 3d 3d |pe Scree|n ======|
|000015e0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 0d 08 52 05 3a 0d 08 |========|=..R.:..|
|000015f0| 5c 11 dd 20 f2 73 63 72 | 65 65 6e 5f 74 77 6f 0d |\.. .scr|een_two.|
|00001600| 08 66 10 20 ef 20 32 39 | 2c 30 3b 30 3b 3a db 0d |.f. . 29|,0;0;:..|
|00001610| 08 70 19 20 f2 6d 65 73 | 68 28 30 2c 30 2c 31 30 |.p. .mes|h(0,0,10|
|00001620| 30 30 2c 31 30 32 34 29 | 0d 08 7a 23 20 e6 20 31 |00,1024)|..z# . 1|
|00001630| 32 3a c8 93 20 c8 90 20 | 31 30 30 30 2c 30 2c 32 |2:.. .. |1000,0,2|
|00001640| 38 30 2c 31 30 32 34 3a | e6 20 37 0d 08 84 17 20 |80,1024:|. 7.... |
|00001650| 86 20 31 30 30 30 2c 30 | 2c 31 30 30 30 2c 31 30 |. 1000,0|,1000,10|
|00001660| 32 34 0d 08 8e 2f 20 f2 | 73 68 61 64 6f 77 64 65 |24.../ .|shadowde|
|00001670| 73 69 67 6e 6d 65 6e 75 | 3a e6 20 33 3a c8 93 20 |signmenu|:. 3:.. |
|00001680| c8 90 20 31 30 35 30 2c | 38 35 36 2c 38 34 2c 33 |.. 1050,|856,84,3|
|00001690| 32 0d 08 98 25 20 f2 77 | 72 69 74 65 28 31 30 35 |2...% .w|rite(105|
|000016a0| 30 2c 38 35 36 2c 22 53 | 68 61 70 65 22 2c 22 62 |0,856,"S|hape","b|
|000016b0| 6c 61 63 6b 22 29 0d 08 | a2 10 20 f2 62 61 73 69 |lack")..|.. .basi|
|000016c0| 63 6d 6f 74 69 66 0d 08 | ac 11 20 f2 63 68 6f 69 |cmotif..|.. .choi|
|000016d0| 63 65 6d 6f 74 69 66 0d | 08 b6 06 20 87 0d 08 c0 |cemotif.|... ....|
|000016e0| 05 e1 0d 08 ca 35 3a 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.....5:-|--------|
|000016f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001700| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001710| 2d 2d 2d 2d 2d 2d 2d 0d | 08 d4 11 dd 20 f2 62 61 |-------.|.... .ba|
|00001720| 73 69 63 6d 6f 74 69 66 | 0d 08 de 18 20 ef 20 32 |sicmotif|.... . 2|
|00001730| 39 2c 78 74 69 6c 65 25 | 3b 79 74 69 6c 65 25 3b |9,xtile%|;ytile%;|
|00001740| 0d 08 e8 19 20 e3 20 6e | 25 3d 30 20 b8 20 73 65 |.... . n|%=0 . se|
|00001750| 67 6d 65 6e 74 73 25 2d | 31 0d 08 f2 0b 20 20 e6 |gments%-|1.... .|
|00001760| 20 33 2c 32 0d 08 fc 2b | 20 20 86 20 78 70 25 28 | 3,2...+| . xp%(|
|00001770| 6e 25 29 2c 79 70 25 28 | 6e 25 29 2c 78 70 25 28 |n%),yp%(|n%),xp%(|
|00001780| 6e 25 2b 31 29 2c 79 70 | 25 28 6e 25 2b 31 29 0d |n%+1),yp|%(n%+1).|
|00001790| 09 06 09 20 20 e6 20 37 | 0d 09 10 21 20 20 c8 93 |... . 7|...! ..|
|000017a0| 20 c8 90 20 78 70 25 28 | 6e 25 29 2d 33 2c 79 70 | .. xp%(|n%)-3,yp|
|000017b0| 25 28 6e 25 29 2d 33 2c | 36 0d 09 1a 4b 20 20 78 |%(n%)-3,|6...K x|
|000017c0| 63 65 6e 74 72 65 25 28 | 6e 25 29 3d 28 78 70 25 |centre%(|n%)=(xp%|
|000017d0| 28 6e 25 29 2b 78 70 25 | 28 6e 25 2b 31 29 29 2f |(n%)+xp%|(n%+1))/|
|000017e0| 32 3a 79 63 65 6e 74 72 | 65 25 28 6e 25 29 3d 28 |2:ycentr|e%(n%)=(|
|000017f0| 79 70 25 28 6e 25 29 2b | 79 70 25 28 6e 25 2b 31 |yp%(n%)+|yp%(n%+1|
|00001800| 29 29 2f 32 0d 09 24 06 | 20 ed 0d 09 2e 0e 20 ef |))/2..$.| ..... .|
|00001810| 20 32 39 2c 30 3b 30 3b | 0d 09 38 05 e1 0d 09 42 | 29,0;0;|..8....B|
|00001820| 35 3a 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |5:------|--------|
|00001830| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001840| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001850| 2d 2d 0d 09 4c 12 dd 20 | f2 63 68 6f 69 63 65 6d |--..L.. |.choicem|
|00001860| 6f 74 69 66 0d 09 56 38 | 20 78 6d 69 6e 25 3d 78 |otif..V8| xmin%=x|
|00001870| 70 25 28 30 29 3a 78 6d | 61 78 25 3d 78 70 25 28 |p%(0):xm|ax%=xp%(|
|00001880| 30 29 3a 79 6d 69 6e 25 | 3d 79 70 25 28 30 29 3a |0):ymin%|=yp%(0):|
|00001890| 79 6d 61 78 25 3d 79 70 | 25 28 30 29 0d 09 60 19 |ymax%=yp|%(0)..`.|
|000018a0| 20 e3 20 6d 25 3d 30 20 | b8 20 73 65 67 6d 65 6e | . m%=0 |. segmen|
|000018b0| 74 73 25 2d 31 0d 09 6a | 25 20 20 e7 20 78 70 25 |ts%-1..j|% . xp%|
|000018c0| 28 6d 25 29 3c 78 6d 69 | 6e 25 20 8c 20 78 6d 69 |(m%)<xmi|n% . xmi|
|000018d0| 6e 25 3d 78 70 25 28 6d | 25 29 0d 09 74 25 20 20 |n%=xp%(m|%)..t% |
|000018e0| e7 20 78 70 25 28 6d 25 | 29 3e 78 6d 61 78 25 20 |. xp%(m%|)>xmax% |
|000018f0| 8c 20 78 6d 61 78 25 3d | 78 70 25 28 6d 25 29 0d |. xmax%=|xp%(m%).|
|00001900| 09 7e 25 20 20 e7 20 79 | 70 25 28 6d 25 29 3c 79 |.~% . y|p%(m%)<y|
|00001910| 6d 69 6e 25 20 8c 20 79 | 6d 69 6e 25 3d 79 70 25 |min% . y|min%=yp%|
|00001920| 28 6d 25 29 0d 09 88 25 | 20 20 e7 20 79 70 25 28 |(m%)...%| . yp%(|
|00001930| 6d 25 29 3e 79 6d 61 78 | 25 20 8c 20 79 6d 61 78 |m%)>ymax|% . ymax|
|00001940| 25 3d 79 70 25 28 6d 25 | 29 0d 09 92 06 20 ed 0d |%=yp%(m%|).... ..|
|00001950| 09 9c 19 20 e3 20 6e 25 | 3d 30 20 b8 20 73 65 67 |... . n%|=0 . seg|
|00001960| 6d 65 6e 74 73 25 2d 31 | 0d 09 a6 1b 20 20 78 70 |ments%-1|.... xp|
|00001970| 25 28 6e 25 29 3d 78 70 | 25 28 6e 25 29 2d 78 6d |%(n%)=xp|%(n%)-xm|
|00001980| 69 6e 25 0d 09 b0 1b 20 | 20 79 70 25 28 6e 25 29 |in%.... | yp%(n%)|
|00001990| 3d 79 70 25 28 6e 25 29 | 2d 79 6d 69 6e 25 0d 09 |=yp%(n%)|-ymin%..|
|000019a0| ba 06 20 ed 0d 09 c4 30 | 20 78 70 25 28 73 65 67 |.. ....0| xp%(seg|
|000019b0| 6d 65 6e 74 73 25 29 3d | 78 70 25 28 30 29 3a 79 |ments%)=|xp%(0):y|
|000019c0| 70 25 28 73 65 67 6d 65 | 6e 74 73 25 29 3d 79 70 |p%(segme|nts%)=yp|
|000019d0| 25 28 30 29 0d 09 ce 3a | 20 78 6d 6f 74 69 66 25 |%(0)...:| xmotif%|
|000019e0| 3d 31 30 30 30 2b 28 32 | 38 30 2d 28 78 6d 61 78 |=1000+(2|80-(xmax|
|000019f0| 25 2d 78 6d 69 6e 25 29 | 2a a4 73 63 61 6c 65 29 |%-xmin%)|*.scale)|
|00001a00| 2f 32 3a 79 6d 6f 74 69 | 66 25 3d 32 30 30 0d 09 |/2:ymoti|f%=200..|
|00001a10| d8 1a 20 ef 20 32 39 2c | 78 6d 6f 74 69 66 25 3b |.. . 29,|xmotif%;|
|00001a20| 79 6d 6f 74 69 66 25 3b | 0d 09 e2 19 20 e3 20 70 |ymotif%;|.... . p|
|00001a30| 25 3d 30 20 b8 20 73 65 | 67 6d 65 6e 74 73 25 2d |%=0 . se|gments%-|
|00001a40| 31 0d 09 ec 1b 20 20 f2 | 61 72 72 6f 77 6c 69 6e |1.... .|arrowlin|
|00001a50| 65 28 70 25 2c a4 73 63 | 61 6c 65 29 0d 09 f6 06 |e(p%,.sc|ale)....|
|00001a60| 20 ed 0d 0a 00 19 20 e3 | 20 6e 25 3d 30 20 b8 20 | ..... .| n%=0 . |
|00001a70| 73 65 67 6d 65 6e 74 73 | 25 2d 31 0d 0a 0a 1b 20 |segments|%-1.... |
|00001a80| 20 78 70 25 28 6e 25 29 | 3d 78 70 25 28 6e 25 29 | xp%(n%)|=xp%(n%)|
|00001a90| 2b 78 6d 69 6e 25 0d 0a | 14 1b 20 20 79 70 25 28 |+xmin%..|.. yp%(|
|00001aa0| 6e 25 29 3d 79 70 25 28 | 6e 25 29 2b 79 6d 69 6e |n%)=yp%(|n%)+ymin|
|00001ab0| 25 0d 0a 1e 06 20 ed 0d | 0a 28 30 20 78 70 25 28 |%.... ..|.(0 xp%(|
|00001ac0| 73 65 67 6d 65 6e 74 73 | 25 29 3d 78 70 25 28 30 |segments|%)=xp%(0|
|00001ad0| 29 3a 79 70 25 28 73 65 | 67 6d 65 6e 74 73 25 29 |):yp%(se|gments%)|
|00001ae0| 3d 79 70 25 28 30 29 0d | 0a 32 05 e1 0d 0a 3c 05 |=yp%(0).|.2....<.|
|00001af0| 3a 0d 0a 46 0c dd 20 a4 | 73 63 61 6c 65 0d 0a 50 |:..F.. .|scale..P|
|00001b00| 14 20 4d 61 78 58 25 3d | 30 3a 4d 61 78 59 25 3d |. MaxX%=|0:MaxY%=|
|00001b10| 30 0d 0a 5a 19 20 e3 20 | 69 25 3d 30 20 b8 20 73 |0..Z. . |i%=0 . s|
|00001b20| 65 67 6d 65 6e 74 73 25 | 2d 31 0d 0a 64 18 20 20 |egments%|-1..d. |
|00001b30| e3 20 6a 25 3d 31 20 b8 | 20 73 65 67 6d 65 6e 74 |. j%=1 .| segment|
|00001b40| 73 25 0d 0a 6e 23 20 20 | 20 58 25 28 69 25 2c 6a |s%..n# | X%(i%,j|
|00001b50| 25 29 3d 94 28 78 70 25 | 28 69 25 29 2d 78 70 25 |%)=.(xp%|(i%)-xp%|
|00001b60| 28 6a 25 29 29 0d 0a 78 | 2a 20 20 20 e7 20 58 25 |(j%))..x|* . X%|
|00001b70| 28 69 25 2c 6a 25 29 3e | 4d 61 78 58 25 20 8c 20 |(i%,j%)>|MaxX% . |
|00001b80| 4d 61 78 58 25 3d 58 25 | 28 69 25 2c 6a 25 29 0d |MaxX%=X%|(i%,j%).|
|00001b90| 0a 82 23 20 20 20 59 25 | 28 69 25 2c 6a 25 29 3d |..# Y%|(i%,j%)=|
|00001ba0| 94 28 79 70 25 28 69 25 | 29 2d 79 70 25 28 6a 25 |.(yp%(i%|)-yp%(j%|
|00001bb0| 29 29 0d 0a 8c 2a 20 20 | 20 e7 20 59 25 28 69 25 |))...* | . Y%(i%|
|00001bc0| 2c 6a 25 29 3e 4d 61 78 | 59 25 20 8c 20 4d 61 78 |,j%)>Max|Y% . Max|
|00001bd0| 59 25 3d 59 25 28 69 25 | 2c 6a 25 29 0d 0a 96 07 |Y%=Y%(i%|,j%)....|
|00001be0| 20 20 ed 0d 0a a0 06 20 | ed 0d 0a aa 2c 20 e7 20 | ..... |...., . |
|00001bf0| 4d 61 78 58 25 3e 4d 61 | 78 59 25 20 8c 20 4d 61 |MaxX%>Ma|xY% . Ma|
|00001c00| 78 25 3d 4d 61 78 58 25 | 20 8b 20 4d 61 78 25 3d |x%=MaxX%| . Max%=|
|00001c10| 4d 61 78 59 25 0d 0a b4 | 0d 3d 32 34 30 2f 4d 61 |MaxY%...|.=240/Ma|
|00001c20| 78 25 0d 0a be 05 3a 0d | 0a c8 33 3a 3d 3d 3d 3d |x%....:.|..3:====|
|00001c30| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 20 f4 20 46 6f |========|=== . Fo|
|00001c40| 72 6d 20 54 69 6c 65 20 | 3d 3d 3d 3d 3d 3d 3d 3d |rm Tile |========|
|00001c50| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 0d 0a d2 05 3a 0d |========|==....:.|
|00001c60| 0a dc 0f dd 20 f2 66 6f | 72 6d 74 69 6c 65 0d 0a |.... .fo|rmtile..|
|00001c70| e6 43 20 f2 77 72 69 74 | 65 28 31 30 32 34 2c 31 |.C .writ|e(1024,1|
|00001c80| 34 30 2c 22 53 45 4c 45 | 43 54 20 20 73 65 67 6d |40,"SELE|CT segm|
|00001c90| 65 6e 74 22 2c 22 62 6c | 61 63 6b 22 29 3a 64 65 |ent","bl|ack"):de|
|00001ca0| 73 69 67 6e 6d 6f 64 65 | 24 3d 22 53 68 61 70 65 |signmode|$="Shape|
|00001cb0| 22 0d 0a f0 06 20 f5 0d | 0a fa 14 20 20 f2 63 68 |".... ..|... .ch|
|00001cc0| 6f 6f 73 65 73 65 67 6d | 65 6e 74 0d 0b 04 1c 20 |oosesegm|ent.... |
|00001cd0| 20 f5 20 c8 97 20 6d 78 | 25 2c 6d 79 25 2c 62 25 | . .. mx|%,my%,b%|
|00001ce0| 3a fd 20 62 25 3d 30 0d | 0b 0e 1b 20 20 e7 20 6e |:. b%=0.|... . n|
|00001cf0| 6f 74 66 69 72 73 74 74 | 69 6d 65 25 28 6e 25 29 |otfirstt|ime%(n%)|
|00001d00| 20 8c 0d 0b 18 11 20 20 | 20 f2 65 64 69 74 73 68 | ..... | .editsh|
|00001d10| 61 70 65 0d 0b 22 12 20 | 20 cc 20 f2 64 72 61 77 |ape..". | . .draw|
|00001d20| 73 68 61 70 65 0d 0b 2c | 07 20 20 cd 0d 0b 36 08 |shape..,|. ...6.|
|00001d30| 20 fd 20 a3 0d 0b 40 05 | e1 0d 0b 4a 05 3a 0d 0b | . ...@.|...J.:..|
|00001d40| 54 33 3a 2d 2d 2d 20 f4 | 20 43 68 6f 6f 73 65 20 |T3:--- .| Choose |
|00001d50| 53 65 67 6d 65 6e 74 20 | 66 6f 72 20 53 68 61 70 |Segment |for Shap|
|00001d60| 69 6e 67 20 6f 72 20 45 | 72 61 73 69 6e 67 20 2d |ing or E|rasing -|
|00001d70| 2d 0d 0b 5e 05 3a 0d 0b | 68 14 dd 20 f2 63 68 6f |-..^.:..|h.. .cho|
|00001d80| 6f 73 65 73 65 67 6d 65 | 6e 74 0d 0b 72 28 20 ef |osesegme|nt..r( .|
|00001d90| 20 32 39 2c 30 3b 30 3b | 3a c8 97 20 ee 3a c8 97 | 29,0;0;|:.. .:..|
|00001da0| 20 c8 93 20 31 30 30 30 | 2c 30 2c 32 38 30 2c 39 | .. 1000|,0,280,9|
|00001db0| 36 30 0d 0b 7c 1a 20 ef | 20 32 39 2c 78 6d 6f 74 |60..|. .| 29,xmot|
|00001dc0| 69 66 25 3b 79 6d 6f 74 | 69 66 25 3b 0d 0b 86 3d |if%;ymot|if%;...=|
|00001dd0| 20 c8 97 20 b8 20 a4 73 | 63 61 6c 65 2a 28 78 6d | .. . .s|cale*(xm|
|00001de0| 61 78 25 2d 78 6d 69 6e | 25 29 2f 32 2b 34 30 2c |ax%-xmin|%)/2+40,|
|00001df0| a4 73 63 61 6c 65 2a 28 | 79 6d 61 78 25 2d 79 6d |.scale*(|ymax%-ym|
|00001e00| 69 6e 25 29 2f 32 2b 34 | 30 0d 0b 90 12 20 63 68 |in%)/2+4|0.... ch|
|00001e10| 6f 69 63 65 66 6c 61 67 | 25 3d a3 0d 0b 9a 06 20 |oiceflag|%=..... |
|00001e20| f5 0d 0b a4 1b 20 20 ef | 20 32 39 2c 78 6d 6f 74 |..... .| 29,xmot|
|00001e30| 69 66 25 3b 79 6d 6f 74 | 69 66 25 3b 0d 0b ae 23 |if%;ymot|if%;...#|
|00001e40| 20 20 f5 20 c8 97 20 6d | 78 25 2c 6d 79 25 2c 62 | . .. m|x%,my%,b|
|00001e50| 25 3a fd 20 62 25 3d 34 | 20 84 20 62 25 3d 32 0d |%:. b%=4| . b%=2.|
|00001e60| 0b b8 16 20 20 c8 8e 20 | 64 65 73 69 67 6e 6d 6f |... .. |designmo|
|00001e70| 64 65 24 20 ca 0d 0b c2 | 12 20 20 20 c9 20 22 53 |de$ ....|. . "S|
|00001e80| 68 61 70 65 22 20 3a 0d | 0b cc 1c 20 20 20 20 e3 |hape" :.|... .|
|00001e90| 20 63 25 3d 30 20 b8 20 | 73 65 67 6d 65 6e 74 73 | c%=0 . |segments|
|00001ea0| 25 2d 31 0d 0b d6 3d 20 | 20 20 20 20 e7 20 a4 70 |%-1...= | . .p|
|00001eb0| 6f 73 69 74 69 6f 6e 28 | 6d 78 25 2c 6d 79 25 2c |osition(|mx%,my%,|
|00001ec0| 78 6d 69 64 25 28 63 25 | 29 2c 79 6d 69 64 25 28 |xmid%(c%|),ymid%(|
|00001ed0| 63 25 29 2c 32 35 29 20 | 80 20 62 25 3d 34 20 8c |c%),25) |. b%=4 .|
|00001ee0| 0d 0b e0 1d 20 20 20 20 | 20 20 6e 25 3d 63 25 3a |.... | n%=c%:|
|00001ef0| 63 68 6f 69 63 65 66 6c | 61 67 25 3d b9 0d 0b ea |choicefl|ag%=....|
|00001f00| 41 20 20 20 20 20 20 ec | 20 78 6d 69 64 25 28 6e |A .| xmid%(n|
|00001f10| 25 29 2d 33 30 2c 79 6d | 69 64 25 28 6e 25 29 2d |%)-30,ym|id%(n%)-|
|00001f20| 33 30 3a ec 20 78 6d 69 | 64 25 28 6e 25 29 2b 33 |30:. xmi|d%(n%)+3|
|00001f30| 30 2c 79 6d 69 64 25 28 | 6e 25 29 2b 33 30 0d 0b |0,ymid%(|n%)+30..|
|00001f40| f4 2f 20 20 20 20 20 20 | c8 99 20 22 4f 53 5f 53 |./ |.. "OS_S|
|00001f50| 70 72 69 74 65 4f 70 22 | 2c 32 37 30 2c 70 61 74 |priteOp"|,270,pat|
|00001f60| 63 68 2c 22 63 69 72 63 | 6c 65 22 2c 30 0d 0b fe |ch,"circ|le",0...|
|00001f70| 27 20 20 20 20 20 20 e6 | 20 33 3a c8 8f 20 78 6d |' .| 3:.. xm|
|00001f80| 69 64 25 28 6e 25 29 2c | 79 6d 69 64 25 28 6e 25 |id%(n%),|ymid%(n%|
|00001f90| 29 2c 32 35 0d 0c 08 0a | 20 20 20 20 20 cd 0d 0c |),25....| ...|
|00001fa0| 12 09 20 20 20 20 ed 0d | 0c 1c 12 20 20 20 c9 20 |.. ..|... . |
|00001fb0| 22 45 72 61 73 65 22 20 | 3a 0d 0c 26 1c 20 20 20 |"Erase" |:..&. |
|00001fc0| 20 e3 20 63 25 3d 30 20 | b8 20 73 65 67 6d 65 6e | . c%=0 |. segmen|
|00001fd0| 74 73 25 2d 31 0d 0c 30 | 3d 20 20 20 20 20 e7 20 |ts%-1..0|= . |
|00001fe0| a4 70 6f 73 69 74 69 6f | 6e 28 6d 78 25 2c 6d 79 |.positio|n(mx%,my|
|00001ff0| 25 2c 78 6d 69 64 25 28 | 63 25 29 2c 79 6d 69 64 |%,xmid%(|c%),ymid|
|00002000| 25 28 63 25 29 2c 32 35 | 29 20 80 20 62 25 3d 34 |%(c%),25|) . b%=4|
|00002010| 20 8c 0d 0c 3a 1d 20 20 | 20 20 20 20 6e 25 3d 63 | ...:. | n%=c|
|00002020| 25 3a 63 68 6f 69 63 65 | 66 6c 61 67 25 3d b9 0d |%:choice|flag%=..|
|00002030| 0c 44 0a 20 20 20 20 20 | cd 0d 0c 4e 09 20 20 20 |.D. |...N. |
|00002040| 20 ed 0d 0c 58 67 20 20 | 20 20 e7 20 a4 70 6f 73 | ...Xg | . .pos|
|00002050| 69 74 69 6f 6e 28 6d 78 | 25 2c 6d 79 25 2c 28 78 |ition(mx|%,my%,(x|
|00002060| 6d 61 78 25 2d 78 6d 69 | 6e 25 29 2a a4 73 63 61 |max%-xmi|n%)*.sca|
|00002070| 6c 65 2f 32 2c 28 79 6d | 61 78 25 2d 79 6d 69 6e |le/2,(ym|ax%-ymin|
|00002080| 25 29 2a a4 73 63 61 6c | 65 2f 32 2c 33 30 29 20 |%)*.scal|e/2,30) |
|00002090| 80 20 62 25 3d 34 20 8c | 20 f2 65 72 61 73 65 64 |. b%=4 .| .erased|
|000020a0| 65 63 6f 72 61 74 69 6f | 6e 0d 0c 62 07 20 20 cb |ecoratio|n..b. .|
|000020b0| 0d 0c 6c 0e 20 20 e7 20 | 62 25 3d 32 20 8c 0d 0c |..l. . |b%=2 ...|
|000020c0| 76 17 20 20 20 c8 8e 20 | 64 65 73 69 67 6e 6d 6f |v. .. |designmo|
|000020d0| 64 65 24 20 ca 0d 0c 80 | 39 20 20 20 20 c9 20 22 |de$ ....|9 . "|
|000020e0| 53 68 61 70 65 22 20 3a | ef 20 32 39 2c 30 3b 30 |Shape" :|. 29,0;0|
|000020f0| 3b 3a e6 20 30 2c 31 32 | 3a c8 93 20 c8 90 20 31 |;:. 0,12|:.. .. 1|
|00002100| 30 30 35 2c 31 33 30 2c | 32 37 30 2c 34 30 0d 0c |005,130,|270,40..|
|00002110| 8a 25 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.% | |
|00002120| 20 20 20 20 f2 73 68 6f | 77 64 65 73 69 67 6e 6d | .sho|wdesignm|
|00002130| 65 6e 75 0d 0c 94 39 20 | 20 20 20 c9 20 22 45 72 |enu...9 | . "Er|
|00002140| 61 73 65 22 20 3a ef 20 | 32 39 2c 30 3b 30 3b 3a |ase" :. |29,0;0;:|
|00002150| e6 20 30 2c 31 32 3a c8 | 93 20 c8 90 20 31 30 30 |. 0,12:.|. .. 100|
|00002160| 35 2c 37 30 2c 32 37 30 | 2c 31 30 30 0d 0c 9e 66 |5,70,270|,100...f|
|00002170| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002180| 20 20 ef 20 32 39 2c 78 | 6d 6f 74 69 66 25 3b 79 | . 29,x|motif%;y|
|00002190| 6d 6f 74 69 66 25 3b 3a | c8 8f 20 c8 90 20 28 78 |motif%;:|.. .. (x|
|000021a0| 6d 61 78 25 2d 78 6d 69 | 6e 25 29 2a a4 73 63 61 |max%-xmi|n%)*.sca|
|000021b0| 6c 65 2f 32 2d 35 2c 28 | 79 6d 61 78 25 2d 79 6d |le/2-5,(|ymax%-ym|
|000021c0| 69 6e 25 29 2a a4 73 63 | 61 6c 65 2f 32 2d 35 2c |in%)*.sc|ale/2-5,|
|000021d0| 32 30 0d 0c a8 25 20 20 | 20 20 20 20 20 20 20 20 |20...% | |
|000021e0| 20 20 20 20 20 20 20 20 | f2 73 68 6f 77 64 65 73 | |.showdes|
|000021f0| 69 67 6e 6d 65 6e 75 0d | 0c b2 08 20 20 20 cb 0d |ignmenu.|... ..|
|00002200| 0c bc 07 20 20 cd 0d 0c | c6 12 20 fd 20 63 68 6f |... ...|.. . cho|
|00002210| 69 63 65 66 6c 61 67 25 | 0d 0c d0 8d 20 e7 20 53 |iceflag%|.... . S|
|00002220| 79 73 24 3d 22 51 2d 30 | 39 22 20 84 20 53 79 73 |ys$="Q-0|9" . Sys|
|00002230| 24 3d 22 51 2d 31 30 22 | 20 84 20 53 79 73 24 3d |$="Q-10"| . Sys$=|
|00002240| 22 51 2d 31 31 22 20 84 | 20 53 79 73 24 3d 22 54 |"Q-11" .| Sys$="T|
|00002250| 2d 30 31 22 20 84 20 53 | 79 73 24 3d 22 54 2d 30 |-01" . S|ys$="T-0|
|00002260| 32 22 20 84 20 53 79 73 | 24 3d 22 54 2d 30 33 22 |2" . Sys|$="T-03"|
|00002270| 20 84 20 53 79 73 24 3d | 22 48 2d 30 37 22 20 84 | . Sys$=|"H-07" .|
|00002280| 20 53 79 73 24 3d 22 50 | 65 6e 74 69 6c 65 73 22 | Sys$="P|entiles"|
|00002290| 20 8c 20 73 69 67 6e 25 | 3d 2d 31 20 8b 20 73 69 | . sign%|=-1 . si|
|000022a0| 67 6e 25 3d 31 0d 0c da | 64 20 68 61 6e 64 25 3d |gn%=1...|d hand%=|
|000022b0| 68 61 6e 64 25 28 6e 25 | 29 3a 63 6f 72 72 68 61 |hand%(n%|):corrha|
|000022c0| 6e 64 25 3d 68 61 6e 64 | 25 28 63 6f 72 72 25 28 |nd%=hand|%(corr%(|
|000022d0| 6e 25 29 29 3a 74 68 65 | 74 61 3d 73 69 67 6e 25 |n%)):the|ta=sign%|
|000022e0| 2a a4 61 6e 67 6c 65 66 | 72 6f 6d 63 6f 72 72 28 |*.anglef|romcorr(|
|000022f0| 6e 25 29 3a 6d 3d 74 28 | 6e 25 29 3a 63 6f 6c 25 |n%):m=t(|n%):col%|
|00002300| 3d 63 6f 6c 25 28 6e 25 | 29 0d 0c e4 12 20 c8 8e |=col%(n%|).... ..|
|00002310| 20 64 69 72 25 28 6e 25 | 29 20 ca 0d 0c ee 50 20 | dir%(n%|) ....P |
|00002320| 20 c9 20 31 20 3a 78 73 | 74 61 72 74 25 3d 78 70 | . 1 :xs|tart%=xp|
|00002330| 25 28 6e 25 29 3a 79 73 | 74 61 72 74 25 3d 79 70 |%(n%):ys|tart%=yp|
|00002340| 25 28 6e 25 29 3a 78 66 | 69 6e 69 73 68 25 3d 78 |%(n%):xf|inish%=x|
|00002350| 70 25 28 6e 25 2b 31 29 | 3a 79 66 69 6e 69 73 68 |p%(n%+1)|:yfinish|
|00002360| 25 3d 79 70 25 28 6e 25 | 2b 31 29 0d 0c f8 50 20 |%=yp%(n%|+1)...P |
|00002370| 20 c9 20 2d 31 3a 78 73 | 74 61 72 74 25 3d 78 70 | . -1:xs|tart%=xp|
|00002380| 25 28 6e 25 2b 31 29 3a | 79 73 74 61 72 74 25 3d |%(n%+1):|ystart%=|
|00002390| 79 70 25 28 6e 25 2b 31 | 29 3a 78 66 69 6e 69 73 |yp%(n%+1|):xfinis|
|000023a0| 68 25 3d 78 70 25 28 6e | 25 29 3a 79 66 69 6e 69 |h%=xp%(n|%):yfini|
|000023b0| 73 68 25 3d 79 70 25 28 | 6e 25 29 0d 0d 02 06 20 |sh%=yp%(|n%).... |
|000023c0| cb 0d 0d 0c 19 20 c8 8e | 20 64 69 72 25 28 63 6f |..... ..| dir%(co|
|000023d0| 72 72 25 28 6e 25 29 29 | 20 ca 0d 0d 16 3a 20 20 |rr%(n%))| ....: |
|000023e0| c9 20 31 20 3a 78 63 73 | 74 61 72 74 25 3d 78 70 |. 1 :xcs|tart%=xp|
|000023f0| 25 28 63 6f 72 72 25 28 | 6e 25 29 29 3a 79 63 73 |%(corr%(|n%)):ycs|
|00002400| 74 61 72 74 25 3d 79 70 | 25 28 63 6f 72 72 25 28 |tart%=yp|%(corr%(|
|00002410| 6e 25 29 29 0d 0d 20 3e | 20 20 c9 20 2d 31 3a 78 |n%)).. >| . -1:x|
|00002420| 63 73 74 61 72 74 25 3d | 78 70 25 28 63 6f 72 72 |cstart%=|xp%(corr|
|00002430| 25 28 6e 25 29 2b 31 29 | 3a 79 63 73 74 61 72 74 |%(n%)+1)|:ycstart|
|00002440| 25 3d 79 70 25 28 63 6f | 72 72 25 28 6e 25 29 2b |%=yp%(co|rr%(n%)+|
|00002450| 31 29 0d 0d 2a 06 20 cb | 0d 0d 34 3e 20 e7 20 64 |1)..*. .|..4> . d|
|00002460| 65 73 69 67 6e 6d 6f 64 | 65 24 3d 22 45 72 61 73 |esignmod|e$="Eras|
|00002470| 65 22 20 80 20 6e 6f 74 | 66 69 72 73 74 74 69 6d |e" . not|firsttim|
|00002480| 65 25 28 6e 25 29 20 8c | 20 f2 65 72 61 73 65 73 |e%(n%) .| .erases|
|00002490| 65 67 6d 65 6e 74 0d 0d | 3e 1c 20 e7 20 64 65 73 |egment..|>. . des|
|000024a0| 69 67 6e 6d 6f 64 65 24 | 3d 22 53 68 61 70 65 22 |ignmode$|="Shape"|
|000024b0| 20 8c 0d 0d 48 22 20 20 | ef 20 32 39 2c 30 3b 30 | ...H" |. 29,0;0|
|000024c0| 3b 3a c8 97 20 c8 93 20 | 30 2c 30 2c 31 30 30 30 |;:.. .. |0,0,1000|
|000024d0| 2c 39 36 30 0d 0d 52 38 | 20 20 ef 20 32 39 2c 78 |,960..R8| . 29,x|
|000024e0| 74 69 6c 65 25 3b 79 74 | 69 6c 65 25 3b 3a c8 97 |tile%;yt|ile%;:..|
|000024f0| 20 b8 20 78 63 65 6e 74 | 72 65 25 28 6e 25 29 2c | . xcent|re%(n%),|
|00002500| 79 63 65 6e 74 72 65 25 | 28 6e 25 29 0d 0d 5c 1c |ycentre%|(n%)..\.|
|00002510| 20 20 f5 20 c8 97 20 6d | 78 25 2c 6d 79 25 2c 62 | . .. m|x%,my%,b|
|00002520| 25 3a fd 20 62 25 3d 30 | 0d 0d 66 06 20 cd 0d 0d |%:. b%=0|..f. ...|
|00002530| 70 07 20 ef 37 0d 0d 7a | 05 e1 0d 0d 84 05 3a 0d |p. .7..z|......:.|
|00002540| 0d 8e 2a dd 20 a4 70 6f | 73 69 74 69 6f 6e 28 6d |..*. .po|sition(m|
|00002550| 78 25 2c 6d 79 25 2c 78 | 63 65 6e 25 2c 79 63 65 |x%,my%,x|cen%,yce|
|00002560| 6e 25 2c 73 69 7a 65 25 | 29 0d 0d 98 57 20 e7 20 |n%,size%|)...W . |
|00002570| 6d 78 25 3e 78 63 65 6e | 25 2d 73 69 7a 65 25 20 |mx%>xcen|%-size% |
|00002580| 80 20 6d 78 25 3c 78 63 | 65 6e 25 2b 73 69 7a 65 |. mx%<xc|en%+size|
|00002590| 25 20 80 20 6d 79 25 3e | 79 63 65 6e 25 2d 73 69 |% . my%>|ycen%-si|
|000025a0| 7a 65 25 20 80 20 6d 79 | 25 3c 79 63 65 6e 25 2b |ze% . my|%<ycen%+|
|000025b0| 73 69 7a 65 25 20 8c 20 | 3d 2d 31 20 8b 20 3d 30 |size% . |=-1 . =0|
|000025c0| 0d 0d a2 05 3a 0d 0d ac | 18 dd 20 a4 61 6e 67 6c |....:...|.. .angl|
|000025d0| 65 66 72 6f 6d 63 6f 72 | 72 28 6c 25 29 0d 0d b6 |efromcor|r(l%)...|
|000025e0| 12 20 63 6c 25 3d 63 6f | 72 72 25 28 6c 25 29 0d |. cl%=co|rr%(l%).|
|000025f0| 0d c0 81 20 e7 20 64 69 | 72 25 28 6c 25 29 3d 31 |... . di|r%(l%)=1|
|00002600| 20 8c 20 61 6e 67 6c 65 | 28 6c 25 29 3d a4 61 6e | . angle|(l%)=.an|
|00002610| 67 6c 65 28 78 70 25 28 | 6c 25 29 2c 79 70 25 28 |gle(xp%(|l%),yp%(|
|00002620| 6c 25 29 2c 78 70 25 28 | 6c 25 2b 31 29 2c 79 70 |l%),xp%(|l%+1),yp|
|00002630| 25 28 6c 25 2b 31 29 29 | 20 8b 20 61 6e 67 6c 65 |%(l%+1))| . angle|
|00002640| 28 6c 25 29 3d a4 61 6e | 67 6c 65 28 78 70 25 28 |(l%)=.an|gle(xp%(|
|00002650| 6c 25 2b 31 29 2c 79 70 | 25 28 6c 25 2b 31 29 2c |l%+1),yp|%(l%+1),|
|00002660| 78 70 25 28 6c 25 29 2c | 79 70 25 28 6c 25 29 29 |xp%(l%),|yp%(l%))|
|00002670| 0d 0d ca 8c 20 e7 20 64 | 69 72 25 28 63 6c 25 29 |.... . d|ir%(cl%)|
|00002680| 3d 31 20 8c 20 61 6e 67 | 6c 65 28 63 6c 25 29 3d |=1 . ang|le(cl%)=|
|00002690| a4 61 6e 67 6c 65 28 78 | 70 25 28 63 6c 25 29 2c |.angle(x|p%(cl%),|
|000026a0| 79 70 25 28 63 6c 25 29 | 2c 78 70 25 28 63 6c 25 |yp%(cl%)|,xp%(cl%|
|000026b0| 2b 31 29 2c 79 70 25 28 | 63 6c 25 2b 31 29 29 20 |+1),yp%(|cl%+1)) |
|000026c0| 8b 20 61 6e 67 6c 65 28 | 63 6c 25 29 3d a4 61 6e |. angle(|cl%)=.an|
|000026d0| 67 6c 65 28 78 70 25 28 | 63 6c 25 2b 31 29 2c 79 |gle(xp%(|cl%+1),y|
|000026e0| 70 25 28 63 6c 25 2b 31 | 29 2c 78 70 25 28 63 6c |p%(cl%+1|),xp%(cl|
|000026f0| 25 29 2c 79 70 25 28 63 | 6c 25 29 29 0d 0d d4 19 |%),yp%(c|l%))....|
|00002700| 3d 61 6e 67 6c 65 28 63 | 6c 25 29 2d 61 6e 67 6c |=angle(c|l%)-angl|
|00002710| 65 28 6c 25 29 0d 0d de | 05 3a 0d 0d e8 25 dd 20 |e(l%)...|.:...%. |
|00002720| a4 61 6e 67 6c 65 28 78 | 62 65 67 25 2c 79 62 65 |.angle(x|beg%,ybe|
|00002730| 67 25 2c 78 65 6e 64 25 | 2c 79 65 6e 64 25 29 0d |g%,xend%|,yend%).|
|00002740| 0d f2 26 20 e7 20 78 62 | 65 67 25 3d 78 65 6e 64 |..& . xb|eg%=xend|
|00002750| 25 20 80 20 79 62 65 67 | 25 3c 79 65 6e 64 25 20 |% . ybeg|%<yend% |
|00002760| 8c 20 3d 39 30 0d 0d fc | 27 20 e7 20 78 62 65 67 |. =90...|' . xbeg|
|00002770| 25 3d 78 65 6e 64 25 20 | 80 20 79 62 65 67 25 3e |%=xend% |. ybeg%>|
|00002780| 79 65 6e 64 25 20 8c 20 | 3d 2d 39 30 0d 0e 06 15 |yend% . |=-90....|
|00002790| 20 e7 20 78 62 65 67 25 | 3c 3e 78 65 6e 64 25 20 | . xbeg%|<>xend% |
|000027a0| 8c 0d 0e 10 23 20 20 6d | 3d 28 79 65 6e 64 25 2d |....# m|=(yend%-|
|000027b0| 79 62 65 67 25 29 2f 28 | 78 65 6e 64 25 2d 78 62 |ybeg%)/(|xend%-xb|
|000027c0| 65 67 25 29 0d 0e 1a 0e | 20 20 74 68 65 74 61 3d |eg%)....| theta=|
|000027d0| 99 6d 0d 0e 24 06 20 cd | 0d 0e 2e 2d 20 e7 20 78 |.m..$. .|...- . x|
|000027e0| 62 65 67 25 3c 78 65 6e | 64 25 20 80 20 79 62 65 |beg%<xen|d% . ybe|
|000027f0| 67 25 3c 3d 79 65 6e 64 | 25 20 8c 20 3d 9d 28 74 |g%<=yend|% . =.(t|
|00002800| 68 65 74 61 29 0d 0e 38 | 2d 20 e7 20 78 62 65 67 |heta)..8|- . xbeg|
|00002810| 25 3c 78 65 6e 64 25 20 | 80 20 79 62 65 67 25 3e |%<xend% |. ybeg%>|
|00002820| 3d 79 65 6e 64 25 20 8c | 20 3d 9d 28 74 68 65 74 |=yend% .| =.(thet|
|00002830| 61 29 0d 0e 42 31 20 e7 | 20 78 62 65 67 25 3e 78 |a)..B1 .| xbeg%>x|
|00002840| 65 6e 64 25 20 80 20 79 | 62 65 67 25 3c 3d 79 65 |end% . y|beg%<=ye|
|00002850| 6e 64 25 20 8c 20 3d 31 | 38 30 2b 9d 28 74 68 65 |nd% . =1|80+.(the|
|00002860| 74 61 29 0d 0e 4c 31 20 | e7 20 78 62 65 67 25 3e |ta)..L1 |. xbeg%>|
|00002870| 78 65 6e 64 25 20 80 20 | 79 62 65 67 25 3e 3d 79 |xend% . |ybeg%>=y|
|00002880| 65 6e 64 25 20 8c 20 3d | 31 38 30 2b 9d 28 74 68 |end% . =|180+.(th|
|00002890| 65 74 61 29 0d 0e 56 05 | e1 0d 0e 60 05 3a 0d 0e |eta)..V.|...`.:..|
|000028a0| 6a 33 3a 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |j3:-----|--------|
|000028b0| 2d 2d 2d 2d 20 f4 20 44 | 72 61 77 20 53 68 61 70 |---- . D|raw Shap|
|000028c0| 65 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |e ------|--------|
|000028d0| 2d 0d 0e 74 05 3a 0d 0e | 7e 10 dd 20 f2 64 72 61 |-..t.:..|~.. .dra|
|000028e0| 77 73 68 61 70 65 0d 0e | 88 11 20 f2 73 65 74 75 |wshape..|.. .setu|
|000028f0| 70 70 6f 69 6e 74 73 0d | 0e 92 22 20 f5 20 c8 97 |ppoints.|.." . ..|
|00002900| 20 6d 78 25 2c 6d 79 25 | 2c 62 25 3a fd 20 62 25 | mx%,my%|,b%:. b%|
|00002910| 3d 31 20 84 20 62 25 3d | 34 0d 0e 9c 0c 20 c8 8e |=1 . b%=|4.... ..|
|00002920| 20 62 25 20 ca 0d 0e a6 | 18 20 20 c9 20 31 20 3a | b% ....|. . 1 :|
|00002930| f2 73 68 61 70 65 73 65 | 67 6d 65 6e 74 0d 0e b0 |.shapese|gment...|
|00002940| 0f 20 20 c9 20 34 20 3a | f2 66 69 78 0d 0e ba 06 |. . 4 :|.fix....|
|00002950| 20 cb 0d 0e c4 05 e1 0d | 0e ce 05 3a 0d 0e d8 12 | .......|...:....|
|00002960| dd 20 f2 73 65 74 75 70 | 70 6f 69 6e 74 73 0d 0e |. .setup|points..|
|00002970| e2 18 20 ef 20 32 39 2c | 78 74 69 6c 65 25 3b 79 |.. . 29,|xtile%;y|
|00002980| 74 69 6c 65 25 3b 0d 0e | ec 09 20 70 25 3d 30 0d |tile%;..|.. p%=0.|
|00002990| 0e f6 1a 20 62 65 67 66 | 6c 61 67 25 3d a3 3a 65 |... begf|lag%=.:e|
|000029a0| 6e 64 66 6c 61 67 25 3d | a3 0d 0f 00 06 20 f5 0d |ndflag%=|..... ..|
|000029b0| 0f 0a 1c 20 20 f5 20 c8 | 97 20 6d 78 25 2c 6d 79 |... . .|. mx%,my|
|000029c0| 25 2c 62 25 3a fd 20 62 | 25 3d 34 0d 0f 14 16 20 |%,b%:. b|%=4.... |
|000029d0| 20 e7 20 6e 25 3c 73 65 | 67 6d 65 6e 74 73 25 20 | . n%<se|gments% |
|000029e0| 8c 0d 0f 1e 5e 20 20 20 | e7 20 94 28 6d 78 25 2d |....^ |. .(mx%-|
|000029f0| 78 73 74 61 72 74 25 29 | 3c 32 35 20 80 20 94 28 |xstart%)|<25 . .(|
|00002a00| 6d 79 25 2d 79 73 74 61 | 72 74 25 29 3c 32 35 20 |my%-ysta|rt%)<25 |
|00002a10| 8c 20 78 28 6e 25 2c 30 | 29 3d 78 73 74 61 72 74 |. x(n%,0|)=xstart|
|00002a20| 25 3a 79 28 6e 25 2c 30 | 29 3d 79 73 74 61 72 74 |%:y(n%,0|)=ystart|
|00002a30| 25 3a 62 65 67 66 6c 61 | 67 25 3d b9 3a ef 37 0d |%:begfla|g%=.:.7.|
|00002a40| 0f 28 62 20 20 20 e7 20 | 94 28 6d 78 25 2d 78 66 |.(b . |.(mx%-xf|
|00002a50| 69 6e 69 73 68 25 29 3c | 32 35 20 80 20 94 28 6d |inish%)<|25 . .(m|
|00002a60| 79 25 2d 79 66 69 6e 69 | 73 68 25 29 3c 32 35 20 |y%-yfini|sh%)<25 |
|00002a70| 8c 20 78 28 6e 25 2c 30 | 29 3d 78 66 69 6e 69 73 |. x(n%,0|)=xfinis|
|00002a80| 68 25 3a 79 28 6e 25 2c | 30 29 3d 79 66 69 6e 69 |h%:y(n%,|0)=yfini|
|00002a90| 73 68 25 3a 62 65 67 66 | 6c 61 67 25 3d b9 3a ef |sh%:begf|lag%=.:.|
|00002aa0| 37 0d 0f 32 2d 20 20 cc | 20 78 28 6e 25 2c 30 29 |7..2- .| x(n%,0)|
|00002ab0| 3d 6d 78 25 3a 79 28 6e | 25 2c 30 29 3d 6d 79 25 |=mx%:y(n|%,0)=my%|
|00002ac0| 3a 62 65 67 66 6c 61 67 | 25 3d b9 3a ef 37 0d 0f |:begflag|%=.:.7..|
|00002ad0| 3c 07 20 20 cd 0d 0f 46 | 0f 20 fd 20 62 65 67 66 |<. ...F|. . begf|
|00002ae0| 6c 61 67 25 0d 0f 50 2e | 20 e6 20 33 2c 31 35 3a |lag%..P.| . 3,15:|
|00002af0| c8 93 20 c8 90 20 78 28 | 6e 25 2c 30 29 2d 35 2c |.. .. x(|n%,0)-5,|
|00002b00| 79 28 6e 25 2c 30 29 2d | 35 2c 31 30 3a e6 20 33 |y(n%,0)-|5,10:. 3|
|00002b10| 2c 37 0d 0f 5a 1b 20 f5 | 20 c8 97 20 6d 78 25 2c |,7..Z. .| .. mx%,|
|00002b20| 6d 79 25 2c 62 25 3a fd | 20 62 25 3d 30 0d 0f 64 |my%,b%:.| b%=0..d|
|00002b30| 0a 20 70 25 2b 3d 33 0d | 0f 6e 06 20 f5 0d 0f 78 |. p%+=3.|.n. ...x|
|00002b40| 1c 20 20 f5 20 c8 97 20 | 6d 78 25 2c 6d 79 25 2c |. . .. |mx%,my%,|
|00002b50| 62 25 3a fd 20 62 25 3d | 30 0d 0f 82 15 20 20 f5 |b%:. b%=|0.... .|
|00002b60| 20 c8 97 20 6d 78 25 2c | 6d 79 25 2c 62 25 0d 0f | .. mx%,|my%,b%..|
|00002b70| 8c 2c 20 20 20 e6 20 33 | 2c 33 3a 86 20 78 28 6e |., . 3|,3:. x(n|
|00002b80| 25 2c 70 25 2d 33 29 2c | 79 28 6e 25 2c 70 25 2d |%,p%-3),|y(n%,p%-|
|00002b90| 33 29 2c 6d 78 25 2c 6d | 79 25 0d 0f 96 2f 20 20 |3),mx%,m|y%.../ |
|00002ba0| 20 c8 96 3a e6 20 33 2c | 33 3a 86 20 78 28 6e 25 | ..:. 3,|3:. x(n%|
|00002bb0| 2c 70 25 2d 33 29 2c 79 | 28 6e 25 2c 70 25 2d 33 |,p%-3),y|(n%,p%-3|
|00002bc0| 29 2c 6d 78 25 2c 6d 79 | 25 0d 0f a0 13 20 20 fd |),mx%,my|%.... .|
|00002bd0| 20 62 25 3d 34 20 84 20 | 62 25 3d 31 0d 0f aa 1f | b%=4 . |b%=1....|
|00002be0| 20 20 78 28 6e 25 2c 70 | 25 29 3d 6d 78 25 3a 79 | x(n%,p|%)=mx%:y|
|00002bf0| 28 6e 25 2c 70 25 29 3d | 6d 79 25 0d 0f b4 16 20 |(n%,p%)=|my%.... |
|00002c00| 20 e7 20 6e 25 3c 73 65 | 67 6d 65 6e 74 73 25 20 | . n%<se|gments% |
|00002c10| 8c 0d 0f be 8f 20 20 20 | e7 20 94 28 78 28 6e 25 |..... |. .(x(n%|
|00002c20| 2c 70 25 29 2d 78 66 69 | 6e 69 73 68 25 29 3c 31 |,p%)-xfi|nish%)<1|
|00002c30| 30 20 80 20 94 28 79 28 | 6e 25 2c 70 25 29 2d 79 |0 . .(y(|n%,p%)-y|
|00002c40| 66 69 6e 69 73 68 25 29 | 3c 31 30 20 80 20 78 28 |finish%)|<10 . x(|
|00002c50| 6e 25 2c 30 29 3d 78 73 | 74 61 72 74 25 20 80 20 |n%,0)=xs|tart% . |
|00002c60| 79 28 6e 25 2c 30 29 3d | 79 73 74 61 72 74 25 20 |y(n%,0)=|ystart% |
|00002c70| 8c 20 78 28 6e 25 2c 70 | 25 29 3d 78 66 69 6e 69 |. x(n%,p|%)=xfini|
|00002c80| 73 68 25 3a 79 28 6e 25 | 2c 70 25 29 3d 79 66 69 |sh%:y(n%|,p%)=yfi|
|00002c90| 6e 69 73 68 25 3a 65 6e | 64 66 6c 61 67 25 3d b9 |nish%:en|dflag%=.|
|00002ca0| 0d 0f c8 8d 20 20 20 e7 | 20 94 28 78 28 6e 25 2c |.... .| .(x(n%,|
|00002cb0| 70 25 29 2d 78 73 74 61 | 72 74 25 29 3c 31 30 20 |p%)-xsta|rt%)<10 |
|00002cc0| 80 20 94 28 79 28 6e 25 | 2c 70 25 29 2d 79 73 74 |. .(y(n%|,p%)-yst|
|00002cd0| 61 72 74 25 29 3c 31 30 | 20 80 20 78 28 6e 25 2c |art%)<10| . x(n%,|
|00002ce0| 30 29 3d 78 66 69 6e 69 | 73 68 25 20 80 20 79 28 |0)=xfini|sh% . y(|
|00002cf0| 6e 25 2c 30 29 3d 79 66 | 69 6e 69 73 68 25 20 8c |n%,0)=yf|inish% .|
|00002d00| 20 78 28 6e 25 2c 70 25 | 29 3d 78 73 74 61 72 74 | x(n%,p%|)=xstart|
|00002d10| 25 3a 79 28 6e 25 2c 70 | 25 29 3d 79 73 74 61 72 |%:y(n%,p|%)=ystar|
|00002d20| 74 25 3a 65 6e 64 66 6c | 61 67 25 3d b9 0d 0f d2 |t%:endfl|ag%=....|
|00002d30| 07 20 20 cd 0d 0f dc 2b | 20 20 e6 20 33 2c 31 35 |. ....+| . 3,15|
|00002d40| 3a c8 93 20 c8 90 20 78 | 28 6e 25 2c 70 25 29 2d |:.. .. x|(n%,p%)-|
|00002d50| 35 2c 79 28 6e 25 2c 70 | 25 29 2d 35 2c 31 30 0d |5,y(n%,p|%)-5,10.|
|00002d60| 0f e6 35 20 20 e6 20 33 | 2c 33 3a 86 20 78 28 6e |..5 . 3|,3:. x(n|
|00002d70| 25 2c 70 25 29 2c 79 28 | 6e 25 2c 70 25 29 2c 78 |%,p%),y(|n%,p%),x|
|00002d80| 28 6e 25 2c 70 25 2d 33 | 29 2c 79 28 6e 25 2c 70 |(n%,p%-3|),y(n%,p|
|00002d90| 25 2d 33 29 0d 0f f0 45 | 20 20 78 74 68 69 72 64 |%-3)...E| xthird|
|00002da0| 25 3d 28 78 28 6e 25 2c | 70 25 29 2d 78 28 6e 25 |%=(x(n%,|p%)-x(n%|
|00002db0| 2c 70 25 2d 33 29 29 2f | 33 3a 79 74 68 69 72 64 |,p%-3))/|3:ythird|
|00002dc0| 25 3d 28 79 28 6e 25 2c | 70 25 29 2d 79 28 6e 25 |%=(y(n%,|p%)-y(n%|
|00002dd0| 2c 70 25 2d 33 29 29 2f | 33 0d 0f fa 3d 20 20 78 |,p%-3))/|3...= x|
|00002de0| 28 6e 25 2c 70 25 2d 31 | 29 3d 78 28 6e 25 2c 70 |(n%,p%-1|)=x(n%,p|
|00002df0| 25 29 2d 78 74 68 69 72 | 64 25 3a 79 28 6e 25 2c |%)-xthir|d%:y(n%,|
|00002e00| 70 25 2d 31 29 3d 79 28 | 6e 25 2c 70 25 29 2d 79 |p%-1)=y(|n%,p%)-y|
|00002e10| 74 68 69 72 64 25 0d 10 | 04 41 20 20 78 28 6e 25 |third%..|.A x(n%|
|00002e20| 2c 70 25 2d 32 29 3d 78 | 28 6e 25 2c 70 25 29 2d |,p%-2)=x|(n%,p%)-|
|00002e30| 32 2a 78 74 68 69 72 64 | 25 3a 79 28 6e 25 2c 70 |2*xthird|%:y(n%,p|
|00002e40| 25 2d 32 29 3d 79 28 6e | 25 2c 70 25 29 2d 32 2a |%-2)=y(n|%,p%)-2*|
|00002e50| 79 74 68 69 72 64 25 0d | 10 0e 0b 20 20 70 25 2b |ythird%.|... p%+|
|00002e60| 3d 33 0d 10 18 18 20 fd | 20 65 6e 64 66 6c 61 67 |=3.... .| endflag|
|00002e70| 25 20 84 20 a6 28 2d 31 | 32 29 0d 10 22 15 20 e7 |% . .(-1|2)..". .|
|00002e80| 20 6e 25 3c 73 65 67 6d | 65 6e 74 73 25 20 8c 0d | n%<segm|ents% ..|
|00002e90| 10 2c 14 20 20 70 6d 61 | 78 25 28 6e 25 29 3d 70 |.,. pma|x%(n%)=p|
|00002ea0| 25 2d 33 0d 10 36 06 20 | cc 0d 10 40 14 20 20 70 |%-3..6. |...@. p|
|00002eb0| 6d 61 78 25 28 6e 25 29 | 3d 70 25 2d 36 0d 10 4a |max%(n%)|=p%-6..J|
|00002ec0| 2f 20 20 e6 20 33 2c 31 | 35 3a c8 93 20 c8 90 20 |/ . 3,1|5:.. .. |
|00002ed0| 78 28 6e 25 2c 70 25 2d | 33 29 2d 35 2c 79 28 6e |x(n%,p%-|3)-5,y(n|
|00002ee0| 25 2c 70 25 2d 33 29 2d | 35 2c 31 30 0d 10 54 39 |%,p%-3)-|5,10..T9|
|00002ef0| 20 20 e6 20 33 2c 33 3a | 86 20 78 28 6e 25 2c 70 | . 3,3:|. x(n%,p|
|00002f00| 25 2d 33 29 2c 79 28 6e | 25 2c 70 25 2d 33 29 2c |%-3),y(n|%,p%-3),|
|00002f10| 78 28 6e 25 2c 70 25 2d | 36 29 2c 79 28 6e 25 2c |x(n%,p%-|6),y(n%,|
|00002f20| 70 25 2d 36 29 0d 10 5e | 06 20 cd 0d 10 68 1b 20 |p%-6)..^|. ...h. |
|00002f30| e3 20 71 25 3d 30 20 b8 | 20 70 6d 61 78 25 28 6e |. q%=0 .| pmax%(n|
|00002f40| 25 29 20 88 20 33 0d 10 | 72 2b 20 20 e6 20 33 2c |%) . 3..|r+ . 3,|
|00002f50| 31 35 3a c8 93 20 c8 90 | 20 78 28 6e 25 2c 71 25 |15:.. ..| x(n%,q%|
|00002f60| 29 2d 35 2c 79 28 6e 25 | 2c 71 25 29 2d 35 2c 31 |)-5,y(n%|,q%)-5,1|
|00002f70| 30 0d 10 7c 46 20 20 e7 | 20 71 25 3c 70 6d 61 78 |0..|F .| q%<pmax|
|00002f80| 25 28 6e 25 29 20 8c 20 | e6 20 33 2c 33 3a 86 20 |%(n%) . |. 3,3:. |
|00002f90| 78 28 6e 25 2c 71 25 29 | 2c 79 28 6e 25 2c 71 25 |x(n%,q%)|,y(n%,q%|
|00002fa0| 29 2c 78 28 6e 25 2c 71 | 25 2b 33 29 2c 79 28 6e |),x(n%,q|%+3),y(n|
|00002fb0| 25 2c 71 25 2b 33 29 0d | 10 86 06 20 ed 0d 10 90 |%,q%+3).|... ....|
|00002fc0| 28 20 e6 20 33 2c 31 35 | 3a c8 93 20 c8 90 20 78 |( . 3,15|:.. .. x|
|00002fd0| 28 6e 25 2c 30 29 2d 35 | 2c 79 28 6e 25 2c 30 29 |(n%,0)-5|,y(n%,0)|
|00002fe0| 2d 35 2c 31 30 0d 10 9a | 21 20 e3 20 73 74 61 72 |-5,10...|! . star|
|00002ff0| 74 25 3d 30 20 b8 20 70 | 6d 61 78 25 28 6e 25 29 |t%=0 . p|max%(n%)|
|00003000| 2d 33 20 88 20 33 0d 10 | a4 1c 20 20 e3 20 69 25 |-3 . 3..|.. . i%|
|00003010| 3d 73 74 61 72 74 25 20 | b8 20 73 74 61 72 74 25 |=start% |. start%|
|00003020| 2b 33 0d 10 ae 38 20 20 | 20 50 28 69 25 2d 73 74 |+3...8 | P(i%-st|
|00003030| 61 72 74 25 2c 78 25 29 | 3d 78 28 6e 25 2c 69 25 |art%,x%)|=x(n%,i%|
|00003040| 29 3a 50 28 69 25 2d 73 | 74 61 72 74 25 2c 79 25 |):P(i%-s|tart%,y%|
|00003050| 29 3d 79 28 6e 25 2c 69 | 25 29 0d 10 b8 07 20 20 |)=y(n%,i|%).... |
|00003060| ed 0d 10 c2 29 20 20 e6 | 20 33 2c 31 35 3a c8 93 |....) .| 3,15:..|
|00003070| 20 c8 90 20 50 28 33 2c | 78 25 29 2d 35 2c 50 28 | .. P(3,|x%)-5,P(|
|00003080| 33 2c 79 25 29 2d 35 2c | 31 30 0d 10 cc 29 20 20 |3,y%)-5,|10...) |
|00003090| e6 20 33 2c 31 34 3a c8 | 93 20 c8 90 20 50 28 31 |. 3,14:.|. .. P(1|
|000030a0| 2c 78 25 29 2d 35 2c 50 | 28 31 2c 79 25 29 2d 35 |,x%)-5,P|(1,y%)-5|
|000030b0| 2c 31 30 0d 10 d6 2c 20 | 20 20 20 20 20 20 20 20 |,10..., | |
|000030c0| 20 20 20 c8 93 20 c8 90 | 20 50 28 32 2c 78 25 29 | .. ..| P(2,x%)|
|000030d0| 2d 35 2c 50 28 32 2c 79 | 25 29 2d 35 2c 31 30 0d |-5,P(2,y|%)-5,10.|
|000030e0| 10 e0 16 20 20 e7 20 6e | 25 3c 73 65 67 6d 65 6e |... . n|%<segmen|
|000030f0| 74 73 25 20 8c 0d 10 ea | 1f 20 20 20 e6 20 33 2c |ts% ....|. . 3,|
|00003100| 33 3a f2 74 77 6f 62 65 | 7a 69 65 72 73 28 50 28 |3:.twobe|ziers(P(|
|00003110| 29 2c 33 29 0d 10 f4 07 | 20 20 cc 0d 10 fe 20 20 |),3)....| .... |
|00003120| 20 20 e6 20 33 2c 33 3a | f2 62 65 7a 69 65 72 63 | . 3,3:|.bezierc|
|00003130| 75 72 76 65 28 50 28 29 | 2c 33 29 0d 11 08 07 20 |urve(P()|,3).... |
|00003140| 20 cd 0d 11 12 27 20 20 | 86 20 50 28 30 2c 78 25 | ....' |. P(0,x%|
|00003150| 29 2c 50 28 30 2c 79 25 | 29 2c 50 28 31 2c 78 25 |),P(0,y%|),P(1,x%|
|00003160| 29 2c 50 28 31 2c 79 25 | 29 0d 11 1c 27 20 20 86 |),P(1,y%|)...' .|
|00003170| 20 50 28 33 2c 78 25 29 | 2c 50 28 33 2c 79 25 29 | P(3,x%)|,P(3,y%)|
|00003180| 2c 50 28 32 2c 78 25 29 | 2c 50 28 32 2c 79 25 29 |,P(2,x%)|,P(2,y%)|
|00003190| 0d 11 26 06 20 ed 0d 11 | 30 1b 20 f5 20 c8 97 20 |..&. ...|0. . .. |
|000031a0| 6d 78 25 2c 6d 79 25 2c | 62 25 3a fd 20 62 25 3d |mx%,my%,|b%:. b%=|
|000031b0| 30 0d 11 3a 05 e1 0d 11 | 44 33 3a 2d 2d 2d 2d 2d |0..:....|D3:-----|
|000031c0| 2d 2d 2d 2d 2d 2d 2d 2d | 20 f4 20 53 68 61 70 65 |--------| . Shape|
|000031d0| 20 53 65 67 6d 65 6e 74 | 20 2d 2d 2d 2d 2d 2d 2d | Segment| -------|
|000031e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 11 4e 13 dd 20 f2 |--------|-..N.. .|
|000031f0| 73 68 61 70 65 73 65 67 | 6d 65 6e 74 0d 11 58 0a |shapeseg|ment..X.|
|00003200| 20 73 25 3d 2d 32 0d 11 | 62 06 20 f5 0d 11 6c 0f | s%=-2..|b. ...l.|
|00003210| 20 20 e7 20 73 25 3e 2d | 32 20 8c 0d 11 76 1d 20 | . s%>-|2 ...v. |
|00003220| 20 20 f5 20 c8 97 20 6d | 78 25 2c 6d 79 25 2c 62 | . .. m|x%,my%,b|
|00003230| 25 3a fd 20 62 25 3d 30 | 0d 11 80 24 20 20 20 f5 |%:. b%=0|...$ .|
|00003240| 20 c8 97 20 6d 78 25 2c | 6d 79 25 2c 62 25 3a fd | .. mx%,|my%,b%:.|
|00003250| 20 62 25 3d 31 20 84 20 | 62 25 3d 34 0d 11 8a 07 | b%=1 . |b%=4....|
|00003260| 20 20 cd 0d 11 94 23 20 | 20 f5 20 c8 97 20 6d 78 | ....# | . .. mx|
|00003270| 25 2c 6d 79 25 2c 62 25 | 3a fd 20 62 25 3d 31 20 |%,my%,b%|:. b%=1 |
|00003280| 84 20 62 25 3d 34 0d 11 | 9e 0e 20 20 e7 20 62 25 |. b%=4..|.. . b%|
|00003290| 3d 31 20 8c 0d 11 a8 1d | 20 20 20 73 25 3d 2d 31 |=1 .....| s%=-1|
|000032a0| 3a 73 65 6c 65 63 74 69 | 6f 6e 6d 61 64 65 25 3d |:selecti|onmade%=|
|000032b0| a3 0d 11 b2 08 20 20 20 | f5 0d 11 bc 0d 20 20 20 |..... |..... |
|000032c0| 20 73 25 2b 3d 31 0d 11 | c6 43 20 20 20 20 e7 20 | s%+=1..|.C . |
|000032d0| a4 70 6f 73 69 74 69 6f | 6e 28 6d 78 25 2c 6d 79 |.positio|n(mx%,my|
|000032e0| 25 2c 78 28 6e 25 2c 73 | 25 29 2c 79 28 6e 25 2c |%,x(n%,s|%),y(n%,|
|000032f0| 73 25 29 2c 38 29 20 8c | 20 73 65 6c 65 63 74 69 |s%),8) .| selecti|
|00003300| 6f 6e 6d 61 64 65 25 3d | b9 0d 11 d0 29 20 20 20 |onmade%=|....) |
|00003310| 20 e7 20 73 25 3d 70 6d | 61 78 25 28 6e 25 29 2b | . s%=pm|ax%(n%)+|
|00003320| 31 3a 73 65 6c 65 63 74 | 69 6f 6e 6d 61 64 65 25 |1:select|ionmade%|
|00003330| 3d b9 0d 11 da 17 20 20 | 20 fd 20 73 65 6c 65 63 |=..... | . selec|
|00003340| 74 69 6f 6e 6d 61 64 65 | 25 0d 11 e4 1f 20 20 20 |tionmade|%.... |
|00003350| e7 20 73 25 3d 70 6d 61 | 78 25 28 6e 25 29 2b 31 |. s%=pma|x%(n%)+1|
|00003360| 20 8c 20 73 25 3d 2d 31 | 0d 11 ee 10 20 20 20 c8 | . s%=-1|.... .|
|00003370| 8e 20 73 25 83 33 20 ca | 0d 11 f8 18 20 20 20 20 |. s%.3 .|.... |
|00003380| c9 20 30 20 3a f2 73 68 | 61 70 65 5f 6a 6f 69 6e |. 0 :.sh|ape_join|
|00003390| 0d 12 02 18 20 20 20 20 | c9 20 31 20 3a f2 73 68 |.... |. 1 :.sh|
|000033a0| 61 70 65 5f 70 6c 75 73 | 0d 12 0c 19 20 20 20 20 |ape_plus|.... |
|000033b0| c9 20 32 20 3a f2 73 68 | 61 70 65 5f 6d 69 6e 75 |. 2 :.sh|ape_minu|
|000033c0| 73 0d 12 16 08 20 20 20 | cb 0d 12 20 07 20 20 cd |s.... |... . .|
|000033d0| 0d 12 2a 0b 20 fd 20 62 | 25 3d 34 0d 12 34 09 20 |..*. . b|%=4..4. |
|000033e0| f2 66 69 78 0d 12 3e 05 | e1 0d 12 48 05 3a 0d 12 |.fix..>.|...H.:..|
|000033f0| 52 11 dd 20 f2 73 68 61 | 70 65 5f 70 6c 75 73 0d |R.. .sha|pe_plus.|
|00003400| 12 5c 13 20 73 74 61 72 | 74 25 3d 73 25 2d 73 25 |.\. star|t%=s%-s%|
|00003410| 83 33 0d 12 66 1b 20 e3 | 20 69 25 3d 73 74 61 72 |.3..f. .| i%=star|
|00003420| 74 25 20 b8 20 73 74 61 | 72 74 25 2b 33 0d 12 70 |t% . sta|rt%+3..p|
|00003430| 37 20 20 50 28 69 25 2d | 73 74 61 72 74 25 2c 78 |7 P(i%-|start%,x|
|00003440| 25 29 3d 78 28 6e 25 2c | 69 25 29 3a 50 28 69 25 |%)=x(n%,|i%):P(i%|
|00003450| 2d 73 74 61 72 74 25 2c | 79 25 29 3d 79 28 6e 25 |-start%,|y%)=y(n%|
|00003460| 2c 69 25 29 0d 12 7a 06 | 20 ed 0d 12 84 14 20 f5 |,i%)..z.| ..... .|
|00003470| 20 c8 97 20 6d 78 25 2c | 6d 79 25 2c 62 25 0d 12 | .. mx%,|my%,b%..|
|00003480| 8e 19 20 20 f2 72 65 66 | 6c 69 6e 65 73 5f 70 6c |.. .ref|lines_pl|
|00003490| 75 73 28 50 28 29 29 0d | 12 98 18 20 20 f2 74 77 |us(P()).|... .tw|
|000034a0| 6f 62 65 7a 69 65 72 73 | 28 50 28 29 2c 33 29 0d |obeziers|(P(),3).|
|000034b0| 12 a2 1d 20 20 50 28 31 | 2c 78 25 29 3d 6d 78 25 |... P(1|,x%)=mx%|
|000034c0| 3a 50 28 31 2c 79 25 29 | 3d 6d 79 25 0d 12 ac 19 |:P(1,y%)|=my%....|
|000034d0| 20 20 f2 72 65 66 6c 69 | 6e 65 73 5f 70 6c 75 73 | .refli|nes_plus|
|000034e0| 28 50 28 29 29 0d 12 b6 | 18 20 20 f2 74 77 6f 62 |(P())...|. .twob|
|000034f0| 65 7a 69 65 72 73 28 50 | 28 29 2c 33 29 0d 12 c0 |eziers(P|(),3)...|
|00003500| 0b 20 fd 20 62 25 3d 30 | 0d 12 ca 1e 20 78 28 6e |. . b%=0|.... x(n|
|00003510| 25 2c 73 25 29 3d 6d 78 | 25 3a 79 28 6e 25 2c 73 |%,s%)=mx|%:y(n%,s|
|00003520| 25 29 3d 6d 79 25 0d 12 | d4 05 e1 0d 12 de 05 3a |%)=my%..|.......:|
|00003530| 0d 12 e8 19 dd 20 f2 72 | 65 66 6c 69 6e 65 73 5f |..... .r|eflines_|
|00003540| 70 6c 75 73 28 50 28 29 | 29 0d 12 f2 29 20 20 e6 |plus(P()|)...) .|
|00003550| 20 33 2c 31 35 3a c8 93 | 20 c8 90 20 50 28 30 2c | 3,15:..| .. P(0,|
|00003560| 78 25 29 2d 35 2c 50 28 | 30 2c 79 25 29 2d 35 2c |x%)-5,P(|0,y%)-5,|
|00003570| 31 30 0d 12 fc 29 20 20 | e6 20 33 2c 31 34 3a c8 |10...) |. 3,14:.|
|00003580| 93 20 c8 90 20 50 28 31 | 2c 78 25 29 2d 35 2c 50 |. .. P(1|,x%)-5,P|
|00003590| 28 31 2c 79 25 29 2d 35 | 2c 31 30 0d 13 06 2d 20 |(1,y%)-5|,10...- |
|000035a0| 20 e6 20 33 2c 33 3a 86 | 20 50 28 30 2c 78 25 29 | . 3,3:.| P(0,x%)|
|000035b0| 2c 50 28 30 2c 79 25 29 | 2c 50 28 31 2c 78 25 29 |,P(0,y%)|,P(1,x%)|
|000035c0| 2c 50 28 31 2c 79 25 29 | 0d 13 10 05 e1 0d 13 1a |,P(1,y%)|........|
|000035d0| 05 3a 0d 13 24 12 dd 20 | f2 73 68 61 70 65 5f 6d |.:..$.. |.shape_m|
|000035e0| 69 6e 75 73 0d 13 2e 13 | 20 73 74 61 72 74 25 3d |inus....| start%=|
|000035f0| 73 25 2d 73 25 83 33 0d | 13 38 1b 20 e3 20 69 25 |s%-s%.3.|.8. . i%|
|00003600| 3d 73 74 61 72 74 25 20 | b8 20 73 74 61 72 74 25 |=start% |. start%|
|00003610| 2b 33 0d 13 42 37 20 20 | 50 28 69 25 2d 73 74 61 |+3..B7 |P(i%-sta|
|00003620| 72 74 25 2c 78 25 29 3d | 78 28 6e 25 2c 69 25 29 |rt%,x%)=|x(n%,i%)|
|00003630| 3a 50 28 69 25 2d 73 74 | 61 72 74 25 2c 79 25 29 |:P(i%-st|art%,y%)|
|00003640| 3d 79 28 6e 25 2c 69 25 | 29 0d 13 4c 06 20 ed 0d |=y(n%,i%|)..L. ..|
|00003650| 13 56 14 20 f5 20 c8 97 | 20 6d 78 25 2c 6d 79 25 |.V. . ..| mx%,my%|
|00003660| 2c 62 25 0d 13 60 1a 20 | 20 f2 72 65 66 6c 69 6e |,b%..`. | .reflin|
|00003670| 65 73 5f 6d 69 6e 75 73 | 28 50 28 29 29 0d 13 6a |es_minus|(P())..j|
|00003680| 18 20 20 f2 74 77 6f 62 | 65 7a 69 65 72 73 28 50 |. .twob|eziers(P|
|00003690| 28 29 2c 33 29 0d 13 74 | 1d 20 20 50 28 32 2c 78 |(),3)..t|. P(2,x|
|000036a0| 25 29 3d 6d 78 25 3a 50 | 28 32 2c 79 25 29 3d 6d |%)=mx%:P|(2,y%)=m|
|000036b0| 79 25 0d 13 7e 1a 20 20 | f2 72 65 66 6c 69 6e 65 |y%..~. |.refline|
|000036c0| 73 5f 6d 69 6e 75 73 28 | 50 28 29 29 0d 13 88 18 |s_minus(|P())....|
|000036d0| 20 20 f2 74 77 6f 62 65 | 7a 69 65 72 73 28 50 28 | .twobe|ziers(P(|
|000036e0| 29 2c 33 29 0d 13 92 0b | 20 fd 20 62 25 3d 30 0d |),3)....| . b%=0.|
|000036f0| 13 9c 1e 20 78 28 6e 25 | 2c 73 25 29 3d 6d 78 25 |... x(n%|,s%)=mx%|
|00003700| 3a 79 28 6e 25 2c 73 25 | 29 3d 6d 79 25 0d 13 a6 |:y(n%,s%|)=my%...|
|00003710| 05 e1 0d 13 b0 05 3a 0d | 13 ba 1a dd 20 f2 72 65 |......:.|.... .re|
|00003720| 66 6c 69 6e 65 73 5f 6d | 69 6e 75 73 28 50 28 29 |flines_m|inus(P()|
|00003730| 29 0d 13 c4 29 20 20 e6 | 20 33 2c 31 35 3a c8 93 |)...) .| 3,15:..|
|00003740| 20 c8 90 20 50 28 33 2c | 78 25 29 2d 35 2c 50 28 | .. P(3,|x%)-5,P(|
|00003750| 33 2c 79 25 29 2d 35 2c | 31 30 0d 13 ce 29 20 20 |3,y%)-5,|10...) |
|00003760| e6 20 33 2c 31 34 3a c8 | 93 20 c8 90 20 50 28 32 |. 3,14:.|. .. P(2|
|00003770| 2c 78 25 29 2d 35 2c 50 | 28 32 2c 79 25 29 2d 35 |,x%)-5,P|(2,y%)-5|
|00003780| 2c 31 30 0d 13 d8 2d 20 | 20 e6 20 33 2c 33 3a 86 |,10...- | . 3,3:.|
|00003790| 20 50 28 33 2c 78 25 29 | 2c 50 28 33 2c 79 25 29 | P(3,x%)|,P(3,y%)|
|000037a0| 2c 50 28 32 2c 78 25 29 | 2c 50 28 32 2c 79 25 29 |,P(2,x%)|,P(2,y%)|
|000037b0| 0d 13 e2 05 e1 0d 13 ec | 05 3a 0d 13 f6 11 dd 20 |........|.:..... |
|000037c0| f2 73 68 61 70 65 5f 6a | 6f 69 6e 0d 14 00 1e 20 |.shape_j|oin.... |
|000037d0| e7 20 6e 25 3c 73 65 67 | 6d 65 6e 74 73 25 20 80 |. n%<seg|ments% .|
|000037e0| 20 73 25 3d 30 20 8c 20 | e1 0d 14 0a 26 20 e7 20 | s%=0 . |....& . |
|000037f0| 6e 25 3c 73 65 67 6d 65 | 6e 74 73 25 20 80 20 73 |n%<segme|nts% . s|
|00003800| 25 3d 70 6d 61 78 25 28 | 6e 25 29 20 8c 20 e1 0d |%=pmax%(|n%) . ..|
|00003810| 14 14 2c 20 e7 20 6e 25 | 3e 3d 73 65 67 6d 65 6e |.., . n%|>=segmen|
|00003820| 74 73 25 20 80 20 73 25 | 3d 30 20 8c 20 f2 73 68 |ts% . s%|=0 . .sh|
|00003830| 61 70 65 5f 73 74 61 72 | 74 3a e1 0d 14 1e 32 20 |ape_star|t:....2 |
|00003840| e7 20 6e 25 3e 3d 73 65 | 67 6d 65 6e 74 73 25 20 |. n%>=se|gments% |
|00003850| 80 20 73 25 3d 70 6d 61 | 78 25 28 6e 25 29 20 8c |. s%=pma|x%(n%) .|
|00003860| 20 f2 73 68 61 70 65 5f | 65 6e 64 3a e1 0d 14 28 | .shape_|end:...(|
|00003870| 0f 20 73 74 61 72 74 31 | 25 3d 73 25 0d 14 32 1d |. start1|%=s%..2.|
|00003880| 20 e3 20 69 25 3d 73 74 | 61 72 74 31 25 20 b8 20 | . i%=st|art1% . |
|00003890| 73 74 61 72 74 31 25 2b | 33 0d 14 3c 39 20 20 50 |start1%+|3..<9 P|
|000038a0| 28 69 25 2d 73 74 61 72 | 74 31 25 2c 78 25 29 3d |(i%-star|t1%,x%)=|
|000038b0| 78 28 6e 25 2c 69 25 29 | 3a 50 28 69 25 2d 73 74 |x(n%,i%)|:P(i%-st|
|000038c0| 61 72 74 31 25 2c 79 25 | 29 3d 79 28 6e 25 2c 69 |art1%,y%|)=y(n%,i|
|000038d0| 25 29 0d 14 46 06 20 ed | 0d 14 50 11 20 73 74 61 |%)..F. .|..P. sta|
|000038e0| 72 74 30 25 3d 73 25 2d | 33 0d 14 5a 1d 20 e3 20 |rt0%=s%-|3..Z. . |
|000038f0| 6a 25 3d 73 74 61 72 74 | 30 25 20 b8 20 73 74 61 |j%=start|0% . sta|
|00003900| 72 74 30 25 2b 33 0d 14 | 64 39 20 20 4e 28 6a 25 |rt0%+3..|d9 N(j%|
|00003910| 2d 73 74 61 72 74 30 25 | 2c 78 25 29 3d 78 28 6e |-start0%|,x%)=x(n|
|00003920| 25 2c 6a 25 29 3a 4e 28 | 6a 25 2d 73 74 61 72 74 |%,j%):N(|j%-start|
|00003930| 30 25 2c 79 25 29 3d 79 | 28 6e 25 2c 6a 25 29 0d |0%,y%)=y|(n%,j%).|
|00003940| 14 6e 06 20 ed 0d 14 78 | 14 20 f5 20 c8 97 20 6d |.n. ...x|. . .. m|
|00003950| 78 25 2c 6d 79 25 2c 62 | 25 0d 14 82 29 20 20 e6 |x%,my%,b|%...) .|
|00003960| 20 33 2c 31 35 3a c8 93 | 20 c8 90 20 50 28 30 2c | 3,15:..| .. P(0,|
|00003970| 78 25 29 2d 35 2c 50 28 | 30 2c 79 25 29 2d 35 2c |x%)-5,P(|0,y%)-5,|
|00003980| 31 30 0d 14 8c 19 20 20 | f2 72 65 66 6c 69 6e 65 |10.... |.refline|
|00003990| 73 5f 70 6c 75 73 28 50 | 28 29 29 0d 14 96 18 20 |s_plus(P|()).... |
|000039a0| 20 f2 74 77 6f 62 65 7a | 69 65 72 73 28 50 28 29 | .twobez|iers(P()|
|000039b0| 2c 33 29 0d 14 a0 1a 20 | 20 f2 72 65 66 6c 69 6e |,3).... | .reflin|
|000039c0| 65 73 5f 6d 69 6e 75 73 | 28 4e 28 29 29 0d 14 aa |es_minus|(N())...|
|000039d0| 18 20 20 f2 74 77 6f 62 | 65 7a 69 65 72 73 28 4e |. .twob|eziers(N|
|000039e0| 28 29 2c 33 29 0d 14 b4 | 3d 20 20 50 28 31 2c 78 |(),3)...|= P(1,x|
|000039f0| 25 29 3d 50 28 31 2c 78 | 25 29 2b 6d 78 25 2d 50 |%)=P(1,x|%)+mx%-P|
|00003a00| 28 30 2c 78 25 29 3a 50 | 28 31 2c 79 25 29 3d 50 |(0,x%):P|(1,y%)=P|
|00003a10| 28 31 2c 79 25 29 2b 6d | 79 25 2d 50 28 30 2c 79 |(1,y%)+m|y%-P(0,y|
|00003a20| 25 29 0d 14 be 3d 20 20 | 4e 28 32 2c 78 25 29 3d |%)...= |N(2,x%)=|
|00003a30| 4e 28 32 2c 78 25 29 2b | 6d 78 25 2d 4e 28 33 2c |N(2,x%)+|mx%-N(3,|
|00003a40| 78 25 29 3a 4e 28 32 2c | 79 25 29 3d 4e 28 32 2c |x%):N(2,|y%)=N(2,|
|00003a50| 79 25 29 2b 6d 79 25 2d | 4e 28 33 2c 79 25 29 0d |y%)+my%-|N(3,y%).|
|00003a60| 14 c8 35 20 20 50 28 30 | 2c 78 25 29 3d 6d 78 25 |..5 P(0|,x%)=mx%|
|00003a70| 3a 50 28 30 2c 79 25 29 | 3d 6d 79 25 3a 4e 28 33 |:P(0,y%)|=my%:N(3|
|00003a80| 2c 78 25 29 3d 6d 78 25 | 3a 4e 28 33 2c 79 25 29 |,x%)=mx%|:N(3,y%)|
|00003a90| 3d 6d 79 25 0d 14 d2 29 | 20 20 e6 20 33 2c 31 35 |=my%...)| . 3,15|
|00003aa0| 3a c8 93 20 c8 90 20 50 | 28 30 2c 78 25 29 2d 35 |:.. .. P|(0,x%)-5|
|00003ab0| 2c 50 28 30 2c 79 25 29 | 2d 35 2c 31 30 0d 14 dc |,P(0,y%)|-5,10...|
|00003ac0| 19 20 20 f2 72 65 66 6c | 69 6e 65 73 5f 70 6c 75 |. .refl|ines_plu|
|00003ad0| 73 28 50 28 29 29 0d 14 | e6 18 20 20 f2 74 77 6f |s(P())..|.. .two|
|00003ae0| 62 65 7a 69 65 72 73 28 | 50 28 29 2c 33 29 0d 14 |beziers(|P(),3)..|
|00003af0| f0 1a 20 20 f2 72 65 66 | 6c 69 6e 65 73 5f 6d 69 |.. .ref|lines_mi|
|00003b00| 6e 75 73 28 4e 28 29 29 | 0d 14 fa 18 20 20 f2 74 |nus(N())|.... .t|
|00003b10| 77 6f 62 65 7a 69 65 72 | 73 28 4e 28 29 2c 33 29 |wobezier|s(N(),3)|
|00003b20| 0d 15 04 0b 20 fd 20 62 | 25 3d 30 0d 15 0e 4a 20 |.... . b|%=0...J |
|00003b30| 78 28 6e 25 2c 73 25 2b | 31 29 3d 78 28 6e 25 2c |x(n%,s%+|1)=x(n%,|
|00003b40| 73 25 2b 31 29 2b 6d 78 | 25 2d 78 28 6e 25 2c 73 |s%+1)+mx|%-x(n%,s|
|00003b50| 25 29 3a 79 28 6e 25 2c | 73 25 2b 31 29 3d 79 28 |%):y(n%,|s%+1)=y(|
|00003b60| 6e 25 2c 73 25 2b 31 29 | 2b 6d 79 25 2d 79 28 6e |n%,s%+1)|+my%-y(n|
|00003b70| 25 2c 73 25 29 0d 15 18 | 4a 20 78 28 6e 25 2c 73 |%,s%)...|J x(n%,s|
|00003b80| 25 2d 31 29 3d 78 28 6e | 25 2c 73 25 2d 31 29 2b |%-1)=x(n|%,s%-1)+|
|00003b90| 6d 78 25 2d 78 28 6e 25 | 2c 73 25 29 3a 79 28 6e |mx%-x(n%|,s%):y(n|
|00003ba0| 25 2c 73 25 2d 31 29 3d | 79 28 6e 25 2c 73 25 2d |%,s%-1)=|y(n%,s%-|
|00003bb0| 31 29 2b 6d 79 25 2d 79 | 28 6e 25 2c 73 25 29 0d |1)+my%-y|(n%,s%).|
|00003bc0| 15 22 1e 20 78 28 6e 25 | 2c 73 25 29 3d 6d 78 25 |.". x(n%|,s%)=mx%|
|00003bd0| 3a 79 28 6e 25 2c 73 25 | 29 3d 6d 79 25 0d 15 2c |:y(n%,s%|)=my%..,|
|00003be0| 05 e1 0d 15 36 05 3a 0d | 15 40 12 dd 20 f2 73 68 |....6.:.|.@.. .sh|
|00003bf0| 61 70 65 5f 73 74 61 72 | 74 0d 15 4a 0d 20 73 74 |ape_star|t..J. st|
|00003c00| 61 72 74 25 3d 30 0d 15 | 54 1b 20 e3 20 69 25 3d |art%=0..|T. . i%=|
|00003c10| 73 74 61 72 74 25 20 b8 | 20 73 74 61 72 74 25 2b |start% .| start%+|
|00003c20| 33 0d 15 5e 37 20 20 50 | 28 69 25 2d 73 74 61 72 |3..^7 P|(i%-star|
|00003c30| 74 25 2c 78 25 29 3d 78 | 28 6e 25 2c 69 25 29 3a |t%,x%)=x|(n%,i%):|
|00003c40| 50 28 69 25 2d 73 74 61 | 72 74 25 2c 79 25 29 3d |P(i%-sta|rt%,y%)=|
|00003c50| 79 28 6e 25 2c 69 25 29 | 0d 15 68 06 20 ed 0d 15 |y(n%,i%)|..h. ...|
|00003c60| 72 14 20 f5 20 c8 97 20 | 6d 78 25 2c 6d 79 25 2c |r. . .. |mx%,my%,|
|00003c70| 62 25 0d 15 7c 19 20 20 | f2 72 65 66 6c 69 6e 65 |b%..|. |.refline|
|00003c80| 73 5f 70 6c 75 73 28 50 | 28 29 29 0d 15 86 19 20 |s_plus(P|()).... |
|00003c90| 20 f2 62 65 7a 69 65 72 | 63 75 72 76 65 28 50 28 | .bezier|curve(P(|
|00003ca0| 29 2c 33 29 0d 15 90 1d | 20 20 50 28 30 2c 78 25 |),3)....| P(0,x%|
|00003cb0| 29 3d 6d 78 25 3a 50 28 | 30 2c 79 25 29 3d 6d 79 |)=mx%:P(|0,y%)=my|
|00003cc0| 25 0d 15 9a 19 20 20 f2 | 72 65 66 6c 69 6e 65 73 |%.... .|reflines|
|00003cd0| 5f 70 6c 75 73 28 50 28 | 29 29 0d 15 a4 19 20 20 |_plus(P(|)).... |
|00003ce0| f2 62 65 7a 69 65 72 63 | 75 72 76 65 28 50 28 29 |.bezierc|urve(P()|
|00003cf0| 2c 33 29 0d 15 ae 0b 20 | fd 20 62 25 3d 30 0d 15 |,3).... |. b%=0..|
|00003d00| b8 1e 20 78 28 6e 25 2c | 73 25 29 3d 6d 78 25 3a |.. x(n%,|s%)=mx%:|
|00003d10| 79 28 6e 25 2c 73 25 29 | 3d 6d 79 25 0d 15 c2 05 |y(n%,s%)|=my%....|
|00003d20| e1 0d 15 cc 05 3a 0d 15 | d6 10 dd 20 f2 73 68 61 |.....:..|... .sha|
|00003d30| 70 65 5f 65 6e 64 0d 15 | e0 17 20 73 74 61 72 74 |pe_end..|.. start|
|00003d40| 25 3d 70 6d 61 78 25 28 | 6e 25 29 2d 33 0d 15 ea |%=pmax%(|n%)-3...|
|00003d50| 1b 20 e3 20 69 25 3d 73 | 74 61 72 74 25 20 b8 20 |. . i%=s|tart% . |
|00003d60| 73 74 61 72 74 25 2b 33 | 0d 15 f4 37 20 20 50 28 |start%+3|...7 P(|
|00003d70| 69 25 2d 73 74 61 72 74 | 25 2c 78 25 29 3d 78 28 |i%-start|%,x%)=x(|
|00003d80| 6e 25 2c 69 25 29 3a 50 | 28 69 25 2d 73 74 61 72 |n%,i%):P|(i%-star|
|00003d90| 74 25 2c 79 25 29 3d 79 | 28 6e 25 2c 69 25 29 0d |t%,y%)=y|(n%,i%).|
|00003da0| 15 fe 06 20 ed 0d 16 08 | 14 20 f5 20 c8 97 20 6d |... ....|. . .. m|
|00003db0| 78 25 2c 6d 79 25 2c 62 | 25 0d 16 12 1a 20 20 f2 |x%,my%,b|%.... .|
|00003dc0| 72 65 66 6c 69 6e 65 73 | 5f 6d 69 6e 75 73 28 50 |reflines|_minus(P|
|00003dd0| 28 29 29 0d 16 1c 19 20 | 20 f2 62 65 7a 69 65 72 |()).... | .bezier|
|00003de0| 63 75 72 76 65 28 50 28 | 29 2c 33 29 0d 16 26 1d |curve(P(|),3)..&.|
|00003df0| 20 20 50 28 33 2c 78 25 | 29 3d 6d 78 25 3a 50 28 | P(3,x%|)=mx%:P(|
|00003e00| 33 2c 79 25 29 3d 6d 79 | 25 0d 16 30 1a 20 20 f2 |3,y%)=my|%..0. .|
|00003e10| 72 65 66 6c 69 6e 65 73 | 5f 6d 69 6e 75 73 28 50 |reflines|_minus(P|
|00003e20| 28 29 29 0d 16 3a 19 20 | 20 f2 62 65 7a 69 65 72 |())..:. | .bezier|
|00003e30| 63 75 72 76 65 28 50 28 | 29 2c 33 29 0d 16 44 0b |curve(P(|),3)..D.|
|00003e40| 20 fd 20 62 25 3d 30 0d | 16 4e 1e 20 78 28 6e 25 | . b%=0.|.N. x(n%|
|00003e50| 2c 73 25 29 3d 6d 78 25 | 3a 79 28 6e 25 2c 73 25 |,s%)=mx%|:y(n%,s%|
|00003e60| 29 3d 6d 79 25 0d 16 58 | 05 e1 0d 16 62 05 3a 0d |)=my%..X|....b.:.|
|00003e70| 16 6c 21 dd 20 a4 70 6f | 73 69 74 69 6f 6e 28 61 |.l!. .po|sition(a|
|00003e80| 25 2c 62 25 2c 78 70 25 | 2c 79 70 25 2c 72 25 29 |%,b%,xp%|,yp%,r%)|
|00003e90| 0d 16 76 36 20 e7 20 61 | 25 3c 78 70 25 2b 72 25 |..v6 . a|%<xp%+r%|
|00003ea0| 20 80 20 61 25 3e 78 70 | 25 2d 72 25 20 80 20 62 | . a%>xp|%-r% . b|
|00003eb0| 25 3c 79 70 25 2b 72 25 | 20 80 20 62 25 3e 79 70 |%<yp%+r%| . b%>yp|
|00003ec0| 25 2d 72 25 20 8c 0d 16 | 80 09 20 20 3d 20 b9 0d |%-r% ...|.. = ..|
|00003ed0| 16 8a 0b 20 20 cc 20 3d | 20 a3 0d 16 94 06 20 cd |... . =| ..... .|
|00003ee0| 0d 16 9e 33 3a 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |...3:---|--------|
|00003ef0| 2d 2d 20 f4 20 46 69 78 | 20 53 68 61 70 65 20 2d |-- . Fix| Shape -|
|00003f00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003f10| 2d 2d 2d 0d 16 a8 0a dd | 20 f2 66 69 78 0d 16 b2 |---.....| .fix...|
|00003f20| 1d 20 e3 20 6b 25 3d 30 | 20 b8 20 70 6d 61 78 25 |. . k%=0| . pmax%|
|00003f30| 28 6e 25 29 2d 33 20 88 | 20 33 0d 16 bc 2b 20 20 |(n%)-3 .| 3...+ |
|00003f40| e6 20 33 2c 31 35 3a c8 | 93 20 c8 90 20 78 28 6e |. 3,15:.|. .. x(n|
|00003f50| 25 2c 6b 25 29 2d 35 2c | 79 28 6e 25 2c 6b 25 29 |%,k%)-5,|y(n%,k%)|
|00003f60| 2d 35 2c 31 30 0d 16 c6 | 2f 20 20 e6 20 33 2c 31 |-5,10...|/ . 3,1|
|00003f70| 34 3a c8 93 20 c8 90 20 | 78 28 6e 25 2c 6b 25 2b |4:.. .. |x(n%,k%+|
|00003f80| 31 29 2d 35 2c 79 28 6e | 25 2c 6b 25 2b 31 29 2d |1)-5,y(n|%,k%+1)-|
|00003f90| 35 2c 31 30 0d 16 d0 2f | 20 20 e6 20 33 2c 31 34 |5,10.../| . 3,14|
|00003fa0| 3a c8 93 20 c8 90 20 78 | 28 6e 25 2c 6b 25 2b 32 |:.. .. x|(n%,k%+2|
|00003fb0| 29 2d 35 2c 79 28 6e 25 | 2c 6b 25 2b 32 29 2d 35 |)-5,y(n%|,k%+2)-5|
|00003fc0| 2c 31 30 0d 16 da 35 20 | 20 e6 20 33 2c 33 3a 86 |,10...5 | . 3,3:.|
|00003fd0| 20 78 28 6e 25 2c 6b 25 | 29 2c 79 28 6e 25 2c 6b | x(n%,k%|),y(n%,k|
|00003fe0| 25 29 2c 78 28 6e 25 2c | 6b 25 2b 31 29 2c 79 28 |%),x(n%,|k%+1),y(|
|00003ff0| 6e 25 2c 6b 25 2b 31 29 | 0d 16 e4 39 20 20 e6 20 |n%,k%+1)|...9 . |
|00004000| 33 2c 33 3a 86 20 78 28 | 6e 25 2c 6b 25 2b 33 29 |3,3:. x(|n%,k%+3)|
|00004010| 2c 79 28 6e 25 2c 6b 25 | 2b 33 29 2c 78 28 6e 25 |,y(n%,k%|+3),x(n%|
|00004020| 2c 6b 25 2b 32 29 2c 79 | 28 6e 25 2c 6b 25 2b 32 |,k%+2),y|(n%,k%+2|
|00004030| 29 0d 16 ee 06 20 ed 0d | 16 f8 38 20 e6 20 33 2c |).... ..|..8 . 3,|
|00004040| 31 35 3a c8 93 20 c8 90 | 20 78 28 6e 25 2c 70 6d |15:.. ..| x(n%,pm|
|00004050| 61 78 25 28 6e 25 29 29 | 2d 35 2c 79 28 6e 25 2c |ax%(n%))|-5,y(n%,|
|00004060| 70 6d 61 78 25 28 6e 25 | 29 29 2d 35 2c 31 30 0d |pmax%(n%|))-5,10.|
|00004070| 17 02 21 20 e7 20 6e 25 | 3e 3d 73 65 67 6d 65 6e |..! . n%|>=segmen|
|00004080| 74 73 25 20 80 20 65 64 | 69 74 64 65 63 25 20 8c |ts% . ed|itdec% .|
|00004090| 0d 17 0c 29 20 20 e6 20 | 33 2c 31 35 3a c8 93 20 |...) . |3,15:.. |
|000040a0| c8 90 20 78 28 6e 25 2c | 30 29 2d 35 2c 79 28 6e |.. x(n%,|0)-5,y(n|
|000040b0| 25 2c 30 29 2d 35 2c 31 | 30 0d 17 16 06 20 cd 0d |%,0)-5,1|0.... ..|
|000040c0| 17 20 21 20 e3 20 73 74 | 61 72 74 25 3d 30 20 b8 |. ! . st|art%=0 .|
|000040d0| 20 70 6d 61 78 25 28 6e | 25 29 2d 33 20 88 20 33 | pmax%(n|%)-3 . 3|
|000040e0| 0d 17 2a 1c 20 20 e3 20 | 69 25 3d 73 74 61 72 74 |..*. . |i%=start|
|000040f0| 25 20 b8 20 73 74 61 72 | 74 25 2b 33 0d 17 34 38 |% . star|t%+3..48|
|00004100| 20 20 20 50 28 69 25 2d | 73 74 61 72 74 25 2c 78 | P(i%-|start%,x|
|00004110| 25 29 3d 78 28 6e 25 2c | 69 25 29 3a 50 28 69 25 |%)=x(n%,|i%):P(i%|
|00004120| 2d 73 74 61 72 74 25 2c | 79 25 29 3d 79 28 6e 25 |-start%,|y%)=y(n%|
|00004130| 2c 69 25 29 0d 17 3e 07 | 20 20 ed 0d 17 48 1e 20 |,i%)..>.| ...H. |
|00004140| 20 e6 20 33 2c 33 3a f2 | 74 77 6f 62 65 7a 69 65 | . 3,3:.|twobezie|
|00004150| 72 73 28 50 28 29 2c 33 | 29 0d 17 52 1f 20 20 e6 |rs(P(),3|)..R. .|
|00004160| 20 30 2c 37 3a f2 62 65 | 7a 69 65 72 63 75 72 76 | 0,7:.be|ziercurv|
|00004170| 65 28 50 28 29 2c 35 29 | 0d 17 5c 16 20 20 e7 20 |e(P(),5)|..\. . |
|00004180| 6e 25 3c 73 65 67 6d 65 | 6e 74 73 25 20 8c 0d 17 |n%<segme|nts% ...|
|00004190| 66 1c 20 20 20 e7 20 68 | 61 6e 64 25 2d 63 6f 72 |f. . h|and%-cor|
|000041a0| 72 68 61 6e 64 25 3d 30 | 20 8c 0d 17 70 2c 20 20 |rhand%=0| ...p, |
|000041b0| 20 20 f2 63 6f 72 72 70 | 6f 69 6e 74 73 28 50 28 | .corrp|oints(P(|
|000041c0| 29 29 3a f2 62 65 7a 69 | 65 72 63 75 72 76 65 28 |)):.bezi|ercurve(|
|000041d0| 51 28 29 2c 35 29 0d 17 | 7a 1e 20 20 20 20 e3 20 |Q(),5)..|z. . |
|000041e0| 69 25 3d 73 74 61 72 74 | 25 20 b8 20 73 74 61 72 |i%=start|% . star|
|000041f0| 74 25 2b 33 0d 17 84 48 | 20 20 20 20 20 78 28 63 |t%+3...H| x(c|
|00004200| 6f 72 72 25 28 6e 25 29 | 2c 69 25 29 3d 51 28 69 |orr%(n%)|,i%)=Q(i|
|00004210| 25 2d 73 74 61 72 74 25 | 2c 78 25 29 3a 79 28 63 |%-start%|,x%):y(c|
|00004220| 6f 72 72 25 28 6e 25 29 | 2c 69 25 29 3d 51 28 69 |orr%(n%)|,i%)=Q(i|
|00004230| 25 2d 73 74 61 72 74 25 | 2c 79 25 29 0d 17 8e 09 |%-start%|,y%)....|
|00004240| 20 20 20 20 ed 0d 17 98 | 2c 20 20 20 cc 20 f2 69 | ....|, . .i|
|00004250| 6e 76 70 6f 69 6e 74 73 | 28 50 28 29 29 3a f2 62 |nvpoints|(P()):.b|
|00004260| 65 7a 69 65 72 63 75 72 | 76 65 28 52 28 29 2c 35 |eziercur|ve(R(),5|
|00004270| 29 0d 17 a2 1e 20 20 20 | 20 e3 20 69 25 3d 73 74 |).... | . i%=st|
|00004280| 61 72 74 25 20 b8 20 73 | 74 61 72 74 25 2b 33 0d |art% . s|tart%+3.|
|00004290| 17 ac 48 20 20 20 20 20 | 78 28 63 6f 72 72 25 28 |..H |x(corr%(|
|000042a0| 6e 25 29 2c 69 25 29 3d | 52 28 69 25 2d 73 74 61 |n%),i%)=|R(i%-sta|
|000042b0| 72 74 25 2c 78 25 29 3a | 79 28 63 6f 72 72 25 28 |rt%,x%):|y(corr%(|
|000042c0| 6e 25 29 2c 69 25 29 3d | 52 28 69 25 2d 73 74 61 |n%),i%)=|R(i%-sta|
|000042d0| 72 74 25 2c 79 25 29 0d | 17 b6 09 20 20 20 20 ed |rt%,y%).|... .|
|000042e0| 0d 17 c0 08 20 20 20 cd | 0d 17 ca 07 20 20 cd 0d |.... .|.... ..|
|000042f0| 17 d4 06 20 ed 0d 17 de | 15 20 e7 20 6e 25 3c 73 |... ....|. . n%<s|
|00004300| 65 67 6d 65 6e 74 73 25 | 20 8c 0d 17 e8 20 20 20 |egments%| .... |
|00004310| 70 6d 61 78 25 28 63 6f | 72 72 25 28 6e 25 29 29 |pmax%(co|rr%(n%))|
|00004320| 3d 70 6d 61 78 25 28 6e | 25 29 0d 17 f2 1b 20 20 |=pmax%(n|%).... |
|00004330| ef 20 32 39 2c 78 6d 6f | 74 69 66 25 3b 79 6d 6f |. 29,xmo|tif%;ymo|
|00004340| 74 69 66 25 3b 0d 17 fc | 45 20 20 c8 99 20 22 4f |tif%;...|E .. "O|
|00004350| 53 5f 53 70 72 69 74 65 | 4f 70 22 2c 32 39 30 2c |S_Sprite|Op",290,|
|00004360| 70 61 74 63 68 2c 22 63 | 69 72 63 6c 65 22 2c 78 |patch,"c|ircle",x|
|00004370| 6d 69 64 25 28 6e 25 29 | 2d 33 30 2c 79 6d 69 64 |mid%(n%)|-30,ymid|
|00004380| 25 28 6e 25 29 2d 33 30 | 2c 30 0d 18 06 34 20 20 |%(n%)-30|,0...4 |
|00004390| 6e 6f 74 66 69 72 73 74 | 74 69 6d 65 25 28 6e 25 |notfirst|time%(n%|
|000043a0| 29 3d b9 3a 6e 6f 74 66 | 69 72 73 74 74 69 6d 65 |)=.:notf|irsttime|
|000043b0| 25 28 63 6f 72 72 25 28 | 6e 25 29 29 3d b9 0d 18 |%(corr%(|n%))=...|
|000043c0| 10 06 20 cd 0d 18 1a 08 | 20 ef 20 37 0d 18 24 05 |.. .....| . 7..$.|
|000043d0| e1 0d 18 2e 33 3a 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |....3:--|--------|
|000043e0| 2d 2d 20 f4 20 42 65 7a | 69 65 72 20 43 75 72 76 |-- . Bez|ier Curv|
|000043f0| 65 73 20 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |es -----|--------|
|00004400| 2d 2d 2d 2d 0d 18 38 1b | dd 20 f2 74 77 6f 62 65 |----..8.|. .twobe|
|00004410| 7a 69 65 72 73 28 50 28 | 29 2c 4e 75 6d 25 29 0d |ziers(P(|),Num%).|
|00004420| 18 42 1c 20 20 f2 62 65 | 7a 69 65 72 63 75 72 76 |.B. .be|ziercurv|
|00004430| 65 28 50 28 29 2c 4e 75 | 6d 25 29 0d 18 4c 16 20 |e(P(),Nu|m%)..L. |
|00004440| 20 e7 20 6e 25 3c 73 65 | 67 6d 65 6e 74 73 25 20 | . n%<se|gments% |
|00004450| 8c 0d 18 56 1c 20 20 20 | e7 20 68 61 6e 64 25 2d |...V. |. hand%-|
|00004460| 63 6f 72 72 68 61 6e 64 | 25 3d 30 20 8c 0d 18 60 |corrhand|%=0 ...`|
|00004470| 2f 20 20 20 20 f2 63 6f | 72 72 70 6f 69 6e 74 73 |/ .co|rrpoints|
|00004480| 28 50 28 29 29 3a f2 62 | 65 7a 69 65 72 63 75 72 |(P()):.b|eziercur|
|00004490| 76 65 28 51 28 29 2c 4e | 75 6d 25 29 0d 18 6a 2f |ve(Q(),N|um%)..j/|
|000044a0| 20 20 20 cc 20 f2 69 6e | 76 70 6f 69 6e 74 73 28 | . .in|vpoints(|
|000044b0| 50 28 29 29 3a f2 62 65 | 7a 69 65 72 63 75 72 76 |P()):.be|ziercurv|
|000044c0| 65 28 52 28 29 2c 4e 75 | 6d 25 29 0d 18 74 08 20 |e(R(),Nu|m%)..t. |
|000044d0| 20 20 cd 0d 18 7e 07 20 | 20 cd 0d 18 88 05 e1 0d | ...~. | .......|
|000044e0| 18 92 05 3a 0d 18 9c 1c | dd 20 f2 62 65 7a 69 65 |...:....|. .bezie|
|000044f0| 72 63 75 72 76 65 28 50 | 28 29 2c 4e 75 6d 25 29 |rcurve(P|(),Num%)|
|00004500| 0d 18 a6 0f 20 e3 20 69 | 25 3d 30 20 b8 20 33 0d |.... . i|%=0 . 3.|
|00004510| 18 b0 10 20 20 e3 20 6a | 25 3d 30 20 b8 20 31 0d |... . j|%=0 . 1.|
|00004520| 18 ba 1d 20 20 20 41 28 | 69 25 2c 6a 25 2c 4e 75 |... A(|i%,j%,Nu|
|00004530| 6d 25 29 3d 50 28 69 25 | 2c 6a 25 29 0d 18 c4 07 |m%)=P(i%|,j%)....|
|00004540| 20 20 ed 0d 18 ce 06 20 | ed 0d 18 d8 16 20 f2 62 | ..... |..... .b|
|00004550| 65 7a 69 65 72 28 41 28 | 29 2c 4e 75 6d 25 29 0d |ezier(A(|),Num%).|
|00004560| 18 e2 05 e1 0d 18 ec 05 | 3a 0d 18 f6 17 dd 20 f2 |........|:..... .|
|00004570| 62 65 7a 69 65 72 28 5a | 28 29 2c 4e 75 6d 25 29 |bezier(Z|(),Num%)|
|00004580| 0d 19 00 0f 20 e7 20 4e | 75 6d 25 3d 30 20 8c 0d |.... . N|um%=0 ..|
|00004590| 19 0a 1b 20 20 ec 20 5a | 28 30 2c 78 25 2c 30 29 |... . Z|(0,x%,0)|
|000045a0| 2c 5a 28 30 2c 79 25 2c | 30 29 0d 19 14 1b 20 20 |,Z(0,y%,|0).... |
|000045b0| df 20 5a 28 31 2c 78 25 | 2c 30 29 2c 5a 28 31 2c |. Z(1,x%|,0),Z(1,|
|000045c0| 79 25 2c 30 29 0d 19 1e | 1b 20 20 df 20 5a 28 32 |y%,0)...|. . Z(2|
|000045d0| 2c 78 25 2c 30 29 2c 5a | 28 32 2c 79 25 2c 30 29 |,x%,0),Z|(2,y%,0)|
|000045e0| 0d 19 28 1b 20 20 df 20 | 5a 28 33 2c 78 25 2c 30 |..(. . |Z(3,x%,0|
|000045f0| 29 2c 5a 28 33 2c 79 25 | 2c 30 29 0d 19 32 06 20 |),Z(3,y%|,0)..2. |
|00004600| cc 0d 19 3c 13 20 20 e3 | 20 6c 6f 6f 70 25 3d 30 |...<. .| loop%=0|
|00004610| 20 b8 20 31 0d 19 46 2f | 20 20 20 74 65 6d 70 3d | . 1..F/| temp=|
|00004620| 28 5a 28 31 2c 6c 6f 6f | 70 25 2c 4e 75 6d 25 29 |(Z(1,loo|p%,Num%)|
|00004630| 2b 5a 28 32 2c 6c 6f 6f | 70 25 2c 4e 75 6d 25 29 |+Z(2,loo|p%,Num%)|
|00004640| 29 2f 32 0d 19 50 28 20 | 20 20 41 28 30 2c 6c 6f |)/2..P( | A(0,lo|
|00004650| 6f 70 25 2c 4e 75 6d 25 | 2d 31 29 3d 5a 28 30 2c |op%,Num%|-1)=Z(0,|
|00004660| 6c 6f 6f 70 25 2c 4e 75 | 6d 25 29 0d 19 5a 3c 20 |loop%,Nu|m%)..Z< |
|00004670| 20 20 41 28 31 2c 6c 6f | 6f 70 25 2c 4e 75 6d 25 | A(1,lo|op%,Num%|
|00004680| 2d 31 29 3d 28 5a 28 30 | 2c 6c 6f 6f 70 25 2c 4e |-1)=(Z(0|,loop%,N|
|00004690| 75 6d 25 29 2b 5a 28 31 | 2c 6c 6f 6f 70 25 2c 4e |um%)+Z(1|,loop%,N|
|000046a0| 75 6d 25 29 29 2f 32 0d | 19 64 33 20 20 20 41 28 |um%))/2.|.d3 A(|
|000046b0| 32 2c 6c 6f 6f 70 25 2c | 4e 75 6d 25 2d 31 29 3d |2,loop%,|Num%-1)=|
|000046c0| 28 74 65 6d 70 2b 41 28 | 31 2c 6c 6f 6f 70 25 2c |(temp+A(|1,loop%,|
|000046d0| 4e 75 6d 25 2d 31 29 29 | 2f 32 0d 19 6e 28 20 20 |Num%-1))|/2..n( |
|000046e0| 20 42 28 33 2c 6c 6f 6f | 70 25 2c 4e 75 6d 25 2d | B(3,loo|p%,Num%-|
|000046f0| 31 29 3d 5a 28 33 2c 6c | 6f 6f 70 25 2c 4e 75 6d |1)=Z(3,l|oop%,Num|
|00004700| 25 29 0d 19 78 3c 20 20 | 20 42 28 32 2c 6c 6f 6f |%)..x< | B(2,loo|
|00004710| 70 25 2c 4e 75 6d 25 2d | 31 29 3d 28 5a 28 32 2c |p%,Num%-|1)=(Z(2,|
|00004720| 6c 6f 6f 70 25 2c 4e 75 | 6d 25 29 2b 5a 28 33 2c |loop%,Nu|m%)+Z(3,|
|00004730| 6c 6f 6f 70 25 2c 4e 75 | 6d 25 29 29 2f 32 0d 19 |loop%,Nu|m%))/2..|
|00004740| 82 33 20 20 20 42 28 31 | 2c 6c 6f 6f 70 25 2c 4e |.3 B(1|,loop%,N|
|00004750| 75 6d 25 2d 31 29 3d 28 | 74 65 6d 70 2b 42 28 32 |um%-1)=(|temp+B(2|
|00004760| 2c 6c 6f 6f 70 25 2c 4e | 75 6d 25 2d 31 29 29 2f |,loop%,N|um%-1))/|
|00004770| 32 0d 19 8c 40 20 20 20 | 41 28 33 2c 6c 6f 6f 70 |2...@ |A(3,loop|
|00004780| 25 2c 4e 75 6d 25 2d 31 | 29 3d 28 41 28 32 2c 6c |%,Num%-1|)=(A(2,l|
|00004790| 6f 6f 70 25 2c 4e 75 6d | 25 2d 31 29 2b 42 28 31 |oop%,Num|%-1)+B(1|
|000047a0| 2c 6c 6f 6f 70 25 2c 4e | 75 6d 25 2d 31 29 29 2f |,loop%,N|um%-1))/|
|000047b0| 32 0d 19 96 2a 20 20 20 | 42 28 30 2c 6c 6f 6f 70 |2...* |B(0,loop|
|000047c0| 25 2c 4e 75 6d 25 2d 31 | 29 3d 41 28 33 2c 6c 6f |%,Num%-1|)=A(3,lo|
|000047d0| 6f 70 25 2c 4e 75 6d 25 | 2d 31 29 0d 19 a0 07 20 |op%,Num%|-1).... |
|000047e0| 20 ed 0d 19 aa 19 20 20 | f2 62 65 7a 69 65 72 28 | ..... |.bezier(|
|000047f0| 41 28 29 2c 4e 75 6d 25 | 2d 31 29 0d 19 b4 19 20 |A(),Num%|-1).... |
|00004800| 20 f2 62 65 7a 69 65 72 | 28 42 28 29 2c 4e 75 6d | .bezier|(B(),Num|
|00004810| 25 2d 31 29 0d 19 be 06 | 20 cd 0d 19 c8 05 e1 0d |%-1)....| .......|
|00004820| 19 d2 05 3a 0d 19 dc 16 | dd 20 f2 63 6f 72 72 70 |...:....|. .corrp|
|00004830| 6f 69 6e 74 73 28 50 28 | 29 29 0d 19 e6 0f 20 e3 |oints(P(|)).... .|
|00004840| 20 70 25 3d 30 20 b8 20 | 33 0d 19 f0 55 20 20 51 | p%=0 . |3...U Q|
|00004850| 28 70 25 2c 78 25 29 3d | 78 63 73 74 61 72 74 25 |(p%,x%)=|xcstart%|
|00004860| 2b 28 50 28 70 25 2c 78 | 25 29 2d 78 73 74 61 72 |+(P(p%,x|%)-xstar|
|00004870| 74 25 29 2a 9b 28 b2 28 | 74 68 65 74 61 29 29 2b |t%)*.(.(|theta))+|
|00004880| 28 50 28 70 25 2c 79 25 | 29 2d 79 73 74 61 72 74 |(P(p%,y%|)-ystart|
|00004890| 25 29 2a b5 28 b2 28 74 | 68 65 74 61 29 29 0d 19 |%)*.(.(t|heta))..|
|000048a0| fa 55 20 20 51 28 70 25 | 2c 79 25 29 3d 79 63 73 |.U Q(p%|,y%)=ycs|
|000048b0| 74 61 72 74 25 2d 28 50 | 28 70 25 2c 78 25 29 2d |tart%-(P|(p%,x%)-|
|000048c0| 78 73 74 61 72 74 25 29 | 2a b5 28 b2 28 74 68 65 |xstart%)|*.(.(the|
|000048d0| 74 61 29 29 2b 28 50 28 | 70 25 2c 79 25 29 2d 79 |ta))+(P(|p%,y%)-y|
|000048e0| 73 74 61 72 74 25 29 2a | 9b 28 b2 28 74 68 65 74 |start%)*|.(.(thet|
|000048f0| 61 29 29 0d 1a 04 06 20 | ed 0d 1a 0e 05 e1 0d 1a |a)).... |........|
|00004900| 18 05 3a 0d 1a 22 15 dd | 20 f2 69 6e 76 70 6f 69 |..:.."..| .invpoi|
|00004910| 6e 74 73 28 50 28 29 29 | 0d 1a 2c 15 20 f2 63 6f |nts(P())|..,. .co|
|00004920| 72 72 70 6f 69 6e 74 73 | 28 50 28 29 29 0d 1a 36 |rrpoints|(P())..6|
|00004930| 0f 20 e3 20 69 25 3d 30 | 20 b8 20 33 0d 1a 40 50 |. . i%=0| . 3..@P|
|00004940| 20 20 52 28 69 25 2c 78 | 25 29 3d 32 2a 6d 2a 28 | R(i%,x|%)=2*m*(|
|00004950| 51 28 69 25 2c 79 25 29 | 2d 79 63 73 74 61 72 74 |Q(i%,y%)|-ycstart|
|00004960| 25 2b 6d 2a 78 63 73 74 | 61 72 74 25 29 2f 28 31 |%+m*xcst|art%)/(1|
|00004970| 2b 6d 2a 6d 29 2b 28 32 | 2f 28 31 2b 6d 2a 6d 29 |+m*m)+(2|/(1+m*m)|
|00004980| 2d 31 29 2a 51 28 69 25 | 2c 78 25 29 0d 1a 4a 71 |-1)*Q(i%|,x%)..Jq|
|00004990| 20 20 52 28 69 25 2c 79 | 25 29 3d 32 2a 6d 2a 6d | R(i%,y|%)=2*m*m|
|000049a0| 2a 28 51 28 69 25 2c 79 | 25 29 2d 79 63 73 74 61 |*(Q(i%,y|%)-ycsta|
|000049b0| 72 74 25 2b 6d 2a 78 63 | 73 74 61 72 74 25 29 2f |rt%+m*xc|start%)/|
|000049c0| 28 31 2b 6d 2a 6d 29 2b | 32 2a 6d 2a 51 28 69 25 |(1+m*m)+|2*m*Q(i%|
|000049d0| 2c 78 25 29 2f 28 31 2b | 6d 2a 6d 29 2b 32 2a 28 |,x%)/(1+|m*m)+2*(|
|000049e0| 79 63 73 74 61 72 74 25 | 2d 6d 2a 78 63 73 74 61 |ycstart%|-m*xcsta|
|000049f0| 72 74 25 29 2d 51 28 69 | 25 2c 79 25 29 0d 1a 54 |rt%)-Q(i|%,y%)..T|
|00004a00| 06 20 ed 0d 1a 5e 05 e1 | 0d 1a 68 05 3a 0d 1a 72 |. ...^..|..h.:..r|
|00004a10| 33 3a 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |3:------|--------|
|00004a20| 20 f4 20 45 64 69 74 20 | 53 68 61 70 65 20 2d 2d | . Edit |Shape --|
|00004a30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004a40| 0d 1a 7c 05 3a 0d 1a 86 | 10 dd 20 f2 65 64 69 74 |..|.:...|.. .edit|
|00004a50| 73 68 61 70 65 0d 1a 90 | 21 20 e3 20 73 74 61 72 |shape...|! . star|
|00004a60| 74 25 3d 30 20 b8 20 70 | 6d 61 78 25 28 6e 25 29 |t%=0 . p|max%(n%)|
|00004a70| 2d 33 20 88 20 33 0d 1a | 9a 1c 20 20 e3 20 69 25 |-3 . 3..|.. . i%|
|00004a80| 3d 73 74 61 72 74 25 20 | b8 20 73 74 61 72 74 25 |=start% |. start%|
|00004a90| 2b 33 0d 1a a4 38 20 20 | 20 50 28 69 25 2d 73 74 |+3...8 | P(i%-st|
|00004aa0| 61 72 74 25 2c 78 25 29 | 3d 78 28 6e 25 2c 69 25 |art%,x%)|=x(n%,i%|
|00004ab0| 29 3a 50 28 69 25 2d 73 | 74 61 72 74 25 2c 79 25 |):P(i%-s|tart%,y%|
|00004ac0| 29 3d 79 28 6e 25 2c 69 | 25 29 0d 1a ae 07 20 20 |)=y(n%,i|%).... |
|00004ad0| ed 0d 1a b8 21 20 20 e6 | 20 30 2c 30 20 3a 20 f2 |....! .| 0,0 : .|
|00004ae0| 62 65 7a 69 65 72 63 75 | 72 76 65 28 50 28 29 2c |beziercu|rve(P(),|
|00004af0| 35 29 0d 1a c2 16 20 20 | e7 20 6e 25 3c 73 65 67 |5).... |. n%<seg|
|00004b00| 6d 65 6e 74 73 25 20 8c | 0d 1a cc 1c 20 20 20 e7 |ments% .|.... .|
|00004b10| 20 68 61 6e 64 25 2d 63 | 6f 72 72 68 61 6e 64 25 | hand%-c|orrhand%|
|00004b20| 3d 30 20 8c 0d 1a d6 2c | 20 20 20 20 f2 63 6f 72 |=0 ....,| .cor|
|00004b30| 72 70 6f 69 6e 74 73 28 | 50 28 29 29 3a f2 62 65 |rpoints(|P()):.be|
|00004b40| 7a 69 65 72 63 75 72 76 | 65 28 51 28 29 2c 35 29 |ziercurv|e(Q(),5)|
|00004b50| 0d 1a e0 2c 20 20 20 cc | 20 f2 69 6e 76 70 6f 69 |..., .| .invpoi|
|00004b60| 6e 74 73 28 50 28 29 29 | 3a f2 62 65 7a 69 65 72 |nts(P())|:.bezier|
|00004b70| 63 75 72 76 65 28 52 28 | 29 2c 35 29 0d 1a ea 08 |curve(R(|),5)....|
|00004b80| 20 20 20 cd 0d 1a f4 07 | 20 20 cd 0d 1a fe 06 20 | .....| ..... |
|00004b90| ed 0d 1b 08 39 20 e7 20 | 6e 25 3c 73 65 67 6d 65 |....9 . |n%<segme|
|00004ba0| 6e 74 73 25 20 8c 20 e6 | 20 33 2c 31 35 3a c8 93 |nts% . .| 3,15:..|
|00004bb0| 20 c8 90 20 78 28 6e 25 | 2c 30 29 2d 35 2c 79 28 | .. x(n%|,0)-5,y(|
|00004bc0| 6e 25 2c 30 29 2d 35 2c | 31 30 0d 1b 12 21 20 e3 |n%,0)-5,|10...! .|
|00004bd0| 20 73 74 61 72 74 25 3d | 30 20 b8 20 70 6d 61 78 | start%=|0 . pmax|
|00004be0| 25 28 6e 25 29 2d 33 20 | 88 20 33 0d 1b 1c 1c 20 |%(n%)-3 |. 3.... |
|00004bf0| 20 e3 20 69 25 3d 73 74 | 61 72 74 25 20 b8 20 73 | . i%=st|art% . s|
|00004c00| 74 61 72 74 25 2b 33 0d | 1b 26 38 20 20 20 50 28 |tart%+3.|.&8 P(|
|00004c10| 69 25 2d 73 74 61 72 74 | 25 2c 78 25 29 3d 78 28 |i%-start|%,x%)=x(|
|00004c20| 6e 25 2c 69 25 29 3a 50 | 28 69 25 2d 73 74 61 72 |n%,i%):P|(i%-star|
|00004c30| 74 25 2c 79 25 29 3d 79 | 28 6e 25 2c 69 25 29 0d |t%,y%)=y|(n%,i%).|
|00004c40| 1b 30 07 20 20 ed 0d 1b | 3a 29 20 20 e6 20 33 2c |.0. ...|:) . 3,|
|00004c50| 31 35 3a c8 93 20 c8 90 | 20 50 28 33 2c 78 25 29 |15:.. ..| P(3,x%)|
|00004c60| 2d 35 2c 50 28 33 2c 79 | 25 29 2d 35 2c 31 30 0d |-5,P(3,y|%)-5,10.|
|00004c70| 1b 44 29 20 20 e6 20 33 | 2c 31 34 3a c8 93 20 c8 |.D) . 3|,14:.. .|
|00004c80| 90 20 50 28 31 2c 78 25 | 29 2d 35 2c 50 28 31 2c |. P(1,x%|)-5,P(1,|
|00004c90| 79 25 29 2d 35 2c 31 30 | 0d 1b 4e 2c 20 20 20 20 |y%)-5,10|..N, |
|00004ca0| 20 20 20 20 20 20 20 20 | c8 93 20 c8 90 20 50 28 | |.. .. P(|
|00004cb0| 32 2c 78 25 29 2d 35 2c | 50 28 32 2c 79 25 29 2d |2,x%)-5,|P(2,y%)-|
|00004cc0| 35 2c 31 30 0d 1b 58 1e | 20 20 e6 20 33 2c 33 3a |5,10..X.| . 3,3:|
|00004cd0| f2 74 77 6f 62 65 7a 69 | 65 72 73 28 50 28 29 2c |.twobezi|ers(P(),|
|00004ce0| 33 29 0d 1b 62 27 20 20 | 86 20 50 28 30 2c 78 25 |3)..b' |. P(0,x%|
|00004cf0| 29 2c 50 28 30 2c 79 25 | 29 2c 50 28 31 2c 78 25 |),P(0,y%|),P(1,x%|
|00004d00| 29 2c 50 28 31 2c 79 25 | 29 0d 1b 6c 27 20 20 86 |),P(1,y%|)..l' .|
|00004d10| 20 50 28 33 2c 78 25 29 | 2c 50 28 33 2c 79 25 29 | P(3,x%)|,P(3,y%)|
|00004d20| 2c 50 28 32 2c 78 25 29 | 2c 50 28 32 2c 79 25 29 |,P(2,x%)|,P(2,y%)|
|00004d30| 0d 1b 76 06 20 ed 0d 1b | 80 12 20 f2 73 68 61 70 |..v. ...|.. .shap|
|00004d40| 65 73 65 67 6d 65 6e 74 | 0d 1b 8a 05 e1 0d 1b 94 |esegment|........|
|00004d50| 05 3a 0d 1b 9e 33 3a 3d | 3d 3d 3d 3d 3d 3d 3d 3d |.:...3:=|========|
|00004d60| 3d 3d 3d 3d 3d 3d 3d 3d | 20 f4 20 44 65 63 6f 72 |========| . Decor|
|00004d70| 61 74 65 20 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |ate ====|========|
|00004d80| 3d 3d 3d 3d 3d 0d 1b a8 | 05 3a 0d 1b b2 0f dd 20 |=====...|.:..... |
|00004d90| f2 64 65 63 6f 72 61 74 | 65 0d 1b bc 11 20 c8 97 |.decorat|e.... ..|
|00004da0| 20 b8 20 35 30 30 2c 35 | 31 32 0d 1b c6 17 20 c8 | . 500,5|12.... .|
|00004db0| 97 20 c8 93 20 30 2c 30 | 2c 31 30 30 30 2c 39 36 |. .. 0,0|,1000,96|
|00004dc0| 30 0d 1b d0 0f 20 65 64 | 69 74 64 65 63 25 3d a3 |0.... ed|itdec%=.|
|00004dd0| 0d 1b da 06 20 f5 0d 1b | e4 1c 20 20 f5 20 c8 97 |.... ...|.. . ..|
|00004de0| 20 6d 78 25 2c 6d 79 25 | 2c 62 25 3a fd 20 62 25 | mx%,my%|,b%:. b%|
|00004df0| 3d 30 0d 1b ee 2a 20 20 | f5 20 c8 97 20 6d 78 25 |=0...* |. .. mx%|
|00004e00| 2c 6d 79 25 2c 62 25 3a | fd 20 62 25 3d 31 20 84 |,my%,b%:|. b%=1 .|
|00004e10| 20 62 25 3d 32 20 84 20 | 62 25 3d 34 0d 1b f8 0d | b%=2 . |b%=4....|
|00004e20| 20 20 c8 8e 20 62 25 20 | ca 0d 1c 02 41 20 20 20 | .. b% |....A |
|00004e30| c9 20 31 3a 20 ef 20 32 | 39 2c 78 74 69 6c 65 25 |. 1: . 2|9,xtile%|
|00004e40| 3b 79 74 69 6c 65 25 3b | 3a e3 20 64 25 3d 73 65 |;ytile%;|:. d%=se|
|00004e50| 67 6d 65 6e 74 73 25 20 | b8 20 73 65 67 6d 65 6e |gments% |. segmen|
|00004e60| 74 73 25 2b 64 65 63 25 | 2d 31 0d 1c 0c 33 20 20 |ts%+dec%|-1...3 |
|00004e70| 20 20 20 20 20 20 20 20 | 20 20 e6 20 33 2c 31 35 | | . 3,15|
|00004e80| 3a c8 93 20 c8 90 20 78 | 28 64 25 2c 30 29 2d 35 |:.. .. x|(d%,0)-5|
|00004e90| 2c 79 28 64 25 2c 30 29 | 2d 35 2c 31 30 0d 1c 16 |,y(d%,0)|-5,10...|
|00004ea0| 10 20 20 20 20 20 20 20 | 20 20 20 20 ed 0d 1c 20 |. | ... |
|00004eb0| 1c 20 20 20 20 20 20 20 | 20 20 20 20 c8 8e 20 65 |. | .. e|
|00004ec0| 64 69 74 64 65 63 25 20 | ca 0d 1c 2a 1f 20 20 20 |ditdec% |...*. |
|00004ed0| 20 20 20 20 20 20 20 20 | 20 c9 20 b9 20 3a 65 64 | | . . :ed|
|00004ee0| 69 74 64 65 63 25 3d a3 | 0d 1c 34 1e 20 20 20 20 |itdec%=.|..4. |
|00004ef0| 20 20 20 20 20 20 20 20 | c9 20 a3 3a 65 64 69 74 | |. .:edit|
|00004f00| 64 65 63 25 3d b9 0d 1c | 3e 10 20 20 20 20 20 20 |dec%=...|>. |
|00004f10| 20 20 20 20 20 cb 0d 1c | 48 18 20 20 20 c9 20 32 | ...|H. . 2|
|00004f20| 3a 20 e7 20 65 64 69 74 | 64 65 63 25 20 8c 0d 1c |: . edit|dec% ...|
|00004f30| 52 31 20 20 20 20 20 20 | 20 20 20 20 20 20 e3 20 |R1 | . |
|00004f40| 64 25 3d 73 65 67 6d 65 | 6e 74 73 25 20 b8 20 73 |d%=segme|nts% . s|
|00004f50| 65 67 6d 65 6e 74 73 25 | 2b 64 65 63 25 2d 31 0d |egments%|+dec%-1.|
|00004f60| 1c 5c 34 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.\4 | |
|00004f70| e6 20 33 2c 31 35 3a c8 | 93 20 c8 90 20 78 28 64 |. 3,15:.|. .. x(d|
|00004f80| 25 2c 30 29 2d 35 2c 79 | 28 64 25 2c 30 29 2d 35 |%,0)-5,y|(d%,0)-5|
|00004f90| 2c 31 30 0d 1c 66 11 20 | 20 20 20 20 20 20 20 20 |,10..f. | |
|00004fa0| 20 20 20 ed 0d 1c 70 1a | 20 20 20 20 20 20 20 20 | ...p.| |
|00004fb0| 20 20 20 20 65 64 69 74 | 64 65 63 25 3d a3 0d 1c | edit|dec%=...|
|00004fc0| 7a 10 20 20 20 20 20 20 | 20 20 20 20 20 cd 0d 1c |z. | ...|
|00004fd0| 84 1e 20 20 20 20 20 20 | 20 20 20 20 20 f2 73 68 |.. | .sh|
|00004fe0| 6f 77 64 65 73 69 67 6e | 6d 65 6e 75 0d 1c 8e 2d |owdesign|menu...-|
|00004ff0| 20 20 20 c9 20 34 3a 20 | e3 20 64 25 3d 73 65 67 | . 4: |. d%=seg|
|00005000| 6d 65 6e 74 73 25 20 b8 | 20 73 65 67 6d 65 6e 74 |ments% .| segment|
|00005010| 73 25 2b 64 65 63 25 2d | 31 0d 1c 98 3e 20 20 20 |s%+dec%-|1...> |
|00005020| 20 20 20 20 20 20 20 20 | 20 e7 20 a4 70 6f 73 69 | | . .posi|
|00005030| 74 69 6f 6e 28 6d 78 25 | 2c 6d 79 25 2c 78 28 64 |tion(mx%|,my%,x(d|
|00005040| 25 2c 30 29 2c 79 28 64 | 25 2c 30 29 2c 38 29 20 |%,0),y(d|%,0),8) |
|00005050| 8c 20 6e 25 3d 64 25 0d | 1c a2 10 20 20 20 20 20 |. n%=d%.|... |
|00005060| 20 20 20 20 20 20 ed 0d | 1c ac 42 20 20 20 20 20 | ..|..B |
|00005070| 20 20 20 20 20 20 e7 20 | 65 64 69 74 64 65 63 25 | . |editdec%|
|00005080| 20 80 20 a4 70 6f 73 69 | 74 69 6f 6e 28 6d 78 25 | . .posi|tion(mx%|
|00005090| 2c 6d 79 25 2c 78 28 6e | 25 2c 30 29 2c 79 28 6e |,my%,x(n|%,0),y(n|
|000050a0| 25 2c 30 29 2c 38 29 20 | 8c 0d 1c b6 1a 20 20 20 |%,0),8) |..... |
|000050b0| 20 20 20 20 20 20 20 20 | 20 f2 65 64 69 74 73 68 | | .editsh|
|000050c0| 61 70 65 0d 1c c0 10 20 | 20 20 20 20 20 20 20 20 |ape.... | |
|000050d0| 20 20 cc 0d 1c ca 21 20 | 20 20 20 20 20 20 20 20 | ....! | |
|000050e0| 20 20 20 6e 25 3d 73 65 | 67 6d 65 6e 74 73 25 2b | n%=se|gments%+|
|000050f0| 64 65 63 25 0d 1c d4 1a | 20 20 20 20 20 20 20 20 |dec%....| |
|00005100| 20 20 20 20 f2 64 72 61 | 77 73 68 61 70 65 0d 1c | .dra|wshape..|
|00005110| de 17 20 20 20 20 20 20 | 20 20 20 20 20 20 64 65 |.. | de|
|00005120| 63 25 2b 3d 31 0d 1c e8 | 10 20 20 20 20 20 20 20 |c%+=1...|. |
|00005130| 20 20 20 20 cd 0d 1c f2 | 07 20 20 cb 0d 1c fc 08 | ....|. .....|
|00005140| 20 fd 20 a3 0d 1d 06 05 | e1 0d 1d 10 05 3a 0d 1d | . .....|.....:..|
|00005150| 1a 33 3a 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |.3:=====|========|
|00005160| 3d 3d 3d 3d 3d 3d 20 f4 | 20 45 72 61 73 65 20 3d |====== .| Erase =|
|00005170| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00005180| 3d 0d 1d 24 05 3a 0d 1d | 2e 0c dd 20 f2 65 72 61 |=..$.:..|... .era|
|00005190| 73 65 0d 1d 38 2f 20 f2 | 77 72 69 74 65 28 31 30 |se..8/ .|write(10|
|000051a0| 32 34 2c 31 34 30 2c 22 | 53 45 4c 45 43 54 20 20 |24,140,"|SELECT |
|000051b0| 73 65 67 6d 65 6e 74 22 | 2c 22 62 6c 61 63 6b 22 |segment"|,"black"|
|000051c0| 29 0d 1d 42 2d 20 f2 77 | 72 69 74 65 28 31 30 36 |)..B- .w|rite(106|
|000051d0| 34 2c 31 30 38 2c 22 6f | 72 20 44 20 74 6f 20 61 |4,108,"o|r D to a|
|000051e0| 6c 6c 6f 77 22 2c 22 62 | 6c 61 63 6b 22 29 0d 1d |llow","b|lack")..|
|000051f0| 4c 33 20 f2 77 72 69 74 | 65 28 31 30 30 39 2c 37 |L3 .writ|e(1009,7|
|00005200| 36 2c 22 63 68 6f 69 63 | 65 20 6f 66 20 64 65 63 |6,"choic|e of dec|
|00005210| 6f 72 61 74 69 6f 6e 22 | 2c 22 62 6c 61 63 6b 22 |oration"|,"black"|
|00005220| 29 0d 1d 56 5c 20 f2 77 | 72 69 74 65 28 78 6d 6f |)..V\ .w|rite(xmo|
|00005230| 74 69 66 25 2b 28 78 6d | 61 78 25 2d 78 6d 69 6e |tif%+(xm|ax%-xmin|
|00005240| 25 29 2a a4 73 63 61 6c | 65 2f 32 2d 31 34 2c 79 |%)*.scal|e/2-14,y|
|00005250| 6d 6f 74 69 66 25 2b 28 | 79 6d 61 78 25 2d 79 6d |motif%+(|ymax%-ym|
|00005260| 69 6e 25 29 2a a4 73 63 | 61 6c 65 2f 32 2d 31 35 |in%)*.sc|ale/2-15|
|00005270| 2c 22 44 22 2c 22 62 6c | 61 63 6b 22 29 0d 1d 60 |,"D","bl|ack")..`|
|00005280| 14 20 f5 20 c8 97 20 6d | 78 25 2c 6d 79 25 2c 62 |. . .. m|x%,my%,b|
|00005290| 25 0d 1d 6a 14 20 20 f2 | 63 68 6f 6f 73 65 73 65 |%..j. .|choosese|
|000052a0| 67 6d 65 6e 74 0d 1d 74 | 08 20 fd 20 a3 0d 1d 7e |gment..t|. . ...~|
|000052b0| 05 e1 0d 1d 88 05 3a 0d | 1d 92 13 dd 20 f2 65 72 |......:.|.... .er|
|000052c0| 61 73 65 73 65 67 6d 65 | 6e 74 0d 1d 9c 18 20 ef |asesegme|nt.... .|
|000052d0| 20 32 39 2c 78 74 69 6c | 65 25 3b 79 74 69 6c 65 | 29,xtil|e%;ytile|
|000052e0| 25 3b 0d 1d a6 21 20 e3 | 20 73 74 61 72 74 25 3d |%;...! .| start%=|
|000052f0| 30 20 b8 20 70 6d 61 78 | 25 28 6e 25 29 2d 33 20 |0 . pmax|%(n%)-3 |
|00005300| 88 20 33 0d 1d b0 1c 20 | 20 e3 20 69 25 3d 73 74 |. 3.... | . i%=st|
|00005310| 61 72 74 25 20 b8 20 73 | 74 61 72 74 25 2b 33 0d |art% . s|tart%+3.|
|00005320| 1d ba 38 20 20 20 50 28 | 69 25 2d 73 74 61 72 74 |..8 P(|i%-start|
|00005330| 25 2c 78 25 29 3d 78 28 | 6e 25 2c 69 25 29 3a 50 |%,x%)=x(|n%,i%):P|
|00005340| 28 69 25 2d 73 74 61 72 | 74 25 2c 79 25 29 3d 79 |(i%-star|t%,y%)=y|
|00005350| 28 6e 25 2c 69 25 29 0d | 1d c4 07 20 20 ed 0d 1d |(n%,i%).|... ...|
|00005360| ce 1f 20 20 e6 20 30 2c | 30 3a f2 62 65 7a 69 65 |.. . 0,|0:.bezie|
|00005370| 72 63 75 72 76 65 28 50 | 28 29 2c 35 29 0d 1d d8 |rcurve(P|(),5)...|
|00005380| 1b 20 20 e7 20 68 61 6e | 64 25 2d 63 6f 72 72 68 |. . han|d%-corrh|
|00005390| 61 6e 64 25 3d 30 20 8c | 0d 1d e2 2b 20 20 20 f2 |and%=0 .|...+ .|
|000053a0| 63 6f 72 72 70 6f 69 6e | 74 73 28 50 28 29 29 3a |corrpoin|ts(P()):|
|000053b0| f2 62 65 7a 69 65 72 63 | 75 72 76 65 28 51 28 29 |.bezierc|urve(Q()|
|000053c0| 2c 35 29 0d 1d ec 2b 20 | 20 cc 20 f2 69 6e 76 70 |,5)...+ | . .invp|
|000053d0| 6f 69 6e 74 73 28 50 28 | 29 29 3a f2 62 65 7a 69 |oints(P(|)):.bezi|
|000053e0| 65 72 63 75 72 76 65 28 | 52 28 29 2c 35 29 0d 1d |ercurve(|R(),5)..|
|000053f0| f6 07 20 20 cd 0d 1e 00 | 06 20 ed 0d 1e 0a 17 20 |.. ....|. ..... |
|00005400| e3 20 70 25 3d 30 20 b8 | 20 70 6d 61 78 25 28 6e |. p%=0 .| pmax%(n|
|00005410| 25 29 0d 1e 14 3f 20 20 | 78 28 6e 25 2c 70 25 29 |%)...? |x(n%,p%)|
|00005420| 3d 30 3a 79 28 6e 25 2c | 70 25 29 3d 30 3a 78 28 |=0:y(n%,|p%)=0:x(|
|00005430| 63 6f 72 72 25 28 6e 25 | 29 2c 70 25 29 3d 30 3a |corr%(n%|),p%)=0:|
|00005440| 79 28 63 6f 72 72 25 28 | 6e 25 29 2c 70 25 29 3d |y(corr%(|n%),p%)=|
|00005450| 30 0d 1e 1e 06 20 ed 0d | 1e 28 23 20 70 6d 61 78 |0.... ..|.(# pmax|
|00005460| 25 28 6e 25 29 3d 30 3a | 70 6d 61 78 25 28 63 6f |%(n%)=0:|pmax%(co|
|00005470| 72 72 25 28 6e 25 29 29 | 3d 30 0d 1e 32 33 20 6e |rr%(n%))|=0..23 n|
|00005480| 6f 74 66 69 72 73 74 74 | 69 6d 65 25 28 6e 25 29 |otfirstt|ime%(n%)|
|00005490| 3d a3 3a 6e 6f 74 66 69 | 72 73 74 74 69 6d 65 25 |=.:notfi|rsttime%|
|000054a0| 28 63 6f 72 72 25 28 6e | 25 29 29 3d a3 0d 1e 3c |(corr%(n|%))=...<|
|000054b0| 05 e1 0d 1e 46 05 3a 0d | 1e 50 16 dd 20 f2 65 72 |....F.:.|.P.. .er|
|000054c0| 61 73 65 64 65 63 6f 72 | 61 74 69 6f 6e 0d 1e 5a |asedecor|ation..Z|
|000054d0| 0f 20 e7 20 64 65 63 25 | 3d 30 20 8c 0d 1e 64 08 |. . dec%|=0 ...d.|
|000054e0| 20 20 ef 37 0d 1e 6e 06 | 20 cc 0d 1e 78 2f 20 20 | .7..n.| ...x/ |
|000054f0| ef 20 32 39 2c 30 3b 30 | 3b 3a c8 97 20 c8 93 20 |. 29,0;0|;:.. .. |
|00005500| 30 2c 30 2c 31 30 30 30 | 2c 39 36 30 3a c8 97 20 |0,0,1000|,960:.. |
|00005510| b8 20 35 30 30 2c 35 31 | 32 0d 1e 82 19 20 20 ef |. 500,51|2.... .|
|00005520| 20 32 39 2c 78 74 69 6c | 65 25 3b 79 74 69 6c 65 | 29,xtil|e%;ytile|
|00005530| 25 3b 0d 1e 8c 15 20 20 | e3 20 64 25 3d 30 20 b8 |%;.... |. d%=0 .|
|00005540| 20 64 65 63 25 2d 31 0d | 1e 96 3e 20 20 20 e6 20 | dec%-1.|..> . |
|00005550| 33 2c 31 35 3a c8 93 20 | c8 90 20 78 28 73 65 67 |3,15:.. |.. x(seg|
|00005560| 6d 65 6e 74 73 25 2b 64 | 25 2c 30 29 2d 35 2c 79 |ments%+d|%,0)-5,y|
|00005570| 28 73 65 67 6d 65 6e 74 | 73 25 2b 64 25 2c 30 29 |(segment|s%+d%,0)|
|00005580| 2d 35 2c 31 30 0d 1e a0 | 07 20 20 ed 0d 1e aa 07 |-5,10...|. .....|
|00005590| 20 20 f5 0d 1e b4 1d 20 | 20 20 f5 20 c8 97 20 6d | ..... | . .. m|
|000055a0| 78 25 2c 6d 79 25 2c 62 | 25 3a fd 20 62 25 3d 30 |x%,my%,b|%:. b%=0|
|000055b0| 0d 1e be 2b 20 20 20 f5 | 20 c8 97 20 6d 78 25 2c |...+ .| .. mx%,|
|000055c0| 6d 79 25 2c 62 25 3a fd | 20 62 25 3d 31 20 84 20 |my%,b%:.| b%=1 . |
|000055d0| 62 25 3d 32 20 84 20 62 | 25 3d 34 0d 1e c8 0f 20 |b%=2 . b|%=4.... |
|000055e0| 20 20 e7 20 62 25 3d 32 | 20 8c 0d 1e d2 17 20 20 | . b%=2| ..... |
|000055f0| 20 20 e3 20 64 25 3d 30 | 20 b8 20 64 65 63 25 2d | . d%=0| . dec%-|
|00005600| 31 0d 1e dc 40 20 20 20 | 20 20 e6 20 33 2c 31 35 |1...@ | . 3,15|
|00005610| 3a c8 93 20 c8 90 20 78 | 28 73 65 67 6d 65 6e 74 |:.. .. x|(segment|
|00005620| 73 25 2b 64 25 2c 30 29 | 2d 35 2c 79 28 73 65 67 |s%+d%,0)|-5,y(seg|
|00005630| 6d 65 6e 74 73 25 2b 64 | 25 2c 30 29 2d 35 2c 31 |ments%+d|%,0)-5,1|
|00005640| 30 0d 1e e6 09 20 20 20 | 20 ed 0d 1e f0 3b 20 20 |0.... | ....; |
|00005650| 20 20 ef 20 32 39 2c 78 | 6d 6f 74 69 66 25 3b 79 | . 29,x|motif%;y|
|00005660| 6d 6f 74 69 66 25 3b 3a | e6 20 30 2c 31 32 3a c8 |motif%;:|. 0,12:.|
|00005670| 93 20 c8 90 20 2d 31 35 | 2c 2d 32 30 30 2c 32 38 |. .. -15|,-200,28|
|00005680| 35 2c 31 38 30 0d 1e fa | 42 20 20 20 20 c8 8f 20 |5,180...|B .. |
|00005690| c8 90 20 28 78 6d 61 78 | 25 2d 78 6d 69 6e 25 29 |.. (xmax|%-xmin%)|
|000056a0| 2a a4 73 63 61 6c 65 2f | 32 2d 35 2c 28 79 6d 61 |*.scale/|2-5,(yma|
|000056b0| 78 25 2d 79 6d 69 6e 25 | 29 2a a4 73 63 61 6c 65 |x%-ymin%|)*.scale|
|000056c0| 2f 32 2d 35 2c 32 30 0d | 1f 04 17 20 20 20 20 f2 |/2-5,20.|... .|
|000056d0| 73 68 6f 77 64 65 73 69 | 67 6e 6d 65 6e 75 0d 1f |showdesi|gnmenu..|
|000056e0| 0e 08 20 20 20 cd 0d 1f | 18 16 20 20 20 e7 20 62 |.. ...|.. . b|
|000056f0| 25 3d 31 20 84 20 62 25 | 3d 34 20 8c 0d 1f 22 29 |%=1 . b%|=4 ...")|
|00005700| 20 20 20 20 e3 20 64 25 | 3d 73 65 67 6d 65 6e 74 | . d%|=segment|
|00005710| 73 25 20 b8 20 73 65 67 | 6d 65 6e 74 73 25 2b 64 |s% . seg|ments%+d|
|00005720| 65 63 25 2d 31 0d 1f 2c | 37 20 20 20 20 20 e7 20 |ec%-1..,|7 . |
|00005730| a4 70 6f 73 69 74 69 6f | 6e 28 6d 78 25 2c 6d 79 |.positio|n(mx%,my|
|00005740| 25 2c 78 28 64 25 2c 30 | 29 2c 79 28 64 25 2c 30 |%,x(d%,0|),y(d%,0|
|00005750| 29 2c 38 29 20 8c 20 6e | 25 3d 64 25 0d 1f 36 09 |),8) . n|%=d%..6.|
|00005760| 20 20 20 20 ed 0d 1f 40 | 30 20 20 20 20 e7 20 a4 | ...@|0 . .|
|00005770| 70 6f 73 69 74 69 6f 6e | 28 6d 78 25 2c 6d 79 25 |position|(mx%,my%|
|00005780| 2c 78 28 6e 25 2c 30 29 | 2c 79 28 6e 25 2c 30 29 |,x(n%,0)|,y(n%,0)|
|00005790| 2c 38 29 20 8c 0d 1f 4a | 2c 20 20 20 20 20 e6 20 |,8) ...J|, . |
|000057a0| 33 2c 31 35 3a c8 93 20 | c8 90 20 78 28 6e 25 2c |3,15:.. |.. x(n%,|
|000057b0| 30 29 2d 35 2c 79 28 6e | 25 2c 30 29 2d 35 2c 31 |0)-5,y(n|%,0)-5,1|
|000057c0| 30 0d 1f 54 25 20 20 20 | 20 20 e3 20 73 74 61 72 |0..T% | . star|
|000057d0| 74 25 3d 30 20 b8 20 70 | 6d 61 78 25 28 6e 25 29 |t%=0 . p|max%(n%)|
|000057e0| 2d 33 20 88 20 33 0d 1f | 5e 20 20 20 20 20 20 20 |-3 . 3..|^ |
|000057f0| e3 20 69 25 3d 73 74 61 | 72 74 25 20 b8 20 73 74 |. i%=sta|rt% . st|
|00005800| 61 72 74 25 2b 33 0d 1f | 68 3c 20 20 20 20 20 20 |art%+3..|h< |
|00005810| 20 50 28 69 25 2d 73 74 | 61 72 74 25 2c 78 25 29 | P(i%-st|art%,x%)|
|00005820| 3d 78 28 6e 25 2c 69 25 | 29 3a 50 28 69 25 2d 73 |=x(n%,i%|):P(i%-s|
|00005830| 74 61 72 74 25 2c 79 25 | 29 3d 79 28 6e 25 2c 69 |tart%,y%|)=y(n%,i|
|00005840| 25 29 0d 1f 72 0b 20 20 | 20 20 20 20 ed 0d 1f 7c |%)..r. | ...||
|00005850| 23 20 20 20 20 20 20 e6 | 20 30 2c 30 3a f2 62 65 |# .| 0,0:.be|
|00005860| 7a 69 65 72 63 75 72 76 | 65 28 50 28 29 2c 35 29 |ziercurv|e(P(),5)|
|00005870| 0d 1f 86 0a 20 20 20 20 | 20 ed 0d 1f 90 12 20 20 |.... | ..... |
|00005880| 20 20 20 f2 72 65 6e 75 | 6d 62 65 72 0d 1f 9a 18 | .renu|mber....|
|00005890| 20 20 20 20 20 e7 20 64 | 65 63 25 3d 30 20 8c 20 | . d|ec%=0 . |
|000058a0| 62 25 3d 31 0d 1f a4 09 | 20 20 20 20 cd 0d 1f ae |b%=1....| ....|
|000058b0| 08 20 20 20 cd 0d 1f b8 | 0c 20 20 fd 20 62 25 3d |. ....|. . b%=|
|000058c0| 31 0d 1f c2 10 20 20 e7 | 20 64 65 63 25 3e 30 20 |1.... .| dec%>0 |
|000058d0| 8c 0d 1f cc 16 20 20 20 | e3 20 64 25 3d 30 20 b8 |..... |. d%=0 .|
|000058e0| 20 64 65 63 25 2d 31 0d | 1f d6 3f 20 20 20 20 e6 | dec%-1.|..? .|
|000058f0| 20 33 2c 31 35 3a c8 93 | 20 c8 90 20 78 28 73 65 | 3,15:..| .. x(se|
|00005900| 67 6d 65 6e 74 73 25 2b | 64 25 2c 30 29 2d 35 2c |gments%+|d%,0)-5,|
|00005910| 79 28 73 65 67 6d 65 6e | 74 73 25 2b 64 25 2c 30 |y(segmen|ts%+d%,0|
|00005920| 29 2d 35 2c 31 30 0d 1f | e0 08 20 20 20 ed 0d 1f |)-5,10..|.. ...|
|00005930| ea 07 20 20 cd 0d 1f f4 | 3a 20 20 ef 20 32 39 2c |.. ....|: . 29,|
|00005940| 30 3b 30 3b 3a c8 97 20 | c8 93 20 31 30 30 30 2c |0;0;:.. |.. 1000,|
|00005950| 30 2c 32 38 30 2c 39 36 | 30 3a ef 20 32 39 2c 78 |0,280,96|0:. 29,x|
|00005960| 6d 6f 74 69 66 25 3b 79 | 6d 6f 74 69 66 25 3b 0d |motif%;y|motif%;.|
|00005970| 1f fe 3e 20 20 c8 97 20 | b8 20 a4 73 63 61 6c 65 |..> .. |. .scale|
|00005980| 2a 28 78 6d 61 78 25 2d | 78 6d 69 6e 25 29 2f 32 |*(xmax%-|xmin%)/2|
|00005990| 2b 34 30 2c a4 73 63 61 | 6c 65 2a 28 79 6d 61 78 |+40,.sca|le*(ymax|
|000059a0| 25 2d 79 6d 69 6e 25 29 | 2f 32 2b 34 30 0d 20 08 |%-ymin%)|/2+40. .|
|000059b0| 06 20 cd 0d 20 12 05 e1 | 0d 20 1c 05 3a 0d 20 26 |. .. ...|. ..:. &|
|000059c0| 0f dd 20 f2 72 65 6e 75 | 6d 62 65 72 0d 20 30 17 |.. .renu|mber. 0.|
|000059d0| 20 e3 20 70 25 3d 30 20 | b8 20 70 6d 61 78 25 28 | . p%=0 |. pmax%(|
|000059e0| 6e 25 29 0d 20 3a 1b 20 | 20 78 28 6e 25 2c 70 25 |n%). :. | x(n%,p%|
|000059f0| 29 3d 30 3a 79 28 6e 25 | 2c 70 25 29 3d 30 0d 20 |)=0:y(n%|,p%)=0. |
|00005a00| 44 06 20 ed 0d 20 4e 10 | 20 70 6d 61 78 25 28 6e |D. .. N.| pmax%(n|
|00005a10| 25 29 3d 30 0d 20 58 0a | 20 64 25 3d 6e 25 0d 20 |%)=0. X.| d%=n%. |
|00005a20| 62 19 20 c8 95 20 64 25 | 3c 73 65 67 6d 65 6e 74 |b. .. d%|<segment|
|00005a30| 73 25 2b 64 65 63 25 0d | 20 6c 1a 20 20 e3 20 70 |s%+dec%.| l. . p|
|00005a40| 25 3d 30 20 b8 20 70 6d | 61 78 25 28 64 25 2b 31 |%=0 . pm|ax%(d%+1|
|00005a50| 29 0d 20 76 2e 20 20 20 | 78 28 64 25 2c 70 25 29 |). v. |x(d%,p%)|
|00005a60| 3d 78 28 64 25 2b 31 2c | 70 25 29 3a 79 28 64 25 |=x(d%+1,|p%):y(d%|
|00005a70| 2c 70 25 29 3d 79 28 64 | 25 2b 31 2c 70 25 29 0d |,p%)=y(d|%+1,p%).|
|00005a80| 20 80 07 20 20 ed 0d 20 | 8a 21 20 20 70 6d 61 78 | .. .. |.! pmax|
|00005a90| 25 28 64 25 29 3d 70 6d | 61 78 25 28 64 25 2b 31 |%(d%)=pm|ax%(d%+1|
|00005aa0| 29 3a 64 25 2b 3d 31 0d | 20 94 06 20 ce 0d 20 9e |):d%+=1.| .. .. .|
|00005ab0| 17 20 e7 20 64 65 63 25 | 3e 30 20 8c 20 64 65 63 |. . dec%|>0 . dec|
|00005ac0| 25 2d 3d 31 0d 20 a8 05 | e1 0d 20 b2 05 3a 0d 20 |%-=1. ..|.. ..:. |
|00005ad0| bc 33 3a 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |.3:=====|========|
|00005ae0| 20 f4 20 54 69 6c 65 20 | 43 6c 75 73 74 65 72 20 | . Tile |Cluster |
|00005af0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00005b00| 3d 0d 20 c6 05 3a 0d 20 | d0 13 dd 20 f2 73 63 72 |=. ..:. |... .scr|
|00005b10| 65 65 6e 5f 74 68 72 65 | 65 0d 20 da 20 20 64 65 |een_thre|e. . de|
|00005b20| 6c 74 61 78 6f 72 69 67 | 25 3d 30 3a 64 65 6c 74 |ltaxorig|%=0:delt|
|00005b30| 61 79 6f 72 69 67 25 3d | 30 0d 20 e4 06 20 db 0d |ayorig%=|0. .. ..|
|00005b40| 20 ee 22 20 e6 20 31 32 | 3a c8 93 20 c8 90 20 31 | ." . 12|:.. .. 1|
|00005b50| 30 30 30 2c 30 2c 32 38 | 30 2c 39 36 30 3a e6 20 |000,0,28|0,960:. |
|00005b60| 37 0d 20 f8 16 20 86 20 | 31 30 30 30 2c 30 2c 31 |7. .. . |1000,0,1|
|00005b70| 30 30 30 2c 39 36 30 0d | 21 02 17 20 f2 73 68 61 |000,960.|!.. .sha|
|00005b80| 64 6f 77 63 6c 75 73 74 | 65 72 6d 65 6e 75 0d 21 |dowclust|ermenu.!|
|00005b90| 0c 0d 20 f2 63 6c 75 73 | 74 65 72 0d 21 16 05 e1 |.. .clus|ter.!...|
|00005ba0| 0d 21 20 35 3a 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.! 5:---|--------|
|00005bb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005bc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005bd0| 2d 2d 2d 2d 2d 0d 21 2a | 0e dd 20 f2 63 6c 75 73 |-----.!*|.. .clus|
|00005be0| 74 65 72 0d 21 34 1b 20 | e6 20 30 3a c8 93 20 c8 |ter.!4. |. 0:.. .|
|00005bf0| 90 20 30 2c 30 2c 31 30 | 30 30 2c 39 36 30 0d 21 |. 0,0,10|00,960.!|
|00005c00| 3e 1a 20 e6 20 37 3a 86 | 20 31 30 30 30 2c 30 2c |>. . 7:.| 1000,0,|
|00005c10| 31 30 30 30 2c 39 36 30 | 0d 21 48 14 20 f2 64 72 |1000,960|.!H. .dr|
|00005c20| 61 77 63 6c 75 73 74 65 | 72 3a ef 37 0d 21 52 15 |awcluste|r:.7.!R.|
|00005c30| 20 f2 73 68 6f 77 63 6c | 75 73 74 65 72 6d 65 6e | .showcl|ustermen|
|00005c40| 75 0d 21 5c 05 e1 0d 21 | 66 35 3a 2d 2d 2d 2d 2d |u.!\...!|f5:-----|
|00005c50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005c60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005c70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 21 70 12 dd |--------|---.!p..|
|00005c80| 20 f2 64 72 61 77 63 6c | 75 73 74 65 72 0d 21 7a | .drawcl|uster.!z|
|00005c90| 13 20 ea 20 6e 25 2c 69 | 25 2c 73 74 61 72 74 25 |. . n%,i|%,start%|
|00005ca0| 0d 21 84 16 20 c8 99 20 | 22 48 6f 75 72 67 6c 61 |.!.. .. |"Hourgla|
|00005cb0| 73 73 5f 4f 6e 22 0d 21 | 8e 15 20 63 6c 75 73 74 |ss_On".!|.. clust|
|00005cc0| 65 72 73 63 61 6c 65 3d | 30 2e 35 0d 21 98 1e 20 |erscale=|0.5.!.. |
|00005cd0| e3 20 6e 25 3d 30 20 b8 | 20 73 65 67 6d 65 6e 74 |. n%=0 .| segment|
|00005ce0| 73 25 2b 64 65 63 25 2d | 31 0d 21 a2 22 20 20 e3 |s%+dec%-|1.!." .|
|00005cf0| 20 73 74 61 72 74 25 3d | 30 20 b8 20 70 6d 61 78 | start%=|0 . pmax|
|00005d00| 25 28 6e 25 29 2d 33 20 | 88 20 33 0d 21 ac 1d 20 |%(n%)-3 |. 3.!.. |
|00005d10| 20 20 e3 20 69 25 3d 73 | 74 61 72 74 25 20 b8 20 | . i%=s|tart% . |
|00005d20| 73 74 61 72 74 25 2b 33 | 0d 21 b6 53 20 20 20 20 |start%+3|.!.S |
|00005d30| 50 28 69 25 2d 73 74 61 | 72 74 25 2c 78 25 29 3d |P(i%-sta|rt%,x%)=|
|00005d40| 78 28 6e 25 2c 69 25 29 | 2a 63 6c 75 73 74 65 72 |x(n%,i%)|*cluster|
|00005d50| 73 63 61 6c 65 3a 50 28 | 69 25 2d 73 74 61 72 74 |scale:P(|i%-start|
|00005d60| 25 2c 79 25 29 3d 79 28 | 6e 25 2c 69 25 29 2a 63 |%,y%)=y(|n%,i%)*c|
|00005d70| 6c 75 73 74 65 72 73 63 | 61 6c 65 0d 21 c0 08 20 |lustersc|ale.!.. |
|00005d80| 20 20 ed 0d 21 ca 15 20 | 20 20 f2 63 6c 75 73 74 | ..!.. | .clust|
|00005d90| 65 72 64 65 74 61 69 6c | 0d 21 d4 07 20 20 ed 0d |erdetail|.!.. ..|
|00005da0| 21 de 06 20 ed 0d 21 e8 | 17 20 c8 99 20 22 48 6f |!.. ..!.|. .. "Ho|
|00005db0| 75 72 67 6c 61 73 73 5f | 4f 66 66 22 0d 21 f2 05 |urglass_|Off".!..|
|00005dc0| e1 0d 21 fc 05 3a 0d 22 | 06 26 f4 20 44 45 46 20 |..!..:."|.&. DEF |
|00005dd0| 50 52 4f 43 63 6c 75 73 | 74 65 72 64 65 74 61 69 |PROCclus|terdetai|
|00005de0| 6c 20 2d 20 61 70 70 65 | 6e 64 65 64 0d 22 10 05 |l - appe|nded."..|
|00005df0| 3a 0d 22 1a 11 dd 20 f2 | 64 72 61 77 63 75 72 76 |:."... .|drawcurv|
|00005e00| 65 73 0d 22 24 39 20 20 | 78 6f 72 69 67 25 3d 78 |es."$9 |xorig%=x|
|00005e10| 6f 72 69 67 25 2b 64 65 | 6c 74 61 78 6f 72 69 67 |orig%+de|ltaxorig|
|00005e20| 25 3a 79 6f 72 69 67 25 | 3d 79 6f 72 69 67 25 2b |%:yorig%|=yorig%+|
|00005e30| 64 65 6c 74 61 79 6f 72 | 69 67 25 0d 22 2e 19 20 |deltayor|ig%.".. |
|00005e40| 20 ef 20 32 39 2c 78 6f | 72 69 67 25 3b 79 6f 72 | . 29,xo|rig%;yor|
|00005e50| 69 67 25 3b 0d 22 38 1f | 20 20 e6 20 30 2c 37 3a |ig%;."8.| . 0,7:|
|00005e60| f2 62 65 7a 69 65 72 63 | 75 72 76 65 28 50 28 29 |.bezierc|urve(P()|
|00005e70| 2c 35 29 0d 22 42 05 e1 | 0d 22 4c 05 3a 0d 22 56 |,5)."B..|."L.:."V|
|00005e80| 0e dd 20 f2 72 65 66 6c | 65 63 74 0d 22 60 0f 20 |.. .refl|ect."`. |
|00005e90| e3 20 69 25 3d 30 20 b8 | 20 33 0d 22 6a 16 20 20 |. i%=0 .| 3."j. |
|00005ea0| 50 28 69 25 2c 30 29 3d | 2d 50 28 69 25 2c 30 29 |P(i%,0)=|-P(i%,0)|
|00005eb0| 0d 22 74 06 20 ed 0d 22 | 7e 05 e1 0d 22 88 05 3a |."t. .."|~..."..:|
|00005ec0| 0d 22 92 09 dd 20 f2 70 | 69 0d 22 9c 0f 20 e3 20 |."... .p|i.".. . |
|00005ed0| 69 25 3d 30 20 b8 20 33 | 0d 22 a6 10 20 20 e3 20 |i%=0 . 3|.".. . |
|00005ee0| 6a 25 3d 30 20 b8 20 31 | 0d 22 b0 19 20 20 20 50 |j%=0 . 1|.".. P|
|00005ef0| 28 69 25 2c 6a 25 29 3d | 2d 50 28 69 25 2c 6a 25 |(i%,j%)=|-P(i%,j%|
|00005f00| 29 0d 22 ba 07 20 20 ed | 0d 22 c4 06 20 ed 0d 22 |).".. .|.".. .."|
|00005f10| ce 05 e1 0d 22 d8 05 3a | 0d 22 e2 0d dd 20 f2 68 |...."..:|."... .h|
|00005f20| 61 6c 66 70 69 0d 22 ec | 0f 20 e3 20 69 25 3d 30 |alfpi.".|. . i%=0|
|00005f30| 20 b8 20 33 0d 22 f6 26 | 20 20 70 28 69 25 2c 30 | . 3.".&| p(i%,0|
|00005f40| 29 3d 2d 50 28 69 25 2c | 31 29 3a 70 28 69 25 2c |)=-P(i%,|1):p(i%,|
|00005f50| 31 29 3d 50 28 69 25 2c | 30 29 0d 23 00 25 20 20 |1)=P(i%,|0).#.% |
|00005f60| 50 28 69 25 2c 30 29 3d | 70 28 69 25 2c 30 29 3a |P(i%,0)=|p(i%,0):|
|00005f70| 50 28 69 25 2c 31 29 3d | 70 28 69 25 2c 31 29 0d |P(i%,1)=|p(i%,1).|
|00005f80| 23 0a 06 20 ed 0d 23 14 | 05 e1 0d 23 1e 05 3a 0d |#.. ..#.|...#..:.|
|00005f90| 23 28 0e dd 20 f2 74 68 | 69 72 64 70 69 0d 23 32 |#(.. .th|irdpi.#2|
|00005fa0| 0f 20 e3 20 69 25 3d 30 | 20 b8 20 33 0d 23 3c 26 |. . i%=0| . 3.#<&|
|00005fb0| 20 20 70 28 69 25 2c 30 | 29 3d 28 50 28 69 25 2c | p(i%,0|)=(P(i%,|
|00005fc0| 30 29 2d b6 28 33 29 2a | 50 28 69 25 2c 31 29 29 |0)-.(3)*|P(i%,1))|
|00005fd0| 2f 32 0d 23 46 26 20 20 | 70 28 69 25 2c 31 29 3d |/2.#F& |p(i%,1)=|
|00005fe0| 28 b6 28 33 29 2a 50 28 | 69 25 2c 30 29 2b 50 28 |(.(3)*P(|i%,0)+P(|
|00005ff0| 69 25 2c 31 29 29 2f 32 | 0d 23 50 25 20 20 50 28 |i%,1))/2|.#P% P(|
|00006000| 69 25 2c 30 29 3d 70 28 | 69 25 2c 30 29 3a 50 28 |i%,0)=p(|i%,0):P(|
|00006010| 69 25 2c 31 29 3d 70 28 | 69 25 2c 31 29 0d 23 5a |i%,1)=p(|i%,1).#Z|
|00006020| 06 20 ed 0d 23 64 05 e1 | 0d 23 6e 05 3a 0d 23 78 |. ..#d..|.#n.:.#x|
|00006030| 33 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |3=======|========|
|00006040| 3d 3d 3d 20 f4 20 43 6f | 6c 6f 75 72 20 3d 3d 3d |=== . Co|lour ===|
|00006050| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00006060| 0d 23 82 05 3a 0d 23 8c | 0d dd 20 f2 63 6f 6c 6f |.#..:.#.|.. .colo|
|00006070| 75 72 0d 23 96 14 20 ea | 20 63 68 6f 69 63 65 25 |ur.#.. .| choice%|
|00006080| 2c 58 25 2c 59 25 0d 23 | a0 0e 20 ef 20 32 39 2c |,X%,Y%.#|.. . 29,|
|00006090| 30 3b 30 3b 0d 23 aa 10 | 20 f2 73 63 72 65 65 6e |0;0;.#..| .screen|
|000060a0| 64 61 74 61 0d 23 b4 0e | 20 63 68 6f 69 63 65 25 |data.#..| choice%|
|000060b0| 3d 31 0d 23 be 19 20 f2 | 64 72 61 77 73 63 72 65 |=1.#.. .|drawscre|
|000060c0| 65 6e 28 61 72 65 61 25 | 28 29 29 0d 23 c8 19 20 |en(area%|()).#.. |
|000060d0| c8 97 20 b8 20 31 30 31 | 32 2b 31 32 38 2c 32 31 |.. . 101|2+128,21|
|000060e0| 30 2b 39 36 0d 23 d2 14 | 20 6e 6f 74 66 69 72 73 |0+96.#..| notfirs|
|000060f0| 74 74 69 6d 65 25 3d a3 | 0d 23 dc 16 20 e6 20 a4 |ttime%=.|.#.. . .|
|00006100| 63 6f 6c 28 63 68 6f 69 | 63 65 25 2d 31 29 0d 23 |col(choi|ce%-1).#|
|00006110| e6 06 20 f5 0d 23 f0 1e | 20 20 f5 20 c8 97 20 6d |.. ..#..| . .. m|
|00006120| 78 25 2c 6d 79 25 2c 6d | 62 25 3a fd 20 6d 62 25 |x%,my%,m|b%:. mb%|
|00006130| 3d 30 0d 23 fa d7 20 20 | f5 20 c8 97 20 6d 78 25 |=0.#.. |. .. mx%|
|00006140| 2c 6d 79 25 2c 6d 62 25 | 3a fd 20 6d 62 25 3d 34 |,my%,mb%|:. mb%=4|
|00006150| 20 80 20 a4 67 65 74 62 | 6f 78 6e 6f 28 6d 78 25 | . .getb|oxno(mx%|
|00006160| 2c 6d 79 25 2c 61 72 65 | 61 25 28 29 29 3e 30 20 |,my%,are|a%())>0 |
|00006170| 20 84 20 6d 62 25 3d 34 | 20 80 20 a4 70 6f 73 69 | . mb%=4| . .posi|
|00006180| 74 69 6f 6e 64 28 6d 78 | 25 2c 6d 79 25 2c 30 2c |tiond(mx|%,my%,0,|
|00006190| 30 2c 31 30 30 30 2c 31 | 30 32 34 29 20 84 20 6d |0,1000,1|024) . m|
|000061a0| 62 25 3d 31 20 80 20 a4 | 70 6f 73 69 74 69 6f 6e |b%=1 . .|position|
|000061b0| 64 28 6d 78 25 2c 6d 79 | 25 2c 30 2c 30 2c 31 30 |d(mx%,my|%,0,0,10|
|000061c0| 30 30 2c 31 30 32 34 29 | 20 84 20 6d 62 25 3d 34 |00,1024)| . mb%=4|
|000061d0| 20 80 20 a4 70 6f 73 69 | 74 69 6f 6e 64 28 6d 78 | . .posi|tiond(mx|
|000061e0| 25 2c 6d 79 25 2c 31 30 | 39 35 2c 35 34 30 2c 38 |%,my%,10|95,540,8|
|000061f0| 30 2c 34 30 29 20 80 20 | 6e 6f 72 6d 61 6c 25 3d |0,40) . |normal%=|
|00006200| a3 20 84 20 6d 62 25 3d | 32 0d 24 04 0c 20 20 c8 |. . mb%=|2.$.. .|
|00006210| 8e 20 b9 20 ca 0d 24 0e | 2e 20 20 20 c9 20 6d 62 |. . ..$.|. . mb|
|00006220| 25 3d 34 20 80 20 a4 67 | 65 74 62 6f 78 6e 6f 28 |%=4 . .g|etboxno(|
|00006230| 6d 78 25 2c 6d 79 25 2c | 61 72 65 61 25 28 29 29 |mx%,my%,|area%())|
|00006240| 3e 30 3a 0d 24 18 19 20 | 20 20 20 e7 20 6e 6f 74 |>0:.$.. | . not|
|00006250| 66 69 72 73 74 74 69 6d | 65 25 20 8c 0d 24 22 2e |firsttim|e% ..$".|
|00006260| 20 20 20 20 20 e6 20 37 | 3a c8 93 20 31 30 31 32 | . 7|:.. 1012|
|00006270| 2b 36 34 2a 58 25 2c 32 | 31 30 2b 36 34 2a 28 32 |+64*X%,2|10+64*(2|
|00006280| 2d 59 25 29 2c 36 34 2c | 36 34 0d 24 2c 09 20 20 |-Y%),64,|64.$,. |
|00006290| 20 20 cd 0d 24 36 2e 20 | 20 20 20 63 68 6f 69 63 | ..$6. | choic|
|000062a0| 65 25 3d a4 67 65 74 62 | 6f 78 6e 6f 28 6d 78 25 |e%=.getb|oxno(mx%|
|000062b0| 2c 6d 79 25 2c 61 72 65 | 61 25 28 29 29 3a ef 20 |,my%,are|a%()):. |
|000062c0| 37 0d 24 40 29 20 20 20 | 20 58 25 3d 28 63 68 6f |7.$@) | X%=(cho|
|000062d0| 69 63 65 25 2d 31 29 83 | 34 3a 59 25 3d 28 63 68 |ice%-1).|4:Y%=(ch|
|000062e0| 6f 69 63 65 25 2d 31 29 | 81 34 0d 24 4a 2d 20 20 |oice%-1)|.4.$J- |
|000062f0| 20 20 e6 20 30 3a c8 93 | 20 31 30 31 32 2b 36 34 | . 0:..| 1012+64|
|00006300| 2a 58 25 2c 32 31 30 2b | 36 34 2a 28 32 2d 59 25 |*X%,210+|64*(2-Y%|
|00006310| 29 2c 36 34 2c 36 34 0d | 24 54 14 20 20 20 20 c8 |),64,64.|$T. .|
|00006320| 97 20 b8 20 35 30 30 2c | 35 31 32 0d 24 5e 14 20 |. . 500,|512.$^. |
|00006330| 20 20 20 c8 8e 20 63 68 | 6f 69 63 65 25 20 ca 0d | .. ch|oice% ..|
|00006340| 24 68 12 20 20 20 20 20 | c9 20 31 20 3a 20 e6 20 |$h. |. 1 : . |
|00006350| 30 0d 24 72 13 20 20 20 | 20 20 c9 20 32 20 3a 20 |0.$r. | . 2 : |
|00006360| e6 20 31 32 0d 24 7c 12 | 20 20 20 20 20 c9 20 33 |. 12.$|.| . 3|
|00006370| 20 3a 20 e6 20 39 0d 24 | 86 13 20 20 20 20 20 c9 | : . 9.$|.. .|
|00006380| 20 34 20 3a 20 e6 20 31 | 34 0d 24 90 13 20 20 20 | 4 : . 1|4.$.. |
|00006390| 20 20 c9 20 35 20 3a 20 | e6 20 31 30 0d 24 9a 12 | . 5 : |. 10.$..|
|000063a0| 20 20 20 20 20 c9 20 36 | 20 3a 20 e6 20 36 0d 24 | . 6| : . 6.$|
|000063b0| a4 13 20 20 20 20 20 c9 | 20 37 20 3a 20 e6 20 31 |.. .| 7 : . 1|
|000063c0| 33 0d 24 ae 13 20 20 20 | 20 20 c9 20 38 20 3a 20 |3.$.. | . 8 : |
|000063d0| e6 20 31 35 0d 24 b8 12 | 20 20 20 20 20 c9 20 39 |. 15.$..| . 9|
|000063e0| 20 3a 20 e6 20 35 0d 24 | c2 13 20 20 20 20 20 c9 | : . 5.$|.. .|
|000063f0| 20 31 30 3a 20 e6 20 31 | 31 0d 24 cc 12 20 20 20 | 10: . 1|1.$.. |
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
