home *** CD-ROM | disk | FTP | other *** search
/ ARM Club 1 / ARM_CLUB_CD.iso / contents / apps / general / progs / planets < prev    next >
ArcFS Archive  |  1995-06-25  |  25.3 KB

open in: MacOS 8.1     |     Win98     |     DOS

browse contents    |     view JSON data     |     view as text


This file was processed as: ArcFS Archive (archive/arcFS).

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert ArcFS Archive (archive/arcFS) magic Supported
100% file RISC OS archive (ArcFS format) default
99% file data default
100% TrID Acorn ArcFS Archive default
100% dearkID deark: arcfs default
100% gt2 Kopftext: 'Archive' default (weak)
100% detectItEasy Archive: ArcFS default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | 20 01 00 00 80 01 00 00 |Archive.| .......|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 82 21 50 6c 61 6e 65 74 | 73 00 00 00 ff ff ff ff |.!Planet|s.......|
|00000070| 43 dc fd ff d2 52 e3 9b | 33 00 00 00 ff ff ff ff |C....R..|3.......|
|00000080| fc 00 00 80 82 21 42 6f | 6f 74 00 00 00 00 00 00 |.....!Bo|ot......|
|00000090| 23 01 00 00 43 eb ff ff | b4 b9 e2 9b 03 00 ae c8 |#...C...|........|
|000000a0| 23 01 00 00 24 00 00 00 | 82 21 52 75 6e 00 04 00 |#...$...|.!Run...|
|000000b0| 00 00 00 00 bd 00 00 00 | 42 eb ff ff d6 b4 60 70 |........|B.....`p|
|000000c0| 03 00 ad f8 bd 00 00 00 | 6b 01 00 00 82 21 52 75 |........|k....!Ru|
|000000d0| 6e 49 6d 61 67 65 00 00 | fe 56 00 00 42 fb ff ff |nImage..|.V..B...|
|000000e0| d5 04 5a b5 03 00 33 87 | fe 56 00 00 4c 02 00 00 |..Z...3.|.V..L...|
|000000f0| 82 21 53 70 72 69 74 65 | 73 00 00 00 6c 04 00 00 |.!Sprite|s...l...|
|00000100| 42 f9 ff ff 5c 63 51 70 | 03 00 5e aa 6c 04 00 00 |B...\cQp|..^.l...|
|00000110| 6e 59 00 00 82 41 72 72 | 6f 77 73 00 00 00 00 00 |nY...Arr|ows.....|
|00000120| 9c 05 00 00 41 f9 ff ff | 3a b1 1a f1 03 00 ef 95 |....A...|:.......|
|00000130| 9c 05 00 00 fe 5d 00 00 | 00 61 00 00 c3 00 04 00 |.....]..|.a......|
|00000140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000150| 00 00 00 00 00 00 00 00 | 80 fe ff ff 00 00 00 00 |........|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 d4 01 00 00 |........|........|
|00000180| 46 69 6c 65 44 61 74 61 | 82 21 42 6f 6f 74 00 00 |FileData|.!Boot..|
|00000190| 00 00 00 00 23 01 00 00 | 43 eb ff ff b4 b9 e2 9b |....#...|C.......|
|000001a0| 03 00 ae c8 7c 20 42 6f | 6f 74 20 66 69 6c 65 20 |....| Bo|ot file |
|000001b0| 66 6f 72 20 21 50 6c 61 | 6e 65 74 73 2e 0a 7c 0a |for !Pla|nets..|.|
|000001c0| 7c 20 4e 6f 74 65 20 74 | 68 65 20 75 73 65 20 6f || Note t|he use o|
|000001d0| 66 20 25 25 20 74 68 61 | 74 20 65 6e 73 75 72 65 |f %% tha|t ensure|
|000001e0| 73 20 74 68 61 74 20 74 | 68 65 20 73 75 62 73 74 |s that t|he subst|
|000001f0| 69 74 75 74 69 6f 6e 20 | 68 61 70 70 65 6e 73 0a |itution |happens.|
|00000200| 7c 20 77 68 65 6e 20 74 | 68 65 20 66 69 6c 65 20 || when t|he file |
|00000210| 69 73 20 72 75 6e 2c 20 | 72 61 74 68 65 72 20 74 |is run, |rather t|
|00000220| 68 61 6e 20 77 68 65 6e | 20 74 68 69 73 20 66 69 |han when| this fi|
|00000230| 6c 65 20 69 73 20 6f 62 | 65 79 65 64 2e 0a 7c 20 |le is ob|eyed..| |
|00000240| 54 68 65 20 4f 62 65 79 | 24 44 69 72 2c 20 6f 6e |The Obey|$Dir, on|
|00000250| 20 74 68 65 20 6f 74 68 | 65 72 20 68 61 6e 64 2c | the oth|er hand,|
|00000260| 20 69 73 20 73 75 62 73 | 74 69 74 75 74 65 64 20 | is subs|tituted |
|00000270| 77 68 65 6e 20 74 68 69 | 73 20 66 69 6c 65 20 69 |when thi|s file i|
|00000280| 73 20 6f 62 65 79 65 64 | 2e 0a 7c 0a 49 63 6f 6e |s obeyed|..|.Icon|
|00000290| 53 70 72 69 74 65 73 20 | 3c 4f 62 65 79 24 44 69 |Sprites |<Obey$Di|
|000002a0| 72 3e 2e 21 53 70 72 69 | 74 65 73 0a 53 65 74 20 |r>.!Spri|tes.Set |
|000002b0| 50 6c 61 6e 65 74 73 24 | 44 69 72 20 3c 4f 62 65 |Planets$|Dir <Obe|
|000002c0| 79 24 44 69 72 3e 0a 46 | 69 6c 65 44 61 74 61 82 |y$Dir>.F|ileData.|
|000002d0| 21 52 75 6e 00 04 00 00 | 00 00 00 bd 00 00 00 42 |!Run....|.......B|
|000002e0| eb ff ff d6 b4 60 70 03 | 00 ad f8 7c 20 50 6c 61 |.....`p.|...| Pla|
|000002f0| 6e 65 74 73 2c 20 76 65 | 72 73 69 6f 6e 20 22 31 |nets, ve|rsion "1|
|00000300| 2e 30 30 20 28 32 38 2d | 53 45 50 2d 38 39 29 22 |.00 (28-|SEP-89)"|
|00000310| 0a 7c 0a 57 69 6d 70 53 | 6c 6f 74 20 2d 6d 69 6e |.|.WimpS|lot -min|
|00000320| 20 32 30 30 4b 20 2d 6d | 61 78 20 32 30 30 4b 0a | 200K -m|ax 200K.|
|00000330| 49 63 6f 6e 53 70 72 69 | 74 65 73 20 3c 4f 62 65 |IconSpri|tes <Obe|
|00000340| 79 24 44 69 72 3e 2e 21 | 53 70 72 69 74 65 73 0a |y$Dir>.!|Sprites.|
|00000350| 53 65 74 20 50 6c 61 6e | 65 74 73 24 44 69 72 20 |Set Plan|ets$Dir |
|00000360| 3c 4f 62 65 79 24 44 69 | 72 3e 0a 57 69 6d 70 53 |<Obey$Di|r>.WimpS|
|00000370| 6c 6f 74 20 2d 6d 69 6e | 20 32 30 30 6b 20 2d 6d |lot -min| 200k -m|
|00000380| 61 78 20 32 30 30 4b 0a | 52 55 4e 20 3c 50 6c 61 |ax 200K.|RUN <Pla|
|00000390| 6e 65 74 73 24 44 69 72 | 3e 2e 21 72 75 6e 69 6d |nets$Dir|>.!runim|
|000003a0| 61 67 65 20 25 2a 30 0a | 46 69 6c 65 44 61 74 61 |age %*0.|FileData|
|000003b0| 82 21 52 75 6e 49 6d 61 | 67 65 00 00 fe 56 00 00 |.!RunIma|ge...V..|
|000003c0| 42 fb ff ff d5 04 5a b5 | 03 00 33 87 0d 00 0a 1e |B.....Z.|..3.....|
|000003d0| f4 20 3e 3c 50 6c 61 6e | 65 74 73 24 44 69 72 3e |. ><Plan|ets$Dir>|
|000003e0| 2e 21 52 75 6e 49 6d 61 | 67 65 0d 00 14 24 f4 20 |.!RunIma|ge...$. |
|000003f0| 28 43 29 20 4d 49 4b 45 | 20 41 54 4b 49 4e 53 4f |(C) MIKE| ATKINSO|
|00000400| 4e 20 26 20 41 4c 45 58 | 20 43 52 4f 53 53 0d 00 |N & ALEX| CROSS..|
|00000410| 1e 0e f4 20 4f 43 54 20 | 31 39 39 30 0d 00 28 05 |... OCT |1990..(.|
|00000420| f4 0d 00 32 04 0d 00 3c | 1e f4 20 4f 4e 20 45 52 |...2...<|.. ON ER|
|00000430| 52 4f 52 20 50 52 4f 43 | 65 72 72 6f 72 20 3a 20 |ROR PROC|error : |
|00000440| 45 4e 44 0d 00 46 0a f2 | 5f 49 6e 69 74 0d 00 50 |END..F..|_Init..P|
|00000450| 0f f2 5f 57 69 6d 70 5f | 4c 6f 6f 70 0d 00 5a 05 |.._Wimp_|Loop..Z.|
|00000460| e0 0d 00 64 04 0d 00 6e | 4e 2d 2d 2d 2d 2d 2d 2d |...d...n|N-------|
|00000470| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000480| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000490| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000004a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000004b0| 2d 2d 2d 0d 00 78 04 0d | 00 82 0e dd f2 5f 43 61 |---..x..|....._Ca|
|000004c0| 6c 63 5f 64 54 0d 00 8c | 09 ea 20 49 2c 4a 0d 00 |lc_dT...|.. I,J..|
|000004d0| 96 44 41 6d 61 78 3d 30 | 20 20 20 20 20 20 20 20 |.DAmax=0| |
|000004e0| 20 3a 20 f4 20 69 6e 69 | 74 69 61 6c 69 73 65 20 | : . ini|tialise |
|000004f0| 6d 61 78 69 6d 75 6d 20 | 61 63 63 65 6c 65 72 61 |maximum |accelera|
|00000500| 74 69 6f 6e 20 66 6f 75 | 6e 64 20 74 6f 20 7a 65 |tion fou|nd to ze|
|00000510| 72 6f 0d 00 a0 04 0d 00 | aa 13 e3 20 49 20 3d 20 |ro......|... I = |
|00000520| 30 20 b8 20 50 6c 61 6e | 73 0d 00 b4 15 20 20 e3 |0 . Plan|s.... .|
|00000530| 20 4a 20 3d 20 30 20 b8 | 20 50 6c 61 6e 73 0d 00 | J = 0 .| Plans..|
|00000540| be 12 20 20 20 20 e7 20 | 49 20 3c 3e 20 4a 20 8c |.. . |I <> J .|
|00000550| 0d 00 c8 4a 20 20 20 20 | 20 20 f4 20 63 61 6c 63 |...J | . calc|
|00000560| 75 6c 61 74 65 20 74 68 | 65 20 61 63 63 65 6c 65 |ulate th|e accele|
|00000570| 72 61 74 69 6f 6e 20 62 | 65 74 77 65 65 6e 20 70 |ration b|etween p|
|00000580| 6c 61 6e 65 74 73 20 49 | 20 61 6e 64 20 4a 20 61 |lanets I| and J a|
|00000590| 6e 64 20 69 66 20 74 68 | 69 73 0d 00 d2 49 20 20 |nd if th|is...I |
|000005a0| 20 20 20 20 f4 20 69 73 | 20 67 72 65 61 74 65 72 | . is| greater|
|000005b0| 20 74 68 61 6e 20 61 6e | 79 20 6f 74 68 65 72 20 | than an|y other |
|000005c0| 73 6f 20 66 61 72 20 66 | 6f 75 6e 64 20 74 68 65 |so far f|ound the|
|000005d0| 6e 20 75 73 65 20 69 74 | 20 61 73 20 74 68 65 20 |n use it| as the |
|000005e0| 6e 65 77 0d 00 dc 21 20 | 20 20 20 20 20 f4 20 6d |new...! | . m|
|000005f0| 61 78 69 6d 75 6d 20 61 | 63 63 65 6c 65 72 61 74 |aximum a|ccelerat|
|00000600| 69 6f 6e 2e 0d 00 e6 04 | 0d 00 f0 46 20 20 20 20 |ion.....|...F |
|00000610| 20 20 72 32 3d 28 50 79 | 28 4a 29 2d 50 79 28 49 | r2=(Py|(J)-Py(I|
|00000620| 29 29 2a 28 50 79 28 4a | 29 2d 50 79 28 49 29 29 |))*(Py(J|)-Py(I))|
|00000630| 20 2b 20 28 50 78 28 4a | 29 2d 50 78 28 49 29 29 | + (Px(J|)-Px(I))|
|00000640| 2a 28 50 78 28 4a 29 2d | 50 78 28 49 29 29 0d 00 |*(Px(J)-|Px(I))..|
|00000650| fa 12 20 20 20 20 20 20 | 46 3d 47 20 2f 20 72 32 |.. |F=G / r2|
|00000660| 0d 01 04 29 20 20 20 20 | 20 20 e7 20 41 6d 61 78 |...) | . Amax|
|00000670| 20 3c 20 46 2a 6d 28 49 | 29 20 8c 20 41 6d 61 78 | < F*m(I|) . Amax|
|00000680| 20 3d 20 46 2a 6d 28 49 | 29 0d 01 0e 29 20 20 20 | = F*m(I|)...) |
|00000690| 20 20 20 e7 20 41 6d 61 | 78 20 3c 20 46 2a 6d 28 | . Ama|x < F*m(|
|000006a0| 4a 29 20 8c 20 41 6d 61 | 78 20 3d 20 46 2a 6d 28 |J) . Ama|x = F*m(|
|000006b0| 4a 29 0d 01 18 09 20 20 | 20 20 cd 0d 01 22 09 20 |J).... | ...". |
|000006c0| 20 ed 20 4a 0d 01 2c 07 | ed 20 49 0d 01 36 04 0d | . J..,.|. I..6..|
|000006d0| 01 40 4c f4 20 75 73 65 | 20 74 68 65 20 6d 61 78 |.@L. use| the max|
|000006e0| 69 6d 75 6d 20 61 63 63 | 65 6c 65 72 61 74 69 6f |imum acc|eleratio|
|000006f0| 6e 20 62 65 74 77 65 65 | 6e 20 61 6e 79 20 74 77 |n betwee|n any tw|
|00000700| 6f 20 70 6c 61 6e 6e 65 | 74 73 20 61 6e 64 20 74 |o planne|ts and t|
|00000710| 68 65 20 72 65 71 75 69 | 72 65 64 0d 01 4a 31 f4 |he requi|red..J1.|
|00000720| 20 61 63 63 75 72 61 63 | 79 20 74 6f 20 63 61 6c | accurac|y to cal|
|00000730| 63 75 6c 61 74 65 20 74 | 68 65 20 63 68 61 6e 67 |culate t|he chang|
|00000740| 65 20 69 6e 20 74 69 6d | 65 20 64 54 0d 01 54 04 |e in tim|e dT..T.|
|00000750| 0d 01 5e 18 64 54 20 3d | 20 31 2f 41 6d 61 78 2f |..^.dT =| 1/Amax/|
|00000760| 41 63 63 75 72 61 63 79 | 0d 01 68 04 0d 01 72 05 |Accuracy|..h...r.|
|00000770| e1 0d 01 7c 04 0d 01 86 | 4e 2d 2d 2d 2d 2d 2d 2d |...|....|N-------|
|00000780| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000790| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000007a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000007b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000007c0| 2d 2d 2d 0d 01 90 04 0d | 01 9a 15 dd f2 5f 43 61 |---.....|....._Ca|
|000007d0| 6c 63 5f 50 6f 73 69 74 | 69 6f 6e 73 0d 01 a4 04 |lc_Posit|ions....|
|000007e0| 0d 01 ae 09 ea 20 49 2c | 4a 0d 01 b8 04 0d 01 c2 |..... I,|J.......|
|000007f0| 13 e3 20 49 20 3d 20 30 | 20 b8 20 50 6c 61 6e 73 |.. I = 0| . Plans|
|00000800| 0d 01 cc 04 0d 01 d6 43 | 20 20 f4 20 69 6e 69 74 |.......C| . init|
|00000810| 69 61 6c 69 73 65 20 74 | 68 65 20 61 63 63 65 6c |ialise t|he accel|
|00000820| 65 72 61 74 69 6f 6e 73 | 20 6f 66 20 74 68 65 20 |erations| of the |
|00000830| 70 6c 61 6e 6e 65 74 73 | 20 69 6e 20 74 68 65 20 |plannets| in the |
|00000840| 58 20 61 6e 64 20 59 0d | 01 e0 1b 20 20 f4 20 64 |X and Y.|... . d|
|00000850| 69 72 65 63 74 69 6f 6e | 73 20 74 6f 20 7a 65 72 |irection|s to zer|
|00000860| 6f 2e 0d 01 ea 04 0d 01 | f4 17 20 20 41 78 28 49 |o.......|.. Ax(I|
|00000870| 29 3d 30 20 3a 20 41 79 | 28 49 29 3d 30 0d 01 fe |)=0 : Ay|(I)=0...|
|00000880| 04 0d 02 08 4c 20 20 f4 | 20 20 20 55 73 65 20 74 |....L .| Use t|
|00000890| 68 65 20 65 73 74 69 6d | 61 74 65 20 6f 66 20 74 |he estim|ate of t|
|000008a0| 68 65 20 76 65 6c 6f 63 | 69 74 79 20 61 74 20 74 |he veloc|ity at t|
|000008b0| 68 65 20 69 6e 69 74 69 | 61 6c 20 70 6f 69 6e 74 |he initi|al point|
|000008c0| 20 74 6f 20 63 61 6c 63 | 75 6c 61 74 65 0d 02 12 | to calc|ulate...|
|000008d0| 43 20 20 f4 20 72 6f 75 | 67 68 74 6c 79 20 77 68 |C . rou|ghtly wh|
|000008e0| 65 72 65 20 74 68 65 20 | 70 6c 61 6e 6e 65 74 20 |ere the |plannet |
|000008f0| 77 69 6c 6c 20 62 65 20 | 68 61 6c 66 20 77 61 79 |will be |half way|
|00000900| 20 74 68 6f 75 67 68 20 | 74 69 6d 65 20 64 54 2e | though |time dT.|
|00000910| 0d 02 1c 49 20 20 f4 20 | 20 20 54 68 69 73 20 65 |...I . | This e|
|00000920| 73 74 69 6d 61 74 65 20 | 77 69 6c 6c 20 62 65 20 |stimate |will be |
|00000930| 75 73 65 64 20 74 6f 20 | 63 61 6c 75 6c 61 74 65 |used to |calulate|
|00000940| 20 74 68 65 20 61 76 65 | 72 61 67 65 20 61 63 63 | the ave|rage acc|
|00000950| 65 6c 65 72 61 74 69 6f | 6e 0d 02 26 24 20 20 f4 |eleratio|n..&$ .|
|00000960| 20 6f 76 65 72 20 74 68 | 65 20 65 6e 74 69 72 65 | over th|e entire|
|00000970| 20 64 54 20 69 6e 74 65 | 72 76 61 6c 2e 0d 02 30 | dT inte|rval...0|
|00000980| 04 0d 02 3a 1d 20 20 50 | 78 31 28 49 29 3d 50 78 |...:. P|x1(I)=Px|
|00000990| 28 49 29 2b 56 78 28 49 | 29 2a 64 54 2f 32 0d 02 |(I)+Vx(I|)*dT/2..|
|000009a0| 44 1d 20 20 50 79 31 28 | 49 29 3d 50 79 28 49 29 |D. Py1(|I)=Py(I)|
|000009b0| 2b 56 79 28 49 29 2a 64 | 54 2f 32 0d 02 4e 04 0d |+Vy(I)*d|T/2..N..|
|000009c0| 02 58 07 ed 20 49 0d 02 | 62 04 0d 02 6c 04 0d 02 |.X.. I..|b...l...|
|000009d0| 76 13 e3 20 49 20 3d 20 | 31 20 b8 20 50 6c 61 6e |v.. I = |1 . Plan|
|000009e0| 73 0d 02 80 04 0d 02 8a | 4b 20 20 41 78 3d 30 20 |s.......|K Ax=0 |
|000009f0| 3a 20 41 79 3d 30 20 20 | 20 20 20 20 20 3a 20 f4 |: Ay=0 | : .|
|00000a00| 20 69 6e 69 74 69 61 6c | 69 73 65 20 61 63 63 65 | initial|ise acce|
|00000a10| 6c 65 72 61 74 69 6f 6e | 73 20 69 6e 20 78 20 61 |leration|s in x a|
|00000a20| 6e 64 20 79 20 64 69 72 | 65 63 74 69 6f 6e 73 2e |nd y dir|ections.|
|00000a30| 0d 02 94 04 0d 02 9e 13 | 20 20 e3 20 4a 20 3d 20 |........| . J = |
|00000a40| 30 20 b8 20 49 2d 31 0d | 02 a8 04 0d 02 b2 4c 20 |0 . I-1.|......L |
|00000a50| 20 20 20 f4 20 63 61 6c | 63 75 6c 61 74 65 20 74 | . cal|culate t|
|00000a60| 68 65 20 64 69 73 74 61 | 6e 63 65 20 62 65 74 77 |he dista|nce betw|
|00000a70| 65 65 6e 20 74 68 65 20 | 70 6c 61 6e 6e 65 74 73 |een the |plannets|
|00000a80| 20 68 61 6c 66 20 77 61 | 79 20 69 6e 74 6f 20 74 | half wa|y into t|
|00000a90| 68 65 20 74 69 6d 65 0d | 02 bc 3a 20 20 20 20 f4 |he time.|..: .|
|00000aa0| 20 69 6e 74 65 72 76 61 | 6c 20 64 54 2e 20 55 73 | interva|l dT. Us|
|00000ab0| 65 20 74 68 65 20 70 6f | 73 69 74 69 6f 6e 73 20 |e the po|sitions |
|00000ac0| 63 61 6c 63 75 6c 61 74 | 65 64 20 61 62 6f 76 65 |calculat|ed above|
|00000ad0| 2e 0d 02 c6 04 0d 02 d0 | 1a 20 20 20 20 64 58 20 |........|. dX |
|00000ae0| 3d 20 50 78 31 28 4a 29 | 2d 50 78 31 28 49 29 0d |= Px1(J)|-Px1(I).|
|00000af0| 02 da 1a 20 20 20 20 64 | 59 20 3d 20 50 79 31 28 |... d|Y = Py1(|
|00000b00| 4a 29 2d 50 79 31 28 49 | 29 0d 02 e4 1a 20 20 20 |J)-Py1(I|).... |
|00000b10| 20 72 3d b6 28 64 58 2a | 64 58 20 2b 20 64 59 2a | r=.(dX*|dX + dY*|
|00000b20| 64 59 29 0d 02 ee 46 20 | 20 20 20 72 33 20 3d 20 |dY)...F | r3 = |
|00000b30| 72 20 2a 20 72 20 2a 20 | 72 20 20 20 20 20 20 20 |r * r * |r |
|00000b40| 20 20 3a 20 f4 20 66 6f | 72 63 65 20 70 72 6f 70 | : . fo|rce prop|
|00000b50| 6f 72 74 69 6f 6e 61 6c | 20 74 6f 20 31 20 2f 20 |ortional| to 1 / |
|00000b60| 28 20 72 20 2a 20 72 20 | 29 0d 02 f8 04 0d 03 02 |( r * r |).......|
|00000b70| 4b 20 20 20 20 41 78 3d | 47 2a 28 50 78 31 28 4a |K Ax=|G*(Px1(J|
|00000b80| 29 2d 50 78 31 28 49 29 | 29 20 2f 20 72 33 20 20 |)-Px1(I)|) / r3 |
|00000b90| 20 20 3a 20 f4 20 43 6f | 6d 70 6f 6e 65 6e 74 20 | : . Co|mponent |
|00000ba0| 69 6e 20 78 20 64 69 72 | 65 63 74 69 6f 6e 20 69 |in x dir|ection i|
|00000bb0| 73 20 64 58 20 2f 20 72 | 0d 03 0c 41 20 20 20 20 |s dX / r|...A |
|00000bc0| 41 79 3d 47 2a 28 50 79 | 31 28 4a 29 2d 50 79 31 |Ay=G*(Py|1(J)-Py1|
|00000bd0| 28 49 29 29 20 2f 20 72 | 33 20 20 20 20 3a 20 f4 |(I)) / r|3 : .|
|00000be0| 20 73 69 6d 69 6c 61 72 | 20 66 6f 72 20 79 20 64 | similar| for y d|
|00000bf0| 69 72 65 63 74 69 6f 6e | 2e 0d 03 16 04 0d 03 20 |irection|....... |
|00000c00| 47 20 20 20 20 41 78 28 | 49 29 3d 41 78 28 49 29 |G Ax(|I)=Ax(I)|
|00000c10| 2b 41 78 2a 6d 28 4a 29 | 20 20 20 20 3a 20 f4 20 |+Ax*m(J)| : . |
|00000c20| 41 63 63 65 6c 65 72 61 | 74 69 6f 6e 20 64 65 70 |Accelera|tion dep|
|00000c30| 65 6e 64 73 20 6f 6e 20 | 6d 61 73 73 20 6f 66 20 |ends on |mass of |
|00000c40| 62 6f 64 79 0d 03 2a 4a | 20 20 20 20 41 79 28 49 |body..*J| Ay(I|
|00000c50| 29 3d 41 79 28 49 29 2b | 41 79 2a 6d 28 4a 29 20 |)=Ay(I)+|Ay*m(J) |
|00000c60| 20 20 20 3a 20 f4 20 61 | 63 63 65 6c 65 72 61 74 | : . a|ccelerat|
|00000c70| 69 6e 67 20 74 6f 2c 20 | 4e 4f 54 20 6d 61 73 73 |ing to, |NOT mass|
|00000c80| 20 6f 66 20 62 6f 64 79 | 20 64 6f 69 6e 67 0d 03 | of body| doing..|
|00000c90| 34 34 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |44 | |
|00000ca0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3a 20 f4 | | : .|
|00000cb0| 20 74 68 65 20 61 63 63 | 65 6c 65 72 61 74 69 6e | the acc|eleratin|
|00000cc0| 67 2e 0d 03 3e 04 0d 03 | 48 4a 20 20 20 20 41 78 |g...>...|HJ Ax|
|00000cd0| 28 4a 29 3d 41 78 28 4a | 29 2d 41 78 2a 6d 28 49 |(J)=Ax(J|)-Ax*m(I|
|00000ce0| 29 20 20 20 20 3a 20 f4 | 20 54 68 65 20 6f 74 68 |) : .| The oth|
|00000cf0| 65 72 20 62 6f 64 79 20 | 61 63 63 65 6c 65 72 61 |er body |accelera|
|00000d00| 74 65 73 20 69 6e 20 74 | 68 65 20 6f 74 68 65 72 |tes in t|he other|
|00000d10| 0d 03 52 2d 20 20 20 20 | 41 79 28 4a 29 3d 41 79 |..R- |Ay(J)=Ay|
|00000d20| 28 4a 29 2d 41 79 2a 6d | 28 49 29 20 20 20 20 3a |(J)-Ay*m|(I) :|
|00000d30| 20 f4 20 64 69 72 65 63 | 74 69 6f 6e 2e 0d 03 5c | . direc|tion...\|
|00000d40| 09 20 20 ed 20 4a 0d 03 | 66 07 ed 20 49 0d 03 70 |. . J..|f.. I..p|
|00000d50| 04 0d 03 7a 0a 41 6d 61 | 78 3d 30 0d 03 84 13 e3 |...z.Ama|x=0.....|
|00000d60| 20 49 20 3d 20 30 20 b8 | 20 50 6c 61 6e 73 0d 03 | I = 0 .| Plans..|
|00000d70| 8e 24 20 20 41 3d b6 28 | 41 78 28 49 29 2a 41 78 |.$ A=.(|Ax(I)*Ax|
|00000d80| 28 49 29 20 2b 20 41 79 | 28 49 29 2a 41 79 28 49 |(I) + Ay|(I)*Ay(I|
|00000d90| 29 29 0d 03 98 15 20 20 | e7 20 41 3e 41 6d 61 78 |)).... |. A>Amax|
|00000da0| 20 41 6d 61 78 3d 41 0d | 03 a2 47 20 20 50 78 28 | Amax=A.|..G Px(|
|00000db0| 49 29 20 3d 20 50 78 28 | 49 29 20 2b 20 64 54 2a |I) = Px(|I) + dT*|
|00000dc0| 28 56 78 28 49 29 20 2b | 20 41 78 28 49 29 2a 64 |(Vx(I) +| Ax(I)*d|
|00000dd0| 54 2f 32 29 20 20 3a 20 | f4 20 75 70 64 61 74 65 |T/2) : |. update|
|00000de0| 20 70 6f 73 69 74 69 6f | 6e 20 77 69 74 68 0d 03 | positio|n with..|
|00000df0| ac 4c 20 20 50 79 28 49 | 29 20 3d 20 50 79 28 49 |.L Py(I|) = Py(I|
|00000e00| 29 20 2b 20 64 54 2a 28 | 56 79 28 49 29 20 2b 20 |) + dT*(|Vy(I) + |
|00000e10| 41 79 28 49 29 2a 64 54 | 2f 32 29 20 20 3a 20 f4 |Ay(I)*dT|/2) : .|
|00000e20| 20 76 65 6c 6f 63 69 74 | 79 20 61 6e 64 20 61 63 | velocit|y and ac|
|00000e30| 63 65 6c 65 72 61 74 69 | 6f 6e 0d 03 b6 04 0d 03 |celerati|on......|
|00000e40| c0 48 20 20 56 78 28 49 | 29 20 3d 20 56 78 28 49 |.H Vx(I|) = Vx(I|
|00000e50| 29 20 2b 20 41 78 28 49 | 29 2a 64 54 20 20 20 20 |) + Ax(I|)*dT |
|00000e60| 3a 20 f4 20 75 70 64 61 | 74 65 20 76 65 6c 6f 63 |: . upda|te veloc|
|00000e70| 69 74 79 20 77 69 74 68 | 20 61 63 63 65 6c 65 72 |ity with| acceler|
|00000e80| 61 74 69 6f 6e 2e 0d 03 | ca 1e 20 20 56 79 28 49 |ation...|.. Vy(I|
|00000e90| 29 20 3d 20 56 79 28 49 | 29 20 2b 20 41 79 28 49 |) = Vy(I|) + Ay(I|
|00000ea0| 29 2a 64 54 0d 03 d4 07 | ed 20 49 0d 03 de 18 64 |)*dT....|. I....d|
|00000eb0| 54 20 3d 20 31 2f 41 6d | 61 78 2f 41 63 63 75 72 |T = 1/Am|ax/Accur|
|00000ec0| 61 63 79 0d 03 e8 04 0d | 03 f2 05 e1 0d 03 fc 04 |acy.....|........|
|00000ed0| 0d 04 06 4e 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |...N----|--------|
|00000ee0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ef0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000f00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000f10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 04 |--------|------..|
|00000f20| 10 04 0d 04 1a 0e dd f2 | 5f 50 6c 61 6e 65 74 73 |........|_Planets|
|00000f30| 0d 04 24 07 ea 20 49 0d | 04 2e 0f ea 20 58 2c 59 |..$.. I.|.... X,Y|
|00000f40| 2c 64 58 2c 64 59 0d 04 | 38 4c 54 20 3d 20 54 20 |,dX,dY..|8LT = T |
|00000f50| 2b 20 64 54 20 20 20 20 | 20 20 20 20 20 20 20 20 |+ dT | |
|00000f60| 20 20 20 3a 20 f4 20 75 | 70 64 61 74 65 20 54 69 | : . u|pdate Ti|
|00000f70| 6d 65 20 69 6e 74 6f 20 | 72 75 6e 20 62 79 20 74 |me into |run by t|
|00000f80| 69 6d 65 20 69 6e 74 65 | 72 76 61 6c 20 75 73 65 |ime inte|rval use|
|00000f90| 64 2e 0d 04 42 15 e7 20 | 54 20 3e 20 54 6f 6c 64 |d...B.. |T > Told|
|00000fa0| 20 2b 20 31 30 20 8c 0d | 04 4c 04 0d 04 56 4a 20 | + 10 ..|.L...VJ |
|00000fb0| 20 f4 20 20 20 20 49 66 | 20 67 72 65 61 74 65 72 | . If| greater|
|00000fc0| 20 74 68 61 6e 20 74 65 | 6e 20 74 69 6d 65 20 75 | than te|n time u|
|00000fd0| 6e 69 74 20 73 69 6e 63 | 65 20 74 68 65 20 6c 61 |nit sinc|e the la|
|00000fe0| 73 74 20 70 6f 69 6e 74 | 20 70 6c 6f 74 74 65 64 |st point| plotted|
|00000ff0| 20 74 68 65 6e 0d 04 60 | 49 20 20 f4 20 70 6c 6f | then..`|I . plo|
|00001000| 74 20 61 6e 6e 6f 74 68 | 65 72 20 70 6f 69 6e 74 |t annoth|er point|
|00001010| 20 66 6f 72 20 65 61 63 | 68 20 70 6c 61 6e 6e 65 | for eac|h planne|
|00001020| 74 20 61 6e 64 20 63 68 | 61 6e 67 65 20 74 68 65 |t and ch|ange the|
|00001030| 20 63 6f 6c 6f 75 72 20 | 6f 66 20 74 68 65 0d 04 | colour |of the..|
|00001040| 6a 1b 20 20 f4 20 6c 61 | 73 74 20 70 6f 69 6e 74 |j. . la|st point|
|00001050| 20 70 6c 6f 74 74 65 64 | 2e 0d 04 74 04 0d 04 7e | plotted|...t...~|
|00001060| 0e 20 20 54 6f 6c 64 20 | 3d 20 54 0d 04 88 04 0d |. Told |= T.....|
|00001070| 04 92 12 20 20 62 6c 6f | 63 6b 21 30 3d 6d 61 69 |... blo|ck!0=mai|
|00001080| 6e 0d 04 9c 0f 20 20 62 | 6c 6f 63 6b 21 34 3d 30 |n.... b|lock!4=0|
|00001090| 0d 04 a6 15 20 20 62 6c | 6f 63 6b 21 38 3d 2d 68 |.... bl|ock!8=-h|
|000010a0| 65 69 67 68 74 0d 04 b0 | 14 20 20 62 6c 6f 63 6b |eight...|. block|
|000010b0| 21 31 32 3d 77 69 64 74 | 68 0d 04 ba 10 20 20 62 |!12=widt|h.... b|
|000010c0| 6c 6f 63 6b 21 31 36 3d | 30 0d 04 c4 2a 20 20 c8 |lock!16=|0...* .|
|000010d0| 99 20 22 57 69 6d 70 5f | 55 70 64 61 74 65 57 69 |. "Wimp_|UpdateWi|
|000010e0| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 20 b8 20 6d |ndow",,b|lock . m|
|000010f0| 6f 72 65 0d 04 ce 1f 20 | 20 f2 5f 47 65 74 5f 4f |ore.... | ._Get_O|
|00001100| 72 69 67 69 6e 28 62 6c | 6f 63 6b 2c 78 30 2c 79 |rigin(bl|ock,x0,y|
|00001110| 30 29 0d 04 d8 04 0d 04 | e2 26 20 20 c8 99 20 22 |0)......|.& .. "|
|00001120| 4f 53 5f 52 65 61 64 4d | 6f 64 65 56 61 72 69 61 |OS_ReadM|odeVaria|
|00001130| 62 6c 65 22 2c 2d 31 2c | 34 2c 64 58 0d 04 ec 26 |ble",-1,|4,dX...&|
|00001140| 20 20 c8 99 20 22 4f 53 | 5f 52 65 61 64 4d 6f 64 | .. "OS|_ReadMod|
|00001150| 65 56 61 72 69 61 62 6c | 65 22 2c 2d 31 2c 35 2c |eVariabl|e",-1,5,|
|00001160| 64 59 0d 04 f6 04 0d 05 | 00 0d 20 20 c8 8e 20 64 |dY......|.. .. d|
|00001170| 58 20 ca 0d 05 0a 12 20 | 20 20 20 c9 20 30 20 3a |X ..... | . 0 :|
|00001180| 20 64 58 3d 32 0d 05 14 | 12 20 20 20 20 c9 20 31 | dX=2...|. . 1|
|00001190| 20 3a 20 64 58 3d 34 0d | 05 1e 12 20 20 20 20 c9 | : dX=4.|... .|
|000011a0| 20 32 20 3a 20 64 58 3d | 38 0d 05 28 0f 20 20 20 | 2 : dX=|8..(. |
|000011b0| 20 7f 20 64 58 3d 31 36 | 0d 05 32 07 20 20 cb 0d | . dX=16|..2. ..|
|000011c0| 05 3c 04 0d 05 46 0d 20 | 20 c8 8e 20 64 59 20 ca |.<...F. | .. dY .|
|000011d0| 0d 05 50 12 20 20 20 20 | c9 20 30 20 3a 20 64 59 |..P. |. 0 : dY|
|000011e0| 3d 32 0d 05 5a 12 20 20 | 20 20 c9 20 31 20 3a 20 |=2..Z. | . 1 : |
|000011f0| 64 59 3d 34 0d 05 64 12 | 20 20 20 20 c9 20 32 20 |dY=4..d.| . 2 |
|00001200| 3a 20 64 59 3d 38 0d 05 | 6e 0f 20 20 20 20 7f 20 |: dY=8..|n. . |
|00001210| 64 59 3d 31 36 0d 05 78 | 07 20 20 cb 0d 05 82 04 |dY=16..x|. .....|
|00001220| 0d 05 8c 0d 20 20 c8 95 | 20 6d 6f 72 65 0d 05 96 |.... ..| more...|
|00001230| 16 20 20 20 20 e3 20 49 | 3d 20 30 20 b8 20 50 6c |. . I|= 0 . Pl|
|00001240| 61 6e 73 0d 05 a0 4e 20 | 20 20 20 20 20 c8 99 20 |ans...N | .. |
|00001250| 22 57 69 6d 70 5f 53 65 | 74 43 6f 6c 6f 75 72 22 |"Wimp_Se|tColour"|
|00001260| 2c 30 3a c8 92 20 78 30 | 2b 50 72 65 76 50 78 28 |,0:.. x0|+PrevPx(|
|00001270| 46 72 6f 6e 74 2c 49 29 | 2a 53 63 2c 79 30 2b 50 |Front,I)|*Sc,y0+P|
|00001280| 72 65 76 50 79 28 46 72 | 6f 6e 74 2c 49 29 2a 53 |revPy(Fr|ont,I)*S|
|00001290| 63 0d 05 aa 0b 20 20 20 | 20 ed 20 49 0d 05 b4 16 |c.... | . I....|
|000012a0| 20 20 20 20 e3 20 49 3d | 20 30 20 b8 20 50 6c 61 | . I=| 0 . Pla|
|000012b0| 6e 73 0d 05 be 29 20 20 | 20 20 20 20 58 3d 78 30 |ns...) | X=x0|
|000012c0| 2b 50 78 4f 28 49 29 2a | 53 63 20 3a 20 59 3d 79 |+PxO(I)*|Sc : Y=y|
|000012d0| 30 2b 50 79 4f 28 49 29 | 2a 53 63 0d 05 c8 46 20 |0+PyO(I)|*Sc...F |
|000012e0| 20 20 20 20 20 c8 99 20 | 22 57 69 6d 70 5f 53 65 | .. |"Wimp_Se|
|000012f0| 74 43 6f 6c 6f 75 72 22 | 2c 30 20 3a 20 c8 92 20 |tColour"|,0 : .. |
|00001300| 58 2b 64 58 2c 59 20 3a | 20 c8 92 20 58 2c 59 2b |X+dX,Y :| .. X,Y+|
|00001310| 64 59 20 3a 20 c8 92 20 | 58 2b 64 58 2c 59 2b 64 |dY : .. |X+dX,Y+d|
|00001320| 59 0d 05 d2 41 20 20 20 | 20 20 20 c8 92 20 58 2d |Y...A | .. X-|
|00001330| 64 58 2c 59 20 3a 20 c8 | 92 20 58 2d 64 58 2c 59 |dX,Y : .|. X-dX,Y|
|00001340| 2b 64 59 20 3a 20 c8 92 | 20 58 2b 64 58 2a 32 2c |+dY : ..| X+dX*2,|
|00001350| 59 20 3a 20 c8 92 20 58 | 2b 64 58 2a 32 2c 59 2b |Y : .. X|+dX*2,Y+|
|00001360| 64 59 0d 05 dc 2c 20 20 | 20 20 20 20 c8 99 20 22 |dY..., | .. "|
|00001370| 57 69 6d 70 5f 53 65 74 | 43 6f 6c 6f 75 72 22 2c |Wimp_Set|Colour",|
|00001380| 43 74 28 49 29 20 3a 20 | c8 92 20 58 2c 59 0d 05 |Ct(I) : |.. X,Y..|
|00001390| e6 27 20 20 20 20 20 20 | 58 3d 78 30 2b 50 78 28 |.' |X=x0+Px(|
|000013a0| 49 29 2a 53 63 20 3a 20 | 59 3d 79 30 2b 50 79 28 |I)*Sc : |Y=y0+Py(|
|000013b0| 49 29 2a 53 63 0d 05 f0 | 52 20 20 20 20 20 20 c8 |I)*Sc...|R .|
|000013c0| 99 20 22 57 69 6d 70 5f | 53 65 74 43 6f 6c 6f 75 |. "Wimp_|SetColou|
|000013d0| 72 22 2c 43 28 49 29 20 | 3a 20 c8 92 20 58 2c 59 |r",C(I) |: .. X,Y|
|000013e0| 20 3a 20 c8 92 20 58 2b | 64 58 2c 59 20 3a 20 c8 | : .. X+|dX,Y : .|
|000013f0| 92 20 58 2c 59 2b 64 59 | 20 3a 20 c8 92 20 58 2b |. X,Y+dY| : .. X+|
|00001400| 64 58 2c 59 2b 64 59 0d | 05 fa 41 20 20 20 20 20 |dX,Y+dY.|..A |
|00001410| 20 c8 92 20 58 2d 64 58 | 2c 59 20 3a 20 c8 92 20 | .. X-dX|,Y : .. |
|00001420| 58 2d 64 58 2c 59 2b 64 | 59 20 3a 20 c8 92 20 58 |X-dX,Y+d|Y : .. X|
|00001430| 2b 64 58 2a 32 2c 59 20 | 3a 20 c8 92 20 58 2b 64 |+dX*2,Y |: .. X+d|
|00001440| 58 2a 32 2c 59 2b 64 59 | 0d 06 04 09 20 20 20 20 |X*2,Y+dY|.... |
|00001450| ed 0d 06 0e 2c 20 20 20 | 20 c8 99 20 22 57 69 6d |...., | .. "Wim|
|00001460| 70 5f 47 65 74 52 65 63 | 74 61 6e 67 6c 65 22 2c |p_GetRec|tangle",|
|00001470| 2c 62 6c 6f 63 6b 20 b8 | 20 6d 6f 72 65 0d 06 18 |,block .| more...|
|00001480| 07 20 20 ce 0d 06 22 04 | 0d 06 2c 14 20 20 e3 20 |. ...".|..,. . |
|00001490| 49 3d 20 30 20 b8 20 50 | 6c 61 6e 73 0d 06 36 37 |I= 0 . P|lans..67|
|000014a0| 20 20 20 20 50 72 65 76 | 50 78 28 46 72 6f 6e 74 | Prev|Px(Front|
|000014b0| 2c 49 29 3d 50 78 4f 28 | 49 29 20 3a 20 50 72 65 |,I)=PxO(|I) : Pre|
|000014c0| 76 50 79 28 46 72 6f 6e | 74 2c 49 29 3d 50 79 4f |vPy(Fron|t,I)=PyO|
|000014d0| 28 49 29 0d 06 40 23 20 | 20 20 20 50 78 4f 28 49 |(I)..@# | PxO(I|
|000014e0| 29 3d 50 78 28 49 29 20 | 3a 20 50 79 4f 28 49 29 |)=Px(I) |: PyO(I)|
|000014f0| 3d 50 79 28 49 29 0d 06 | 4a 2b 20 20 20 20 50 58 |=Py(I)..|J+ PX|
|00001500| 21 28 28 46 72 6f 6e 74 | 2b 48 69 73 74 53 69 7a |!((Front|+HistSiz|
|00001510| 65 31 2a 49 29 2a 34 29 | 3d 50 78 28 49 29 2a 53 |e1*I)*4)|=Px(I)*S|
|00001520| 63 0d 06 54 2b 20 20 20 | 20 50 59 21 28 28 46 72 |c..T+ | PY!((Fr|
|00001530| 6f 6e 74 2b 48 69 73 74 | 53 69 7a 65 31 2a 49 29 |ont+Hist|Size1*I)|
|00001540| 2a 34 29 3d 50 79 28 49 | 29 2a 53 63 0d 06 5e 09 |*4)=Py(I|)*Sc..^.|
|00001550| 20 20 ed 20 49 0d 06 68 | 2e 20 20 46 72 6f 6e 74 | . I..h|. Front|
|00001560| 3d 46 72 6f 6e 74 2b 31 | 20 3a 20 e7 20 46 72 6f |=Front+1| : . Fro|
|00001570| 6e 74 3d 48 69 73 74 53 | 69 7a 65 20 46 72 6f 6e |nt=HistS|ize Fron|
|00001580| 74 3d 30 0d 06 72 1b 20 | 20 e7 20 46 72 6f 6e 74 |t=0..r. | . Front|
|00001590| 3e 4d 61 78 20 4d 61 78 | 3d 46 72 6f 6e 74 0d 06 |>Max Max|=Front..|
|000015a0| 7c 05 cd 0d 06 86 04 0d | 06 90 05 e1 0d 06 9a 04 ||.......|........|
|000015b0| 0d 06 a4 4e 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |...N----|--------|
|000015c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000015d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000015e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000015f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 06 |--------|------..|
|00001600| ae 04 0d 06 b8 0b dd f2 | 5f 49 6e 69 74 0d 06 c2 |........|_Init...|
|00001610| 28 50 6c 61 6e 73 3d 38 | 20 20 20 20 20 20 20 20 |(Plans=8| |
|00001620| 3a 20 f4 20 6e 75 6d 62 | 65 72 20 6f 66 20 70 6c |: . numb|er of pl|
|00001630| 61 6e 65 74 73 0d 06 cc | 29 50 6c 61 6e 73 31 3d |anets...|)Plans1=|
|00001640| 39 20 20 20 20 20 20 3a | 20 f4 20 6e 75 6d 62 65 |9 :| . numbe|
|00001650| 72 20 6f 66 20 70 6c 61 | 6e 65 74 73 2b 31 0d 06 |r of pla|nets+1..|
|00001660| d6 31 48 69 73 74 53 69 | 7a 65 3d 31 30 30 30 20 |.1HistSi|ze=1000 |
|00001670| 20 20 3a 20 f4 20 70 61 | 73 74 20 70 6f 73 69 74 | : . pa|st posit|
|00001680| 69 6f 6e 73 20 6f 66 20 | 70 6c 61 6e 65 74 73 0d |ions of |planets.|
|00001690| 06 e0 3a 48 69 73 74 53 | 69 7a 65 31 3d 31 30 30 |..:HistS|ize1=100|
|000016a0| 31 20 20 3a 20 f4 20 6f | 6e 65 20 70 6c 75 73 20 |1 : . o|ne plus |
|000016b0| 70 61 73 74 20 70 6f 73 | 69 74 69 6f 6e 73 20 6f |past pos|itions o|
|000016c0| 66 20 70 6c 61 6e 65 74 | 73 0d 06 ea 47 46 72 6f |f planet|s...GFro|
|000016d0| 6e 74 3d 30 20 20 20 20 | 20 20 20 20 20 3a 20 f4 |nt=0 | : .|
|000016e0| 20 70 6f 69 6e 74 65 72 | 20 69 6e 74 6f 20 61 72 | pointer| into ar|
|000016f0| 72 61 79 20 6f 66 20 70 | 61 73 74 20 70 6f 73 69 |ray of p|ast posi|
|00001700| 74 69 6f 6e 73 20 6f 66 | 20 70 6c 61 6e 65 74 73 |tions of| planets|
|00001710| 0d 06 f4 09 4d 61 78 3d | 30 0d 06 fe 12 de 20 4d |....Max=|0..... M|
|00001720| 43 6f 64 65 20 31 30 32 | 34 2a 34 0d 07 08 16 de |Code 102|4*4.....|
|00001730| 20 57 69 6e 64 6f 77 4c | 69 6d 69 74 73 20 34 2a | WindowL|imits 4*|
|00001740| 34 0d 07 12 20 de 20 50 | 58 20 28 50 6c 61 6e 73 |4... . P|X (Plans|
|00001750| 31 29 2a 28 48 69 73 74 | 53 69 7a 65 2b 31 29 2a |1)*(Hist|Size+1)*|
|00001760| 34 0d 07 1c 20 de 20 50 | 59 20 28 50 6c 61 6e 73 |4... . P|Y (Plans|
|00001770| 31 29 2a 28 48 69 73 74 | 53 69 7a 65 2b 31 29 2a |1)*(Hist|Size+1)*|
|00001780| 34 0d 07 26 28 de 20 50 | 78 28 50 6c 61 6e 73 29 |4..&(. P|x(Plans)|
|00001790| 20 20 3a 20 f4 20 70 6f | 73 69 74 69 6f 6e 20 6f | : . po|sition o|
|000017a0| 66 20 70 6c 61 6e 65 74 | 73 0d 07 30 0f de 20 50 |f planet|s..0.. P|
|000017b0| 79 28 50 6c 61 6e 73 29 | 0d 07 3a 28 de 20 56 78 |y(Plans)|..:(. Vx|
|000017c0| 28 50 6c 61 6e 73 29 20 | 20 3a 20 f4 20 76 65 6c |(Plans) | : . vel|
|000017d0| 6f 63 69 74 79 20 6f 66 | 20 70 6c 61 6e 65 74 73 |ocity of| planets|
|000017e0| 0d 07 44 0f de 20 56 79 | 28 50 6c 61 6e 73 29 0d |..D.. Vy|(Plans).|
|000017f0| 07 4e 2c de 20 41 78 28 | 50 6c 61 6e 73 29 20 20 |.N,. Ax(|Plans) |
|00001800| 3a 20 f4 20 61 63 63 65 | 6c 65 72 61 74 69 6f 6e |: . acce|leration|
|00001810| 20 6f 66 20 70 6c 61 6e | 65 74 73 0d 07 58 0f de | of plan|ets..X..|
|00001820| 20 41 79 28 50 6c 61 6e | 73 29 0d 07 62 2d de 20 | Ay(Plan|s)..b-. |
|00001830| 50 78 4f 28 50 6c 61 6e | 73 29 20 3a 20 f4 20 6c |PxO(Plan|s) : . l|
|00001840| 61 73 74 20 70 6f 73 69 | 74 69 6f 6e 20 6f 66 20 |ast posi|tion of |
|00001850| 70 6c 61 6e 65 74 73 0d | 07 6c 10 de 20 50 79 4f |planets.|.l.. PyO|
|00001860| 28 50 6c 61 6e 73 29 0d | 07 76 3a de 20 50 78 31 |(Plans).|.v:. Px1|
|00001870| 28 50 6c 61 6e 73 29 20 | 3a 20 f4 20 70 6f 73 69 |(Plans) |: . posi|
|00001880| 74 69 6f 6e 20 6f 66 20 | 70 6c 61 6e 65 74 20 68 |tion of |planet h|
|00001890| 61 6c 66 20 77 61 79 20 | 74 68 6f 75 67 68 20 64 |alf way |though d|
|000018a0| 54 0d 07 80 10 de 20 50 | 79 31 28 50 6c 61 6e 73 |T..... P|y1(Plans|
|000018b0| 29 0d 07 8a 25 de 20 6d | 28 50 6c 61 6e 73 29 20 |)...%. m|(Plans) |
|000018c0| 20 20 3a 20 f4 20 6d 61 | 73 73 20 6f 66 20 70 6c | : . ma|ss of pl|
|000018d0| 61 6e 65 74 73 2e 0d 07 | 94 25 de 20 43 28 50 6c |anets...|.%. C(Pl|
|000018e0| 61 6e 73 29 20 20 20 3a | 20 f4 20 63 6f 6c 6f 75 |ans) :| . colou|
|000018f0| 72 20 6f 66 20 70 6c 61 | 6e 65 74 0d 07 9e 2b de |r of pla|net...+.|
|00001900| 20 43 74 28 50 6c 61 6e | 73 29 20 20 3a 20 f4 20 | Ct(Plan|s) : . |
|00001910| 43 6f 6c 6f 75 72 20 6f | 66 20 70 6c 61 6e 65 74 |Colour o|f planet|
|00001920| 20 74 72 61 63 65 0d 07 | a8 04 0d 07 b2 2e de 20 | trace..|....... |
|00001930| 53 50 78 28 50 6c 61 6e | 73 29 20 3a 20 f4 20 73 |SPx(Plan|s) : . s|
|00001940| 65 74 75 70 20 70 6f 73 | 69 74 69 6f 6e 20 6f 66 |etup pos|ition of|
|00001950| 20 70 6c 61 6e 65 74 73 | 0d 07 bc 10 de 20 53 50 | planets|..... SP|
|00001960| 79 28 50 6c 61 6e 73 29 | 0d 07 c6 2e de 20 53 56 |y(Plans)|..... SV|
|00001970| 78 28 50 6c 61 6e 73 29 | 20 3a 20 f4 20 73 65 74 |x(Plans)| : . set|
|00001980| 75 70 20 76 65 6c 6f 63 | 69 74 79 20 6f 66 20 70 |up veloc|ity of p|
|00001990| 6c 61 6e 65 74 73 0d 07 | d0 10 de 20 53 56 79 28 |lanets..|... SVy(|
|000019a0| 50 6c 61 6e 73 29 0d 07 | da 2b de 20 53 6d 28 50 |Plans)..|.+. Sm(P|
|000019b0| 6c 61 6e 73 29 20 20 3a | 20 f4 20 73 65 74 75 70 |lans) :| . setup|
|000019c0| 20 6d 61 73 73 20 6f 66 | 20 70 6c 61 6e 65 74 73 | mass of| planets|
|000019d0| 2e 0d 07 e4 2b de 20 53 | 43 28 50 6c 61 6e 73 29 |....+. S|C(Plans)|
|000019e0| 20 20 3a 20 f4 20 73 65 | 74 75 70 20 63 6f 6c 6f | : . se|tup colo|
|000019f0| 75 72 20 6f 66 20 70 6c | 61 6e 65 74 0d 07 ee 31 |ur of pl|anet...1|
|00001a00| de 20 53 43 74 28 50 6c | 61 6e 73 29 20 3a 20 f4 |. SCt(Pl|ans) : .|
|00001a10| 20 73 65 74 75 70 20 43 | 6f 6c 6f 75 72 20 6f 66 | setup C|olour of|
|00001a20| 20 70 6c 61 6e 65 74 20 | 74 72 61 63 65 0d 07 f8 | planet |trace...|
|00001a30| 04 0d 08 02 1c de 20 50 | 72 65 76 50 78 28 48 69 |...... P|revPx(Hi|
|00001a40| 73 74 53 69 7a 65 2c 50 | 6c 61 6e 73 29 0d 08 0c |stSize,P|lans)...|
|00001a50| 1c de 20 50 72 65 76 50 | 79 28 48 69 73 74 53 69 |.. PrevP|y(HistSi|
|00001a60| 7a 65 2c 50 6c 61 6e 73 | 29 0d 08 16 04 0d 08 20 |ze,Plans|)...... |
|00001a70| 0e f2 5f 41 73 73 65 6d | 62 6c 65 0d 08 2a 15 f2 |.._Assem|ble..*..|
|00001a80| 5f 47 65 74 5f 50 6c 61 | 6e 65 74 5f 44 61 74 61 |_Get_Pla|net_Data|
|00001a90| 0d 08 34 0f f2 5f 49 6e | 69 74 5f 57 69 6d 70 0d |..4.._In|it_Wimp.|
|00001aa0| 08 3e 0d 72 75 6e 6e 69 | 6e 67 3d b9 0d 08 48 0f |.>.runni|ng=...H.|
|00001ab0| f2 5f 49 6e 69 74 5f 44 | 61 74 61 0d 08 52 04 0d |._Init_D|ata..R..|
|00001ac0| 08 5c 05 e1 0d 08 66 04 | 0d 08 70 04 0d 08 7a 04 |.\....f.|..p...z.|
|00001ad0| 0d 08 84 10 dd 20 f2 5f | 41 73 73 65 6d 62 6c 65 |..... ._|Assemble|
|00001ae0| 0d 08 8e 09 73 70 3d 31 | 33 0d 08 98 0b 6c 69 6e |....sp=1|3....lin|
|00001af0| 6b 3d 31 34 0d 08 a2 09 | 70 63 3d 31 35 0d 08 ac |k=14....|pc=15...|
|00001b00| 15 e3 20 70 61 73 73 25 | 3d 30 20 b8 20 33 20 88 |.. pass%|=0 . 3 .|
|00001b10| 20 32 0d 08 b6 0c 50 25 | 3d 4d 43 6f 64 65 0d 08 | 2....P%|=MCode..|
|00001b20| c0 0f 5b 20 4f 50 54 20 | 70 61 73 73 25 0d 08 ca |..[ OPT |pass%...|
|00001b30| 04 0d 08 d4 17 3b 20 69 | 6e 20 52 30 20 3d 20 70 |.....; i|n R0 = p|
|00001b40| 6c 6f 74 20 63 6f 64 65 | 0d 08 de 23 3b 20 20 20 |lot code|...#; |
|00001b50| 20 52 32 20 3d 20 6e 75 | 6d 62 65 72 20 70 6f 69 | R2 = nu|mber poi|
|00001b60| 6e 74 73 20 74 6f 20 70 | 6c 6f 74 0d 08 e8 10 3b |nts to p|lot....;|
|00001b70| 20 20 20 20 52 33 20 3d | 20 78 30 0d 08 f2 10 3b | R3 =| x0....;|
|00001b80| 20 20 20 20 52 34 20 3d | 20 79 30 0d 08 fc 1b 3b | R4 =| y0....;|
|00001b90| 20 20 20 20 52 35 20 3d | 20 58 20 61 72 72 61 79 | R5 =| X array|
|00001ba0| 20 73 74 61 72 74 0d 09 | 06 1b 3b 20 20 20 20 52 | start..|..; R|
|00001bb0| 36 20 3d 20 59 20 61 72 | 72 61 79 20 73 74 61 72 |6 = Y ar|ray star|
|00001bc0| 74 0d 09 10 1b 3b 20 20 | 20 20 52 37 20 3d 20 77 |t....; | R7 = w|
|00001bd0| 69 6e 64 6f 77 20 6c 69 | 6d 69 74 73 0d 09 1a 04 |indow li|mits....|
|00001be0| 0d 09 24 1d 20 20 20 53 | 54 4d 46 44 20 28 73 70 |..$. S|TMFD (sp|
|00001bf0| 29 21 2c 20 7b 52 30 2c | 6c 69 6e 6b 7d 0d 09 2e |)!, {R0,|link}...|
|00001c00| 1b 3b 20 20 20 53 55 42 | 20 20 20 52 31 30 2c 20 |.; SUB| R10, |
|00001c10| 20 52 32 2c 20 20 23 31 | 0d 09 38 15 20 20 20 4d | R2, #1|..8. M|
|00001c20| 4f 56 20 20 20 52 31 30 | 2c 20 20 52 32 0d 09 42 |OV R10|, R2..B|
|00001c30| 17 20 20 20 4c 44 52 20 | 20 20 52 38 2c 20 20 20 |. LDR | R8, |
|00001c40| 5b 52 35 5d 0d 09 4c 17 | 20 20 20 4c 44 52 20 20 |[R5]..L.| LDR |
|00001c50| 20 52 39 2c 20 20 20 5b | 52 36 5d 0d 09 56 1b 20 | R9, [|R6]..V. |
|00001c60| 20 20 41 44 44 20 20 20 | 52 31 2c 20 20 20 52 33 | ADD |R1, R3|
|00001c70| 2c 20 20 20 52 38 0d 09 | 60 1b 20 20 20 41 44 44 |, R8..|`. ADD|
|00001c80| 20 20 20 52 32 2c 20 20 | 20 52 34 2c 20 20 20 52 | R2, | R4, R|
|00001c90| 39 0d 09 6a 15 20 20 20 | 4d 4f 56 20 20 20 52 30 |9..j. |MOV R0|
|00001ca0| 2c 20 20 20 23 34 0d 09 | 74 16 20 20 20 53 57 49 |, #4..|t. SWI|
|00001cb0| 20 20 20 22 4f 53 5f 50 | 6c 6f 74 22 0d 09 7e 18 | "OS_P|lot"..~.|
|00001cc0| 20 20 20 4c 44 4d 46 44 | 20 28 73 70 29 21 2c 20 | LDMFD| (sp)!, |
|00001cd0| 7b 52 30 7d 0d 09 88 04 | 0d 09 92 04 0d 09 9c 09 |{R0}....|........|
|00001ce0| 2e 6c 6f 6f 70 0d 09 a6 | 1b 20 20 20 4c 44 52 20 |.loop...|. LDR |
|00001cf0| 20 20 52 38 2c 20 20 20 | 5b 52 35 5d 2c 20 23 34 | R8, |[R5], #4|
|00001d00| 0d 09 b0 1b 20 20 20 4c | 44 52 20 20 20 52 39 2c |.... L|DR R9,|
|00001d10| 20 20 20 5b 52 36 5d 2c | 20 23 34 0d 09 ba 1b 20 | [R6],| #4.... |
|00001d20| 20 20 41 44 44 20 20 20 | 52 31 2c 20 20 20 52 33 | ADD |R1, R3|
|00001d30| 2c 20 20 20 52 38 0d 09 | c4 1b 20 20 20 41 44 44 |, R8..|.. ADD|
|00001d40| 20 20 20 52 32 2c 20 20 | 20 52 34 2c 20 20 20 52 | R2, | R4, R|
|00001d50| 39 0d 09 ce 04 0d 09 d8 | 1b 20 20 20 4c 44 52 20 |9.......|. LDR |
|00001d60| 20 20 52 38 2c 20 20 20 | 5b 52 37 2c 20 23 30 5d | R8, |[R7, #0]|
|00001d70| 0d 09 e2 15 20 20 20 43 | 4d 50 20 20 20 52 31 2c |.... C|MP R1,|
|00001d80| 20 20 20 52 38 0d 09 ec | 14 20 20 20 42 4c 54 20 | R8...|. BLT |
|00001d90| 20 20 4e 6f 5f 44 72 61 | 77 0d 09 f6 04 0d 0a 00 | No_Dra|w.......|
|00001da0| 1b 20 20 20 4c 44 52 20 | 20 20 52 38 2c 20 20 20 |. LDR | R8, |
|00001db0| 5b 52 37 2c 20 23 38 5d | 0d 0a 0a 15 20 20 20 43 |[R7, #8]|.... C|
|00001dc0| 4d 50 20 20 20 52 31 2c | 20 20 20 52 38 0d 0a 14 |MP R1,| R8...|
|00001dd0| 14 20 20 20 42 47 54 20 | 20 20 4e 6f 5f 44 72 61 |. BGT | No_Dra|
|00001de0| 77 0d 0a 1e 04 0d 0a 28 | 1b 20 20 20 4c 44 52 20 |w......(|. LDR |
|00001df0| 20 20 52 38 2c 20 20 20 | 5b 52 37 2c 20 23 34 5d | R8, |[R7, #4]|
|00001e00| 0d 0a 32 15 20 20 20 43 | 4d 50 20 20 20 52 32 2c |..2. C|MP R2,|
|00001e10| 20 20 20 52 38 0d 0a 3c | 14 20 20 20 42 4c 54 20 | R8..<|. BLT |
|00001e20| 20 20 4e 6f 5f 44 72 61 | 77 0d 0a 46 04 0d 0a 50 | No_Dra|w..F...P|
|00001e30| 1c 20 20 20 4c 44 52 20 | 20 20 52 38 2c 20 20 20 |. LDR | R8, |
|00001e40| 5b 52 37 2c 20 23 31 32 | 5d 0d 0a 5a 15 20 20 20 |[R7, #12|]..Z. |
|00001e50| 43 4d 50 20 20 20 52 32 | 2c 20 20 20 52 38 0d 0a |CMP R2|, R8..|
|00001e60| 64 14 20 20 20 42 47 54 | 20 20 20 4e 6f 5f 44 72 |d. BGT| No_Dr|
|00001e70| 61 77 0d 0a 6e 04 0d 0a | 78 16 20 20 20 53 57 49 |aw..n...|x. SWI|
|00001e80| 20 20 20 22 4f 53 5f 50 | 6c 6f 74 22 0d 0a 82 1b | "OS_P|lot"....|
|00001e90| 20 20 20 53 55 42 53 20 | 20 52 31 30 2c 20 20 52 | SUBS | R10, R|
|00001ea0| 31 30 2c 20 20 23 31 0d | 0a 8c 11 20 20 20 42 47 |10, #1.|... BG|
|00001eb0| 54 20 20 20 6c 6f 6f 70 | 0d 0a 96 19 20 20 20 4c |T loop|.... L|
|00001ec0| 44 4d 46 44 20 28 73 70 | 29 21 2c 20 7b 70 63 7d |DMFD (sp|)!, {pc}|
|00001ed0| 5e 0d 0a a0 04 0d 0a aa | 0c 2e 4e 6f 5f 44 72 61 |^.......|..No_Dra|
|00001ee0| 77 0d 0a b4 19 3b 20 20 | 20 53 54 4d 46 44 20 28 |w....; | STMFD (|
|00001ef0| 73 70 29 21 2c 20 7b 52 | 30 7d 0d 0a be 4e 3b 20 |sp)!, {R|0}...N; |
|00001f00| 20 20 4d 4f 56 20 20 20 | 52 30 2c 20 20 20 23 34 | MOV |R0, #4|
|00001f10| 20 20 20 20 20 20 20 20 | 20 3b 20 74 68 65 73 65 | | ; these|
|00001f20| 20 6c 69 6e 65 73 20 6e | 65 65 64 20 74 6f 20 62 | lines n|eed to b|
|00001f30| 65 20 69 6e 20 77 68 65 | 6e 20 70 6c 6f 74 74 69 |e in whe|n plotti|
|00001f40| 6e 67 20 6c 69 6e 65 73 | 0d 0a c8 17 3b 20 20 20 |ng lines|....; |
|00001f50| 53 57 49 20 20 20 22 4f | 53 5f 50 6c 6f 74 22 0d |SWI "O|S_Plot".|
|00001f60| 0a d2 19 3b 20 20 20 4c | 44 4d 46 44 20 28 73 70 |...; L|DMFD (sp|
|00001f70| 29 21 2c 20 7b 52 30 7d | 0d 0a dc 04 0d 0a e6 1b |)!, {R0}|........|
|00001f80| 20 20 20 53 55 42 53 20 | 20 52 31 30 2c 20 20 52 | SUBS | R10, R|
|00001f90| 31 30 2c 20 20 23 31 0d | 0a f0 11 20 20 20 42 47 |10, #1.|... BG|
|00001fa0| 54 20 20 20 6c 6f 6f 70 | 0d 0a fa 19 20 20 20 4c |T loop|.... L|
|00001fb0| 44 4d 46 44 20 28 73 70 | 29 21 2c 20 7b 70 63 7d |DMFD (sp|)!, {pc}|
|00001fc0| 5e 0d 0b 04 04 0d 0b 0e | 04 0d 0b 18 05 5d 0d 0b |^.......|.....]..|
|00001fd0| 22 0b ed 20 70 61 73 73 | 25 0d 0b 2c 05 e1 0d 0b |".. pass|%..,....|
|00001fe0| 36 04 0d 0b 40 04 0d 0b | 4a 4e 2d 2d 2d 2d 2d 2d |6...@...|JN------|
|00001ff0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002000| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002010| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002020| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002030| 2d 2d 2d 2d 0d 0b 54 04 | 0d 0b 5e 10 dd f2 5f 49 |----..T.|..^..._I|
|00002040| 6e 69 74 5f 44 61 74 61 | 0d 0b 68 15 c8 99 20 22 |nit_Data|..h... "|
|00002050| 48 6f 75 72 67 6c 61 73 | 73 5f 4f 6e 22 0d 0b 72 |Hourglas|s_On"..r|
|00002060| 16 e3 20 49 20 3d 20 30 | 20 b8 20 48 69 73 74 53 |.. I = 0| . HistS|
|00002070| 69 7a 65 0d 0b 73 2e 20 | 20 c8 99 20 22 48 6f 75 |ize..s. | .. "Hou|
|00002080| 72 67 6c 61 73 73 5f 50 | 65 72 63 65 6e 74 61 67 |rglass_P|ercentag|
|00002090| 65 22 2c 49 2f 48 69 73 | 74 53 69 7a 65 2a 31 30 |e",I/His|tSize*10|
|000020a0| 30 0d 0b 7c 15 20 20 e3 | 20 4a 20 3d 20 30 20 b8 |0..|. .| J = 0 .|
|000020b0| 20 50 6c 61 6e 73 0d 0b | 86 2f 20 20 20 20 50 72 | Plans..|./ Pr|
|000020c0| 65 76 50 78 28 49 2c 4a | 29 3d 2d 31 30 30 30 30 |evPx(I,J|)=-10000|
|000020d0| 20 3a 20 50 72 65 76 50 | 79 28 49 2c 4a 29 3d 2d | : PrevP|y(I,J)=-|
|000020e0| 31 30 30 30 30 0d 0b 90 | 22 20 20 20 20 50 58 21 |10000...|" PX!|
|000020f0| 28 28 49 2a 50 6c 61 6e | 73 31 2b 4a 29 2a 34 29 |((I*Plan|s1+J)*4)|
|00002100| 3d 2d 31 30 30 30 30 0d | 0b 9a 22 20 20 20 20 50 |=-10000.|.." P|
|00002110| 59 21 28 28 49 2a 50 6c | 61 6e 73 31 2b 4a 29 2a |Y!((I*Pl|ans1+J)*|
|00002120| 34 29 3d 2d 31 30 30 30 | 30 0d 0b a4 09 20 20 ed |4)=-1000|0.... .|
|00002130| 20 4a 0d 0b ae 07 ed 20 | 49 0d 0b b8 2f 47 3d 30 | J..... |I.../G=0|
|00002140| 2e 30 31 20 20 20 20 20 | 20 20 20 20 20 20 3a 20 |.01 | : |
|00002150| f4 20 67 72 61 76 69 74 | 61 74 69 6f 6e 61 6c 20 |. gravit|ational |
|00002160| 63 6f 6e 73 74 61 6e 74 | 0d 0b c2 2b 64 54 3d 30 |constant|...+dT=0|
|00002170| 2e 30 30 31 20 20 20 20 | 20 20 20 20 20 3a 20 f4 |.001 | : .|
|00002180| 20 64 65 66 61 75 6c 74 | 20 64 65 6c 74 61 20 54 | default| delta T|
|00002190| 69 6d 65 0d 0b cc 36 53 | 63 3d 5a 6f 6f 6d 4c 2f |ime...6S|c=ZoomL/|
|000021a0| 5a 6f 6f 6d 52 2a 30 2e | 31 20 20 20 3a 20 f4 20 |ZoomR*0.|1 : . |
|000021b0| 73 63 61 6c 65 20 66 61 | 63 74 65 72 20 66 6f 72 |scale fa|cter for|
|000021c0| 20 70 6c 6f 74 74 69 6e | 67 0d 0b d6 26 54 3d 30 | plottin|g...&T=0|
|000021d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3a 20 | | : |
|000021e0| f4 20 74 69 6d 65 20 69 | 6e 74 6f 20 72 75 6e 0d |. time i|nto run.|
|000021f0| 0b e0 2a 54 6f 6c 64 3d | 30 20 20 20 20 20 20 20 |..*Told=|0 |
|00002200| 20 20 20 20 3a 20 f4 20 | 74 69 6d 65 20 6c 61 73 | : . |time las|
|00002210| 74 20 70 6c 6f 74 74 65 | 64 0d 0b ea 4b 41 63 63 |t plotte|d...KAcc|
|00002220| 75 72 61 63 79 3d 31 2e | 30 20 20 20 20 20 3a 20 |uracy=1.|0 : |
|00002230| f4 20 68 69 67 68 65 72 | 20 6e 75 6d 62 65 72 73 |. higher| numbers|
|00002240| 20 67 69 76 65 20 62 65 | 74 74 65 72 20 61 63 63 | give be|tter acc|
|00002250| 75 72 61 63 79 20 61 74 | 20 74 68 65 20 65 78 70 |uracy at| the exp|
|00002260| 65 6e 63 65 0d 0b f4 22 | 20 20 20 20 20 20 20 20 |ence..."| |
|00002270| 20 20 20 20 20 20 20 20 | 20 3a 20 f4 20 6f 66 20 | | : . of |
|00002280| 73 70 65 65 64 2e 0d 0b | fe 48 46 72 6f 6e 74 3d |speed...|.HFront=|
|00002290| 30 20 20 20 20 20 20 20 | 20 20 20 3a 20 f4 20 70 |0 | : . p|
|000022a0| 6f 69 6e 74 65 72 20 69 | 6e 74 6f 20 61 72 72 61 |ointer i|nto arra|
|000022b0| 79 20 6f 66 20 70 61 73 | 74 20 70 6f 73 69 74 69 |y of pas|t positi|
|000022c0| 6f 6e 73 20 6f 66 20 70 | 6c 61 6e 65 74 73 0d 0c |ons of p|lanets..|
|000022d0| 08 09 4d 61 78 3d 30 0d | 0c 12 12 e3 20 49 3d 20 |..Max=0.|.... I= |
|000022e0| 30 20 b8 20 50 6c 61 6e | 73 0d 0c 1c 2c 20 20 50 |0 . Plan|s..., P|
|000022f0| 78 28 49 29 3d 53 50 78 | 28 49 29 3a 20 50 79 28 |x(I)=SPx|(I): Py(|
|00002300| 49 29 3d 53 50 79 28 49 | 29 3a 20 6d 28 49 29 3d |I)=SPy(I|): m(I)=|
|00002310| 53 6d 28 49 29 0d 0c 26 | 3a 20 20 56 78 28 49 29 |Sm(I)..&|: Vx(I)|
|00002320| 3d 53 56 78 28 49 29 3a | 20 56 79 28 49 29 3d 53 |=SVx(I):| Vy(I)=S|
|00002330| 56 79 28 49 29 3a 20 43 | 28 49 29 3d 53 43 28 49 |Vy(I): C|(I)=SC(I|
|00002340| 29 3a 20 43 74 28 49 29 | 3d 53 43 74 28 49 29 0d |): Ct(I)|=SCt(I).|
|00002350| 0c 30 20 20 20 50 78 4f | 28 49 29 3d 50 78 28 49 |.0 PxO|(I)=Px(I|
|00002360| 29 3a 20 50 79 4f 28 49 | 29 3d 50 79 28 49 29 0d |): PyO(I|)=Py(I).|
|00002370| 0c 3a 05 ed 0d 0c 44 16 | c8 99 20 22 48 6f 75 72 |.:....D.|.. "Hour|
|00002380| 67 6c 61 73 73 5f 4f 66 | 66 22 0d 0c 4e 05 e1 0d |glass_Of|f"..N...|
|00002390| 0c 58 04 0d 0c 62 4e 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.X...bN-|--------|
|000023a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000023b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000023c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000023d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000023e0| 2d 0d 0c 6c 04 0d 0c 76 | 16 dd f2 5f 47 65 74 5f |-..l...v|..._Get_|
|000023f0| 50 6c 61 6e 65 74 5f 44 | 61 74 61 0d 0c 80 05 f7 |Planet_D|ata.....|
|00002400| 0d 0c 8a 12 e3 20 49 3d | 20 30 20 b8 20 50 6c 61 |..... I=| 0 . Pla|
|00002410| 6e 73 0d 0c 94 3c 20 20 | f3 20 53 50 78 28 49 29 |ns...< |. SPx(I)|
|00002420| 2c 20 53 50 79 28 49 29 | 2c 20 53 6d 28 49 29 2c |, SPy(I)|, Sm(I),|
|00002430| 20 53 56 78 28 49 29 2c | 20 53 56 79 28 49 29 2c | SVx(I),| SVy(I),|
|00002440| 20 53 43 28 49 29 2c 20 | 53 43 74 28 49 29 0d 0c | SC(I), |SCt(I)..|
|00002450| 9e 05 ed 0d 0c a8 38 dc | 20 30 2c 20 20 20 20 20 |......8.| 0, |
|00002460| 20 30 2c 20 33 33 32 39 | 35 38 2c 20 30 2c 2d 30 | 0, 3329|58, 0,-0|
|00002470| 2e 30 30 34 36 35 2c 20 | 39 2c 20 37 20 20 20 20 |.00465, |9, 7 |
|00002480| 20 20 3a 20 52 45 4d 20 | 53 55 4e 0d 0c b2 3c dc | : REM |SUN...<.|
|00002490| 20 35 37 2e 39 31 2c 20 | 20 30 2c 20 30 2e 30 35 | 57.91, | 0, 0.05|
|000024a0| 34 2c 20 20 30 2c 20 38 | 2e 30 2c 20 20 20 20 20 |4, 0, 8|.0, |
|000024b0| 38 2c 20 37 20 20 20 20 | 20 20 3a 20 52 45 4d 20 |8, 7 | : REM |
|000024c0| 6d 65 72 63 75 72 79 0d | 0c bc 3a dc 20 31 30 38 |mercury.|..:. 108|
|000024d0| 2e 32 31 2c 20 30 2c 20 | 30 2e 38 31 35 2c 20 20 |.21, 0, |0.815, |
|000024e0| 30 2c 20 36 2e 31 2c 20 | 20 20 20 20 39 2c 20 37 |0, 6.1, | 9, 7|
|000024f0| 20 20 20 20 20 20 3a 20 | 52 45 4d 20 76 65 6e 75 | : |REM venu|
|00002500| 73 0d 0c c6 3b dc 20 31 | 34 39 2e 36 30 2c 20 30 |s...;. 1|49.60, 0|
|00002510| 2c 20 31 2e 30 30 30 2c | 20 20 30 2c 20 35 2e 30 |, 1.000,| 0, 5.0|
|00002520| 2c 20 20 20 20 20 31 30 | 2c 20 37 20 20 20 20 20 |, 10|, 7 |
|00002530| 20 3a 20 52 45 4d 20 65 | 61 72 74 68 0d 0c d0 3a | : REM e|arth...:|
|00002540| dc 20 32 32 37 2e 39 34 | 2c 20 30 2c 20 30 2e 31 |. 227.94|, 0, 0.1|
|00002550| 30 37 2c 20 20 30 2c 20 | 34 2e 30 2c 20 20 20 20 |07, 0, |4.0, |
|00002560| 20 31 31 2c 20 37 20 20 | 20 20 20 20 3a 20 52 45 | 11, 7 | : RE|
|00002570| 4d 20 6d 61 72 73 0d 0c | da 3c dc 20 37 37 38 2e |M mars..|.<. 778.|
|00002580| 33 34 2c 20 30 2c 20 33 | 31 37 2e 38 39 2c 20 30 |34, 0, 3|17.89, 0|
|00002590| 2c 20 31 2e 35 2c 20 20 | 20 20 20 38 2c 20 37 20 |, 1.5, | 8, 7 |
|000025a0| 20 20 20 20 20 3a 20 52 | 45 4d 20 6a 75 70 69 74 | : R|EM jupit|
|000025b0| 65 72 0d 0c e4 3b dc 20 | 31 34 32 37 2e 30 31 2c |er...;. |1427.01,|
|000025c0| 30 2c 20 39 35 2e 31 34 | 2c 20 20 30 2c 20 31 2e |0, 95.14|, 0, 1.|
|000025d0| 30 2c 20 20 20 20 20 39 | 2c 20 37 20 20 20 20 20 |0, 9|, 7 |
|000025e0| 20 3a 20 52 45 4d 20 73 | 61 74 75 72 6e 0d 0c ee | : REM s|aturn...|
|000025f0| 3c dc 20 32 38 36 39 2e | 36 2c 20 30 2c 20 31 34 |<. 2869.|6, 0, 14|
|00002600| 2e 35 32 2c 20 20 30 2c | 20 30 2e 37 2c 20 20 20 |.52, 0,| 0.7, |
|00002610| 20 20 31 30 2c 20 37 20 | 20 20 20 20 20 3a 20 52 | 10, 7 | : R|
|00002620| 45 4d 20 75 72 61 6e 75 | 73 0d 0c f8 3d dc 20 34 |EM uranu|s...=. 4|
|00002630| 34 39 36 2e 37 2c 20 30 | 2c 20 31 37 2e 34 36 2c |496.7, 0|, 17.46,|
|00002640| 20 20 30 2c 20 30 2e 34 | 2c 20 20 20 20 20 31 31 | 0, 0.4|, 11|
|00002650| 2c 20 37 20 20 20 20 20 | 20 3a 20 52 45 4d 20 6e |, 7 | : REM n|
|00002660| 65 70 74 75 6e 65 0d 0d | 02 3a dc 20 35 39 30 37 |eptune..|.:. 5907|
|00002670| 2e 30 2c 20 30 2c 20 30 | 2e 31 2c 20 20 20 20 30 |.0, 0, 0|.1, 0|
|00002680| 2c 20 30 2e 33 2c 20 20 | 20 20 20 38 2c 20 37 20 |, 0.3, | 8, 7 |
|00002690| 20 20 20 20 20 3a 20 52 | 45 4d 20 70 6c 75 74 6f | : R|EM pluto|
|000026a0| 0d 0d 0c 05 e1 0d 0d 16 | 04 0d 0d 20 4e 2d 2d 2d |........|... N---|
|000026b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000026c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000026d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000026e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000026f0| 2d 2d 2d 2d 2d 2d 2d 0d | 0d 2a 04 0d 0d 34 10 dd |-------.|.*...4..|
|00002700| f2 5f 49 6e 69 74 5f 57 | 69 6d 70 0d 0d 3e 10 de |._Init_W|imp..>..|
|00002710| 20 62 6c 6f 63 6b 20 26 | 32 30 30 0d 0d 48 22 de | block &|200..H".|
|00002720| 20 6d 65 6e 75 20 32 35 | 30 2c 20 58 58 58 20 32 | menu 25|0, XXX 2|
|00002730| 35 30 20 20 3a 20 f4 20 | 6d 65 6e 75 73 0d 0d 52 |50 : . |menus..R|
|00002740| 0e 77 69 64 74 68 3d 31 | 32 38 30 0d 0d 5c 0f 68 |.width=1|280..\.h|
|00002750| 65 69 67 68 74 3d 31 30 | 32 34 0d 0d 66 0a 6f 70 |eight=10|24..f.op|
|00002760| 65 6e 3d a3 0d 0d 70 0a | 71 75 69 74 3d a3 0d 0d |en=...p.|quit=...|
|00002770| 7a 11 24 62 6c 6f 63 6b | 3d 22 54 41 53 4b 22 0d |z.$block|="TASK".|
|00002780| 0d 84 3c c8 99 20 22 57 | 69 6d 70 5f 49 6e 69 74 |..<.. "W|imp_Init|
|00002790| 69 61 6c 69 73 65 22 2c | 32 30 30 2c 21 62 6c 6f |ialise",|200,!blo|
|000027a0| 63 6b 2c 22 50 4c 41 4e | 45 54 53 22 20 b8 20 76 |ck,"PLAN|ETS" . v|
|000027b0| 65 72 73 69 6f 6e 2c 74 | 61 73 6b 0d 0d 8e 20 ee |ersion,t|ask... .|
|000027c0| 20 85 20 ef 20 37 20 3a | 20 e7 20 a4 5f 57 69 6d | . . 7 :| . ._Wim|
|000027d0| 70 5f 45 72 72 6f 72 20 | 8c 20 e0 0d 0d 98 25 de |p_Error |. ....%.|
|000027e0| 20 4e 61 6d 53 74 72 20 | 31 30 20 3a 20 24 4e 61 | NamStr |10 : $Na|
|000027f0| 6d 53 74 72 20 3d 20 22 | 50 6c 61 6e 65 74 73 22 |mStr = "|Planets"|
|00002800| 0d 0d a2 3e 6d 61 69 6e | 3d a4 5f 43 72 65 61 74 |...>main|=._Creat|
|00002810| 65 28 30 2c 30 2c 77 69 | 64 74 68 2c 68 65 69 67 |e(0,0,wi|dth,heig|
|00002820| 68 74 2c 31 30 30 2c 32 | 30 30 2c 26 46 46 30 30 |ht,100,2|00,&FF00|
|00002830| 30 30 30 46 2c 4e 61 6d | 53 74 72 2c 30 29 0d 0d |000F,Nam|Str,0)..|
|00002840| ac 38 70 69 63 6f 6e 3d | a4 5f 53 70 72 69 74 65 |.8picon=|._Sprite|
|00002850| 5f 49 63 6f 6e 28 2d 31 | 2c 30 2c 30 2c 36 38 2c |_Icon(-1|,0,0,68,|
|00002860| 36 38 2c 26 33 31 30 32 | 2c 31 2c 22 21 50 6c 61 |68,&3102|,1,"!Pla|
|00002870| 6e 65 74 73 22 29 0d 0d | b6 04 0d 0d c0 4c f4 20 |nets")..|.....L. |
|00002880| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002890| 2d 2d 2d 2d 2d 2d 2d 20 | 49 6e 66 6f 20 57 69 6e |------- |Info Win|
|000028a0| 64 6f 77 20 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |dow ----|--------|
|000028b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000028c0| 2d 2d 2d 2d 2d 2d 0d 0d | ca 04 0d 0d d4 30 de 20 |------..|.....0. |
|000028d0| 49 6e 66 53 74 72 20 32 | 30 20 3a 20 24 49 6e 66 |InfStr 2|0 : $Inf|
|000028e0| 53 74 72 20 3d 20 22 41 | 62 6f 75 74 20 74 68 69 |Str = "A|bout thi|
|000028f0| 73 20 50 72 6f 67 72 61 | 6d 22 0d 0d de 2f 49 6e |s Progra|m".../In|
|00002900| 66 6f 3d a4 5f 43 72 65 | 61 74 65 28 30 2c 30 2c |fo=._Cre|ate(0,0,|
|00002910| 36 34 30 2c 32 33 32 2c | 30 2c 30 2c 26 39 33 2c |640,232,|0,0,&93,|
|00002920| 49 6e 66 53 74 72 2c 32 | 29 0d 0d e8 30 de 20 56 |InfStr,2|)...0. V|
|00002930| 65 72 53 74 72 20 32 35 | 20 3a 20 24 56 65 72 53 |erStr 25| : $VerS|
|00002940| 74 72 20 3d 20 22 31 2e | 30 30 20 28 31 36 2d 4f |tr = "1.|00 (16-O|
|00002950| 63 74 2d 31 39 39 30 29 | 22 0d 0d f2 34 de 20 41 |ct-1990)|"...4. A|
|00002960| 75 74 53 74 72 20 32 35 | 20 3a 20 24 41 75 74 53 |utStr 25| : $AutS|
|00002970| 74 72 20 3d 20 22 28 63 | 29 20 4d 69 6b 65 20 41 |tr = "(c|) Mike A|
|00002980| 74 6b 69 6e 73 6f 6e 20 | 31 39 39 30 22 0d 0d fc |tkinson |1990"...|
|00002990| 2f de 20 50 75 72 53 74 | 72 20 32 35 20 3a 20 24 |/. PurSt|r 25 : $|
|000029a0| 50 75 72 53 74 72 20 3d | 20 22 47 72 61 76 69 74 |PurStr =| "Gravit|
|000029b0| 79 20 53 69 6d 75 6c 61 | 74 6f 72 22 0d 0e 06 25 |y Simula|tor"...%|
|000029c0| de 20 54 74 6c 53 74 72 | 20 32 35 20 3a 20 24 54 |. TtlStr| 25 : $T|
|000029d0| 74 6c 53 74 72 20 3d 20 | 22 50 6c 61 6e 65 74 73 |tlStr = |"Planets|
|000029e0| 22 0d 0e 10 2c 78 3d a4 | 5f 54 78 74 5f 49 63 6f |"...,x=.|_Txt_Ico|
|000029f0| 6e 28 49 6e 66 6f 2c 31 | 30 2c 32 32 30 2c 31 33 |n(Info,1|0,220,13|
|00002a00| 38 2c 22 76 65 72 73 69 | 6f 6e 3a 22 29 0d 0e 1a |8,"versi|on:")...|
|00002a10| 2c 78 3d a4 5f 54 78 74 | 5f 49 63 6f 6e 28 49 6e |,x=._Txt|_Icon(In|
|00002a20| 66 6f 2c 31 30 2c 31 36 | 34 2c 31 33 38 2c 22 20 |fo,10,16|4,138," |
|00002a30| 61 75 74 68 6f 72 3a 22 | 29 0d 0e 24 2c 78 3d a4 |author:"|)..$,x=.|
|00002a40| 5f 54 78 74 5f 49 63 6f | 6e 28 49 6e 66 6f 2c 31 |_Txt_Ico|n(Info,1|
|00002a50| 30 2c 31 30 38 2c 31 33 | 38 2c 22 70 75 72 70 6f |0,108,13|8,"purpo|
|00002a60| 73 65 3a 22 29 0d 0e 2e | 2c 78 3d a4 5f 54 78 74 |se:")...|,x=._Txt|
|00002a70| 5f 49 63 6f 6e 28 49 6e | 66 6f 2c 31 30 2c 35 32 |_Icon(In|fo,10,52|
|00002a80| 2c 20 31 33 38 2c 22 20 | 20 20 6e 61 6d 65 3a 22 |, 138," | name:"|
|00002a90| 29 0d 0e 38 2a 78 3d a4 | 5f 54 65 78 74 5f 49 63 |)..8*x=.|_Text_Ic|
|00002aa0| 6f 6e 28 49 6e 66 6f 2c | 31 35 34 2c 32 32 30 2c |on(Info,|154,220,|
|00002ab0| 36 32 38 2c 56 65 72 53 | 74 72 29 0d 0e 42 2a 78 |628,VerS|tr)..B*x|
|00002ac0| 3d a4 5f 54 65 78 74 5f | 49 63 6f 6e 28 49 6e 66 |=._Text_|Icon(Inf|
|00002ad0| 6f 2c 31 35 34 2c 31 36 | 34 2c 36 32 38 2c 41 75 |o,154,16|4,628,Au|
|00002ae0| 74 53 74 72 29 0d 0e 4c | 2a 78 3d a4 5f 54 65 78 |tStr)..L|*x=._Tex|
|00002af0| 74 5f 49 63 6f 6e 28 49 | 6e 66 6f 2c 31 35 34 2c |t_Icon(I|nfo,154,|
|00002b00| 31 30 38 2c 36 32 38 2c | 50 75 72 53 74 72 29 0d |108,628,|PurStr).|
|00002b10| 0e 56 2a 78 3d a4 5f 54 | 65 78 74 5f 49 63 6f 6e |.V*x=._T|ext_Icon|
|00002b20| 28 49 6e 66 6f 2c 31 35 | 34 2c 35 32 2c 20 36 32 |(Info,15|4,52, 62|
|00002b30| 38 2c 54 74 6c 53 74 72 | 29 0d 0e 60 04 0d 0e 6a |8,TtlStr|)..`...j|
|00002b40| 4c f4 20 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |L. -----|--------|
|00002b50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 20 53 63 61 6c 65 |--------|-- Scale|
|00002b60| 46 61 63 74 6f 72 20 57 | 69 6e 64 6f 77 20 2d 2d |Factor W|indow --|
|00002b70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002b80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 0e 74 04 0d 0e 7e |--------|-..t...~|
|00002b90| 25 de 20 5a 6d 53 74 72 | 20 32 30 20 3a 20 24 5a |%. ZmStr| 20 : $Z|
|00002ba0| 6d 53 74 72 20 3d 20 22 | 4d 61 67 6e 69 66 69 65 |mStr = "|Magnifie|
|00002bb0| 72 22 0d 0e 88 2e 5a 6f | 6f 6d 3d a4 5f 43 72 65 |r"....Zo|om=._Cre|
|00002bc0| 61 74 65 28 30 2c 30 2c | 32 37 32 2c 31 33 32 2c |ate(0,0,|272,132,|
|00002bd0| 30 2c 30 2c 26 39 33 2c | 5a 6d 53 74 72 2c 30 29 |0,0,&93,|ZmStr,0)|
|00002be0| 0d 0e 92 33 53 25 3d 8e | 20 22 3c 50 6c 61 6e 65 |...3S%=.| "<Plane|
|00002bf0| 74 73 24 44 69 72 3e 2e | 41 72 72 6f 77 73 22 20 |ts$Dir>.|Arrows" |
|00002c00| 3a 20 54 25 3d a2 23 53 | 25 2b 31 36 20 3a 20 d9 |: T%=.#S|%+16 : .|
|00002c10| 23 53 25 0d 0e 9c 41 de | 20 61 72 72 6f 77 20 54 |#S%...A.| arrow T|
|00002c20| 25 20 3a 20 21 61 72 72 | 6f 77 3d 54 25 20 3a 20 |% : !arr|ow=T% : |
|00002c30| 61 72 72 6f 77 21 34 3d | 30 20 3a 20 61 72 72 6f |arrow!4=|0 : arro|
|00002c40| 77 21 34 3d 31 36 20 3a | 20 61 72 72 6f 77 21 31 |w!4=16 :| arrow!1|
|00002c50| 32 3d 31 36 0d 0e a6 36 | c8 99 20 22 4f 53 5f 53 |2=16...6|.. "OS_S|
|00002c60| 70 72 69 74 65 4f 70 22 | 2c 26 31 30 41 2c 61 72 |priteOp"|,&10A,ar|
|00002c70| 72 6f 77 2c 22 3c 50 6c | 61 6e 65 74 73 24 44 69 |row,"<Pl|anets$Di|
|00002c80| 72 3e 2e 41 72 72 6f 77 | 73 22 0d 0e b0 3f 75 70 |r>.Arrow|s"...?up|
|00002c90| 31 3d a4 5f 53 70 72 69 | 74 65 5f 49 63 6f 6e 28 |1=._Spri|te_Icon(|
|00002ca0| 5a 6f 6f 6d 2c 31 36 2c | 2d 36 36 2c 35 36 2c 2d |Zoom,16,|-66,56,-|
|00002cb0| 31 34 2c 26 33 31 30 32 | 2c 61 72 72 6f 77 2c 22 |14,&3102|,arrow,"|
|00002cc0| 75 70 61 72 72 6f 77 22 | 29 0d 0e ba 41 75 70 32 |uparrow"|)...Aup2|
|00002cd0| 3d a4 5f 53 70 72 69 74 | 65 5f 49 63 6f 6e 28 5a |=._Sprit|e_Icon(Z|
|00002ce0| 6f 6f 6d 2c 32 31 36 2c | 2d 36 36 2c 32 35 36 2c |oom,216,|-66,256,|
|00002cf0| 2d 31 34 2c 26 33 31 30 | 32 2c 61 72 72 6f 77 2c |-14,&310|2,arrow,|
|00002d00| 22 75 70 61 72 72 6f 77 | 22 29 0d 0e c4 44 64 6f |"uparrow|")...Ddo|
|00002d10| 77 6e 31 3d a4 5f 53 70 | 72 69 74 65 5f 49 63 6f |wn1=._Sp|rite_Ico|
|00002d20| 6e 28 5a 6f 6f 6d 2c 31 | 36 2c 2d 31 31 36 2c 35 |n(Zoom,1|6,-116,5|
|00002d30| 36 2c 2d 36 36 2c 26 33 | 31 30 32 2c 61 72 72 6f |6,-66,&3|102,arro|
|00002d40| 77 2c 22 64 6f 77 6e 61 | 72 72 6f 77 22 29 0d 0e |w,"downa|rrow")..|
|00002d50| ce 46 64 6f 77 6e 32 3d | a4 5f 53 70 72 69 74 65 |.Fdown2=|._Sprite|
|00002d60| 5f 49 63 6f 6e 28 5a 6f | 6f 6d 2c 32 31 36 2c 2d |_Icon(Zo|om,216,-|
|00002d70| 31 31 36 2c 32 35 36 2c | 2d 36 36 2c 26 33 31 30 |116,256,|-66,&310|
|00002d80| 32 2c 61 72 72 6f 77 2c | 22 64 6f 77 6e 61 72 72 |2,arrow,|"downarr|
|00002d90| 6f 77 22 29 0d 0e d8 0f | 5a 6f 6f 6d 24 3d 22 31 |ow")....|Zoom$="1|
|00002da0| 3a 31 22 0d 0e e2 0b 5a | 6f 6f 6d 4c 3d 31 0d 0e |:1"....Z|oomL=1..|
|00002db0| ec 0b 5a 6f 6f 6d 52 3d | 31 0d 0e f6 21 de 20 5a |..ZoomR=|1...!. Z|
|00002dc0| 6f 6f 6d 53 74 72 20 31 | 30 20 3a 20 24 5a 6f 6f |oomStr 1|0 : $Zoo|
|00002dd0| 6d 53 74 72 3d 5a 6f 6f | 6d 24 0d 0f 00 33 5a 6f |mStr=Zoo|m$...3Zo|
|00002de0| 6f 6d 49 3d a4 5f 43 65 | 6e 74 72 65 64 5f 54 65 |omI=._Ce|ntred_Te|
|00002df0| 78 74 5f 49 63 6f 6e 28 | 5a 6f 6f 6d 2c 31 33 36 |xt_Icon(|Zoom,136|
|00002e00| 2c 2d 36 36 2c 5a 6f 6f | 6d 53 74 72 29 0d 0f 0a |,-66,Zoo|mStr)...|
|00002e10| 04 0d 0f 14 4c f4 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d |....L. -|--------|
|00002e20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 20 |--------|------- |
|00002e30| 50 6c 61 6e 65 74 73 20 | 57 69 6e 64 6f 77 20 2d |Planets |Window -|
|00002e40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002e50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 0f 1e |--------|-----...|
|00002e60| 04 0d 0f 28 32 de 20 50 | 6c 61 6e 53 74 72 20 32 |...(2. P|lanStr 2|
|00002e70| 30 20 3a 20 24 50 6c 61 | 6e 53 74 72 20 3d 20 22 |0 : $Pla|nStr = "|
|00002e80| 50 6c 61 6e 65 74 20 44 | 65 66 69 6e 69 74 69 6f |Planet D|efinitio|
|00002e90| 6e 73 22 0d 0f 32 31 50 | 44 65 66 73 3d a4 5f 43 |ns"..21P|Defs=._C|
|00002ea0| 72 65 61 74 65 28 30 2c | 30 2c 32 37 32 2c 36 31 |reate(0,|0,272,61|
|00002eb0| 32 2c 30 2c 30 2c 26 38 | 33 2c 50 6c 61 6e 53 74 |2,0,0,&8|3,PlanSt|
|00002ec0| 72 2c 32 29 0d 0f 3c 0e | 50 6c 61 6e 65 74 4e 6f |r,2)..<.|PlanetNo|
|00002ed0| 3d 31 0d 0f 46 45 f2 5f | 56 61 72 69 61 62 6c 65 |=1..FE._|Variable|
|00002ee0| 5f 43 68 61 6e 67 65 28 | 50 44 65 66 73 2c 35 32 |_Change(|PDefs,52|
|00002ef0| 2c 22 70 6c 61 6e 65 74 | 22 2c c3 28 50 6c 61 6e |,"planet|",.(Plan|
|00002f00| 65 74 4e 6f 29 2c 75 70 | 33 2c 64 6f 77 6e 33 2c |etNo),up|3,down3,|
|00002f10| 50 6c 61 53 74 72 29 0d | 0f 50 48 f2 5f 56 61 72 |PlaStr).|.PH._Var|
|00002f20| 69 61 62 6c 65 5f 43 68 | 61 6e 67 65 28 50 44 65 |iable_Ch|ange(PDe|
|00002f30| 66 73 2c 31 35 32 2c 22 | 6d 61 73 73 22 2c c3 28 |fs,152,"|mass",.(|
|00002f40| 6d 28 50 6c 61 6e 65 74 | 4e 6f 29 29 2c 75 70 34 |m(Planet|No)),up4|
|00002f50| 2c 64 6f 77 6e 34 2c 6d | 61 73 73 53 74 72 29 0d |,down4,m|assStr).|
|00002f60| 0f 5a 45 f2 5f 56 61 72 | 69 61 62 6c 65 5f 43 68 |.ZE._Var|iable_Ch|
|00002f70| 61 6e 67 65 28 50 44 65 | 66 73 2c 32 35 32 2c 22 |ange(PDe|fs,252,"|
|00002f80| 50 78 22 2c c3 28 50 78 | 28 50 6c 61 6e 65 74 4e |Px",.(Px|(PlanetN|
|00002f90| 6f 29 29 2c 75 70 35 2c | 64 6f 77 6e 35 2c 50 78 |o)),up5,|down5,Px|
|00002fa0| 53 74 72 29 0d 0f 64 45 | f2 5f 56 61 72 69 61 62 |Str)..dE|._Variab|
|00002fb0| 6c 65 5f 43 68 61 6e 67 | 65 28 50 44 65 66 73 2c |le_Chang|e(PDefs,|
|00002fc0| 33 35 32 2c 22 50 79 22 | 2c c3 28 50 79 28 50 6c |352,"Py"|,.(Py(Pl|
|00002fd0| 61 6e 65 74 4e 6f 29 29 | 2c 75 70 36 2c 64 6f 77 |anetNo))|,up6,dow|
|00002fe0| 6e 36 2c 50 79 53 74 72 | 29 0d 0f 6e 45 f2 5f 56 |n6,PyStr|)..nE._V|
|00002ff0| 61 72 69 61 62 6c 65 5f | 43 68 61 6e 67 65 28 50 |ariable_|Change(P|
|00003000| 44 65 66 73 2c 34 35 32 | 2c 22 56 78 22 2c c3 28 |Defs,452|,"Vx",.(|
|00003010| 56 78 28 50 6c 61 6e 65 | 74 4e 6f 29 29 2c 75 70 |Vx(Plane|tNo)),up|
|00003020| 37 2c 64 6f 77 6e 37 2c | 56 78 53 74 72 29 0d 0f |7,down7,|VxStr)..|
|00003030| 78 45 f2 5f 56 61 72 69 | 61 62 6c 65 5f 43 68 61 |xE._Vari|able_Cha|
|00003040| 6e 67 65 28 50 44 65 66 | 73 2c 35 35 32 2c 22 56 |nge(PDef|s,552,"V|
|00003050| 79 22 2c c3 28 56 79 28 | 50 6c 61 6e 65 74 4e 6f |y",.(Vy(|PlanetNo|
|00003060| 29 29 2c 75 70 38 2c 64 | 6f 77 6e 38 2c 56 79 53 |)),up8,d|own8,VyS|
|00003070| 74 72 29 0d 0f 82 04 0d | 0f 8c 4c f4 20 2d 2d 2d |tr).....|..L. ---|
|00003080| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003090| 2d 2d 2d 2d 2d 2d 2d 20 | 53 75 6e 20 57 69 6e 64 |------- |Sun Wind|
|000030a0| 6f 77 20 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ow -----|--------|
|000030b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000030c0| 2d 2d 2d 0d 0f 96 04 0d | 0f a0 2c de 20 53 75 6e |---.....|..,. Sun|
|000030d0| 53 74 72 20 32 30 20 3a | 20 24 53 75 6e 53 74 72 |Str 20 :| $SunStr|
|000030e0| 20 3d 20 22 53 75 6e 20 | 44 65 66 69 6e 69 74 69 | = "Sun |Definiti|
|000030f0| 6f 6e 22 0d 0f aa 30 53 | 44 65 66 73 3d a4 5f 43 |on"...0S|Defs=._C|
|00003100| 72 65 61 74 65 28 30 2c | 30 2c 32 37 32 2c 35 31 |reate(0,|0,272,51|
|00003110| 32 2c 30 2c 30 2c 26 38 | 33 2c 53 75 6e 53 74 72 |2,0,0,&8|3,SunStr|
|00003120| 2c 32 29 0d 0f b4 41 f2 | 5f 56 61 72 69 61 62 6c |,2)...A.|_Variabl|
|00003130| 65 5f 43 68 61 6e 67 65 | 28 53 44 65 66 73 2c 35 |e_Change|(SDefs,5|
|00003140| 32 2c 22 6d 61 73 73 22 | 2c c3 28 6d 28 30 29 29 |2,"mass"|,.(m(0))|
|00003150| 2c 75 70 39 2c 64 6f 77 | 6e 39 2c 53 6d 61 73 73 |,up9,dow|n9,Smass|
|00003160| 53 74 72 29 0d 0f be 41 | f2 5f 56 61 72 69 61 62 |Str)...A|._Variab|
|00003170| 6c 65 5f 43 68 61 6e 67 | 65 28 53 44 65 66 73 2c |le_Chang|e(SDefs,|
|00003180| 31 35 32 2c 22 50 78 22 | 2c c3 28 50 78 28 30 29 |152,"Px"|,.(Px(0)|
|00003190| 29 2c 75 70 31 30 2c 64 | 6f 77 6e 31 30 2c 53 50 |),up10,d|own10,SP|
|000031a0| 78 53 74 72 29 0d 0f c8 | 41 f2 5f 56 61 72 69 61 |xStr)...|A._Varia|
|000031b0| 62 6c 65 5f 43 68 61 6e | 67 65 28 53 44 65 66 73 |ble_Chan|ge(SDefs|
|000031c0| 2c 32 35 32 2c 22 50 79 | 22 2c c3 28 50 79 28 30 |,252,"Py|",.(Py(0|
|000031d0| 29 29 2c 75 70 31 31 2c | 64 6f 77 6e 31 31 2c 53 |)),up11,|down11,S|
|000031e0| 50 79 53 74 72 29 0d 0f | d2 41 f2 5f 56 61 72 69 |PyStr)..|.A._Vari|
|000031f0| 61 62 6c 65 5f 43 68 61 | 6e 67 65 28 53 44 65 66 |able_Cha|nge(SDef|
|00003200| 73 2c 33 35 32 2c 22 56 | 78 22 2c c3 28 56 78 28 |s,352,"V|x",.(Vx(|
|00003210| 30 29 29 2c 75 70 31 32 | 2c 64 6f 77 6e 31 32 2c |0)),up12|,down12,|
|00003220| 53 56 78 53 74 72 29 0d | 0f dc 41 f2 5f 56 61 72 |SVxStr).|..A._Var|
|00003230| 69 61 62 6c 65 5f 43 68 | 61 6e 67 65 28 53 44 65 |iable_Ch|ange(SDe|
|00003240| 66 73 2c 34 35 32 2c 22 | 56 79 22 2c c3 28 56 79 |fs,452,"|Vy",.(Vy|
|00003250| 28 30 29 29 2c 75 70 31 | 33 2c 64 6f 77 6e 31 33 |(0)),up1|3,down13|
|00003260| 2c 53 56 79 53 74 72 29 | 0d 0f e6 04 0d 0f f0 04 |,SVyStr)|........|
|00003270| 0d 0f fa 05 e1 0d 10 04 | 04 0d 10 0e 4e 2d 2d 2d |........|....N---|
|00003280| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003290| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000032a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000032b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000032c0| 2d 2d 2d 2d 2d 2d 2d 0d | 10 18 04 0d 10 22 10 dd |-------.|....."..|
|000032d0| f2 5f 57 69 6d 70 5f 4c | 6f 6f 70 0d 10 2c 0a 6d |._Wimp_L|oop..,.m|
|000032e0| 61 73 6b 3d 30 0d 10 36 | 05 f5 0d 10 40 28 20 20 |ask=0..6|....@( |
|000032f0| c8 99 20 22 57 69 6d 70 | 5f 50 6f 6c 6c 22 2c 6d |.. "Wimp|_Poll",m|
|00003300| 61 73 6b 2c 62 6c 6f 63 | 6b 20 b8 20 72 65 61 73 |ask,bloc|k . reas|
|00003310| 6f 6e 0d 10 4a 11 20 20 | c8 8e 20 72 65 61 73 6f |on..J. |.. reaso|
|00003320| 6e 20 ca 0d 10 54 1e 20 | 20 20 20 c9 20 30 20 3a |n ...T. | . 0 :|
|00003330| 20 f2 5f 4e 65 78 74 5f | 49 74 65 72 61 74 69 6f | ._Next_|Iteratio|
|00003340| 6e 0d 10 5e 1d 20 20 20 | 20 c9 20 31 20 3a 20 f2 |n..^. | . 1 : .|
|00003350| 5f 52 65 64 72 61 77 28 | 62 6c 6f 63 6b 29 0d 10 |_Redraw(|block)..|
|00003360| 68 29 20 20 20 20 c9 20 | 32 20 3a 20 c8 99 20 22 |h) . |2 : .. "|
|00003370| 57 69 6d 70 5f 4f 70 65 | 6e 57 69 6e 64 6f 77 22 |Wimp_Ope|nWindow"|
|00003380| 2c 2c 62 6c 6f 63 6b 0d | 10 72 41 20 20 20 20 c9 |,,block.|.rA .|
|00003390| 20 33 20 3a 20 6f 70 65 | 6e 3d a3 20 3a 20 21 62 | 3 : ope|n=. : !b|
|000033a0| 6c 6f 63 6b 3d 6d 61 69 | 6e 20 3a 20 c8 99 20 22 |lock=mai|n : .. "|
|000033b0| 57 69 6d 70 5f 43 6c 6f | 73 65 57 69 6e 64 6f 77 |Wimp_Clo|seWindow|
|000033c0| 22 2c 2c 62 6c 6f 63 6b | 0d 10 7c 1e 20 20 20 20 |",,block|..|. |
|000033d0| c9 20 36 20 3a 20 f2 5f | 42 75 74 74 6f 6e 73 28 |. 6 : ._|Buttons(|
|000033e0| 62 6c 6f 63 6b 29 0d 10 | 86 20 20 20 20 20 c9 20 |block)..|. . |
|000033f0| 38 20 3a 20 f2 5f 48 61 | 6e 64 6c 65 4b 65 79 28 |8 : ._Ha|ndleKey(|
|00003400| 62 6c 6f 63 6b 29 0d 10 | 90 22 20 20 20 20 c9 20 |block)..|." . |
|00003410| 39 20 3a 20 f2 5f 4d 65 | 6e 75 5f 53 65 6c 65 63 |9 : ._Me|nu_Selec|
|00003420| 74 28 62 6c 6f 63 6b 29 | 0d 10 9a 27 20 20 20 20 |t(block)|...' |
|00003430| c9 20 31 37 2c 31 38 20 | 3a 20 e7 20 62 6c 6f 63 |. 17,18 |: . bloc|
|00003440| 6b 21 31 36 3d 30 20 8c | 20 71 75 69 74 3d b9 0d |k!16=0 .| quit=..|
|00003450| 10 a4 07 20 20 cb 0d 10 | ae 0a fd 20 71 75 69 74 |... ...|... quit|
|00003460| 0d 10 b8 11 24 62 6c 6f | 63 6b 3d 22 54 41 53 4b |....$blo|ck="TASK|
|00003470| 22 0d 10 c2 23 c8 99 20 | 22 57 69 6d 70 5f 43 6c |"...#.. |"Wimp_Cl|
|00003480| 6f 73 65 44 6f 77 6e 22 | 2c 74 61 73 6b 2c 21 62 |oseDown"|,task,!b|
|00003490| 6c 6f 63 6b 0d 10 cc 05 | e1 0d 10 d6 04 0d 10 e0 |lock....|........|
|000034a0| 4e 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |N-------|--------|
|000034b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000034c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000034d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000034e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 10 ea 04 0d |--------|---.....|
|000034f0| 10 f4 15 dd f2 5f 4e 65 | 78 74 5f 49 74 65 72 61 |....._Ne|xt_Itera|
|00003500| 74 69 6f 6e 0d 10 fe 0f | e7 20 72 75 6e 6e 69 6e |tion....|. runnin|
|00003510| 67 20 8c 0d 11 08 12 f4 | 20 50 52 4f 43 5f 43 61 |g ......| PROC_Ca|
|00003520| 6c 63 5f 64 54 0d 11 12 | 16 20 20 f2 5f 43 61 6c |lc_dT...|. ._Cal|
|00003530| 63 5f 50 6f 73 69 74 69 | 6f 6e 73 0d 11 1c 0f 20 |c_Positi|ons.... |
|00003540| 20 f2 5f 50 6c 61 6e 65 | 74 73 0d 11 26 05 cd 0d | ._Plane|ts..&...|
|00003550| 11 30 05 e1 0d 11 3a 04 | 0d 11 44 4e 2d 2d 2d 2d |.0....:.|..DN----|
|00003560| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003570| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003580| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003590| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000035a0| 2d 2d 2d 2d 2d 2d 0d 11 | 4e 04 0d 11 58 10 dd f2 |------..|N...X...|
|000035b0| 5f 52 65 64 72 61 77 28 | 62 29 0d 11 62 0a ea 20 |_Redraw(|b)..b.. |
|000035c0| 6d 6f 72 65 0d 11 6c 0b | c8 8e 20 21 62 20 ca 0d |more..l.|.. !b ..|
|000035d0| 11 76 0c 20 20 c9 20 6d | 61 69 6e 0d 11 80 28 20 |.v. . m|ain...( |
|000035e0| 20 20 20 c8 99 20 22 57 | 69 6d 70 5f 52 65 64 72 | .. "W|imp_Redr|
|000035f0| 61 77 57 69 6e 64 6f 77 | 22 2c 2c 62 20 b8 20 6d |awWindow|",,b . m|
|00003600| 6f 72 65 0d 11 8a 1d 20 | 20 20 20 f2 5f 47 65 74 |ore.... | ._Get|
|00003610| 5f 4f 72 69 67 69 6e 28 | 62 2c 78 30 2c 79 30 29 |_Origin(|b,x0,y0)|
|00003620| 0d 11 94 0f 20 20 20 20 | c8 95 20 6d 6f 72 65 0d |.... |.. more.|
|00003630| 11 9e 17 20 20 20 20 20 | 20 f2 5f 44 72 61 77 28 |... | ._Draw(|
|00003640| 78 30 2c 79 30 29 0d 11 | a8 2a 20 20 20 20 20 20 |x0,y0)..|.* |
|00003650| c8 99 20 22 57 69 6d 70 | 5f 47 65 74 52 65 63 74 |.. "Wimp|_GetRect|
|00003660| 61 6e 67 6c 65 22 2c 2c | 62 20 b8 20 6d 6f 72 65 |angle",,|b . more|
|00003670| 0d 11 b2 1f 20 20 20 20 | 20 20 f2 5f 47 65 74 5f |.... | ._Get_|
|00003680| 4f 72 69 67 69 6e 28 62 | 2c 78 30 2c 79 30 29 0d |Origin(b|,x0,y0).|
|00003690| 11 bc 09 20 20 20 20 ce | 0d 11 c6 0d 20 20 c9 20 |... .|.... . |
|000036a0| 50 44 65 66 73 0d 11 d0 | 19 20 20 20 20 f2 5f 52 |PDefs...|. ._R|
|000036b0| 65 44 72 61 77 5f 50 44 | 65 66 73 28 62 29 0d 11 |eDraw_PD|efs(b)..|
|000036c0| da 0d 20 20 c9 20 53 44 | 65 66 73 0d 11 e4 19 20 |.. . SD|efs.... |
|000036d0| 20 20 20 f2 5f 52 65 44 | 72 61 77 5f 53 44 65 66 | ._ReD|raw_SDef|
|000036e0| 73 28 62 29 0d 11 ee 07 | 20 20 cb 0d 11 f8 05 e1 |s(b)....| ......|
|000036f0| 0d 12 02 04 0d 12 0c 4e | 2d 2d 2d 2d 2d 2d 2d 2d |.......N|--------|
|00003700| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003710| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003720| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003730| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003740| 2d 2d 0d 12 16 04 0d 12 | 20 17 dd 20 f2 5f 52 65 |--......| .. ._Re|
|00003750| 44 72 61 77 5f 50 44 65 | 66 73 28 62 29 0d 12 2a |Draw_PDe|fs(b)..*|
|00003760| 0c 21 62 3d 50 44 65 66 | 73 0d 12 34 18 24 50 6c |.!b=PDef|s..4.$Pl|
|00003770| 61 53 74 72 20 20 3d 20 | c3 50 6c 61 6e 65 74 4e |aStr = |.PlanetN|
|00003780| 6f 0d 12 3e 1e 24 6d 61 | 73 73 53 74 72 20 3d 20 |o..>.$ma|ssStr = |
|00003790| c3 28 53 6d 28 50 6c 61 | 6e 65 74 4e 6f 29 29 0d |.(Sm(Pla|netNo)).|
|000037a0| 12 48 1f 24 50 78 53 74 | 72 20 20 20 3d 20 c3 28 |.H.$PxSt|r = .(|
|000037b0| 53 50 78 28 50 6c 61 6e | 65 74 4e 6f 29 29 0d 12 |SPx(Plan|etNo))..|
|000037c0| 52 1f 24 50 79 53 74 72 | 20 20 20 3d 20 c3 28 53 |R.$PyStr| = .(S|
|000037d0| 50 79 28 50 6c 61 6e 65 | 74 4e 6f 29 29 0d 12 5c |Py(Plane|tNo))..\|
|000037e0| 1f 24 56 78 53 74 72 20 | 20 20 3d 20 c3 28 53 56 |.$VxStr | = .(SV|
|000037f0| 78 28 50 6c 61 6e 65 74 | 4e 6f 29 29 0d 12 66 1f |x(Planet|No))..f.|
|00003800| 24 56 79 53 74 72 20 20 | 20 3d 20 c3 28 53 56 79 |$VyStr | = .(SVy|
|00003810| 28 50 6c 61 6e 65 74 4e | 6f 29 29 0d 12 70 24 c8 |(PlanetN|o))..p$.|
|00003820| 99 20 22 57 69 6d 70 5f | 52 65 64 72 61 77 57 69 |. "Wimp_|RedrawWi|
|00003830| 6e 64 6f 77 22 2c 2c 62 | 20 b8 20 6d 6f 72 65 0d |ndow",,b| . more.|
|00003840| 12 7a 0b c8 95 20 6d 6f | 72 65 0d 12 84 26 20 20 |.z... mo|re...& |
|00003850| c8 99 20 22 57 69 6d 70 | 5f 47 65 74 52 65 63 74 |.. "Wimp|_GetRect|
|00003860| 61 6e 67 6c 65 22 2c 2c | 62 20 b8 20 6d 6f 72 65 |angle",,|b . more|
|00003870| 0d 12 8e 05 ce 0d 12 98 | 05 e1 0d 12 a2 04 0d 12 |........|........|
|00003880| ac 4e 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.N------|--------|
|00003890| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000038a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000038b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000038c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 12 b6 04 |--------|----....|
|000038d0| 0d 12 c0 04 0d 12 ca 17 | dd 20 f2 5f 52 65 44 72 |........|. ._ReDr|
|000038e0| 61 77 5f 53 44 65 66 73 | 28 62 29 0d 12 d4 0c 21 |aw_SDefs|(b)....!|
|000038f0| 62 3d 53 44 65 66 73 0d | 12 de 18 24 53 6d 61 73 |b=SDefs.|...$Smas|
|00003900| 73 53 74 72 20 3d 20 c3 | 28 53 6d 28 30 29 29 0d |sStr = .|(Sm(0)).|
|00003910| 12 e8 19 24 53 50 78 53 | 74 72 20 20 20 3d 20 c3 |...$SPxS|tr = .|
|00003920| 28 53 50 78 28 30 29 29 | 0d 12 f2 19 24 53 50 79 |(SPx(0))|....$SPy|
|00003930| 53 74 72 20 20 20 3d 20 | c3 28 53 50 79 28 30 29 |Str = |.(SPy(0)|
|00003940| 29 0d 12 fc 19 24 53 56 | 78 53 74 72 20 20 20 3d |)....$SV|xStr =|
|00003950| 20 c3 28 53 56 78 28 30 | 29 29 0d 13 06 19 24 53 | .(SVx(0|))....$S|
|00003960| 56 79 53 74 72 20 20 20 | 3d 20 c3 28 53 56 79 28 |VyStr |= .(SVy(|
|00003970| 30 29 29 0d 13 10 24 c8 | 99 20 22 57 69 6d 70 5f |0))...$.|. "Wimp_|
|00003980| 52 65 64 72 61 77 57 69 | 6e 64 6f 77 22 2c 2c 62 |RedrawWi|ndow",,b|
|00003990| 20 b8 20 6d 6f 72 65 0d | 13 1a 0b c8 95 20 6d 6f | . more.|..... mo|
|000039a0| 72 65 0d 13 24 26 20 20 | c8 99 20 22 57 69 6d 70 |re..$& |.. "Wimp|
|000039b0| 5f 47 65 74 52 65 63 74 | 61 6e 67 6c 65 22 2c 2c |_GetRect|angle",,|
|000039c0| 62 20 b8 20 6d 6f 72 65 | 0d 13 2e 05 ce 0d 13 38 |b . more|.......8|
|000039d0| 05 e1 0d 13 42 04 0d 13 | 4c 4e 2d 2d 2d 2d 2d 2d |....B...|LN------|
|000039e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000039f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003a00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003a10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003a20| 2d 2d 2d 2d 0d 13 56 04 | 0d 13 60 12 dd 20 f2 5f |----..V.|..`.. ._|
|00003a30| 42 75 74 74 6f 6e 73 28 | 62 29 0d 13 6a 0f e7 20 |Buttons(|b)..j.. |
|00003a40| 62 21 38 20 80 20 32 20 | 8c 0d 13 74 0f 20 20 f2 |b!8 . 2 |...t. .|
|00003a50| 5f 4d 65 6e 75 28 62 29 | 0d 13 7e 05 cc 0d 13 88 |_Menu(b)|..~.....|
|00003a60| 0f 20 20 c8 8e 20 62 21 | 31 32 20 ca 0d 13 92 0c |. .. b!|12 .....|
|00003a70| 20 20 20 20 c9 20 2d 32 | 0d 13 9c 22 20 20 20 20 | . -2|..." |
|00003a80| 20 20 e7 20 28 62 21 31 | 36 3d 70 69 63 6f 6e 29 | . (b!1|6=picon)|
|00003a90| 20 80 20 ac 6f 70 65 6e | 20 8c 0d 13 a6 17 20 20 | . .open| ..... |
|00003aa0| 20 20 20 20 20 20 21 62 | 6c 6f 63 6b 3d 6d 61 69 | !b|lock=mai|
|00003ab0| 6e 0d 13 b0 2b 20 20 20 | 20 20 20 20 20 c8 99 20 |n...+ | .. |
|00003ac0| 22 57 69 6d 70 5f 47 65 | 74 57 69 6e 64 6f 77 53 |"Wimp_Ge|tWindowS|
|00003ad0| 74 61 74 65 22 2c 2c 62 | 6c 6f 63 6b 0d 13 ba 27 |tate",,b|lock...'|
|00003ae0| 20 20 20 20 20 20 20 20 | c8 99 20 22 57 69 6d 70 | |.. "Wimp|
|00003af0| 5f 4f 70 65 6e 57 69 6e | 64 6f 77 22 2c 2c 62 6c |_OpenWin|dow",,bl|
|00003b00| 6f 63 6b 0d 13 c4 12 20 | 20 20 20 20 20 20 20 6f |ock.... | o|
|00003b10| 70 65 6e 3d b9 0d 13 ce | 0b 20 20 20 20 20 20 cd |pen=....|. .|
|00003b20| 0d 13 d8 0e 20 20 20 20 | c9 20 5a 6f 6f 6d 0d 13 |.... |. Zoom..|
|00003b30| e2 1a 20 20 20 20 20 20 | f2 5f 48 61 6e 64 6c 65 |.. |._Handle|
|00003b40| 5f 5a 6f 6f 6d 28 62 29 | 0d 13 ec 0f 20 20 20 20 |_Zoom(b)|.... |
|00003b50| c9 20 50 44 65 66 73 0d | 13 f6 19 20 20 20 20 20 |. PDefs.|... |
|00003b60| 20 f2 5f 47 65 74 5f 4e | 65 77 5f 50 44 65 66 73 | ._Get_N|ew_PDefs|
|00003b70| 0d 14 00 1b 20 20 20 20 | 20 20 f2 5f 48 61 6e 64 |.... | ._Hand|
|00003b80| 6c 65 5f 50 44 65 66 73 | 28 62 29 0d 14 0a 0f 20 |le_PDefs|(b).... |
|00003b90| 20 20 20 c9 20 53 44 65 | 66 73 0d 14 14 19 20 20 | . SDe|fs.... |
|00003ba0| 20 20 20 20 f2 5f 47 65 | 74 5f 4e 65 77 5f 53 44 | ._Ge|t_New_SD|
|00003bb0| 65 66 73 0d 14 1e 1b 20 | 20 20 20 20 20 f2 5f 48 |efs.... | ._H|
|00003bc0| 61 6e 64 6c 65 5f 53 44 | 65 66 73 28 62 29 0d 14 |andle_SD|efs(b)..|
|00003bd0| 28 07 20 20 cb 0d 14 32 | 05 cd 0d 14 3c 05 e1 0d |(. ...2|....<...|
|00003be0| 14 46 04 0d 14 50 4e 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.F...PN-|--------|
|00003bf0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003c00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003c10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003c20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003c30| 2d 0d 14 5a 04 0d 14 64 | 14 dd 20 f2 5f 48 61 6e |-..Z...d|.. ._Han|
|00003c40| 64 6c 65 4b 65 79 28 62 | 29 0d 14 6e 0c c8 8e 20 |dleKey(b|)..n... |
|00003c50| 62 21 30 20 ca 0d 14 78 | 0d 20 20 c9 20 50 44 65 |b!0 ...x|. . PDe|
|00003c60| 66 73 0d 14 82 17 20 20 | 20 20 f2 5f 47 65 74 5f |fs.... | ._Get_|
|00003c70| 4e 65 77 5f 50 44 65 66 | 73 0d 14 8c 0d 20 20 c9 |New_PDef|s.... .|
|00003c80| 20 53 44 65 66 73 0d 14 | 96 17 20 20 20 20 f2 5f | SDefs..|.. ._|
|00003c90| 47 65 74 5f 4e 65 77 5f | 53 44 65 66 73 0d 14 a0 |Get_New_|SDefs...|
|00003ca0| 05 cb 0d 14 aa 05 e1 0d | 14 b4 04 0d 14 be 4e 2d |........|......N-|
|00003cb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003cc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003cd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003ce0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003cf0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 14 c8 04 0d 14 d2 |--------|-.......|
|00003d00| 15 dd 20 f2 5f 47 65 74 | 5f 4e 65 77 5f 50 44 65 |.. ._Get|_New_PDe|
|00003d10| 66 73 0d 14 dc 1e 50 6c | 61 6e 65 74 4e 6f 20 20 |fs....Pl|anetNo |
|00003d20| 20 20 20 20 3d 20 a0 28 | 24 50 6c 61 53 74 72 29 | = .(|$PlaStr)|
|00003d30| 0d 14 e6 23 e7 20 50 6c | 61 6e 65 74 4e 6f 3e 50 |...#. Pl|anetNo>P|
|00003d40| 6c 61 6e 73 20 50 6c 61 | 6e 65 74 4e 6f 3d 50 6c |lans Pla|netNo=Pl|
|00003d50| 61 6e 73 0d 14 f0 1b e7 | 20 50 6c 61 6e 65 74 4e |ans.....| PlanetN|
|00003d60| 6f 3c 31 20 50 6c 61 6e | 65 74 4e 6f 3d 31 0d 14 |o<1 Plan|etNo=1..|
|00003d70| fa 1f 53 6d 28 50 6c 61 | 6e 65 74 4e 6f 29 20 20 |..Sm(Pla|netNo) |
|00003d80| 3d 20 a0 28 24 6d 61 73 | 73 53 74 72 29 0d 15 04 |= .($mas|sStr)...|
|00003d90| 1d 53 50 78 28 50 6c 61 | 6e 65 74 4e 6f 29 20 3d |.SPx(Pla|netNo) =|
|00003da0| 20 a0 28 24 50 78 53 74 | 72 29 0d 15 0e 1d 53 50 | .($PxSt|r)....SP|
|00003db0| 79 28 50 6c 61 6e 65 74 | 4e 6f 29 20 3d 20 a0 28 |y(Planet|No) = .(|
|00003dc0| 24 50 79 53 74 72 29 0d | 15 18 1d 53 56 78 28 50 |$PyStr).|...SVx(P|
|00003dd0| 6c 61 6e 65 74 4e 6f 29 | 20 3d 20 a0 28 24 56 78 |lanetNo)| = .($Vx|
|00003de0| 53 74 72 29 0d 15 22 1d | 53 56 79 28 50 6c 61 6e |Str)..".|SVy(Plan|
|00003df0| 65 74 4e 6f 29 20 3d 20 | a0 28 24 56 79 53 74 72 |etNo) = |.($VyStr|
|00003e00| 29 0d 15 2c 05 e1 0d 15 | 36 04 0d 15 40 4e 2d 2d |)..,....|6...@N--|
|00003e10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003e20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003e30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003e40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003e50| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 15 4a 04 0d 15 54 15 |--------|..J...T.|
|00003e60| dd 20 f2 5f 47 65 74 5f | 4e 65 77 5f 53 44 65 66 |. ._Get_|New_SDef|
|00003e70| 73 0d 15 5e 19 53 6d 28 | 30 29 20 20 3d 20 a0 28 |s..^.Sm(|0) = .(|
|00003e80| 24 53 6d 61 73 73 53 74 | 72 29 0d 15 68 17 53 50 |$SmassSt|r)..h.SP|
|00003e90| 78 28 30 29 20 3d 20 a0 | 28 24 53 50 78 53 74 72 |x(0) = .|($SPxStr|
|00003ea0| 29 0d 15 72 17 53 50 79 | 28 30 29 20 3d 20 a0 28 |)..r.SPy|(0) = .(|
|00003eb0| 24 53 50 79 53 74 72 29 | 0d 15 7c 17 53 56 78 28 |$SPyStr)|..|.SVx(|
|00003ec0| 30 29 20 3d 20 a0 28 24 | 53 56 78 53 74 72 29 0d |0) = .($|SVxStr).|
|00003ed0| 15 86 17 53 56 79 28 30 | 29 20 3d 20 a0 28 24 53 |...SVy(0|) = .($S|
|00003ee0| 56 79 53 74 72 29 0d 15 | 90 05 e1 0d 15 9a 04 0d |VyStr)..|........|
|00003ef0| 15 a4 4e 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..N-----|--------|
|00003f00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003f10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003f20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003f30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 15 ae |--------|-----...|
|00003f40| 04 0d 15 b8 16 dd 20 f2 | 5f 48 61 6e 64 6c 65 5f |...... .|_Handle_|
|00003f50| 5a 6f 6f 6d 28 62 29 0d | 15 c2 07 ea 20 50 0d 15 |Zoom(b).|.... P..|
|00003f60| cc 11 50 3d a7 5a 6f 6f | 6d 24 2c 22 3a 22 29 0d |..P=.Zoo|m$,":").|
|00003f70| 15 d6 0d c8 8e 20 62 21 | 31 36 20 ca 0d 15 e0 18 |..... b!|16 .....|
|00003f80| 20 20 c9 20 75 70 31 20 | 20 20 3a 20 5a 6f 6f 6d | . up1 | : Zoom|
|00003f90| 4c 2b 3d 31 0d 15 ea 18 | 20 20 c9 20 75 70 32 20 |L+=1....| . up2 |
|00003fa0| 20 20 3a 20 5a 6f 6f 6d | 52 2b 3d 31 0d 15 f4 18 | : Zoom|R+=1....|
|00003fb0| 20 20 c9 20 64 6f 77 6e | 31 20 3a 20 5a 6f 6f 6d | . down|1 : Zoom|
|00003fc0| 4c 2d 3d 31 0d 15 fe 18 | 20 20 c9 20 64 6f 77 6e |L-=1....| . down|
|00003fd0| 32 20 3a 20 5a 6f 6f 6d | 52 2d 3d 31 0d 16 08 05 |2 : Zoom|R-=1....|
|00003fe0| cb 0d 16 12 15 e7 20 5a | 6f 6f 6d 4c 3c 31 20 5a |...... Z|oomL<1 Z|
|00003ff0| 6f 6f 6d 4c 3d 31 0d 16 | 1c 15 e7 20 5a 6f 6f 6d |oomL=1..|... Zoom|
|00004000| 52 3c 31 20 5a 6f 6f 6d | 52 3d 31 0d 16 26 32 62 |R<1 Zoom|R=1..&2b|
|00004010| 21 30 3d 5a 6f 6f 6d 20 | 3a 20 62 21 34 3d 5a 6f |!0=Zoom |: b!4=Zo|
|00004020| 6f 6d 49 20 3a 20 c8 99 | 20 22 57 69 6d 70 5f 44 |omI : ..| "Wimp_D|
|00004030| 65 6c 65 74 65 49 63 6f | 6e 22 2c 2c 62 0d 16 30 |eleteIco|n",,b..0|
|00004040| 1e 24 5a 6f 6f 6d 53 74 | 72 3d c3 5a 6f 6f 6d 4c |.$ZoomSt|r=.ZoomL|
|00004050| 2b 22 3a 22 2b c3 5a 6f | 6f 6d 52 0d 16 3a 33 5a |+":"+.Zo|omR..:3Z|
|00004060| 6f 6f 6d 49 3d a4 5f 43 | 65 6e 74 72 65 64 5f 54 |oomI=._C|entred_T|
|00004070| 65 78 74 5f 49 63 6f 6e | 28 5a 6f 6f 6d 2c 31 33 |ext_Icon|(Zoom,13|
|00004080| 36 2c 2d 36 36 2c 5a 6f | 6f 6d 53 74 72 29 0d 16 |6,-66,Zo|omStr)..|
|00004090| 44 2e 21 62 3d 5a 6f 6f | 6d 20 3a 20 c8 99 20 22 |D.!b=Zoo|m : .. "|
|000040a0| 57 69 6d 70 5f 52 65 64 | 72 61 77 57 69 6e 64 6f |Wimp_Red|rawWindo|
|000040b0| 77 22 2c 2c 62 20 b8 20 | 6d 6f 72 65 0d 16 4e 0b |w",,b . |more..N.|
|000040c0| c8 95 20 6d 6f 72 65 0d | 16 58 26 20 20 c8 99 20 |.. more.|.X& .. |
|000040d0| 22 57 69 6d 70 5f 47 65 | 74 52 65 63 74 61 6e 67 |"Wimp_Ge|tRectang|
|000040e0| 6c 65 22 2c 2c 62 20 b8 | 20 6d 6f 72 65 0d 16 62 |le",,b .| more..b|
|000040f0| 05 ce 0d 16 6c 1f 68 65 | 69 67 68 74 3d 28 31 30 |....l.he|ight=(10|
|00004100| 32 34 2a 5a 6f 6f 6d 4c | 29 20 81 20 5a 6f 6f 6d |24*ZoomL|) . Zoom|
|00004110| 52 0d 16 76 1e 77 69 64 | 74 68 3d 28 31 32 38 30 |R..v.wid|th=(1280|
|00004120| 2a 5a 6f 6f 6d 4c 29 20 | 81 20 5a 6f 6f 6d 52 0d |*ZoomL) |. ZoomR.|
|00004130| 16 80 29 21 62 3d 6d 61 | 69 6e 20 3a 20 c8 99 20 |..)!b=ma|in : .. |
|00004140| 22 57 69 6d 70 5f 47 65 | 74 57 69 6e 64 6f 77 53 |"Wimp_Ge|tWindowS|
|00004150| 74 61 74 65 22 2c 2c 62 | 0d 16 8a 49 62 21 30 3d |tate",,b|...Ib!0=|
|00004160| 30 20 3a 20 62 21 34 3d | 2d 68 65 69 67 68 74 20 |0 : b!4=|-height |
|00004170| 3a 20 62 21 38 3d 77 69 | 64 74 68 20 3a 20 62 21 |: b!8=wi|dth : b!|
|00004180| 31 32 3d 30 20 3a 20 c8 | 99 20 22 57 69 6d 70 5f |12=0 : .|. "Wimp_|
|00004190| 53 65 74 45 78 74 65 6e | 74 22 2c 6d 61 69 6e 2c |SetExten|t",main,|
|000041a0| 62 0d 16 94 16 53 63 3d | 5a 6f 6f 6d 4c 2f 5a 6f |b....Sc=|ZoomL/Zo|
|000041b0| 6f 6d 52 2a 30 2e 31 0d | 16 9e 11 e3 20 4a 3d 30 |omR*0.1.|.... J=0|
|000041c0| 20 b8 20 46 72 6f 6e 74 | 0d 16 a8 13 20 20 e3 20 | . Front|.... . |
|000041d0| 49 3d 30 20 b8 20 50 6c | 61 6e 73 0d 16 b2 2d 20 |I=0 . Pl|ans...- |
|000041e0| 20 20 20 50 58 21 28 28 | 4a 2b 48 69 73 74 53 69 | PX!((|J+HistSi|
|000041f0| 7a 65 31 2a 49 29 2a 34 | 29 3d 50 72 65 76 50 78 |ze1*I)*4|)=PrevPx|
|00004200| 28 4a 2c 49 29 2a 53 63 | 0d 16 bc 2d 20 20 20 20 |(J,I)*Sc|...- |
|00004210| 50 59 21 28 28 4a 2b 48 | 69 73 74 53 69 7a 65 31 |PY!((J+H|istSize1|
|00004220| 2a 49 29 2a 34 29 3d 50 | 72 65 76 50 79 28 4a 2c |*I)*4)=P|revPy(J,|
|00004230| 49 29 2a 53 63 0d 16 c6 | 09 20 20 ed 20 49 0d 16 |I)*Sc...|. . I..|
|00004240| d0 07 ed 20 4a 0d 16 da | 28 62 21 30 3d 6d 61 69 |... J...|(b!0=mai|
|00004250| 6e 3a c8 99 20 22 57 69 | 6d 70 5f 47 65 74 57 69 |n:.. "Wi|mp_GetWi|
|00004260| 6e 64 6f 77 53 74 61 74 | 65 22 2c 2c 62 0d 16 e4 |ndowStat|e",,b...|
|00004270| 46 62 21 34 3d 30 20 3a | 20 62 21 38 3d 30 20 3a |Fb!4=0 :| b!8=0 :|
|00004280| 20 62 21 31 32 3d 77 69 | 64 74 68 20 3a 20 62 21 | b!12=wi|dth : b!|
|00004290| 31 36 3d 68 65 69 67 68 | 74 20 3a 20 c8 99 20 22 |16=heigh|t : .. "|
|000042a0| 57 69 6d 70 5f 4f 70 65 | 6e 57 69 6e 64 6f 77 22 |Wimp_Ope|nWindow"|
|000042b0| 2c 2c 62 0d 16 ee 0f f2 | 5f 52 65 64 72 61 77 28 |,,b.....|_Redraw(|
|000042c0| 62 29 0d 16 f8 05 e1 0d | 17 02 04 0d 17 0c 4e 2d |b)......|......N-|
|000042d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000042e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000042f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004300| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004310| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 17 16 04 0d 17 20 |--------|-...... |
|00004320| 17 dd 20 f2 5f 48 61 6e | 64 6c 65 5f 50 44 65 66 |.. ._Han|dle_PDef|
|00004330| 73 28 62 29 0d 17 2a 0d | c8 8e 20 62 21 31 36 20 |s(b)..*.|.. b!16 |
|00004340| ca 0d 17 34 3d 20 20 c9 | 20 75 70 33 20 20 20 3a |...4= .| up3 :|
|00004350| 20 50 6c 61 6e 65 74 4e | 6f 2b 3d 31 20 3a 20 e7 | PlanetN|o+=1 : .|
|00004360| 20 50 6c 61 6e 65 74 4e | 6f 3e 50 6c 61 6e 73 20 | PlanetN|o>Plans |
|00004370| 50 6c 61 6e 65 74 4e 6f | 3d 50 6c 61 6e 73 0d 17 |PlanetNo|=Plans..|
|00004380| 3e 35 20 20 c9 20 64 6f | 77 6e 33 20 3a 20 50 6c |>5 . do|wn3 : Pl|
|00004390| 61 6e 65 74 4e 6f 2d 3d | 31 20 3a 20 e7 20 50 6c |anetNo-=|1 : . Pl|
|000043a0| 61 6e 65 74 4e 6f 3c 31 | 20 50 6c 61 6e 65 74 4e |anetNo<1| PlanetN|
|000043b0| 6f 3d 31 0d 17 48 2b 20 | 20 c9 20 75 70 34 20 20 |o=1..H+ | . up4 |
|000043c0| 20 3a 20 53 6d 28 50 6c | 61 6e 65 74 4e 6f 29 3d | : Sm(Pl|anetNo)=|
|000043d0| 53 6d 28 50 6c 61 6e 65 | 74 4e 6f 29 2a 32 0d 17 |Sm(Plane|tNo)*2..|
|000043e0| 52 2b 20 20 c9 20 64 6f | 77 6e 34 20 3a 20 53 6d |R+ . do|wn4 : Sm|
|000043f0| 28 50 6c 61 6e 65 74 4e | 6f 29 3d 53 6d 28 50 6c |(PlanetN|o)=Sm(Pl|
|00004400| 61 6e 65 74 4e 6f 29 2f | 32 0d 17 5c 2d 20 20 c9 |anetNo)/|2..\- .|
|00004410| 20 75 70 35 20 20 20 3a | 20 53 50 78 28 50 6c 61 | up5 :| SPx(Pla|
|00004420| 6e 65 74 4e 6f 29 3d 53 | 50 78 28 50 6c 61 6e 65 |netNo)=S|Px(Plane|
|00004430| 74 4e 6f 29 2a 32 0d 17 | 66 2d 20 20 c9 20 64 6f |tNo)*2..|f- . do|
|00004440| 77 6e 35 20 3a 20 53 50 | 78 28 50 6c 61 6e 65 74 |wn5 : SP|x(Planet|
|00004450| 4e 6f 29 3d 53 50 78 28 | 50 6c 61 6e 65 74 4e 6f |No)=SPx(|PlanetNo|
|00004460| 29 2f 32 0d 17 70 2d 20 | 20 c9 20 75 70 36 20 20 |)/2..p- | . up6 |
|00004470| 20 3a 20 53 50 79 28 50 | 6c 61 6e 65 74 4e 6f 29 | : SPy(P|lanetNo)|
|00004480| 3d 53 50 79 28 50 6c 61 | 6e 65 74 4e 6f 29 2a 32 |=SPy(Pla|netNo)*2|
|00004490| 0d 17 7a 2d 20 20 c9 20 | 64 6f 77 6e 36 20 3a 20 |..z- . |down6 : |
|000044a0| 53 50 79 28 50 6c 61 6e | 65 74 4e 6f 29 3d 53 50 |SPy(Plan|etNo)=SP|
|000044b0| 79 28 50 6c 61 6e 65 74 | 4e 6f 29 2f 32 0d 17 84 |y(Planet|No)/2...|
|000044c0| 2d 20 20 c9 20 75 70 37 | 20 20 20 3a 20 53 56 78 |- . up7| : SVx|
|000044d0| 28 50 6c 61 6e 65 74 4e | 6f 29 3d 53 56 78 28 50 |(PlanetN|o)=SVx(P|
|000044e0| 6c 61 6e 65 74 4e 6f 29 | 2a 32 0d 17 8e 2d 20 20 |lanetNo)|*2...- |
|000044f0| c9 20 64 6f 77 6e 37 20 | 3a 20 53 56 78 28 50 6c |. down7 |: SVx(Pl|
|00004500| 61 6e 65 74 4e 6f 29 3d | 53 56 78 28 50 6c 61 6e |anetNo)=|SVx(Plan|
|00004510| 65 74 4e 6f 29 2f 32 0d | 17 98 2d 20 20 c9 20 75 |etNo)/2.|..- . u|
|00004520| 70 38 20 20 20 3a 20 53 | 56 79 28 50 6c 61 6e 65 |p8 : S|Vy(Plane|
|00004530| 74 4e 6f 29 3d 53 56 79 | 28 50 6c 61 6e 65 74 4e |tNo)=SVy|(PlanetN|
|00004540| 6f 29 2a 32 0d 17 a2 2d | 20 20 c9 20 64 6f 77 6e |o)*2...-| . down|
|00004550| 38 20 3a 20 53 56 79 28 | 50 6c 61 6e 65 74 4e 6f |8 : SVy(|PlanetNo|
|00004560| 29 3d 53 56 79 28 50 6c | 61 6e 65 74 4e 6f 29 2f |)=SVy(Pl|anetNo)/|
|00004570| 32 0d 17 ac 05 cb 0d 17 | b6 15 f2 5f 52 65 44 72 |2.......|..._ReDr|
|00004580| 61 77 5f 50 44 65 66 73 | 28 62 29 0d 17 c0 05 e1 |aw_PDefs|(b).....|
|00004590| 0d 17 ca 04 0d 17 d4 4e | 2d 2d 2d 2d 2d 2d 2d 2d |.......N|--------|
|000045a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000045b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000045c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000045d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000045e0| 2d 2d 0d 17 de 04 0d 17 | e8 17 dd 20 f2 5f 48 61 |--......|... ._Ha|
|000045f0| 6e 64 6c 65 5f 53 44 65 | 66 73 28 62 29 0d 17 f2 |ndle_SDe|fs(b)...|
|00004600| 0d c8 8e 20 62 21 31 36 | 20 ca 0d 17 fc 1d 20 20 |... b!16| ..... |
|00004610| c9 20 75 70 39 20 20 20 | 3a 20 53 6d 28 30 29 3d |. up9 |: Sm(0)=|
|00004620| 53 6d 28 30 29 2a 32 0d | 18 06 1d 20 20 c9 20 64 |Sm(0)*2.|... . d|
|00004630| 6f 77 6e 39 20 3a 20 53 | 6d 28 30 29 3d 53 6d 28 |own9 : S|m(0)=Sm(|
|00004640| 30 29 2f 32 0d 18 10 1f | 20 20 c9 20 75 70 31 30 |0)/2....| . up10|
|00004650| 20 20 3a 20 53 50 78 28 | 30 29 3d 53 50 78 28 30 | : SPx(|0)=SPx(0|
|00004660| 29 2a 32 0d 18 1a 1f 20 | 20 c9 20 64 6f 77 6e 31 |)*2.... | . down1|
|00004670| 30 3a 20 53 50 78 28 30 | 29 3d 53 50 78 28 30 29 |0: SPx(0|)=SPx(0)|
|00004680| 2f 32 0d 18 24 1f 20 20 | c9 20 75 70 31 31 20 20 |/2..$. |. up11 |
|00004690| 3a 20 53 50 79 28 30 29 | 3d 53 50 79 28 30 29 2a |: SPy(0)|=SPy(0)*|
|000046a0| 32 0d 18 2e 1f 20 20 c9 | 20 64 6f 77 6e 31 31 3a |2.... .| down11:|
|000046b0| 20 53 50 79 28 30 29 3d | 53 50 79 28 30 29 2f 32 | SPy(0)=|SPy(0)/2|
|000046c0| 0d 18 38 1f 20 20 c9 20 | 75 70 31 32 20 20 3a 20 |..8. . |up12 : |
|000046d0| 53 56 78 28 30 29 3d 53 | 56 78 28 30 29 2a 32 0d |SVx(0)=S|Vx(0)*2.|
|000046e0| 18 42 1f 20 20 c9 20 64 | 6f 77 6e 31 32 3a 20 53 |.B. . d|own12: S|
|000046f0| 56 78 28 30 29 3d 53 56 | 78 28 30 29 2f 32 0d 18 |Vx(0)=SV|x(0)/2..|
|00004700| 4c 1f 20 20 c9 20 75 70 | 31 33 20 20 3a 20 53 56 |L. . up|13 : SV|
|00004710| 79 28 30 29 3d 53 56 79 | 28 30 29 2a 32 0d 18 56 |y(0)=SVy|(0)*2..V|
|00004720| 1f 20 20 c9 20 64 6f 77 | 6e 31 33 3a 20 53 56 79 |. . dow|n13: SVy|
|00004730| 28 30 29 3d 53 56 79 28 | 30 29 2f 32 0d 18 60 05 |(0)=SVy(|0)/2..`.|
|00004740| cb 0d 18 6a 15 f2 5f 52 | 65 44 72 61 77 5f 53 44 |...j.._R|eDraw_SD|
|00004750| 65 66 73 28 62 29 0d 18 | 74 05 e1 0d 18 7e 04 0d |efs(b)..|t....~..|
|00004760| 18 88 4e 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..N-----|--------|
|00004770| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004780| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004790| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000047a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 18 92 |--------|-----...|
|000047b0| 04 0d 18 9c 0f dd 20 f2 | 5f 4d 65 6e 75 28 62 29 |...... .|_Menu(b)|
|000047c0| 0d 18 a6 0d c8 8e 20 62 | 21 31 32 20 ca 0d 18 b0 |...... b|!12 ....|
|000047d0| 09 20 c9 20 2d 32 0d 18 | ba 2f 20 20 20 f2 5f 44 |. . -2..|./ ._D|
|000047e0| 72 61 77 5f 4d 65 6e 75 | 28 6d 65 6e 75 2c 31 2c |raw_Menu|(menu,1,|
|000047f0| 22 50 6c 61 6e 65 74 73 | 2c 2d 49 6e 66 6f 2c 51 |"Planets|,-Info,Q|
|00004800| 75 69 74 22 29 0d 18 c4 | 2d 20 20 20 c8 99 20 22 |uit")...|- .. "|
|00004810| 57 69 6d 70 5f 43 72 65 | 61 74 65 4d 65 6e 75 22 |Wimp_Cre|ateMenu"|
|00004820| 2c 2c 6d 65 6e 75 2b 34 | 2c 21 62 2d 36 34 2c 31 |,,menu+4|,!b-64,1|
|00004830| 33 36 0d 18 ce 0b 20 c9 | 20 6d 61 69 6e 0d 18 d8 |36.... .| main...|
|00004840| 42 20 20 20 f2 5f 44 72 | 61 77 5f 4d 65 6e 75 28 |B ._Dr|aw_Menu(|
|00004850| 6d 65 6e 75 2c 32 2c 22 | 50 6c 61 6e 65 74 73 2c |menu,2,"|Planets,|
|00004860| 52 75 6e 6e 69 6e 67 2c | 52 65 49 6e 69 74 2c 5e |Running,|ReInit,^|
|00004870| 50 6c 61 6e 65 74 73 2c | 2d 5a 6f 6f 6d 22 29 0d |Planets,|-Zoom").|
|00004880| 18 e2 24 20 20 20 e7 20 | 72 75 6e 6e 69 6e 67 20 |..$ . |running |
|00004890| 6d 65 6e 75 21 33 32 3d | 6d 65 6e 75 21 33 32 20 |menu!32=|menu!32 |
|000048a0| 84 20 31 0d 18 ec 2e 20 | 20 20 f2 5f 44 72 61 77 |. 1.... | ._Draw|
|000048b0| 5f 4d 65 6e 75 28 58 58 | 58 2c 33 2c 22 44 65 66 |_Menu(XX|X,3,"Def|
|000048c0| 73 2c 23 53 75 6e 2c 24 | 50 6c 61 6e 65 74 73 22 |s,#Sun,$|Planets"|
|000048d0| 29 0d 18 f6 2d 20 20 20 | c8 99 20 22 57 69 6d 70 |)...- |.. "Wimp|
|000048e0| 5f 43 72 65 61 74 65 4d | 65 6e 75 22 2c 2c 6d 65 |_CreateM|enu",,me|
|000048f0| 6e 75 2b 34 2c 21 62 2d | 36 34 2c 62 21 34 0d 19 |nu+4,!b-|64,b!4..|
|00004900| 00 05 cb 0d 19 0a 05 e1 | 0d 19 14 04 0d 19 1e 4e |........|.......N|
|00004910| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004920| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004930| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004940| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004950| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 19 28 04 0d 19 |--------|--..(...|
|00004960| 32 21 dd 20 f2 5f 44 72 | 61 77 5f 4d 65 6e 75 28 |2!. ._Dr|aw_Menu(|
|00004970| 6d 65 6e 75 2c 20 68 2c | 20 6d 65 6e 75 24 29 0d |menu, h,| menu$).|
|00004980| 19 3c 46 21 6d 65 6e 75 | 3d 68 20 3a 20 6d 65 6e |.<F!menu|=h : men|
|00004990| 75 21 31 36 3d 26 30 30 | 30 37 30 32 30 37 20 3a |u!16=&00|070207 :|
|000049a0| 20 6d 65 6e 75 21 32 30 | 3d 31 35 36 20 3a 20 6d | menu!20|=156 : m|
|000049b0| 65 6e 75 21 32 34 3d 34 | 30 20 3a 20 6d 65 6e 75 |enu!24=4|0 : menu|
|000049c0| 21 32 38 3d 30 0d 19 46 | 0f 70 74 72 3d 6d 65 6e |!28=0..F|.ptr=men|
|000049d0| 75 2b 33 32 0d 19 50 23 | 24 28 6d 65 6e 75 2b 34 |u+32..P#|$(menu+4|
|000049e0| 29 3d c0 6d 65 6e 75 24 | 2c a7 6d 65 6e 75 24 2c |)=.menu$|,.menu$,|
|000049f0| 22 2c 22 29 2d 31 29 0d | 19 5a 13 6d 65 6e 75 24 |",")-1).|.Z.menu$|
|00004a00| 3d 6d 65 6e 75 24 2b 22 | 2c 22 0d 19 64 10 c8 95 |=menu$+"|,"..d...|
|00004a10| 20 6d 65 6e 75 24 3c 3e | 22 22 0d 19 6e 21 20 20 | menu$<>|""..n! |
|00004a20| 6d 65 6e 75 24 3d c1 6d | 65 6e 75 24 2c a7 6d 65 |menu$=.m|enu$,.me|
|00004a30| 6e 75 24 2c 22 2c 22 29 | 2b 31 29 0d 19 78 13 20 |nu$,",")|+1)..x. |
|00004a40| 20 e7 20 6d 65 6e 75 24 | 3c 3e 22 22 20 8c 0d 19 | . menu$|<>"" ...|
|00004a50| 82 16 20 20 20 20 c8 8e | 20 c0 6d 65 6e 75 24 2c |.. ..| .menu$,|
|00004a60| 31 29 20 ca 0d 19 8c 4b | 20 20 20 20 20 20 c9 20 |1) ....K| . |
|00004a70| 22 2d 22 20 3a 20 21 70 | 74 72 3d 30 20 3a 20 6d |"-" : !p|tr=0 : m|
|00004a80| 65 6e 75 24 3d c1 6d 65 | 6e 75 24 2c 32 29 20 3a |enu$=.me|nu$,2) :|
|00004a90| 20 70 74 72 21 34 3d a0 | 28 c0 6d 65 6e 75 24 2c | ptr!4=.|(.menu$,|
|00004aa0| a7 6d 65 6e 75 24 2c 22 | 2c 22 29 2d 31 29 29 0d |.menu$,"|,")-1)).|
|00004ab0| 19 96 38 20 20 20 20 20 | 20 c9 20 22 5e 22 20 3a |..8 | . "^" :|
|00004ac0| 20 21 70 74 72 3d 30 20 | 3a 20 6d 65 6e 75 24 3d | !ptr=0 |: menu$=|
|00004ad0| c1 6d 65 6e 75 24 2c 32 | 29 20 3a 20 70 74 72 21 |.menu$,2|) : ptr!|
|00004ae0| 34 3d 58 58 58 2b 34 0d | 19 a0 38 20 20 20 20 20 |4=XXX+4.|..8 |
|00004af0| 20 c9 20 22 24 22 20 3a | 20 21 70 74 72 3d 30 20 | . "$" :| !ptr=0 |
|00004b00| 3a 20 6d 65 6e 75 24 3d | c1 6d 65 6e 75 24 2c 32 |: menu$=|.menu$,2|
|00004b10| 29 20 3a 20 70 74 72 21 | 34 3d 50 44 65 66 73 0d |) : ptr!|4=PDefs.|
|00004b20| 19 aa 38 20 20 20 20 20 | 20 c9 20 22 23 22 20 3a |..8 | . "#" :|
|00004b30| 20 21 70 74 72 3d 30 20 | 3a 20 6d 65 6e 75 24 3d | !ptr=0 |: menu$=|
|00004b40| c1 6d 65 6e 75 24 2c 32 | 29 20 3a 20 70 74 72 21 |.menu$,2|) : ptr!|
|00004b50| 34 3d 53 44 65 66 73 0d | 19 b4 1e 20 20 20 20 20 |4=SDefs.|... |
|00004b60| 20 7f 3a 20 21 70 74 72 | 3d 30 20 3a 20 70 74 72 | .: !ptr|=0 : ptr|
|00004b70| 21 34 3d 2d 31 0d 19 be | 09 20 20 20 20 cb 0d 19 |!4=-1...|. ...|
|00004b80| c8 16 20 20 20 20 70 74 | 72 21 38 3d 26 37 30 30 |.. pt|r!8=&700|
|00004b90| 30 30 32 31 0d 19 d2 27 | 20 20 20 20 24 28 70 74 |0021...'| $(pt|
|00004ba0| 72 2b 31 32 29 3d c0 6d | 65 6e 75 24 2c a7 6d 65 |r+12)=.m|enu$,.me|
|00004bb0| 6e 75 24 2c 22 2c 22 29 | 2d 31 29 0d 19 dc 0f 20 |nu$,",")|-1).... |
|00004bc0| 20 20 20 70 74 72 2b 3d | 32 34 0d 19 e6 07 20 20 | ptr+=|24.... |
|00004bd0| cd 0d 19 f0 05 ce 0d 19 | fa 19 70 74 72 21 2d 32 |........|..ptr!-2|
|00004be0| 34 3d 70 74 72 21 2d 32 | 34 20 84 20 26 38 30 0d |4=ptr!-2|4 . &80.|
|00004bf0| 1a 04 05 e1 0d 1a 0e 04 | 0d 1a 18 4e 2d 2d 2d 2d |........|...N----|
|00004c00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004c10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004c20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004c30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004c40| 2d 2d 2d 2d 2d 2d 0d 1a | 22 04 0d 1a 2c 16 dd 20 |------..|"...,.. |
|00004c50| f2 5f 4d 65 6e 75 5f 53 | 65 6c 65 63 74 28 62 29 |._Menu_S|elect(b)|
|00004c60| 0d 1a 36 0e c8 8e 20 21 | 6d 65 6e 75 20 ca 0d 1a |..6... !|menu ...|
|00004c70| 40 09 20 20 c9 20 31 0d | 1a 4a 0f 20 20 20 20 c8 |@. . 1.|.J. .|
|00004c80| 8e 20 21 62 20 ca 0d 1a | 54 16 20 20 20 20 20 20 |. !b ...|T. |
|00004c90| c9 20 31 20 3a 20 71 75 | 69 74 3d b9 0d 1a 5e 09 |. 1 : qu|it=...^.|
|00004ca0| 20 20 20 20 cb 0d 1a 68 | 09 20 20 c9 20 32 0d 1a | ...h|. . 2..|
|00004cb0| 72 0f 20 20 20 20 c8 8e | 20 21 62 20 ca 0d 1a 7c |r. ..| !b ...||
|00004cc0| 22 20 20 20 20 20 20 c9 | 20 30 20 3a 20 72 75 6e |" .| 0 : run|
|00004cd0| 6e 69 6e 67 3d 20 ac 20 | 72 75 6e 6e 69 6e 67 0d |ning= . |running.|
|00004ce0| 1a 86 33 20 20 20 20 20 | 20 c9 20 31 20 3a 20 f2 |..3 | . 1 : .|
|00004cf0| 5f 49 6e 69 74 5f 44 61 | 74 61 20 3a 20 21 62 3d |_Init_Da|ta : !b=|
|00004d00| 6d 61 69 6e 20 3a 20 f2 | 5f 52 65 64 72 61 77 28 |main : .|_Redraw(|
|00004d10| 62 29 0d 1a 90 13 20 20 | 20 20 20 20 c9 20 32 20 |b).... | . 2 |
|00004d20| 3a 20 ef 20 37 0d 1a 9a | 13 20 20 20 20 20 20 c9 |: . 7...|. .|
|00004d30| 20 33 20 3a 20 ef 20 37 | 0d 1a a4 09 20 20 20 20 | 3 : . 7|.... |
|00004d40| cb 0d 1a ae 09 20 20 c9 | 20 33 0d 1a b8 05 cb 0d |..... .| 3......|
|00004d50| 1a c2 05 e1 0d 1a cc 04 | 0d 1a d6 4e 2d 2d 2d 2d |........|...N----|
|00004d60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004d70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004d80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004d90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004da0| 2d 2d 2d 2d 2d 2d 0d 1a | e0 04 0d 1a ea 20 dd f2 |------..|..... ..|
|00004db0| 5f 47 65 74 5f 4f 72 69 | 67 69 6e 28 62 2c 20 f8 |_Get_Ori|gin(b, .|
|00004dc0| 20 78 30 2c 20 f8 20 79 | 30 29 0d 1a f4 19 78 30 | x0, . y|0)....x0|
|00004dd0| 3d 62 21 34 2d 62 21 32 | 30 2b 77 69 64 74 68 20 |=b!4-b!2|0+width |
|00004de0| 81 20 32 0d 1a fe 1b 79 | 30 3d 62 21 31 36 2d 62 |. 2....y|0=b!16-b|
|00004df0| 21 32 34 2d 68 65 69 67 | 68 74 20 81 20 32 0d 1b |!24-heig|ht . 2..|
|00004e00| 08 18 57 69 6e 64 6f 77 | 4c 69 6d 69 74 73 21 30 |..Window|Limits!0|
|00004e10| 20 3d 20 62 21 34 0d 1b | 12 18 57 69 6e 64 6f 77 | = b!4..|..Window|
|00004e20| 4c 69 6d 69 74 73 21 34 | 20 3d 20 62 21 38 0d 1b |Limits!4| = b!8..|
|00004e30| 1c 19 57 69 6e 64 6f 77 | 4c 69 6d 69 74 73 21 38 |..Window|Limits!8|
|00004e40| 20 3d 20 62 21 31 32 0d | 1b 26 19 57 69 6e 64 6f | = b!12.|.&.Windo|
|00004e50| 77 4c 69 6d 69 74 73 21 | 31 32 3d 20 62 21 31 36 |wLimits!|12= b!16|
|00004e60| 0d 1b 30 05 e1 0d 1b 3a | 04 0d 1b 44 4e 2d 2d 2d |..0....:|...DN---|
|00004e70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004e80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004e90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004ea0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004eb0| 2d 2d 2d 2d 2d 2d 2d 0d | 1b 4e 04 0d 1b 58 12 dd |-------.|.N...X..|
|00004ec0| f2 5f 44 72 61 77 28 78 | 30 2c 79 30 29 0d 1b 62 |._Draw(x|0,y0)..b|
|00004ed0| 11 e3 20 4a 3d 30 20 b8 | 20 50 6c 61 6e 73 0d 1b |.. J=0 .| Plans..|
|00004ee0| 6c 1f 20 20 c8 99 20 22 | 57 69 6d 70 5f 53 65 74 |l. .. "|Wimp_Set|
|00004ef0| 43 6f 6c 6f 75 72 22 2c | 43 74 28 4a 29 0d 1b 76 |Colour",|Ct(J)..v|
|00004f00| 62 20 20 41 25 3d 36 39 | 20 3a 20 44 25 3d 78 30 |b A%=69| : D%=x0|
|00004f10| 20 3a 20 45 25 3d 79 30 | 20 3a 20 46 25 3d 50 58 | : E%=y0| : F%=PX|
|00004f20| 2b 4a 2a 48 69 73 74 53 | 69 7a 65 31 2a 34 20 3a |+J*HistS|ize1*4 :|
|00004f30| 20 47 25 3d 50 59 2b 4a | 2a 48 69 73 74 53 69 7a | G%=PY+J|*HistSiz|
|00004f40| 65 31 2a 34 20 3a 20 48 | 25 3d 57 69 6e 64 6f 77 |e1*4 : H|%=Window|
|00004f50| 4c 69 6d 69 74 73 20 3a | 20 43 25 3d 4d 61 78 0d |Limits :| C%=Max.|
|00004f60| 1b 80 0d 20 20 d6 20 4d | 43 6f 64 65 0d 1b 8a 07 |... . M|Code....|
|00004f70| ed 20 4a 0d 1b 94 11 e3 | 20 49 3d 30 20 b8 20 50 |. J.....| I=0 . P|
|00004f80| 6c 61 6e 73 0d 1b 9e 1e | 20 20 c8 99 20 22 57 69 |lans....| .. "Wi|
|00004f90| 6d 70 5f 53 65 74 43 6f | 6c 6f 75 72 22 2c 43 28 |mp_SetCo|lour",C(|
|00004fa0| 49 29 0d 1b a8 34 20 20 | c8 92 20 78 30 2b 50 72 |I)...4 |.. x0+Pr|
|00004fb0| 65 76 50 78 28 46 72 6f | 6e 74 2c 49 29 2a 53 63 |evPx(Fro|nt,I)*Sc|
|00004fc0| 2c 79 30 2b 50 72 65 76 | 50 79 28 46 72 6f 6e 74 |,y0+Prev|Py(Front|
|00004fd0| 2c 49 29 2a 53 63 0d 1b | b2 07 ed 20 49 0d 1b bc |,I)*Sc..|... I...|
|00004fe0| 05 e1 0d 1b c6 04 0d 1b | d0 4e 2d 2d 2d 2d 2d 2d |........|.N------|
|00004ff0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005000| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005010| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005020| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005030| 2d 2d 2d 2d 0d 1b da 04 | 0d 1b e4 33 dd a4 5f 43 |----....|...3.._C|
|00005040| 72 65 61 74 65 28 76 77 | 78 2c 76 77 79 2c 76 77 |reate(vw|x,vwy,vw|
|00005050| 77 2c 76 77 68 2c 65 78 | 74 78 2c 65 78 74 79 2c |w,vwh,ex|tx,exty,|
|00005060| 66 2c 70 74 72 2c 62 67 | 6e 64 29 0d 1b ee 0c ea |f,ptr,bg|nd).....|
|00005070| 20 68 61 6e 64 6c 65 0d | 1b f8 12 24 62 6c 6f 63 | handle.|...$bloc|
|00005080| 6b 3d c4 38 38 2c bd 30 | 29 0d 1c 02 0f 62 6c 6f |k=.88,.0|)....blo|
|00005090| 63 6b 21 30 3d 76 77 78 | 0d 1c 0c 0f 62 6c 6f 63 |ck!0=vwx|....bloc|
|000050a0| 6b 21 34 3d 76 77 79 0d | 1c 16 13 62 6c 6f 63 6b |k!4=vwy.|...block|
|000050b0| 21 38 3d 76 77 78 2b 76 | 77 77 0d 1c 20 14 62 6c |!8=vwx+v|ww.. .bl|
|000050c0| 6f 63 6b 21 31 32 3d 76 | 77 78 2b 76 77 68 0d 1c |ock!12=v|wx+vwh..|
|000050d0| 2a 0f 62 6c 6f 63 6b 21 | 32 34 3d 2d 31 0d 1c 34 |*.block!|24=-1..4|
|000050e0| 0e 62 6c 6f 63 6b 21 32 | 38 3d 66 0d 1c 3e 16 62 |.block!2|8=f..>.b|
|000050f0| 6c 6f 63 6b 21 33 32 3d | 26 30 30 30 37 30 32 30 |lock!32=|&0007020|
|00005100| 37 0d 1c 48 11 62 6c 6f | 63 6b 21 33 35 3d 62 67 |7..H.blo|ck!35=bg|
|00005110| 6e 64 0d 1c 52 16 62 6c | 6f 63 6b 21 33 36 3d 26 |nd..R.bl|ock!36=&|
|00005120| 30 30 30 43 30 31 30 33 | 0d 1c 5c 0e 62 6c 6f 63 |000C0103|..\.bloc|
|00005130| 6b 21 34 30 3d 30 0d 1c | 66 16 62 6c 6f 63 6b 21 |k!40=0..|f.block!|
|00005140| 34 34 3d 2d 76 77 68 2d | 65 78 74 79 0d 1c 70 15 |44=-vwh-|exty..p.|
|00005150| 62 6c 6f 63 6b 21 34 38 | 3d 76 77 77 2b 65 78 74 |block!48|=vww+ext|
|00005160| 78 0d 1c 7a 0e 62 6c 6f | 63 6b 21 35 32 3d 30 0d |x..z.blo|ck!52=0.|
|00005170| 1c 84 11 62 6c 6f 63 6b | 21 35 36 3d 26 31 33 44 |...block|!56=&13D|
|00005180| 0d 1c 8e 12 62 6c 6f 63 | 6b 21 36 30 3d 32 3c 3c |....bloc|k!60=2<<|
|00005190| 31 32 0d 1c 98 10 62 6c | 6f 63 6b 21 37 32 3d 70 |12....bl|ock!72=p|
|000051a0| 74 72 0d 1c a2 0f 62 6c | 6f 63 6b 21 37 36 3d 2d |tr....bl|ock!76=-|
|000051b0| 31 0d 1c ac 12 62 6c 6f | 63 6b 21 38 30 3d a9 24 |1....blo|ck!80=.$|
|000051c0| 70 74 72 0d 1c b6 2a c8 | 99 20 22 57 69 6d 70 5f |ptr...*.|. "Wimp_|
|000051d0| 43 72 65 61 74 65 57 69 | 6e 64 6f 77 22 2c 2c 62 |CreateWi|ndow",,b|
|000051e0| 6c 6f 63 6b 20 b8 20 68 | 61 6e 64 6c 65 0d 1c c0 |lock . h|andle...|
|000051f0| 0b 3d 68 61 6e 64 6c 65 | 0d 1c ca 04 0d 1c d4 4e |.=handle|.......N|
|00005200| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005210| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005220| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005230| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005240| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 1c de 04 0d 1c |--------|--......|
|00005250| e8 2b dd 20 a4 5f 53 70 | 72 69 74 65 5f 49 63 6f |.+. ._Sp|rite_Ico|
|00005260| 6e 28 77 2c 78 30 2c 79 | 30 2c 78 31 2c 79 31 2c |n(w,x0,y|0,x1,y1,|
|00005270| 66 2c 73 70 2c 73 70 24 | 29 0d 1c f2 21 de 20 62 |f,sp,sp$|)...!. b|
|00005280| 6c 6f 63 6b 21 32 34 20 | a9 73 70 24 2b 31 3a 62 |lock!24 |.sp$+1:b|
|00005290| 6c 6f 63 6b 21 32 38 3d | 73 70 0d 1c fc 23 62 6c |lock!28=|sp...#bl|
|000052a0| 6f 63 6b 21 33 32 3d a9 | 73 70 24 2b 31 20 3a 20 |ock!32=.|sp$+1 : |
|000052b0| 24 62 6c 6f 63 6b 21 32 | 34 3d 73 70 24 0d 1d 06 |$block!2|4=sp$...|
|000052c0| 20 3d a4 5f 49 63 6f 6e | 5f 42 6c 6b 28 77 2c 78 | =._Icon|_Blk(w,x|
|000052d0| 30 2c 79 30 2c 78 31 2c | 79 31 2c 66 29 0d 1d 10 |0,y0,x1,|y1,f)...|
|000052e0| 04 0d 1d 1a 4e 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |....N---|--------|
|000052f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005300| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005310| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005320| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00005330| 1d 24 04 0d 1d 2e 21 dd | 20 a4 5f 49 63 6f 6e 5f |.$....!.| ._Icon_|
|00005340| 42 6c 6b 28 77 2c 78 30 | 2c 79 30 2c 78 31 2c 79 |Blk(w,x0|,y0,x1,y|
|00005350| 31 2c 66 29 0d 1d 38 45 | 21 62 6c 6f 63 6b 3d 77 |1,f)..8E|!block=w|
|00005360| 3a 62 6c 6f 63 6b 21 34 | 3d 78 30 3a 62 6c 6f 63 |:block!4|=x0:bloc|
|00005370| 6b 21 38 3d 79 30 3a 62 | 6c 6f 63 6b 21 31 32 3d |k!8=y0:b|lock!12=|
|00005380| 78 31 3a 62 6c 6f 63 6b | 21 31 36 3d 79 31 3a 62 |x1:block|!16=y1:b|
|00005390| 6c 6f 63 6b 21 32 30 3d | 66 0d 1d 42 26 c8 99 20 |lock!20=|f..B&.. |
|000053a0| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 49 63 6f 6e |"Wimp_Cr|eateIcon|
|000053b0| 22 2c 2c 62 6c 6f 63 6b | 20 b8 20 69 63 6f 6e 0d |",,block| . icon.|
|000053c0| 1d 4c 09 3d 69 63 6f 6e | 0d 1d 56 04 0d 1d 60 4e |.L.=icon|..V...`N|
|000053d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000053e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000053f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005400| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005410| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 1d 6a 04 0d 1d |--------|--..j...|
|00005420| 74 21 dd 20 a4 5f 54 65 | 78 74 5f 49 63 6f 6e 28 |t!. ._Te|xt_Icon(|
|00005430| 77 2c 78 30 2c 79 30 2c | 78 31 2c 70 74 72 29 0d |w,x0,y0,|x1,ptr).|
|00005440| 1d 7e 2f 62 6c 6f 63 6b | 21 32 34 3d 70 74 72 20 |.~/block|!24=ptr |
|00005450| 3a 20 62 6c 6f 63 6b 21 | 32 38 3d 2d 31 20 3a 20 |: block!|28=-1 : |
|00005460| 62 6c 6f 63 6b 21 33 32 | 3d a9 24 70 74 72 0d 1d |block!32|=.$ptr..|
|00005470| 88 2d 3d a4 5f 49 63 6f | 6e 5f 42 6c 6b 28 77 2c |.-=._Ico|n_Blk(w,|
|00005480| 78 30 2c 2d 79 30 2c 78 | 31 2c 2d 79 30 2b 34 38 |x0,-y0,x|1,-y0+48|
|00005490| 2c 26 30 37 30 30 30 31 | 33 44 29 0d 1d 92 04 0d |,&070001|3D).....|
|000054a0| 1d 9c 4e 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..N-----|--------|
|000054b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000054c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000054d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000054e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 1d a6 |--------|-----...|
|000054f0| 04 0d 1d b0 25 dd 20 a4 | 5f 57 72 69 74 61 62 6c |....%. .|_Writabl|
|00005500| 65 5f 49 63 6f 6e 28 77 | 2c 78 30 2c 79 30 2c 78 |e_Icon(w|,x0,y0,x|
|00005510| 31 2c 70 74 72 29 0d 1d | ba 2c 62 6c 6f 63 6b 21 |1,ptr)..|.,block!|
|00005520| 32 34 3d 70 74 72 20 3a | 20 62 6c 6f 63 6b 21 32 |24=ptr :| block!2|
|00005530| 38 3d 2d 31 20 3a 20 62 | 6c 6f 63 6b 21 33 32 3d |8=-1 : b|lock!32=|
|00005540| 31 30 0d 1d c4 2d 3d a4 | 5f 49 63 6f 6e 5f 42 6c |10...-=.|_Icon_Bl|
|00005550| 6b 28 77 2c 78 30 2c 2d | 79 30 2c 78 31 2c 2d 79 |k(w,x0,-|y0,x1,-y|
|00005560| 30 2b 34 38 2c 26 30 37 | 30 30 46 31 33 44 29 0d |0+48,&07|00F13D).|
|00005570| 1d ce 04 0d 1d d8 4e 2d | 2d 2d 2d 2d 2d 2d 2d 2d |......N-|--------|
|00005580| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005590| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000055a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000055b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000055c0| 2d 0d 1d e2 04 0d 1d ec | 26 dd 20 a4 5f 43 65 6e |-.......|&. ._Cen|
|000055d0| 74 72 65 64 5f 54 65 78 | 74 5f 49 63 6f 6e 28 77 |tred_Tex|t_Icon(w|
|000055e0| 2c 78 30 2c 79 30 2c 70 | 74 72 29 0d 1d f6 09 ea |,x0,y0,p|tr).....|
|000055f0| 20 6c 65 6e 0d 1e 00 0f | 6c 65 6e 3d 38 2a a9 24 | len....|len=8*.$|
|00005600| 70 74 72 0d 1e 0a 2f 62 | 6c 6f 63 6b 21 32 34 3d |ptr.../b|lock!24=|
|00005610| 70 74 72 20 3a 20 62 6c | 6f 63 6b 21 32 38 3d 2d |ptr : bl|ock!28=-|
|00005620| 31 20 3a 20 62 6c 6f 63 | 6b 21 33 32 3d a9 24 70 |1 : bloc|k!32=.$p|
|00005630| 74 72 0d 1e 14 36 3d a4 | 5f 49 63 6f 6e 5f 42 6c |tr...6=.|_Icon_Bl|
|00005640| 6b 28 77 2c 78 30 2d 6c | 65 6e 2c 79 30 2d 32 33 |k(w,x0-l|en,y0-23|
|00005650| 2c 78 30 2b 6c 65 6e 2c | 79 30 2b 32 34 2c 26 30 |,x0+len,|y0+24,&0|
|00005660| 37 30 30 30 31 33 39 29 | 0d 1e 1e 04 0d 1e 28 4e |7000139)|......(N|
|00005670| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005680| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005690| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000056a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000056b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 1e 32 04 0d 1e |--------|--..2...|
|000056c0| 3c 1f dd 20 a4 5f 54 78 | 74 5f 49 63 6f 6e 28 77 |<.. ._Tx|t_Icon(w|
|000056d0| 2c 78 30 2c 79 30 2c 78 | 31 2c 41 24 29 0d 1e 46 |,x0,y0,x|1,A$)..F|
|000056e0| 12 24 28 62 6c 6f 63 6b | 2b 32 34 29 3d 41 24 0d |.$(block|+24)=A$.|
|000056f0| 1e 50 2d 3d a4 5f 49 63 | 6f 6e 5f 42 6c 6b 28 77 |.P-=._Ic|on_Blk(w|
|00005700| 2c 78 30 2c 2d 79 30 2c | 78 31 2c 2d 79 30 2b 34 |,x0,-y0,|x1,-y0+4|
|00005710| 38 2c 26 32 37 30 30 30 | 30 31 39 29 0d 1e 5a 04 |8,&27000|019)..Z.|
|00005720| 0d 1e 64 4e 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..dN----|--------|
|00005730| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005740| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005750| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005760| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 1e |--------|------..|
|00005770| 6e 04 0d 1e 78 37 dd 20 | f2 5f 56 61 72 69 61 62 |n...x7. |._Variab|
|00005780| 6c 65 5f 43 68 61 6e 67 | 65 28 77 2c 79 30 2c 61 |le_Chang|e(w,y0,a|
|00005790| 24 2c 62 24 2c f8 20 75 | 70 2c 20 f8 20 64 6f 77 |$,b$,. u|p, . dow|
|000057a0| 6e 2c 20 f8 20 53 74 72 | 29 0d 1e 82 20 78 3d a4 |n, . Str|)... x=.|
|000057b0| 5f 54 78 74 5f 49 63 6f | 6e 28 77 2c 39 36 2c 79 |_Txt_Ico|n(w,96,y|
|000057c0| 30 2c 32 36 30 2c 61 24 | 29 0d 1e 8c 18 de 20 53 |0,260,a$|)..... S|
|000057d0| 74 72 20 32 30 20 3a 20 | 24 53 74 72 20 3d 20 62 |tr 20 : |$Str = b|
|000057e0| 24 0d 1e 96 29 78 3d a4 | 5f 57 72 69 74 61 62 6c |$...)x=.|_Writabl|
|000057f0| 65 5f 49 63 6f 6e 28 77 | 2c 39 36 2c 79 30 2b 34 |e_Icon(w|,96,y0+4|
|00005800| 38 2c 32 36 30 2c 53 74 | 72 29 0d 1e a0 3e 75 70 |8,260,St|r)...>up|
|00005810| 3d a4 5f 53 70 72 69 74 | 65 5f 49 63 6f 6e 28 77 |=._Sprit|e_Icon(w|
|00005820| 2c 31 36 2c 2d 79 30 2d | 34 38 2c 35 36 2c 2d 79 |,16,-y0-|48,56,-y|
|00005830| 30 2c 26 33 31 30 32 2c | 61 72 72 6f 77 2c 22 75 |0,&3102,|arrow,"u|
|00005840| 70 61 72 72 6f 77 22 29 | 0d 1e aa 42 64 6f 77 6e |parrow")|...Bdown|
|00005850| 3d a4 5f 53 70 72 69 74 | 65 5f 49 63 6f 6e 28 77 |=._Sprit|e_Icon(w|
|00005860| 2c 35 36 2c 2d 79 30 2d | 34 38 2c 39 36 2c 2d 79 |,56,-y0-|48,96,-y|
|00005870| 30 2c 26 33 31 30 32 2c | 61 72 72 6f 77 2c 22 64 |0,&3102,|arrow,"d|
|00005880| 6f 77 6e 61 72 72 6f 77 | 22 29 0d 1e b4 05 e1 0d |ownarrow|")......|
|00005890| 1e be 04 0d 1e c8 4e 2d | 2d 2d 2d 2d 2d 2d 2d 2d |......N-|--------|
|000058a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000058b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000058c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000058d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000058e0| 2d 0d 1e d2 04 0d 1e dc | 0c dd f2 5f 43 6c 6f 73 |-.......|..._Clos|
|000058f0| 65 0d 1e e6 11 24 62 6c | 6f 63 6b 3d 22 54 41 53 |e....$bl|ock="TAS|
|00005900| 4b 22 0d 1e f0 23 c8 99 | 20 22 57 69 6d 70 5f 43 |K"...#..| "Wimp_C|
|00005910| 6c 6f 73 65 44 6f 77 6e | 22 2c 74 61 73 6b 2c 21 |loseDown|",task,!|
|00005920| 62 6c 6f 63 6b 0d 1e fa | 05 e1 0d 1f 04 04 0d 1f |block...|........|
|00005930| 0e 4e 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.N------|--------|
|00005940| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005950| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005960| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005970| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 1f 18 04 |--------|----....|
|00005980| 0d 1f 22 0c dd f2 5f 45 | 72 72 6f 72 0d 1f 2c 09 |.."..._E|rror..,.|
|00005990| ee 20 85 20 87 0d 1f 36 | 11 24 62 6c 6f 63 6b 3d |. . ...6|.$block=|
|000059a0| 22 54 41 53 4b 22 0d 1f | 40 23 c8 99 20 22 57 69 |"TASK"..|@#.. "Wi|
|000059b0| 6d 70 5f 43 6c 6f 73 65 | 44 6f 77 6e 22 2c 74 61 |mp_Close|Down",ta|
|000059c0| 73 6b 2c 21 62 6c 6f 63 | 6b 0d 1f 4a 05 e1 0d 1f |sk,!bloc|k..J....|
|000059d0| 54 04 0d 1f 5e 4e 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |T...^N--|--------|
|000059e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000059f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005a00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005a10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005a20| 0d 1f 68 04 0d 1f 72 11 | dd a4 5f 57 69 6d 70 5f |..h...r.|.._Wimp_|
|00005a30| 45 72 72 6f 72 0d 1f 7c | 0c 21 62 6c 6f 63 6b 3d |Error..||.!block=|
|00005a40| 9f 0d 1f 86 23 24 28 62 | 6c 6f 63 6b 2b 34 29 3d |....#$(b|lock+4)=|
|00005a50| f6 24 2b 22 20 61 74 20 | 6c 69 6e 65 20 22 2b c3 |.$+" at |line "+.|
|00005a60| 9e 2b bd 30 0d 1f 90 3e | c8 99 20 22 57 69 6d 70 |.+.0...>|.. "Wimp|
|00005a70| 5f 52 65 70 6f 72 74 45 | 72 72 6f 72 22 2c 62 6c |_ReportE|rror",bl|
|00005a80| 6f 63 6b 2c 33 2c 22 50 | 6c 61 6e 65 74 73 20 57 |ock,3,"P|lanets W|
|00005a90| 69 6e 64 6f 77 22 20 b8 | 20 2c 72 65 73 70 6f 6e |indow" .| ,respon|
|00005aa0| 73 65 0d 1f 9a 22 e7 20 | 72 65 73 70 6f 6e 73 65 |se...". |response|
|00005ab0| 3d 32 20 8c 20 f2 5f 43 | 6c 6f 73 65 3a 3d b9 20 |=2 . ._C|lose:=. |
|00005ac0| 8b 20 3d a3 0d 1f a4 04 | 0d ff 46 69 6c 65 44 61 |. =.....|..FileDa|
|00005ad0| 74 61 82 21 53 70 72 69 | 74 65 73 00 00 00 6c 04 |ta.!Spri|tes...l.|
|00005ae0| 00 00 42 f9 ff ff 5c 63 | 51 70 03 00 5e aa 02 00 |..B...\c|Qp..^...|
|00005af0| 00 00 10 00 00 00 70 04 | 00 00 5c 03 00 00 21 70 |......p.|..\...!p|
|00005b00| 6c 61 6e 65 74 73 00 00 | 00 00 05 00 00 00 10 00 |lanets..|........|
|00005b10| 00 00 00 00 00 00 07 00 | 00 00 2c 00 00 00 c4 01 |........|..,.....|
|00005b20| 00 00 0c 00 00 00 77 77 | 77 77 27 22 72 77 55 55 |......ww|ww'"rwUU|
|00005b30| 55 55 77 77 77 77 77 77 | 77 77 77 00 00 00 77 77 |UUwwwwww|www...ww|
|00005b40| 77 77 77 77 52 55 77 22 | ff 44 55 55 77 77 77 77 |wwwwRUw"|.DUUwwww|
|00005b50| 77 77 77 00 00 00 77 37 | 79 77 54 55 33 22 22 27 |www...w7|ywTU3""'|
|00005b60| 72 77 77 44 55 77 77 77 | 77 37 77 00 00 00 77 37 |rwwDUwww|w7w...w7|
|00005b70| 33 33 77 77 77 37 77 22 | 22 77 77 77 47 55 77 77 |33www7w"|"wwwGUww|
|00005b80| 37 33 77 00 00 00 77 37 | 33 33 73 77 77 77 77 77 |73w...w7|33swwwww|
|00005b90| 27 72 77 77 77 47 55 73 | 37 33 77 00 00 00 77 37 |'rwwwGUs|73w...w7|
|00005ba0| 33 33 73 77 77 77 77 77 | 77 27 77 77 77 37 47 55 |33swwwww|w'www7GU|
|00005bb0| 77 77 77 00 00 00 77 37 | 33 33 73 77 77 77 e7 e9 |www...w7|33swww..|
|00005bc0| e9 77 72 77 73 37 77 f3 | ff 33 77 00 00 00 77 37 |.wrws7w.|.3w...w7|
|00005bd0| 33 33 77 77 77 97 9e 9e | 9e 9e 27 77 70 37 33 f3 |33www...|..'wp73.|
|00005be0| ff 33 77 00 00 00 77 77 | 77 77 77 77 77 e9 e9 e9 |.3w...ww|wwwww...|
|00005bf0| e9 e9 29 77 73 37 33 73 | 77 77 77 00 00 00 77 77 |..)ws73s|www...ww|
|00005c00| 77 77 77 77 37 9e 9e 9e | 9e 9e 2e 77 73 37 33 73 |wwww7...|...ws73s|
|00005c10| 77 77 77 00 00 00 77 77 | 77 77 77 37 33 e7 e9 e9 |www...ww|www73...|
|00005c20| e9 e9 27 72 73 37 33 73 | 07 33 77 00 00 00 77 77 |..'rs73s|.3w...ww|
|00005c30| 77 77 77 77 77 77 97 9e | 9e 77 27 77 77 77 77 77 |wwwwww..|.w'wwwww|
|00005c40| 77 77 77 00 00 00 77 77 | 77 77 77 77 77 77 77 77 |www...ww|wwwwwwww|
|00005c50| 77 77 27 77 77 77 77 77 | 77 77 77 00 00 00 77 77 |ww'wwwww|www...ww|
|00005c60| 77 77 77 77 77 77 77 77 | 77 77 72 77 77 77 77 77 |wwwwwwww|wwrwwwww|
|00005c70| 77 77 77 00 00 00 77 07 | 37 33 7e 37 33 77 38 77 |www...w.|73~73w8w|
|00005c80| 77 27 77 77 73 77 77 77 | 77 77 77 00 00 00 77 37 |w'wwswww|www...w7|
|00005c90| 33 33 73 77 77 77 33 77 | bb 7b 77 77 73 37 33 73 |33swww3w|.{wws73s|
|00005ca0| 37 33 77 00 00 00 77 e7 | 33 33 33 77 77 33 03 77 |73w...w.|333ww3.w|
|00005cb0| bb 7b 77 77 73 07 33 73 | 37 33 77 00 00 00 00 00 |.{wws.3s|73w.....|
|00005cc0| 00 00 f0 0f 00 00 f0 ff | ff 0f 00 00 00 00 00 00 |........|........|
|00005cd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 ff ff 00 00 |........|........|
|00005ce0| 00 00 ff 0f 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005cf0| 00 00 f0 ff 00 f0 ff 00 | 00 00 00 00 ff 00 00 00 |........|........|
|00005d00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 ff |........|........|
|00005d10| 0f 00 00 00 00 0f 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005d20| 00 00 00 00 00 00 00 00 | f0 0f 00 00 00 00 ff 00 |........|........|
|00005d30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005d40| 00 f0 00 00 00 00 00 0f | 00 00 00 00 00 00 00 00 |........|........|
|00005d50| 00 00 00 00 00 00 f0 ff | ff 00 0f 00 00 00 00 f0 |........|........|
|00005d60| ff 00 00 00 00 00 00 00 | 00 00 00 00 00 f0 ff ff |........|........|
|00005d70| ff ff f0 00 00 00 00 f0 | ff 00 00 00 00 00 00 00 |........|........|
|00005d80| 00 00 00 00 00 ff ff ff | ff ff ff 00 00 00 00 00 |........|........|
|00005d90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 ff ff ff |........|........|
|00005da0| ff ff ff 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005db0| 00 00 00 00 00 f0 ff ff | ff ff 00 0f 00 00 00 00 |........|........|
|00005dc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 f0 ff |........|........|
|00005dd0| ff 00 f0 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005de0| 00 00 00 00 00 00 00 00 | 00 00 f0 00 00 00 00 00 |........|........|
|00005df0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005e00| 00 00 0f 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005e10| 00 00 00 00 00 00 00 00 | 00 f0 00 00 00 00 00 00 |........|........|
|00005e20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005e30| ff 0f 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005e40| 00 00 00 00 00 00 00 00 | ff 0f 00 00 00 00 00 00 |........|........|
|00005e50| 00 00 00 00 00 00 04 01 | 00 00 73 6d 21 70 6c 61 |........|..sm!pla|
|00005e60| 6e 65 74 73 00 00 02 00 | 00 00 08 00 00 00 00 00 |nets....|........|
|00005e70| 00 00 0b 00 00 00 2c 00 | 00 00 98 00 00 00 0c 00 |......,.|........|
|00005e80| 00 00 77 27 22 52 55 55 | 75 77 77 07 00 00 37 53 |..w'"RUU|uww...7S|
|00005e90| 55 25 72 77 57 55 37 07 | 00 00 37 33 77 73 27 77 |U%rwWU7.|..73ws'w|
|00005ea0| 77 37 55 07 00 00 37 73 | 73 97 9e 72 77 37 f7 0f |w7U...7s|s..rw7..|
|00005eb0| 00 00 77 77 77 e7 e9 72 | 77 37 37 07 00 00 77 77 |..www..r|w77...ww|
|00005ec0| 37 37 77 72 77 33 77 07 | 00 00 77 77 77 77 77 72 |77wrw3w.|..wwwwwr|
|00005ed0| 77 77 77 07 00 00 37 73 | 33 37 27 73 77 33 37 07 |www...7s|37'sw37.|
|00005ee0| 00 00 37 33 77 33 bb 73 | 77 33 37 07 00 00 00 f0 |..73w3.s|w37.....|
|00005ef0| ff 00 ff ff 00 00 00 00 | 00 00 00 f0 ff ff 0f 00 |........|........|
|00005f00| f0 0f 00 00 00 00 00 00 | 00 00 f0 00 00 00 0f 00 |........|........|
|00005f10| 00 00 00 00 00 f0 ff 0f | 00 00 f0 0f 00 00 00 00 |........|........|
|00005f20| 00 f0 ff 0f 00 00 00 00 | 00 00 00 00 00 00 00 0f |........|........|
|00005f30| 00 00 00 00 00 00 00 00 | 00 00 00 0f 00 00 00 00 |........|........|
|00005f40| 00 00 00 00 00 00 f0 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005f50| 00 00 ff 00 00 00 00 00 | 00 00 46 69 6c 65 44 61 |........|..FileDa|
|00005f60| 74 61 82 41 72 72 6f 77 | 73 00 00 00 00 00 9c 05 |ta.Arrow|s.......|
|00005f70| 00 00 41 f9 ff ff 3a b1 | 1a f1 03 00 ef 95 04 00 |..A...:.|........|
|00005f80| 00 00 10 00 00 00 a0 05 | 00 00 64 01 00 00 75 70 |........|..d...up|
|00005f90| 61 72 72 6f 77 00 00 00 | 00 00 02 00 00 00 0c 00 |arrow...|........|
|00005fa0| 00 00 00 00 00 00 0f 00 | 00 00 2c 00 00 00 c8 00 |........|..,.....|
|00005fb0| 00 00 0c 00 00 00 77 77 | 77 77 77 77 77 77 77 77 |......ww|wwwwwwww|
|00005fc0| 77 77 07 00 00 00 00 00 | 00 00 00 77 77 77 77 77 |ww......|...wwwww|
|00005fd0| 77 77 77 77 44 74 77 77 | 77 77 77 93 77 77 47 74 |wwwwDtww|www.wwGt|
|00005fe0| 27 22 72 77 77 77 77 33 | 73 77 77 77 77 77 77 77 |'"rwwww3|swwwwwww|
|00005ff0| 77 77 77 33 77 77 77 77 | 77 77 77 77 77 77 77 73 |www3wwww|wwwwwwws|
|00006000| 77 77 77 77 77 77 77 77 | 77 77 77 33 33 33 77 77 |wwwwwwww|www333ww|
|00006010| 77 77 70 77 77 77 77 33 | 33 73 77 77 77 00 70 77 |wwpwwww3|3swww.pw|
|00006020| 77 77 77 77 77 77 77 77 | 77 00 70 77 77 77 77 70 |wwwwwwww|w.pwwwwp|
|00006030| 33 e3 77 33 73 87 73 77 | 77 77 77 77 33 33 77 77 |3.w3s.sw|wwww33ww|
|00006040| 77 37 73 77 77 77 77 77 | 77 77 77 77 77 77 77 77 |w7swwwww|wwwwwwww|
|00006050| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff 0f 00 |........|........|
|00006060| 00 00 00 00 00 00 00 f0 | ff ff 0f 00 00 00 f0 0f |........|........|
|00006070| 00 00 00 f0 ff ff 0f 00 | 00 00 0f f0 00 00 00 f0 |........|........|
|00006080| ff ff 0f 00 00 f0 00 00 | 0f 00 00 f0 ff ff 0f 00 |........|........|
|00006090| 00 0f 00 00 f0 00 00 f0 | ff ff 0f 00 f0 ff 0f f0 |........|........|
|000060a0| ff 0f 00 f0 ff ff 0f 00 | 00 00 0f f0 00 00 00 f0 |........|........|
|000060b0| ff ff 0f 00 00 00 0f f0 | 00 00 00 f0 ff ff 0f 00 |........|........|
|000060c0| 00 00 ff ff 00 00 00 f0 | ff ff 0f 00 00 00 00 00 |........|........|
|000060d0| 00 00 00 f0 00 00 0f 00 | 00 00 00 00 00 00 00 f0 |........|........|
|000060e0| 00 00 ff ff ff ff ff ff | ff ff ff ff 44 44 64 01 |........|....DDd.|
|000060f0| 00 00 64 6f 77 6e 61 72 | 72 6f 77 00 00 00 02 00 |..downar|row.....|
|00006100| 00 00 0c 00 00 00 00 00 | 00 00 0f 00 00 00 2c 00 |........|......,.|
|00006110| 00 00 c8 00 00 00 0c 00 | 00 00 77 77 77 77 77 77 |........|..wwwwww|
|00006120| 77 77 77 77 77 77 07 00 | 00 00 00 00 00 00 00 77 |wwwwww..|.......w|
|00006130| 77 77 77 77 77 77 77 77 | 44 74 77 77 77 77 77 93 |wwwwwwww|Dtwwwww.|
|00006140| 77 77 77 77 27 22 72 77 | 77 77 77 33 73 77 77 77 |wwww'"rw|www3swww|
|00006150| 77 77 77 77 77 77 77 33 | 77 77 77 77 77 77 77 77 |wwwwwww3|wwwwwwww|
|00006160| 77 77 77 73 77 77 77 77 | 77 77 77 77 77 77 77 33 |wwwswwww|wwwwwww3|
|00006170| 33 37 77 77 77 77 70 77 | 77 77 77 33 33 73 77 77 |37wwwwpw|www33sww|
|00006180| 77 00 70 77 77 77 77 77 | 77 77 77 77 77 00 70 77 |w.pwwwww|wwwww.pw|
|00006190| 77 77 77 70 33 e3 77 37 | 73 87 73 77 77 77 77 77 |wwwp3.w7|s.swwwww|
|000061a0| 33 33 77 77 77 37 73 77 | 77 77 77 77 77 77 77 77 |33www7sw|wwwwwwww|
|000061b0| 77 77 77 77 ff ff ff ff | ff ff ff ff ff ff ff ff |wwww....|........|
|000061c0| ff ff 0f 00 00 00 00 00 | 00 00 00 f0 ff ff 0f 00 |........|........|
|000061d0| 00 00 00 00 00 00 00 f0 | ff ff 0f 00 00 00 ff ff |........|........|
|000061e0| 00 00 00 f0 ff ff 0f 00 | 00 00 0f f0 00 00 00 f0 |........|........|
|000061f0| ff ff 0f 00 00 00 0f f0 | 00 00 00 f0 ff ff 0f 00 |........|........|
|00006200| f0 ff 0f f0 ff 0f 00 f0 | ff ff 0f 00 00 0f 00 00 |........|........|
|00006210| f0 00 00 f0 ff ff 0f 00 | 00 f0 00 00 0f 00 00 f0 |........|........|
|00006220| ff ff 0f 00 00 00 0f f0 | 00 00 00 f0 ff ff 0f 00 |........|........|
|00006230| 00 00 f0 0f 00 00 00 f0 | 00 00 0f 00 00 00 00 00 |........|........|
|00006240| 00 00 00 f0 00 00 ff ff | ff ff ff ff ff ff ff ff |........|........|
|00006250| 44 44 64 01 00 00 6c 65 | 66 74 61 72 72 6f 77 00 |DDd...le|ftarrow.|
|00006260| 00 00 02 00 00 00 0c 00 | 00 00 00 00 00 00 0f 00 |........|........|
|00006270| 00 00 2c 00 00 00 c8 00 | 00 00 0c 00 00 00 77 77 |..,.....|......ww|
|00006280| 77 77 77 77 77 77 77 77 | 77 77 07 00 00 00 00 00 |wwwwwwww|ww......|
|00006290| 00 00 00 77 77 77 77 77 | 77 77 77 77 44 74 77 77 |...wwwww|wwwwDtww|
|000062a0| 77 77 77 93 77 77 77 77 | 77 22 72 77 77 77 77 73 |www.wwww|w"rwwwws|
|000062b0| 77 77 77 77 77 77 77 77 | 77 77 77 73 77 77 77 77 |wwwwwwww|wwwswwww|
|000062c0| 77 77 77 77 77 77 77 73 | 77 77 77 77 77 77 77 77 |wwwwwwws|wwwwwwww|
|000062d0| 77 77 77 73 77 77 77 77 | 77 77 70 77 77 77 77 33 |wwwswwww|wwpwwww3|
|000062e0| 33 73 77 77 77 00 70 77 | 77 77 77 77 77 77 77 77 |3swww.pw|wwwwwwww|
|000062f0| 77 00 70 77 77 77 77 70 | 33 e3 77 33 73 87 73 77 |w.pwwwwp|3.w3s.sw|
|00006300| 77 77 77 77 33 33 77 77 | 77 37 73 77 77 77 77 77 |wwww33ww|w7swwwww|
|00006310| 77 77 77 77 77 77 77 77 | ff ff ff ff ff ff ff ff |wwwwwwww|........|
|00006320| ff ff ff ff ff ff 0f 00 | 00 00 00 00 00 00 00 f0 |........|........|
|00006330| ff ff 0f 00 00 00 ff 00 | 00 00 00 f0 ff ff 0f 00 |........|........|
|00006340| 00 00 ff ff 00 00 00 f0 | ff ff 0f 00 00 00 ff 00 |........|........|
|00006350| ff 00 00 f0 ff ff 0f f0 | ff ff ff 00 00 ff 00 f0 |........|........|
|00006360| ff ff 0f f0 0f 00 00 00 | 00 00 ff f0 ff ff 0f f0 |........|........|
|00006370| ff ff ff 00 00 ff 00 f0 | ff ff 0f 00 00 00 ff 00 |........|........|
|00006380| ff 00 00 f0 ff ff 0f 00 | 00 00 ff ff 00 00 00 f0 |........|........|
|00006390| ff ff 0f 00 00 00 ff 00 | 00 00 00 f0 00 00 0f 00 |........|........|
|000063a0| 00 00 00 00 00 00 00 f0 | 00 00 ff ff ff ff ff ff |........|........|
|000063b0| ff ff ff ff 44 44 64 01 | 00 00 72 69 67 68 74 61 |....DDd.|..righta|
|000063c0| 72 72 6f 77 00 00 02 00 | 00 00 0c 00 00 00 00 00 |rrow....|........|
|000063d0| 00 00 0f 00 00 00 2c 00 | 00 00 c8 00 00 00 0c 00 |......,.|........|
|000063e0| 00 00 77 77 77 77 77 77 | 77 77 77 77 77 77 07 00 |..wwwwww|wwwwww..|
|000063f0| 00 00 00 00 00 00 00 77 | 77 77 77 77 77 77 77 77 |.......w|wwwwwwww|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.