|
DataMuseum.dkPresents historical artifacts from the history of: CP/M |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about CP/M Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 8448 (0x2100)
Names: »PLANETS.IWS«
└─⟦87e51841f⟧ Bits:30002669 I-APL - PICCOLINIENs programklub Marts 88
└─ ⟦this⟧ »PLANETS.IWS«
0x0000…0020 e4 20 20 80 20 87 01 00 88 80 30 83 1a 5f 00 00 c0 80 d8 82 f4 8a 01 00 74 00 00 00 fe ff 01 00 ┆ 0 _ t ┆ 0x0020…0040 00 00 28 80 20 87 02 00 73 66 30 80 32 87 02 00 73 66 38 80 42 87 02 00 73 66 40 80 52 87 02 00 ┆ ( sf0 2 sf8 B sf@ R ┆ 0x0040…0060 73 66 48 80 62 87 02 00 73 66 50 80 72 87 02 00 73 66 58 80 82 87 02 00 73 66 60 80 92 87 01 00 ┆sfH b sfP r sfX sf` ┆ 0x0060…0080 73 0e 68 80 a2 87 01 00 73 0d 70 80 b2 87 01 00 73 0c 78 80 c2 87 01 00 73 0b 80 80 d2 87 01 00 ┆s h s p s x s ┆ 0x0080…00a0 73 0a 90 80 e2 87 03 00 73 06 b0 81 c0 a0 01 00 00 00 98 80 f2 87 02 00 73 05 a8 80 02 88 01 00 ┆s s s ┆ 0x00a0…00c0 61 00 c8 80 ce 88 02 00 73 66 b8 80 0a 88 02 00 73 04 d0 80 2a 88 01 00 61 00 b0 80 1a 88 02 00 ┆a sf s * a ┆ 0x00c0…00e0 73 02 18 80 e4 a0 00 00 00 00 f0 80 de 88 02 00 73 66 e0 80 32 88 02 00 73 07 f8 80 52 88 01 00 ┆s sf 2 s R ┆ 0x00e0…0100 61 00 d8 80 42 88 02 00 73 03 d0 86 0e 96 01 00 6c 00 d8 81 ee 88 02 00 73 66 00 81 5a 88 03 00 ┆a B s l sf Z ┆ 0x0100…0120 73 01 08 81 6a 88 01 00 61 00 10 81 72 88 01 00 6b 00 18 81 78 88 01 00 6c 00 a0 80 8e 88 01 00 ┆s j a r k x l ┆ 0x0120…0140 00 00 28 81 1c 89 01 00 61 00 30 81 26 89 01 00 74 00 48 81 2e 89 01 00 61 00 60 81 22 8a 01 00 ┆ ( a 0 & t H . a ` " ┆ 0x0140…0160 74 00 38 81 08 8a 01 00 6c 00 50 81 36 89 01 00 61 00 58 81 40 89 01 00 74 00 68 81 48 89 01 00 ┆t 8 l P 6 a X @ t h H ┆ 0x0160…0180 61 00 78 81 28 8a 01 00 74 00 70 81 50 89 01 00 6c 00 88 81 6a 89 01 00 74 00 80 81 2e 8a 01 00 ┆a x ( t p P l j t . ┆ 0x0180…01a0 6c 00 e8 81 32 8a 01 00 6c 00 90 81 a6 89 05 00 73 00 98 81 b6 89 08 00 73 00 a8 81 c8 89 08 00 ┆l 2 l s s ┆ 0x01a0…01c0 73 00 f8 81 50 8a 03 00 73 00 40 82 d8 89 01 00 6c 00 60 86 d4 a0 01 00 6c 00 90 86 00 00 00 00 ┆s P s @ l ` l ┆ 0x01c0…01e0 c8 86 d0 81 9c 8a 01 00 6c 00 40 81 02 8a 01 00 74 00 e0 81 de 8a 01 00 61 00 20 81 00 89 01 00 ┆ l @ t a ┆ 0x01e0…0200 6c 00 f0 81 e6 8a 01 00 74 00 a0 81 42 8a 01 00 66 00 10 80 ec 8a 01 00 61 00 10 86 5e 8a 03 00 ┆l t B f a ^ ┆ 0x0200…0220 73 00 08 82 44 96 02 00 73 00 98 86 58 96 01 00 61 00 18 82 80 8a 04 00 73 71 c0 81 8e 8a 01 00 ┆s D s X a sq ┆ 0x0220…0240 73 71 30 82 10 8c 01 00 6c 00 38 82 08 8b 01 00 74 00 58 82 14 8c 01 00 6c 00 48 82 44 8b 01 00 ┆sq0 l 8 t X l H D ┆ 0x0240…0260 74 00 50 82 e8 89 01 00 6c 00 60 82 8a 8b 01 00 74 00 00 83 ec 89 01 00 6c 00 58 83 18 8c 01 00 ┆t P l ` t l X ┆ 0x0260…0280 6c 00 68 82 d2 8b 03 00 73 00 b8 83 e4 8b 03 00 73 00 88 86 00 00 00 00 70 86 40 84 2a 95 08 00 ┆l h s s p @ * ┆ 0x0280…02a0 73 00 a8 86 00 00 00 00 e0 86 98 82 00 00 00 00 f8 85 e0 85 00 00 00 00 28 85 30 84 00 00 00 00 ┆s ( 0 ┆ 0x02a0…02c0 88 82 f0 82 00 00 00 00 c8 82 f0 85 62 9e 00 00 28 84 b0 86 ee 9d 01 00 74 00 68 84 58 8c 01 00 ┆ b ( t h X ┆ 0x02c0…02e0 74 00 20 82 0c 8c 01 00 6c 00 a0 82 00 00 00 00 d8 86 78 86 00 00 00 00 38 85 28 82 fa 8a 01 00 ┆t l x 8 ( ┆ 0x02e0…0300 74 00 80 85 00 00 00 00 50 86 b8 82 48 8c 01 00 61 00 38 85 00 00 00 00 a0 82 d8 86 00 00 00 00 ┆t P H a 8 ┆ 0x0300…0320 30 84 c8 81 f0 89 02 00 73 00 10 83 32 8c 01 00 61 00 18 83 3a 8c 01 00 74 00 e8 82 40 8c 01 00 ┆0 s 2 a : t @ ┆ 0x0320…0340 61 00 c8 86 00 00 00 00 28 83 20 83 00 00 00 00 f0 85 40 86 e6 ff 00 00 c0 80 60 85 c2 96 01 00 ┆a ( @ ` ┆ 0x0340…0360 64 00 78 85 00 00 00 00 a0 86 d8 85 5e 99 01 00 61 00 18 87 00 00 00 00 68 85 08 83 24 8c 01 00 ┆d x ^ a h $ ┆ 0x0360…0380 61 00 68 83 b0 8c 01 00 61 00 70 83 2a 8e 01 00 61 00 78 83 14 90 01 00 61 00 80 83 a6 90 01 00 ┆a h a p * a x a ┆ 0x0380…03a0 73 00 88 83 b8 90 01 00 61 00 90 83 14 91 01 00 73 00 98 83 28 91 01 00 61 00 a0 83 0e 94 02 00 ┆s a s ( a ┆ 0x03a0…03c0 73 00 a8 83 1e 94 01 00 6c 00 b0 83 24 94 01 00 61 00 c0 83 4a 94 01 00 74 00 d0 83 fa 8b 01 00 ┆s l $ a J t ┆ 0x03c0…03e0 6c 00 c8 83 6e 94 01 00 61 00 d8 83 82 94 01 00 74 00 e0 83 fe 8b 01 00 6c 00 e8 83 94 94 02 00 ┆l n a t l ┆ 0x03e0…0400 73 00 10 84 02 8c 01 00 6c 00 f0 83 a4 94 02 00 73 00 f8 83 b2 94 05 00 73 00 00 84 c2 94 01 00 ┆s l s s ┆ 0x0400…0420 6c 00 08 84 c8 94 01 00 61 00 18 84 e4 94 01 00 74 00 c0 82 08 8c 01 00 6c 00 50 84 fe 94 01 00 ┆l a t l P ┆ 0x0420…0440 61 00 18 86 00 00 00 00 58 86 c0 85 f6 a0 00 00 00 00 f8 82 00 00 00 00 98 82 30 85 9c 96 01 00 ┆a X 0 ┆ 0x0440…0460 73 00 48 84 3a 95 01 00 6c 00 60 84 4c 95 01 00 61 00 58 84 12 95 01 00 74 00 70 84 1a 95 01 00 ┆s H : l ` L a X t p ┆ 0x0460…0480 6c 00 78 84 54 95 01 00 61 00 80 84 6a 8c 01 00 74 00 78 82 1e 95 01 00 6c 00 b8 84 5c 95 01 00 ┆l x T a j t x l Ø ┆ 0x0480…04a0 6c 00 c0 84 70 8c 01 00 6c 00 28 84 a4 ff 00 00 40 86 68 85 00 00 00 00 e8 85 20 86 4e 9e 01 00 ┆l p l ( @ h N ┆ 0x04a0…04c0 6c 00 90 85 00 00 00 00 80 85 88 85 00 00 00 00 f0 85 08 86 0a 9e 01 00 61 00 d0 84 6a 95 01 00 ┆l a j ┆ 0x04c0…04e0 61 00 c8 84 78 8c 01 00 74 00 e0 84 7e 8c 01 00 6c 00 e8 84 72 95 01 00 61 00 f8 84 98 8c 01 00 ┆a x t ü l r a ┆ 0x04e0…0500 74 00 f0 84 86 8c 01 00 6c 00 00 85 7a 95 01 00 74 00 d8 84 94 8c 01 00 6c 00 60 83 9e 8c 01 00 ┆t l z t l ` ┆ 0x0500…0520 6c 00 08 85 ba 95 03 00 73 00 10 85 ca 95 03 00 73 00 18 85 da 95 08 00 73 00 c0 86 ea 95 04 00 ┆l s s s ┆ 0x0520…0540 73 00 50 85 00 00 00 00 88 84 90 82 00 00 00 00 08 87 e8 86 aa 96 01 00 61 00 d0 82 00 00 00 00 ┆s P a ┆ 0x0540…0560 f0 82 48 83 bc 97 01 00 61 00 e8 80 06 96 01 00 61 00 a0 86 00 00 00 00 20 85 38 84 8e 96 02 00 ┆ H a a 8 ┆ 0x0560…0580 73 00 30 86 cc 96 01 00 6c 00 50 83 00 00 00 00 90 84 a8 84 00 00 00 00 e0 85 00 87 00 00 00 00 ┆s 0 l P ┆ 0x0580…05a0 88 80 a0 84 00 00 00 00 e0 82 e0 86 00 00 00 00 a8 84 f8 85 00 00 00 00 a0 84 80 86 72 96 01 00 ┆ r ┆ 0x05a0…05c0 6c 00 f0 86 34 96 01 00 61 00 58 86 00 00 00 00 f8 86 00 86 a8 9d 01 00 6c 00 b8 81 00 00 00 00 ┆l 4 a X l ┆ 0x05c0…05e0 18 87 a8 82 c0 a0 00 00 a8 82 e8 85 00 00 00 00 28 83 98 85 6a 96 01 00 74 00 b0 85 a2 9d 01 00 ┆ ( j t ┆ 0x05e0…0600 74 00 70 85 00 00 00 00 90 82 90 84 00 00 00 00 c8 85 28 83 00 00 00 00 c0 85 88 82 00 00 00 00 ┆t p ( ┆ 0x0600…0620 90 85 68 86 c4 9d 01 00 61 00 28 86 1a 9e 01 00 66 00 10 82 6e 8a 01 00 73 00 00 00 00 00 00 00 ┆ h a ( f n s ┆ 0x0620…0640 20 84 48 86 52 9e 01 00 6c 00 98 84 32 9e 01 00 61 00 b8 86 d4 96 01 00 74 00 88 80 a0 a0 01 00 ┆ H R l 2 a t ┆ 0x0640…0660 66 00 88 84 c2 ff 00 00 30 83 38 86 56 9e 01 00 61 00 e0 82 00 00 00 00 c0 80 20 84 00 00 00 00 ┆f 0 8 V a ┆ 0x0660…0680 a8 85 c0 80 d8 a0 01 00 61 00 10 87 e2 9d 01 00 6c 00 70 82 00 00 00 00 00 87 20 85 00 00 00 00 ┆ a l p ┆ 0x0680…06a0 d0 82 58 85 80 96 03 00 73 00 08 87 00 00 00 00 70 82 f8 86 00 00 00 00 b8 81 d0 85 60 96 01 00 ┆ X s p ` ┆ 0x06a0…06c0 61 00 40 83 00 00 00 00 50 85 c8 85 00 00 00 00 80 82 b0 84 f6 9d 01 00 6c 00 40 85 da 96 01 00 ┆a @ P l @ ┆ 0x06c0…06e0 61 00 48 85 fc 95 01 00 6c 00 50 86 00 00 00 00 20 83 a0 85 2c 96 01 00 61 00 c8 82 00 00 00 00 ┆a H l P , a ┆ 0x06e0…0700 30 83 80 82 00 00 00 00 88 85 38 83 b2 96 01 00 6c 00 00 82 3c 96 01 00 61 00 a8 85 00 00 00 00 ┆0 8 l < a ┆ 0x0700…0720 90 86 70 86 00 00 00 00 78 85 28 85 00 00 00 00 88 86 b0 82 e6 9d 01 00 6c 00 b8 85 00 00 00 00 ┆ p x ( l ┆ 0x0720…0740 50 83 f0 80 a8 80 07 00 00 00 00 00 05 00 b9 53 54 4f 50 00 b8 80 78 80 06 00 00 00 00 00 03 00 ┆P STOP x ┆ 0x0740…0760 b9 43 52 00 d0 80 40 80 05 00 00 00 00 00 03 00 b9 46 58 00 e0 80 48 80 04 00 00 00 00 00 03 00 ┆ CR @ FX H ┆ 0x0760…0780 b9 4e 4c 00 30 80 50 80 03 00 00 00 00 00 03 00 b9 45 58 00 38 80 c8 80 02 00 00 00 00 00 03 00 ┆ NL 0 P EX 8 ┆ 0x0780…07a0 b9 4e 43 00 40 80 b8 80 01 00 00 00 00 00 03 00 b9 44 4c 00 f8 80 d0 80 00 00 00 00 00 00 03 00 ┆ NC @ DL ┆ 0x07a0…07c0 b9 49 44 00 00 00 a0 80 00 00 00 00 00 00 03 00 b9 57 41 00 a0 80 f0 80 00 00 00 00 00 00 03 00 ┆ ID WA ┆ 0x07c0…07e0 b9 54 53 00 80 80 f8 80 00 00 00 00 00 00 03 00 b9 4c 43 00 28 80 18 82 00 00 00 00 00 00 03 00 ┆ TS LC ( ┆ 0x07e0…0800 b9 41 56 00 c8 80 70 80 58 83 00 00 00 00 03 00 b9 4c 58 00 a8 80 e0 80 98 80 00 00 00 00 03 00 ┆ AV p X LX ┆ 0x0800…0820 b9 50 57 00 6e 00 02 00 01 00 4f 00 20 80 90 80 b0 80 00 00 00 00 03 00 b9 52 4c 00 50 80 28 80 ┆ PW n O RL P ( ┆ 0x0820…0840 60 86 00 00 00 00 03 00 b9 43 54 00 6e 00 00 00 01 00 00 00 58 80 30 80 d8 80 00 00 00 00 03 00 ┆` CT n X 0 ┆ 0x0840…0860 b9 48 43 00 90 80 38 80 f0 86 00 00 00 00 03 00 b9 50 50 00 6e 00 00 00 01 00 00 00 70 80 58 80 ┆ HC 8 PP n p X ┆ 0x0860…0880 00 81 00 00 00 00 03 00 b9 49 4f 00 6e 00 00 00 01 00 01 00 10 81 02 00 00 00 00 00 00 00 00 00 ┆ IO n ┆ 0x0880…08a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 38 84 00 00 68 82 00 00 00 82 e8 83 00 00 00 00 ┆ 8 h ┆ 0x08a0…08c0 98 81 00 00 00 00 00 00 88 81 78 82 00 85 f8 81 78 83 00 00 a0 81 f0 83 00 83 00 00 80 86 08 85 ┆ x x ┆ 0x08c0…08e0 00 00 18 82 00 00 10 82 00 00 00 00 00 00 58 85 60 80 68 80 0a 00 00 00 00 00 03 00 b9 54 58 00 ┆ X ` h TX ┆ 0x08e0…0900 48 80 80 80 09 00 00 00 00 00 03 00 b9 4d 43 00 68 80 20 80 08 00 00 00 00 00 06 00 b9 54 52 41 ┆H MC h TRA┆ 0x0900…0920 43 45 00 00 88 81 a2 00 28 00 c8 81 a1 00 bc 00 98 81 29 00 bf 00 e0 81 a1 00 bc 00 90 81 6e 00 ┆CE ( ) n ┆ 0x0920…0940 00 01 02 00 02 00 03 00 20 81 03 00 31 20 31 4e 6e 00 02 00 01 00 fe ff 6e 00 00 01 02 00 02 00 ┆ 1 1Nn n ┆ 0x0940…0960 03 00 48 81 03 00 31 20 31 20 6e 00 02 00 01 00 fe ff 00 00 98 81 a2 00 28 00 60 81 a4 00 50 81 ┆ H 1 1 n ( ` P ┆ 0x0960…0980 2c 00 bc 00 98 81 29 00 bc 00 98 81 bd 00 37 00 bd 20 4a 4f 49 4e 53 20 54 57 4f 20 56 41 52 49 ┆, ) 7 JOINS TWO VARI┆ 0x0980…09a0 41 42 4c 45 53 20 4f 4e 45 20 4f 56 45 52 20 54 48 45 20 4f 54 48 45 52 20 54 4f 20 46 4f 52 4d ┆ABLES ONE OVER THE OTHER TO FORM┆ 0x09a0…09c0 20 4d 41 54 52 49 58 53 18 85 0c 00 00 00 00 00 00 00 03 00 4c 45 4e 00 00 00 98 81 00 00 00 00 ┆ MATRIXS LEN ┆ 0x09c0…09e0 00 00 05 00 48 45 45 4c 53 00 90 81 08 00 00 00 00 00 00 00 04 00 48 45 41 44 a0 81 00 00 98 81 ┆ HEELS HEAD ┆ 0x09e0…0a00 00 00 90 81 00 00 88 81 00 00 00 00 38 82 00 00 48 82 10 85 14 00 38 86 00 00 00 00 06 00 54 41 ┆ 8 H 8 TA┆ 0x0a00…0a20 53 54 45 52 f0 81 01 00 31 00 00 00 90 81 a2 00 28 00 38 81 a4 00 28 81 2c 00 bc 00 90 81 29 00 ┆STER 1 ( 8 ( , ) ┆ 0x0a20…0a40 bc 00 90 81 30 81 02 00 b8 32 58 81 02 00 b8 32 00 00 70 81 00 00 a0 81 a2 00 98 81 f8 81 90 81 ┆ 0 2X 2 p ┆ 0x0a40…0a60 3b 00 88 81 a8 81 80 81 78 81 68 81 40 81 d8 81 c0 81 00 00 12 00 00 00 00 00 00 00 01 00 52 87 ┆; x h @ R ┆ 0x0a60…0a80 00 00 0f 00 e8 81 00 00 00 00 04 00 4f 56 45 52 00 00 88 83 b8 86 00 00 00 00 06 00 50 54 41 42 ┆ OVER PTAB┆ 0x0a80…0aa0 4c 45 00 00 1b 00 01 00 00 00 00 00 01 00 bb 80 78 80 19 00 00 00 00 00 00 00 01 00 b9 45 00 00 ┆LE x E ┆ 0x0aa0…0ac0 a0 81 a2 00 28 00 28 00 28 00 10 80 a4 00 bc 00 98 81 29 00 2c 00 88 81 29 00 a4 00 98 81 29 00 ┆ ( ( ( ) , ) ) ┆ 0x0ac0…0ae0 2c 00 5b 00 f8 80 5d 00 28 00 28 00 10 83 a4 00 bc 00 90 81 29 00 2c 00 88 81 29 00 a4 00 90 81 ┆, Æ Å ( ( ) , ) ┆ 0x0ae0…0b00 6e 00 00 00 01 00 01 00 d0 81 01 00 31 20 6e 00 00 00 01 00 01 00 18 83 01 00 31 00 e8 82 0a 00 ┆n 1 n 1 ┆ 0x0b00…0b20 27 43 4c 45 41 52 20 57 53 27 bd 00 38 00 bd 20 4c 49 4e 45 53 20 54 48 41 54 20 43 41 4e 54 20 ┆'CLEAR WS' 8 LINES THAT CANT ┆ 0x0b20…0b40 42 45 20 45 58 45 43 55 54 45 44 20 28 53 55 43 48 20 41 53 20 27 29 56 41 52 53 27 29 20 44 49 ┆BE EXECUTED (SUCH AS ')VARS') DI┆ 0x0b40…0b60 52 45 43 54 4c 59 bd 00 42 00 bd 20 45 58 45 43 55 54 49 4e 47 20 45 41 43 48 20 4c 49 4e 45 20 ┆RECTLY B EXECUTING EACH LINE ┆ 0x0b60…0b80 4f 46 20 45 58 41 4d 50 4c 45 53 20 41 4e 44 20 4d 4f 52 45 45 58 41 4d 50 4c 45 53 20 50 4c 55 ┆OF EXAMPLES AND MOREEXAMPLES PLU┆ 0x0b80…0ba0 53 20 44 49 53 50 4c 41 59 49 4e 47 bd 00 44 00 bd 20 55 53 45 53 20 53 48 4f 57 20 54 4f 20 44 ┆S DISPLAYING D USES SHOW TO D┆ 0x0ba0…0bc0 49 53 50 4c 41 59 20 54 48 45 20 45 58 41 4d 50 4c 45 53 20 49 4e 20 54 41 53 54 45 52 20 42 59 ┆ISPLAY THE EXAMPLES IN TASTER BY┆ 0x0bc0…0be0 20 44 49 53 50 4c 41 59 49 4e 47 20 41 4e 44 20 54 48 45 4e 00 00 68 82 48 83 00 00 48 83 06 00 ┆ DISPLAYING AND THEN h H H ┆ 0x0be0…0c00 42 4c 4f 43 4b 53 60 82 02 00 40 85 00 00 40 85 09 00 42 4c 4f 43 4b 48 45 41 44 00 00 00 b0 83 ┆BLOCKS` @ @ BLOCKHEAD ┆ 0x0c00…0c20 00 00 c8 83 00 00 f0 83 d8 83 00 00 08 84 00 00 b8 82 00 00 d8 82 00 00 28 82 00 00 00 83 3b 00 ┆ ( ; ┆ 0x0c20…0c40 68 82 3b 00 60 82 63 00 01 01 06 00 06 00 54 41 53 54 45 52 6e 00 00 00 01 00 01 00 08 83 01 00 ┆h ; ` c TASTERn ┆ 0x0c40…0c60 31 00 6e 00 00 00 01 00 01 00 63 00 01 01 08 00 08 00 43 4c 45 41 52 20 57 53 18 84 0d 00 27 20 ┆1 n c CLEAR WS ' ┆ 0x0c60…0c80 20 20 20 20 20 29 56 41 52 53 27 20 60 84 01 00 31 20 00 00 08 85 a2 00 10 82 b8 84 01 00 31 20 ┆ )VARS' ` 1 1 ┆ 0x0c80…0ca0 00 00 10 85 a2 00 c0 84 00 00 18 85 a2 00 d8 84 a4 00 bc 00 78 82 00 00 e8 84 d0 84 01 00 31 00 ┆ x 1 ┆ 0x0ca0…0cc0 00 00 f0 83 78 82 3b 00 18 85 3b 00 10 85 3b 00 08 85 63 00 01 02 70 01 08 00 2e 00 27 20 27 3d ┆ x ; ; ; c p . ' '=┆ 0x0cc0…0ce0 50 4c 41 4e 45 54 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆PLANETS ┆ 0x0ce0…0d00 20 20 20 20 20 20 20 20 20 20 2b 2f 27 20 27 3d 50 4c 41 4e 45 54 53 20 20 20 20 20 20 20 20 20 ┆ +/' '=PLANETS ┆ 0x0d00…0d20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2d 2b 2f 27 20 27 3d ┆ (-+/' '=┆ 0x0d20…0d40 50 4c 41 4e 45 54 53 29 ac 50 4c 41 4e 45 54 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆PLANETS) PLANETS ┆ 0x0d40…0d60 20 20 20 20 20 20 50 48 45 41 44 2c 5b 31 5d 28 28 2d 2b 2f 27 20 27 3d 50 4c 41 4e 45 54 53 29 ┆ PHEAD,Æ1Å((-+/' '=PLANETS)┆ 0x0d60…0d80 ac 50 4c 41 4e 45 54 53 29 2c 39 20 30 de 50 54 41 42 4c 45 50 48 45 41 44 2c 5b 31 5d 28 50 4c ┆ PLANETS),9 0 PTABLEPHEAD,Æ1Å(PL┆ 0x0d80…0da0 41 4e 45 54 53 2c 39 20 30 de 50 54 41 42 4c 45 29 5b 34 a4 ae 50 54 41 42 4c 45 5b 3b 32 5d 3b ┆ANETS,9 0 PTABLE)Æ4 PTABLEÆ;2Å;┆ 0x0da0…0dc0 5d 20 37 20 32 37 a4 50 48 45 41 44 2c 5b 31 5d 50 4c 41 4e 45 54 53 2c 39 20 30 de 50 54 41 42 ┆Å 7 27 PHEAD,Æ1ÅPLANETS,9 0 PTAB┆ 0x0dc0…0de0 4c 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2d 35 20 31 38 29 a1 50 48 45 41 44 2c 5b 31 ┆LE (-5 18) PHEAD,Æ1┆ 0x0de0…0e00 5d 50 4c 41 4e 45 54 53 2c 39 20 30 de 50 54 41 42 4c 45 20 20 20 20 20 20 20 20 20 20 20 42 4c ┆ÅPLANETS,9 0 PTABLE BL┆ 0x0e00…0e20 4f 43 4b 48 45 41 44 a2 35 20 39 bc 50 48 45 41 44 5b 31 3b 5d 20 20 20 20 20 20 20 20 20 20 20 ┆OCKHEAD 5 9 PHEADÆ1;Å ┆ 0x0e20…0e40 20 20 20 20 20 20 20 20 20 20 20 20 63 00 01 02 e0 01 0a 00 30 00 42 4c 4f 43 4b 48 45 41 44 5b ┆ c 0 BLOCKHEADÆ┆ 0x0e40…0e60 32 20 34 20 35 3b 5d a2 28 35 20 39 bc 50 48 45 41 44 5b 32 3b 5d 29 5b 32 20 34 20 35 3b 5d 20 ┆2 4 5;Å (5 9 PHEADÆ2;Å)Æ2 4 5;Å ┆ 0x0e60…0e80 20 20 20 20 20 20 42 4c 4f 43 4b 48 45 41 44 a2 39 20 35 20 39 bc 42 4c 4f 43 4b 48 45 41 44 20 ┆ BLOCKHEAD 9 5 9 BLOCKHEAD ┆ 0x0e80…0ea0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 4c 4f 43 4b 48 45 41 44 5b ┆ BLOCKHEADÆ┆ 0x0ea0…0ec0 33 3b 3b 5d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆3;;Å ┆ 0x0ec0…0ee0 20 20 20 20 20 20 42 4c 4f 43 4b 53 a2 39 20 36 20 32 30 a4 42 4c 4f 43 4b 48 45 41 44 2c 39 20 ┆ BLOCKS 9 6 20 BLOCKHEAD,9 ┆ 0x0ee0…0f00 35 20 39 bc 50 4c 41 4e 45 54 53 2c 39 20 30 de 50 54 41 42 4c 45 bc 42 4c 4f 43 4b 53 20 20 20 ┆5 9 PLANETS,9 0 PTABLE BLOCKS ┆ 0x0f00…0f20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x0f20…0f40 20 20 20 20 20 20 42 4c 4f 43 4b 53 5b 39 3b 3b 5d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BLOCKSÆ9;;Å ┆ 0x0f40…0f60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 38 20 36 30 bc 31 20 33 20 ┆ 18 60 1 3 ┆ 0x0f60…0f80 32 20 34 aa 33 20 33 20 36 20 32 30 bc 42 4c 4f 43 4b 53 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆2 4 3 3 6 20 BLOCKS ┆ 0x0f80…0fa0 20 20 20 20 20 20 31 38 20 36 30 bc 33 20 31 20 32 20 34 aa 33 20 33 20 36 20 32 30 bc 42 4c 4f ┆ 18 60 3 1 2 4 3 3 6 20 BLO┆ 0x0fa0…0fc0 43 4b 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 38 20 36 30 bc 33 20 31 20 ┆CKS 18 60 3 1 ┆ 0x0fc0…0fe0 32 20 34 aa 33 20 33 20 36 20 32 30 bc 42 4c 4f 43 4b 53 5b af 50 54 41 42 4c 45 5b 3b 31 5d 3b ┆2 4 3 3 6 20 BLOCKSÆ PTABLEÆ;1Å;┆ 0x0fe0…1000 3b 5d 20 20 20 20 31 38 20 36 30 bc 33 20 31 20 32 20 34 aa 33 20 33 20 36 20 32 30 bc 42 4c 4f ┆;Å 18 60 3 1 2 4 3 3 6 20 BLO┆ 0x1000…1020 43 4b 53 5b ae 50 54 41 42 4c 45 5b 3b 33 5d 3b 3b 5d 20 20 20 20 63 00 01 02 87 00 03 00 2d 00 ┆CKSÆ PTABLEÆ;3Å;;Å c - ┆ 0x1020…1040 50 4c 41 4e 45 54 20 20 20 20 44 49 53 54 41 4e 43 45 20 44 49 41 4d 45 54 45 52 20 20 20 4c 45 ┆PLANET DISTANCE DIAMETER LE┆ 0x1040…1060 4e 47 54 48 20 20 20 4c 45 4e 47 54 48 4e 41 4d 45 20 20 20 20 20 20 46 52 4f 4d 20 53 55 4e 20 ┆NGTH LENGTHNAME FROM SUN ┆ 0x1060…1080 49 4e 20 4d 49 4c 45 53 20 20 44 41 59 20 48 52 53 20 20 20 59 52 20 48 52 53 2d 2d 2d 2d 2d 2d ┆IN MILES DAY HRS YR HRS------┆ 0x1080…10a0 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ┆--------------------------------┆ 0x10a0…10c0 2d 2d 2d 2d 2d 2d 2d 20 88 83 10 00 70 83 00 00 00 00 05 00 50 48 45 41 44 00 63 00 01 02 51 00 ┆------- p PHEAD c Q ┆ 0x10c0…10e0 09 00 09 00 45 41 52 54 48 20 20 20 20 4a 55 50 49 54 45 52 20 20 4d 41 52 53 20 20 20 20 20 4d ┆ EARTH JUPITER MARS M┆ 0x10e0…1100 45 52 43 55 52 59 20 20 4e 45 50 54 55 4e 45 20 20 50 4c 55 54 4f 20 20 20 20 53 41 54 55 52 4e ┆ERCURY NEPTUNE PLUTO SATURN┆ 0x1100…1120 20 20 20 55 52 41 4e 55 53 20 20 20 56 45 4e 55 53 20 20 20 20 20 10 86 78 83 80 83 00 00 00 00 ┆ URANUS VENUS x ┆ 0x1120…1140 07 00 50 4c 41 4e 45 54 53 00 63 00 01 02 db 02 11 00 2b 00 50 4c 41 4e 45 54 53 20 20 20 20 20 ┆ PLANETS c + PLANETS ┆ 0x1140…1160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 ┆ P┆ 0x1160…1180 48 45 41 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆HEAD ┆ 0x1180…11a0 20 20 20 20 20 20 20 20 20 20 50 54 41 42 4c 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PTABLE ┆ 0x11a0…11c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 30 31 2b 50 54 41 42 4c 45 20 ┆ .01+PTABLE ┆ 0x11c0…11e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x11e0…1200 bc 50 4c 41 4e 45 54 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PLANETS ┆ 0x1200…1220 20 20 20 20 20 20 20 20 20 20 20 bc 50 48 45 41 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PHEAD ┆ 0x1220…1240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 bc 50 54 41 42 4c 45 20 20 20 ┆ PTABLE ┆ 0x1240…1260 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1260…1280 20 39 20 30 de 50 54 41 42 4c 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 9 0 PTABLE ┆ 0x1280…12a0 20 20 20 20 20 20 20 20 20 20 20 20 50 48 45 41 44 2c 5b 31 5d 50 4c 41 4e 45 54 53 2c 39 20 30 ┆ PHEAD,Æ1ÅPLANETS,9 0┆ 0x12a0…12c0 de 50 54 41 42 4c 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 48 45 41 44 5b 33 3b 5d ┆ PTABLE PHEADÆ3;Å┆ 0x12c0…12e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x12e0…1300 20 20 50 4c 41 4e 45 54 53 5b 3b 31 20 32 20 34 20 33 5d 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PLANETSÆ;1 2 4 3Å ┆ 0x1300…1320 20 20 20 20 20 20 20 20 20 20 20 20 20 50 54 41 42 4c 45 5b 3b 31 5d 20 20 20 20 20 20 20 20 20 ┆ PTABLEÆ;1Å ┆ 0x1320…1340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 af 50 54 41 42 4c 45 5b ┆ PTABLEÆ┆ 0x1340…1360 3b 31 5d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆;1Å ┆ 0x1360…1380 20 20 20 50 48 45 41 44 2c 5b 31 5d 28 50 4c 41 4e 45 54 53 2c 39 20 30 de 50 54 41 42 4c 45 29 ┆ PHEAD,Æ1Å(PLANETS,9 0 PTABLE)┆ 0x1380…13a0 5b af 50 54 41 42 4c 45 5b 3b 31 5d 3b 5d 50 48 45 41 44 2c 5b 31 5d 28 50 4c 41 4e 45 54 53 2c ┆Æ PTABLEÆ;1Å;ÅPHEAD,Æ1Å(PLANETS,┆ 0x13a0…13c0 39 20 30 de 50 54 41 42 4c 45 29 5b af 50 54 41 42 4c 45 5b 3b 32 5d 3b 5d 50 48 45 41 44 2c 5b ┆9 0 PTABLE)Æ PTABLEÆ;2Å;ÅPHEAD,Æ┆ 0x13c0…13e0 31 5d 28 50 4c 41 4e 45 54 53 2c 39 20 30 de 50 54 41 42 4c 45 29 5b ae 50 54 41 42 4c 45 5b 3b ┆1Å(PLANETS,9 0 PTABLE)Æ PTABLEÆ;┆ 0x13e0…1400 33 5d 3b 5d 32 37 ac 28 50 48 45 41 44 2c 5b 31 5d 50 4c 41 4e 45 54 53 2c 39 20 30 de 50 54 41 ┆3Å;Å27 (PHEAD,Æ1ÅPLANETS,9 0 PTA┆ 0x1400…1420 42 4c 45 29 2c 27 20 27 20 20 20 20 20 20 20 20 00 00 d8 83 68 83 00 00 00 00 03 00 45 47 32 50 ┆BLE),' ' h EG2P┆ 0x1420…1440 00 00 f0 83 98 83 63 00 01 01 1e 00 1e 00 42 4c 4f 43 4b 48 45 41 44 20 50 48 45 41 44 20 50 4c ┆ c BLOCKHEAD PHEAD PL┆ 0x1440…1460 41 4e 45 54 53 20 50 54 41 42 4c 45 a8 83 20 00 27 42 4c 4f 43 4b 48 45 41 44 20 50 48 45 41 44 ┆ANETS PTABLE 'BLOCKHEAD PHEAD┆ 0x1460…1480 20 50 4c 41 4e 45 54 53 20 50 54 41 42 4c 45 27 63 00 01 01 0b 00 0b 00 20 20 20 20 20 20 29 56 ┆ PLANETS PTABLE'c )V┆ 0x1480…14a0 41 52 53 20 c0 83 0d 00 27 20 20 20 20 20 20 29 56 41 52 53 27 20 98 83 e8 83 60 83 00 00 00 00 ┆ARS ' )VARS' ` ┆ 0x14a0…14c0 03 00 45 47 31 00 d8 83 05 00 90 83 00 00 00 00 02 00 45 47 00 00 13 00 08 86 00 00 00 00 04 00 ┆ EG1 EG ┆ 0x14c0…14e0 53 48 4f 57 00 00 f0 83 e8 83 63 00 01 01 14 00 14 00 50 48 45 41 44 20 50 4c 41 4e 45 54 53 20 ┆SHOW c PHEAD PLANETS ┆ 0x14e0…1500 50 54 41 42 4c 45 00 84 16 00 27 50 48 45 41 44 20 50 4c 41 4e 45 54 53 20 50 54 41 42 4c 45 27 ┆PTABLE 'PHEAD PLANETS PTABLE'┆ 0x1500…1520 63 00 01 01 0b 00 0b 00 20 20 20 20 20 20 29 56 41 52 53 20 48 84 03 00 27 20 27 20 00 00 50 84 ┆c )VARS H ' ' P ┆ 0x1520…1540 00 00 10 85 a2 00 10 85 2b 00 68 84 00 00 0d 00 38 83 00 00 38 83 03 00 4d 41 54 00 00 00 a3 00 ┆ + h 8 8 MAT ┆ 0x1540…1560 28 00 10 85 b5 00 18 85 29 00 2f 00 00 85 63 00 01 00 01 00 20 20 6e 00 00 00 01 00 01 00 00 00 ┆( ) / c n ┆ 0x1560…1580 dc 00 78 82 5b 00 10 85 3b 00 5d 00 6e 00 00 00 01 00 01 00 6e 00 00 00 01 00 01 00 bd 00 3c 00 ┆ x Æ ; Å n n < ┆ 0x1580…15a0 bd 20 44 49 53 50 4c 41 59 53 20 45 41 43 48 20 4c 49 4e 45 20 4f 46 20 4d 41 54 20 49 4e 20 54 ┆ DISPLAYS EACH LINE OF MAT IN T┆ 0x15a0…15c0 55 52 4e 20 41 4e 44 20 4f 4e 20 45 4e 54 45 52 20 45 58 45 43 55 54 45 53 20 49 54 00 00 0e 00 ┆URN AND ON ENTER EXECUTES IT ┆ 0x15c0…15e0 00 00 00 00 00 00 03 00 4e 58 54 00 00 00 17 00 00 00 00 00 00 00 03 00 57 50 42 00 00 00 00 83 ┆ NXT WPB ┆ 0x15e0…1600 00 00 00 00 00 00 04 00 54 48 49 53 00 00 88 81 00 00 00 00 00 00 05 00 4c 49 4e 45 53 00 00 00 ┆ THIS LINES ┆ 0x1600…1620 80 86 f8 81 78 82 58 85 6e 00 02 00 01 00 b1 ff 00 00 00 85 3a 00 28 00 d8 85 bc 00 d0 86 29 00 ┆ x X n : ( ) ┆ 0x1620…1640 2c 00 2c 00 78 82 5b 00 10 85 3b 00 5d 00 63 00 01 00 01 00 20 20 6e 00 02 00 01 00 06 00 6e 00 ┆, , x Æ ; Å c n n ┆ 0x1640…1660 02 00 01 00 09 00 00 00 04 00 48 86 00 00 00 00 08 00 44 45 53 43 52 49 42 45 63 00 01 00 01 00 ┆ H DESCRIBEc ┆ 0x1660…1680 20 20 6e 00 00 01 02 00 02 00 00 00 98 86 03 00 30 20 30 00 00 00 30 86 3d 00 bc 00 80 86 a2 00 ┆ n 0 0 0 = ┆ 0x1680…16a0 10 82 00 00 16 00 00 00 00 00 00 00 01 00 56 00 00 00 1f 00 00 00 00 00 00 00 01 00 ff 00 00 00 ┆ V ┆ 0x16a0…16c0 00 00 00 00 00 00 00 00 01 00 a0 00 6e 00 00 00 01 00 00 00 00 00 00 00 38 84 00 00 58 85 00 00 ┆ n 8 X ┆ 0x16c0…16e0 80 86 00 00 e8 86 78 82 c0 86 98 85 60 85 00 00 d0 85 bc 00 08 82 30 85 01 00 30 00 6e 00 06 02 ┆ x ` 0 0 n ┆ 0x16e0…1700 24 00 09 00 04 00 42 93 00 00 00 00 44 79 26 00 00 00 42 24 00 00 00 00 44 87 66 00 00 00 43 48 ┆$ B Dy& B$ D f CH┆ 0x1700…1720 00 00 00 00 45 89 40 00 00 00 42 10 00 00 00 00 46 10 39 65 00 00 43 14 20 00 00 00 44 42 00 00 ┆ E @ B F 9e C DB ┆ 0x1720…1740 00 00 42 25 00 00 00 00 45 16 48 80 00 00 42 36 00 00 00 00 44 30 00 00 00 00 44 14 16 00 00 00 ┆ B% E H B6 D0 D ┆ 0x1740…1760 44 21 12 00 00 00 44 28 00 00 00 00 45 30 00 00 00 00 42 19 00 00 00 00 47 14 46 39 00 00 44 37 ┆D! D( E0 B G F9 D7┆ 0x1760…1780 00 00 00 00 44 19 00 00 00 00 43 15 40 00 00 00 47 21 73 96 80 00 43 88 60 00 00 00 45 75 00 00 ┆ D C @ G!s C ` Eu ┆ 0x1780…17a0 00 00 42 10 00 00 00 00 46 25 82 46 00 00 44 17 83 00 00 00 45 32 30 00 00 00 42 22 00 00 00 00 ┆ B F% F D E20 B" ┆ 0x17a0…17c0 46 73 63 44 00 00 42 67 00 00 00 00 44 75 00 00 00 00 44 58 44 00 00 00 44 54 00 00 00 00 63 00 ┆FscD Bg Du DXD DT c ┆ 0x17c0…17e0 01 03 95 01 09 00 05 00 09 00 50 4c 41 4e 45 54 20 20 20 20 46 52 4f 4d 20 53 55 4e 20 44 49 41 ┆ PLANET FROM SUN DIA┆ 0x17e0…1800 4d 45 54 45 52 20 20 44 41 59 20 48 52 53 20 20 20 59 52 20 48 52 53 50 4c 41 4e 45 54 20 20 20 ┆METER DAY HRS YR HRSPLANET ┆ 0x1800…1820 20 46 52 4f 4d 20 53 55 4e 20 44 49 41 4d 45 54 45 52 20 20 44 41 59 20 48 52 53 20 20 20 59 52 ┆ FROM SUN DIAMETER DAY HRS YR┆ 0x1820…1840 20 48 52 53 50 4c 41 4e 45 54 20 20 20 20 46 52 4f 4d 20 53 55 4e 20 44 49 41 4d 45 54 45 52 20 ┆ HRSPLANET FROM SUN DIAMETER ┆ 0x1840…1860 20 44 41 59 20 48 52 53 20 20 20 59 52 20 48 52 53 50 4c 41 4e 45 54 20 20 20 20 46 52 4f 4d 20 ┆ DAY HRS YR HRSPLANET FROM ┆ 0x1860…1880 53 55 4e 20 44 49 41 4d 45 54 45 52 20 20 44 41 59 20 48 52 53 20 20 20 59 52 20 48 52 53 50 4c ┆SUN DIAMETER DAY HRS YR HRSPL┆ 0x1880…18a0 41 4e 45 54 20 20 20 20 46 52 4f 4d 20 53 55 4e 20 44 49 41 4d 45 54 45 52 20 20 44 41 59 20 48 ┆ANET FROM SUN DIAMETER DAY H┆ 0x18a0…18c0 52 53 20 20 20 59 52 20 48 52 53 50 4c 41 4e 45 54 20 20 20 20 46 52 4f 4d 20 53 55 4e 20 44 49 ┆RS YR HRSPLANET FROM SUN DI┆ 0x18c0…18e0 41 4d 45 54 45 52 20 20 44 41 59 20 48 52 53 20 20 20 59 52 20 48 52 53 50 4c 41 4e 45 54 20 20 ┆AMETER DAY HRS YR HRSPLANET ┆ 0x18e0…1900 20 20 46 52 4f 4d 20 53 55 4e 20 44 49 41 4d 45 54 45 52 20 20 44 41 59 20 48 52 53 20 20 20 59 ┆ FROM SUN DIAMETER DAY HRS Y┆ 0x1900…1920 52 20 48 52 53 50 4c 41 4e 45 54 20 20 20 20 46 52 4f 4d 20 53 55 4e 20 44 49 41 4d 45 54 45 52 ┆R HRSPLANET FROM SUN DIAMETER┆ […truncated at 200 lines…]