00000000  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 00 00 00 00  |NNNNNNNNNNNN....|
00000010  00 00 00 00 00 00 00 00  f5 f5 f5 fe 4f 00 09 01  |............O...|
00000020  f7 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 4e  |.NNNNNNNNNNNNNNN|
00000030  4e 4e 4e 4e 4e 4e 4e 00  00 00 00 00 00 00 00 00  |NNNNNNN.........|
00000040  00 00 00 f5 f5 f5 fb 6c  6c 6c 6c 6c 6c 6c 6c 6c  |.......lllllllll|
00000050  6c 6c 6c 6c 6c 6c 6c 6c  6c 6c 6c 6c 6c 6c 6c 6c  |llllllllllllllll|
*
00000140  6c 6c 6c 6c 6c 6c 6c f7  4e 4e 4e 4e 4e 4e 4e 4e  |lllllll.NNNNNNNN|
00000150  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 4e  |NNNNNNNNNNNNNNNN|
*
00000170  4e 4e 4e 4e 00 00 00 00  00 00 00 00 00 00 00 00  |NNNN............|
00000180  f5 f5 f5 fe 4f 00 0a 01  f7 4e 4e 4e 4e 4e 4e 4e  |....O....NNNNNNN|
00000190  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 00  |NNNNNNNNNNNNNNN.|
000001a0  00 00 00 00 00 00 00 00  00 00 00 f5 f5 f5 fb 6c  |...............l|
000001b0  6c 6c 6c 6c 6c 6c 6c 6c  6c 6c 6c 6c 6c 6c 6c 6c  |llllllllllllllll|
*
000002a0  6c 6c 6c 6c 6c 6c 6c 6c  6c 6c 6c 6c 6c 6c 6c f7  |lllllllllllllll.|
000002b0  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 4e  |NNNNNNNNNNNNNNNN|
*
000002d0  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 00 00 00 00  |NNNNNNNNNNNN....|
000002e0  00 00 00 00 00 00 00 00  f5 f5 f5 fe 4f 00 0b 01  |............O...|
000002f0  f7 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 4e  |.NNNNNNNNNNNNNNN|
00000300  4e 4e 4e 4e 4e 4e 4e 00  00 00 00 00 00 00 00 00  |NNNNNNN.........|
00000310  00 00 00 f5 f5 f5 fb 6c  6c 6c 6c 6c 6c 6c 6c 6c  |.......lllllllll|
00000320  6c 6c 6c 6c 6c 6c 6c 6c  6c 6c 6c 6c 6c 6c 6c 6c  |llllllllllllllll|
*
00000410  6c 6c 6c 6c 6c 6c 6c f7  4e 4e 4e 4e 4e 4e 4e 4e  |lllllll.NNNNNNNN|
00000420  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 4e  |NNNNNNNNNNNNNNNN|
*
00000440  4e 4e 4e 4e 00 00 00 00  00 00 00 00 00 00 00 00  |NNNN............|
00000450  f5 f5 f5 fe 4f 00 0c 01  f7 4e 4e 4e 4e 4e 4e 4e  |....O....NNNNNNN|
00000460  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 00  |NNNNNNNNNNNNNNN.|
00000470  00 00 00 00 00 00 00 00  00 00 00 f5 f5 f5 fb 6c  |...............l|
00000480  6c 6c 6c 6c 6c 6c 6c 6c  6c 6c 6c 6c 6c 6c 6c 6c  |llllllllllllllll|
*
00000570  6c 6c 6c 6c 6c 6c 6c 6c  6c 6c 6c 6c 6c 6c 6c f7  |lllllllllllllll.|
00000580  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 4e  |NNNNNNNNNNNNNNNN|
*
000005a0  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 00 00 00 00  |NNNNNNNNNNNN....|
000005b0  00 00 00 00 00 00 00 00  f5 f5 f5 fe 4f 00 0d 01  |............O...|
000005c0  f7 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 4e  |.NNNNNNNNNNNNNNN|
000005d0  4e 4e 4e 4e 4e 4e 4e 00  00 00 00 00 00 00 00 00  |NNNNNNN.........|
000005e0  00 00 00 f5 f5 f5 fb 6c  6c 6c 6c 6c 6c 6c 6c 6c  |.......lllllllll|
000005f0  6c 6c 6c 6c 6c 6c 6c 6c  6c 6c 6c 6c 6c 6c 6c 6c  |llllllllllllllll|
*
000006e0  6c 6c 6c 6c 6c 6c 6c f7  4e 4e 4e 4e 4e 4e 4e 4e  |lllllll.NNNNNNNN|
000006f0  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 4e  |NNNNNNNNNNNNNNNN|
*
00000710  4e 4e 4e 4e 00 00 00 00  00 00 00 00 00 00 00 00  |NNNN............|
00000720  f5 f5 f5 fe 4f 00 0e 01  f7 4e 4e 4e 4e 4e 4e 4e  |....O....NNNNNNN|
00000730  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 00  |NNNNNNNNNNNNNNN.|
00000740  00 00 00 00 00 00 00 00  00 00 00 f5 f5 f5 fb 6c  |...............l|
00000750  6c 6c 6c 6c 6c 6c 6c 6c  6c 6c 6c 6c 6c 6c 6c 6c  |llllllllllllllll|
*
00000840  6c 6c 6c 6c 6c 6c 6c 6c  6c 6c 6c 6c 6c 6c 6c f7  |lllllllllllllll.|
00000850  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 4e  |NNNNNNNNNNNNNNNN|
*
00000870  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 00 00 00 00  |NNNNNNNNNNNN....|
00000880  00 00 00 00 00 00 00 00  f5 f5 f5 fe 4f 00 0f 01  |............O...|
00000890  f7 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 4e  |.NNNNNNNNNNNNNNN|
000008a0  4e 4e 4e 4e 4e 4e 4e 00  00 00 00 00 00 00 00 00  |NNNNNNN.........|
000008b0  00 00 00 f5 f5 f5 fb 6c  6c 6c 6c 6c 6c 6c 6c 6c  |.......lllllllll|
000008c0  6c 6c 6c 6c 6c 6c 6c 6c  6c 6c 6c 6c 6c 6c 6c 6c  |llllllllllllllll|
*
000009b0  6c 6c 6c 6c 6c 6c 6c f7  4e 4e 4e 4e 4e 4e 4e 4e  |lllllll.NNNNNNNN|
000009c0  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 4e  |NNNNNNNNNNNNNNNN|
*
000009e0  4e 4e 4e 4e 00 00 00 00  00 00 00 00 00 00 00 00  |NNNN............|
000009f0  f5 f5 f5 fe 4f 00 00 01  f7 4e 4e 4e 4e 4e 4e 4e  |....O....NNNNNNN|
00000a00  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 00  |NNNNNNNNNNNNNNN.|
00000a10  00 00 00 00 00 00 00 00  00 00 00 f5 f5 f5 fb 6c  |...............l|
00000a20  6c 6c 6c 6c 6c 6c 6c 6c  6c 6c 6c 6c 6c 6c 6c 6c  |llllllllllllllll|
*
00000b10  6c 6c 6c 6c 6c 6c 6c 6c  6c 6c 6c 6c 6c 6c 6c f7  |lllllllllllllll.|
00000b20  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 4e  |NNNNNNNNNNNNNNNN|
*
00000b40  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 00 00 00 00  |NNNNNNNNNNNN....|
00000b50  00 00 00 00 00 00 00 00  f5 f5 f5 fe 4f 00 01 01  |............O...|
00000b60  f7 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 4e  |.NNNNNNNNNNNNNNN|
00000b70  4e 4e 4e 4e 4e 4e 4e 00  00 00 00 00 00 00 00 00  |NNNNNNN.........|
00000b80  00 00 00 f5 f5 f5 fb 6c  6c 6c 6c 6c 6c 6c 6c 6c  |.......lllllllll|
00000b90  6c 6c 6c 6c 6c 6c 6c 6c  6c 6c 6c 6c 6c 6c 6c 6c  |llllllllllllllll|
*
00000c80  6c 6c 6c 6c 6c 6c 6c f7  4e 4e 4e 4e 4e 4e 4e 4e  |lllllll.NNNNNNNN|
00000c90  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 4e  |NNNNNNNNNNNNNNNN|
*
00000cb0  4e 4e 4e 4e 00 00 00 00  00 00 00 00 00 00 00 00  |NNNN............|
00000cc0  f5 f5 f5 fe 4f 00 02 01  f7 4e 4e 4e 4e 4e 4e 4e  |....O....NNNNNNN|
00000cd0  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 00  |NNNNNNNNNNNNNNN.|
00000ce0  00 00 00 00 00 00 00 00  00 00 00 f5 f5 f5 fb 6c  |...............l|
00000cf0  6c 6c 6c 6c 6c 6c 6c 6c  6c 6c 6c 6c 6c 6c 6c 6c  |llllllllllllllll|
*
00000de0  6c 6c 6c 6c 6c 6c 6c 6c  6c 6c 6c 6c 6c 6c 6c f7  |lllllllllllllll.|
00000df0  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 4e  |NNNNNNNNNNNNNNNN|
*
00000e10  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 00 00 00 00  |NNNNNNNNNNNN....|
00000e20  00 00 00 00 00 00 00 00  f5 f5 f5 fe 4f 00 03 01  |............O...|
00000e30  f7 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 4e  |.NNNNNNNNNNNNNNN|
00000e40  4e 4e 4e 4e 4e 4e 4e 00  00 00 00 00 00 00 00 00  |NNNNNNN.........|
00000e50  00 00 00 f5 f5 f5 fb 6c  6c 6c 6c 6c 6c 6c 6c 6c  |.......lllllllll|
00000e60  6c 6c 6c 6c 6c 6c 6c 6c  6c 6c 6c 6c 6c 6c 6c 6c  |llllllllllllllll|
*
00000f50  6c 6c 6c 6c 6c 6c 6c f7  4e 4e 4e 4e 4e 4e 4e 4e  |lllllll.NNNNNNNN|
00000f60  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 4e  |NNNNNNNNNNNNNNNN|
*
00000f80  4e 4e 4e 4e 00 00 00 00  00 00 00 00 00 00 00 00  |NNNN............|
00000f90  f5 f5 f5 fe 4f 00 04 01  f7 4e 4e 4e 4e 4e 4e 4e  |....O....NNNNNNN|
00000fa0  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 00  |NNNNNNNNNNNNNNN.|
00000fb0  00 00 00 00 00 00 00 00  00 00 00 f5 f5 f5 fb 6c  |...............l|
00000fc0  6c 6c 6c 6c 6c 6c 6c 6c  6c 6c 6c 6c 6c 6c 6c 6c  |llllllllllllllll|
*
000010b0  6c 6c 6c 6c 6c 6c 6c 6c  6c 6c 6c 6c 6c 6c 6c f7  |lllllllllllllll.|
000010c0  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 4e  |NNNNNNNNNNNNNNNN|
*
000010e0  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 00 00 00 00  |NNNNNNNNNNNN....|
000010f0  00 00 00 00 00 00 00 00  f5 f5 f5 fe 4f 00 05 01  |............O...|
00001100  f7 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 4e  |.NNNNNNNNNNNNNNN|
00001110  4e 4e 4e 4e 4e 4e 4e 00  00 00 00 00 00 00 00 00  |NNNNNNN.........|
00001120  00 00 00 f5 f5 f5 fb 6c  6c 6c 6c 6c 6c 6c 6c 6c  |.......lllllllll|
00001130  6c 6c 6c 6c 6c 6c 6c 6c  6c 6c 6c 6c 6c 6c 6c 6c  |llllllllllllllll|
*
00001220  6c 6c 6c 6c 6c 6c 6c f7  4e 4e 4e 4e 4e 4e 4e 4e  |lllllll.NNNNNNNN|
00001230  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 4e  |NNNNNNNNNNNNNNNN|
*
00001250  4e 4e 4e 4e 00 00 00 00  00 00 00 00 00 00 00 00  |NNNN............|
00001260  f5 f5 f5 fe 4f 00 06 01  f7 4e 4e 4e 4e 4e 4e 4e  |....O....NNNNNNN|
00001270  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 00  |NNNNNNNNNNNNNNN.|
00001280  00 00 00 00 00 00 00 00  00 00 00 f5 f5 f5 fb 6c  |...............l|
00001290  6c 6c 6c 6c 6c 6c 6c 6c  6c 6c 6c 6c 6c 6c 6c 6c  |llllllllllllllll|
*
00001380  6c 6c 6c 6c 6c 6c 6c 6c  6c 6c 6c 6c 6c 6c 6c f7  |lllllllllllllll.|
00001390  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e 4e 4e 4e 4e  |NNNNNNNNNNNNNNNN|
*
000013b0  4e 4e 4e 4e 4e 4e 4e 4e  4e 4e 4e 4e ff 20 20 20  |NNNNNNNNNNNN.   |
000013c0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
000013e0  20 20 41 56 45 20 45 53  43 41 91 7b 24 00 f2 33  |  AVE ESCA.{$..3|
000013f0  17 0a 53 54 4f 4e 45 48  45 4e 47 45 20 20 20 20  |..STONEHENGE    |
00001400  20 30 29 22 54 48 45 20  43 53 79 74 78 00 ce 30  | 0)"THE CSytx..0|
00001410  4a 34 24 00 28 34 22 00  61 00 25 00 00 00 00 00  |J4$.(4".a.%.....|
00001420  09 00 25 00 00 00 00 00  44 49 53 4b 20 50 49 52  |..%.....DISK PIR|
00001430  41 54 45 20 56 32 2e 30  35 20 28 63 29 20 31 39  |ATE V2.05 (c) 19|
00001440  39 31 34 f1 8a 34 2c 34  29 22 f9 34 25 00 00 00  |914..4,4)".4%...|
00001450  00 00 52 00 24 00 77 34  01 01 94 34 34 00 aa 2e  |..R.$.w4...44...|
00001460  f0 34 24 00 80 34 13 00  53 6f 75 72 63 65 78 34  |.4$..4..Sourcex4|
00001470  30 00 81 80 00 00 00 30  73 00 24 00 93 34 01 01  |0......0s.$..4..|
00001480  53 54 4f 4e 45 48 45 4e  47 45 0d dd f2 62 6f 6e  |STONEHENGE...bon|
00001490  6b 0d 09 30 ab 34 35 00  2b 2f 17 36 30 00 81 80  |k..0.45.+/.60...|
000014a0  00 00 00 90 79 00 81 80  00 00 00 10 7a 31 00 d0  |....y.......z1..|
000014b0  2f 31 00 24 00 b9 34 1d  00 4f 76 65 72 77 72 69  |/1.$..4..Overwri|
000014c0  74 65 20 6c 6f 63 6b 65  64 20 66 69 6c 65 73 2c  |te locked files,|
000014d0  58 25 3a df 58 25 2c 00  24 00 de 34 01 01 4e 24  |X%:.X%,.$..4..N$|
000014e0  7b 00 81 80 00 00 00 cb  35 30 00 00 00 00 00 00  |{.......50......|
000014f0  71 7a 30 00 8f 06 66 00  00 58 00 30 00 8e 54 08  |qz0...f..X.0..T.|
00001500  00 00 86 81 84 82 ad 01  06 85 86 ad 02 06 85 87  |................|
00001510  a0 00 b1 86 85 83 c8 b1  86 85 84 ad 04 06 85 86  |................|
00001520  ad 05 06 85 87 a0 00 b1  86 85 80 ad 00 06 c9 02  |................|
00001530  f0 15 ad 07 06 85 86 ad  08 06 85 87 a0 00 b1 86  |................|
00001540  85 81 c8 b1 86 85 82 a9  02 85 87 ad 02 02 85 88  |................|
00001550  ad 03 02 85 89 a9 8a 8d  02 02 a9 35 8d 03 02 ad  |...........5....|
00001560  00 10 85 8b a9 02 8d 00  10 ba 86 8a a5 80 a6 81  |................|
00001570  a4 82 20 87 35 85 85 a5  88 8d 02 02 a5 89 8d 03  |.. .5...........|
00001580  02 a5 8b 8d 00 10 60 6c  83 00 a5 87 d0 06 20 77  |......`l...... w|
00001590  35 6c 02 02 c6 87 a6 8a  9a 4c 6c 35 00 00 00 00  |5l.......Ll5....|
000015a0  00 00 00 00 00 00 00 00  00 00 00 00 00 00 00 00  |................|
*
000015c0  00 00 00 00 00 00 00 00  00 00 00 63 79 25 00 d3  |...........cy%..|
000015d0  35 00 00 39 d1 56 00 00  00 00 00 00 73 10 00 00  |5..9.V......s...|
000015e0  79 7a 25 00 e8 35 00 00  02 36 00 0e ff ff 23 80  |yz%..5...6....#.|
000015f0  ff ff 73 10 00 00 33 00  00 00 00 00 00 8e 58 08  |..s...3.......X.|
00001600  00 00 53 54 4f 4e 45 48  45 4e 47 45 0d 20 0d 00  |..STONEHENGE. ..|
00001610  00 00 00 00 00 00 00 bf  79 00 8e 58 7c 00 00 03  |........y..X|...|
00001620  88 06 00 00 00 00 7d 06  00 00 0d 00 0a 0c 48 53  |......}.......HS|
00001630  43 3d 31 30 30 30 0d 00  1e 14 eb 31 3a ef 32 33  |C=1000.....1:.23|
00001640  2c 31 3b 30 3b 30 3b 30  3b 30 0d 00 28 0a fb 31  |,1;0;0;0;0..(..1|
00001650  33 31 3a db 0d 00 32 19  fb 31 3a f1 8a 31 35 2c  |31:...2..1:..15,|
00001660  32 29 22 51 55 41 53 49  4d 4f 44 4f 22 0d 00 3c  |2)"QUASIMODO"..<|
00001670  16 f1 8a 31 35 2c 33 29  22 7e 7e 7e 7e 7e 7e 7e  |...15,3)"~~~~~~~|
00001680  7e 7e 22 0d 00 46 53 fb  30 3a f1 27 22 59 6f 75  |~~"..FS.0:.'"You|
00001690  20 6d 75 73 74 20 6a 75  6d 70 20 74 68 65 20 72  | must jump the r|
000016a0  61 6d 70 61 72 74 73 20  2c 67 75 61 72 64 73 2c  |amparts ,guards,|
000016b0  72 6f 63 6b 73 61 6e 64  20 61 72 72 6f 77 73 74  |rocksand arrowst|
000016c0  6f 20 72 65 73 63 75 65  20 45 73 6d 65 72 61 6c  |o rescue Esmeral|
000016d0  64 65 72 21 22 20 0d 00  50 46 f1 27 27 89 35 22  |der!" ..PF.''.5"|
000016e0  4b 65 79 73 2e 2e 22 27  27 89 31 35 22 5a 2e 2e  |Keys.."''.15"Z..|
000016f0  4c 65 66 74 22 27 27 89  31 35 22 58 2e 2e 52 69  |Left"''.15"X..Ri|
00001700  67 68 74 22 27 27 27 89  31 32 22 53 68 69 66 74  |ght"'''.12"Shift|
00001710  2e 2e 2e 20 54 4f 20 4a  75 6d 70 22 0d 00 5a 24  |... TO Jump"..Z$|
00001720  f1 8a 35 2c 32 32 29 22  57 72 69 74 74 65 6e 20  |..5,22)"Written |
00001730  62 79 20 4d 61 72 6b 20  4a 6f 68 6e 73 6f 6e 22  |by Mark Johnson"|
00001740  0d 00 64 26 ef 34 3a fb  31 3a f1 8a 38 2c 32 36  |..d&.4:.1:..8,26|
00001750  29 22 43 68 6f 6f 73 65  20 77 68 69 63 68 20 53  |)"Choose which S|
00001760  63 72 65 65 6e 22 0d 00  6e 1e f1 8a 39 2c 32 38  |creen"..n...9,28|
00001770  29 22 31 2e 2e 45 61 73  79 20 54 4f 20 33 20 48  |)"1..Easy TO 3 H|
00001780  61 72 64 22 0d 00 78 40  f1 8a 31 34 2c 33 30 29  |ard"..x@..14,30)|
00001790  22 53 63 72 65 65 6e 3f  22 3a f5 20 fd 20 a5 3c  |"Screen?":. . .<|
000017a0  3e a3 3a e7 20 a5 3c 34  39 20 84 20 a5 3e 35 31  |>.:. .<49 . .>51|
000017b0  20 e5 8d 44 78 40 20 8b  20 53 43 4e 3d a5 2d 34  | ..Dx@ . SCN=.-4|
000017c0  38 3a fb 30 0d 00 82 35  20 eb 35 3a fb 31 33 31  |8:.0...5 .5:.131|
000017d0  3a fb 30 3a db 3a ef 32  33 2c 31 3b 30 3b 30 3b  |:.0:.:.23,1;0;0;|
000017e0  30 3b 30 3a f1 8a 34 2c  31 35 29 22 47 65 74 20  |0;0:..4,15)"Get |
000017f0  72 65 61 64 79 21 21 21  22 0d 00 8c 1a e3 20 57  |ready!!!"..... W|
00001800  3d 30 20 b8 20 32 30 30  30 3a ed 3a f2 54 55 4e  |=0 . 2000:.:.TUN|
00001810  45 3a db 0d 00 96 0c f2  49 4e 49 54 49 41 4c 0d  |E:......INITIAL.|
00001820  00 a0 0b f2 53 43 52 45  45 4e 0d 00 aa 05 f5 0d  |....SCREEN......|
00001830  00 b4 43 e7 20 a6 28 2d  39 38 29 20 80 20 58 3e  |..C. .(-98) . X>|
00001840  30 20 8c 20 d4 30 2c 2d  31 35 2c 35 30 2c 31 3a  |0 . .0,-15,50,1:|
00001850  fb 30 3a f1 8a 58 2c 59  29 53 50 41 43 45 24 3a  |.0:..X,Y)SPACE$:|
00001860  58 3d 58 2d 31 3a f1 8a  58 2c 59 29 3b 4d 41 4e  |X=X-1:..X,Y);MAN|
00001870  32 24 0d 00 be 5d e7 20  a6 28 2d 31 29 80 20 52  |2$...]. .(-1). R|
00001880  49 47 48 54 3d b9 20 80  20 58 3c 31 37 20 8c 20  |IGHT=. . X<17 . |
00001890  fb 30 3a f2 4d 41 4e 4a  55 4d 50 52 49 47 48 54  |.0:.MANJUMPRIGHT|
000018a0  20 8b 20 e7 20 a6 28 2d  31 29 80 20 59 3d 31 33  | . . .(-1). Y=13|
000018b0  20 80 20 52 49 47 48 54  3d a3 20 8c 20 d4 31 2c  | . RIGHT=. . .1,|
000018c0  31 2c 32 30 2c 35 3a fb  30 3a f2 4a 55 4d 50 0d  |1,20,5:.0:.JUMP.|
000018d0  00 c8 54 e7 20 a6 28 2d  36 37 29 20 80 58 3c 31  |..T. .(-67) .X<1|
000018e0  39 20 8c 20 d4 30 2c 2d  31 35 2c 35 30 2c 31 3a  |9 . .0,-15,50,1:|
000018f0  fb 30 3a f1 8a 58 2c 59  29 53 50 41 43 45 24 3a  |.0:..X,Y)SPACE$:|
00001900  58 3d 58 2b 31 3a f1 8a  58 2c 59 29 4d 41 4e 32  |X=X+1:..X,Y)MAN2|
00001910  24 3a 52 49 47 48 54 3d  b9 20 8b 20 52 49 47 48  |$:RIGHT=. . RIGH|
00001920  54 3d a3 0d 00 d2 16 e3  20 56 3d 30 20 b8 20 4c  |T=...... V=0 . L|
00001930  45 56 45 4c 2a 32 3a ed  56 0d 00 dc 17 e7 20 41  |EVEL*2:.V..... A|
00001940  52 57 31 3d b9 20 8c 20  f2 41 52 57 4d 4f 56 45  |RW1=. . .ARWMOVE|
00001950  0d 00 e6 37 e7 20 41 52  57 3d b9 20 80 20 b3 28  |...7. ARW=. . .(|
00001960  4c 45 56 45 4c 2a 34 29  3d 31 20 80 20 41 52 57  |LEVEL*4)=1 . ARW|
00001970  31 3c 3e b9 20 8c 20 41  52 57 31 3d b9 3a d4 30  |1<>. . ARW1=.:.0|
00001980  2c 31 2c 38 30 2c 33 0d  00 f0 37 e7 20 53 43 4e  |,1,80,3...7. SCN|
00001990  3e 31 20 80 20 b3 28 4c  45 56 45 4c 2a 34 29 3d  |>1 . .(LEVEL*4)=|
000019a0  31 80 20 52 4f 43 4b 3c  3e b9 20 8c 20 52 4f 43  |1. ROCK<>. . ROC|
000019b0  4b 3d b9 3a d4 30 2c 31  2c 32 30 30 2c 33 0d 00  |K=.:.0,1,200,3..|
000019c0  fa 27 e7 20 52 4f 43 4b  3d b9 20 8c 20 f1 8a 52  |.'. ROCK=. . ..R|
000019d0  4f 4b 2c 31 31 29 3b 52  4f 4b 24 3a 52 4f 4b 3d  |OK,11);ROK$:ROK=|
000019e0  52 4f 4b 2b 31 0d 01 04  2a e7 20 52 4f 4b 3d 31  |ROK+1...*. ROK=1|
000019f0  38 20 8c 20 f1 8a 52 4f  4b 2c 31 31 29 3b 22 20  |8 . ..ROK,11);" |
00001a00  20 22 3a 52 4f 4b 3d 30  3a 52 4f 43 4b 3d a3 0d  | ":ROK=0:ROCK=..|
00001a10  01 0e 2b e7 20 58 3d 52  4f 4b 2b 31 20 80 20 59  |..+. X=ROK+1 . Y|
00001a20  3c 3e 31 33 20 8c 20 f1  8a 52 4f 4b 2c 31 30 29  |<>13 . ..ROK,10)|
00001a30  22 20 20 22 3a f2 44 45  41 44 0d 01 18 2e e7 20  |"  ":.DEAD..... |
00001a40  58 3d 31 39 20 8c 20 53  43 4e 3d 53 43 4e 2b 31  |X=19 . SCN=SCN+1|
00001a50  3a 58 3d 30 3a 53 43 3d  53 43 2b 42 4f 4e 55 53  |:X=0:SC=SC+BONUS|
00001a60  3a f2 53 43 52 45 45 4e  0d 01 22 18 e7 20 47 55  |:.SCREEN..".. GU|
00001a70  41 52 44 53 3d b9 20 8c  20 f2 47 55 41 52 44 53  |ARDS=. . .GUARDS|
00001a80  0d 01 2c 12 fb 30 3a f1  8a 58 2c 59 29 3b 4d 41  |..,..0:..X,Y);MA|
00001a90  4e 24 0d 01 36 46 e7 20  58 3d 34 20 84 20 58 3d  |N$..6F. X=4 . X=|
00001aa0  35 20 84 20 58 3d 38 20  84 20 58 3d 39 20 84 20  |5 . X=8 . X=9 . |
00001ab0  58 3d 31 32 20 84 20 58  3d 31 33 20 84 20 58 3d  |X=12 . X=13 . X=|
00001ac0  31 36 20 84 20 58 3d 31  37 20 80 20 59 3d 31 33  |16 . X=17 . Y=13|
00001ad0  20 8c 20 f2 44 45 41 44  0d 01 40 15 e7 20 4c 49  | . .DEAD..@.. LI|
00001ae0  56 45 53 3c 31 20 8c 20  e5 8d 44 7a 43 0d 01 4a  |VES<1 . ..DzC..J|
00001af0  1e e7 20 59 3c 31 33 8c  20 f1 8a 58 2c 59 29 53  |.. Y<13. ..X,Y)S|
00001b00  50 41 43 45 24 3a 59 3d  59 2b 31 0d 01 54 25 e7  |PACE$:Y=Y+1..T%.|
00001b10  20 59 3d 31 33 20 80 20  41 3d 58 20 8c 20 f1 8a  | Y=13 . A=X . ..|
00001b20  58 2c 59 29 53 50 41 43  45 24 3a f2 44 45 41 44  |X,Y)SPACE$:.DEAD|
00001b30  0d 01 5e 24 e7 20 42 4f  4e 55 53 3c 31 30 20 8c  |..^$. BONUS<10 .|
00001b40  20 42 4f 4e 55 53 3d 53  43 4e 2a 34 30 30 3a f2  | BONUS=SCN*400:.|
00001b50  44 45 41 44 0d 01 68 13  20 42 4f 4e 55 53 3d 42  |DEAD..h. BONUS=B|
00001b60  4f 4e 55 53 2d 31 30 0d  01 72 29 fb 30 3a f1 8a  |ONUS-10..r).0:..|
00001b70  30 2c 32 37 29 22 42 4f  4e 55 53 22 3a f1 8a 30  |0,27)"BONUS":..0|
00001b80  2c 32 38 29 3b 42 4f 4e  55 53 3b 22 20 20 22 20  |,28);BONUS;"  " |
00001b90  0d 01 7c 23 fb 30 3a f1  8a 31 35 2c 32 37 29 22  |..|#.0:..15,27)"|
00001ba0  53 43 4f 52 45 22 3a f1  8a 31 35 2c 32 38 29 3b  |SCORE":..15,28);|
00001bb0  53 43 3b 0d 01 86 2a e3  20 46 3d 31 b8 4c 49 56  |SC;...*. F=1.LIV|
00001bc0  45 53 3a fb 30 3a f1 8a  46 2c 34 29 4d 41 4e 24  |ES:.0:..F,4)MAN$|
00001bd0  3b bd 31 30 3b 53 50 41  43 45 24 3a ed 0d 01 90  |;.10;SPACE$:....|
00001be0  07 fd 20 a3 0d 01 9a 0d  dd f2 49 4e 49 54 49 41  |.. .......INITIA|
00001bf0  4c 0d 01 a4 0b 2a 46 58  31 31 2c 34 0d 01 ae 10  |L....*FX11,4....|
00001c00  ef 32 33 2c 31 2c 30 3b  30 3b 30 3b 0d 01 b8 0e  |.23,1,0;0;0;....|
00001c10  ef 31 39 2c 32 2c 36 3b  30 3b 0d 01 c2 0e ef 31  |.19,2,6;0;.....1|
00001c20  39 2c 30 2c 34 3b 30 3b  0d 01 cc 2c e2 31 2c 30  |9,0,4;0;...,.1,0|
00001c30  2c 31 2c 2d 31 2c 30 2c  32 30 2c 32 30 2c 30 2c  |,1,-1,0,20,20,0,|
00001c40  31 32 36 2c 30 2c 30 2c  2d 31 32 36 2c 31 32 36  |126,0,0,-126,126|
00001c50  2c 31 32 36 0d 01 d6 2b  e2 32 2c 31 2c 30 2c 30  |,126...+.2,1,0,0|
00001c60  2c 30 2c 35 30 2c 32 35  2c 32 35 2c 31 32 37 2c  |,0,50,25,25,127,|
00001c70  2d 31 2c 2d 31 2c 2d 31  2c 31 32 36 2c 39 30 0d  |-1,-1,-1,126,90.|
00001c80  01 e0 3e 4c 45 56 45 4c  3d 36 3a 52 4f 4b 3d 30  |..>LEVEL=6:ROK=0|
00001c90  3a 52 4f 43 4b 3d a3 3a  47 55 50 3d b9 3a 4c 49  |:ROCK=.:GUP=.:LI|
00001ca0  56 45 53 3d 33 3a 58 03  7f 09 7d 06 00 00 74 09  |VES=3:X...}...t.|
00001cb0  00 00 3d 30 3a 59 3d 31  33 3a 41 3d 31 36 3a 47  |..=0:Y=13:A=16:G|
00001cc0  3d 31 33 3a 53 43 3d 30  0d 01 ea 34 52 49 47 48  |=13:SC=0...4RIGH|
00001cd0  54 3d a3 3a 41 52 57 31  3d a3 3a 47 55 41 52 44  |T=.:ARW1=.:GUARD|
00001ce0  53 3d a3 3a 48 49 54 3d  a3 3a 41 52 57 3d a3 3a  |S=.:HIT=.:ARW=.:|
00001cf0  42 45 4c 4c 3d b9 3a 45  53 4d 3d a3 0d 01 f4 28  |BELL=.:ESM=....(|
00001d00  20 4d 41 4e 24 3d bd 31  37 2b bd 31 2b bd 31 34  | MAN$=.17+.1+.14|
00001d10  35 2b bd 31 31 2b bd 38  2b bd 31 37 2b bd 30 2b  |5+.11+.8+.17+.0+|
00001d20  bd 31 34 34 0d 01 fe 28  4d 41 4e 32 24 3d bd 31  |.144...(MAN2$=.1|
00001d30  37 2b bd 31 2b bd 31 35  32 2b bd 31 31 2b bd 38  |7+.1+.152+.11+.8|
00001d40  2b bd 31 37 2b bd 30 2b  bd 31 34 34 0d 02 08 19  |+.17+.0+.144....|
00001d50  47 52 44 24 3d bd 31 34  37 2b bd 31 31 2b bd 38  |GRD$=.147+.11+.8|
00001d60  2b bd 31 34 36 0d 02 12  1a 45 53 4d 24 3d bd 31  |+.146....ESM$=.1|
00001d70  34 39 2b bd 31 31 2b bd  38 2b bd 31 34 38 20 0d  |49+.11+.8+.148 .|
00001d80  02 1c 0d 42 45 4c 24 3d  bd 31 35 30 0d 02 26 15  |...BEL$=.150..&.|
00001d90  41 52 57 24 3d bd 31 35  31 2b bd 33 32 2b bd 33  |ARW$=.151+.32+.3|
00001da0  32 0d 02 30 11 52 4f 4b  24 3d bd 33 32 2b bd 31  |2..0.ROK$=.32+.1|
00001db0  35 34 0d 02 3a 19 53 50  41 43 45 24 3d bd 33 32  |54..:.SPACE$=.32|
00001dc0  2b bd 31 31 2b bd 38 2b  bd 33 32 0d 02 44 27 20  |+.11+.8+.32..D' |
00001dd0  ef 32 33 2c 31 34 34 2c  38 2c 32 38 2c 36 30 2c  |.23,144,8,28,60,|
00001de0  35 32 2c 31 32 36 2c 32  35 30 2c 32 34 38 2c 32  |52,126,250,248,2|
00001df0  34 38 0d 02 4e 26 ef 32  33 2c 31 34 35 2c 32 34  |48..N&.23,145,24|
00001e00  38 2c 32 34 38 2c 31 32  30 2c 34 30 2c 34 30 2c  |8,248,120,40,40,|
00001e10  34 30 2c 34 30 2c 36 30  0d 02 58 27 ef 32 33 2c  |40,40,60..X'.23,|
00001e20  31 34 36 2c 32 34 2c 36  30 2c 31 32 36 2c 31 30  |146,24,60,126,10|
00001e30  32 2c 36 36 2c 36 36 2c  32 35 35 2c 32 35 35 0d  |2,66,66,255,255.|
00001e40  02 62 2b ef 32 33 2c 31  34 37 2c 32 35 35 2c 32  |.b+.23,147,255,2|
00001e50  35 35 2c 32 35 35 2c 31  32 36 2c 31 32 36 2c 31  |55,255,126,126,1|
00001e60  30 32 2c 31 30 32 2c 32  33 31 0d 02 6c 23 ef 32  |02,102,231..l#.2|
00001e70  33 2c 31 34 38 2c 30 2c  36 30 2c 36 30 2c 31 30  |3,148,0,60,60,10|
00001e80  38 2c 36 30 2c 32 38 2c  32 38 2c 33 30 0d 02 76  |8,60,28,28,30..v|
00001e90  27 ef 32 33 2c 31 34 39  2c 35 36 2c 32 34 38 2c  |'.23,149,56,248,|
00001ea0  35 36 2c 35 36 2c 31 32  34 2c 32 35 34 2c 32 35  |56,56,124,254,25|
00001eb0  34 2c 36 38 0d 02 80 26  ef 32 33 2c 31 35 30 2c  |4,68...&.23,150,|
00001ec0  31 36 2c 35 36 2c 35 36  2c 35 36 2c 31 32 34 2c  |16,56,56,56,124,|
00001ed0  32 35 34 2c 32 35 34 2c  31 36 0d 02 8a 1f ef 32  |254,254,16.....2|
00001ee0  33 2c 31 35 31 2c 30 2c  31 2c 36 36 2c 32 35 35  |3,151,0,1,66,255|
00001ef0  2c 36 36 2c 31 2c 30 2c  30 0d 02 94 26 ef 32 33  |,66,1,0,0...&.23|
00001f00  2c 31 35 32 2c 32 34 38  2c 32 34 38 2c 31 32 36  |,152,248,248,126|
00001f10  2c 33 34 2c 33 34 2c 33  34 2c 36 37 2c 36 34 0d  |,34,34,34,67,64.|
00001f20  02 9e 2b ef 32 33 2c 31  35 33 2c 32 35 35 2c 31  |..+.23,153,255,1|
00001f30  32 39 2c 31 32 39 2c 31  32 39 2c 31 32 39 2c 31  |29,129,129,129,1|
00001f40  32 39 2c 31 32 39 2c 32  35 35 0d 02 a8 21 ef 32  |29,129,255...!.2|
00001f50  33 2c 31 35 34 2c 30 2c  36 30 2c 31 32 36 2c 32  |3,154,0,60,126,2|
00001f60  35 35 2c 31 32 36 2c 36  30 2c 30 0d 02 b2 05 e1  |55,126,60,0.....|
00001f70  0d 02 bc 0c dd f2 53 43  52 45 45 4e 0d 02 c6 2b  |......SCREEN...+|
00001f80  e7 20 53 43 4e 3d 32 20  84 20 53 43 4e 3d 33 20  |. SCN=2 . SCN=3 |
00001f90  8c 20 d4 31 2c 32 2c 31  34 30 2c 38 3a d4 31 2c  |. .1,2,140,8:.1,|
00001fa0  32 2c 31 35 30 2c 34 0d  02 d0 22 e7 20 53 43 4e  |2,150,4...". SCN|
00001fb0  3d 34 20 8c 20 f2 45 53  4d 54 55 4e 45 3a e3 4a  |=4 . .ESMTUNE:.J|
00001fc0  3d 30 b8 32 30 30 30 3a  ed 0d 02 da 05 db 0d 02  |=0.2000:........|
00001fd0  e4 24 fb 33 3a fb 31 32  39 3a f1 8a 30 2c 31 35  |.$.3:.129:..0,15|
00001fe0  29 3b 3a e3 46 3d 30 b8  33 33 39 3a ef 31 35 33  |);:.F=0.339:.153|
00001ff0  3a ed 0d 02 ee 2e e3 4e  3d 31 34 b8 31 37 3a e3  |:......N=14.17:.|
00002000  46 3d 34 b8 31 37 88 34  3a fb 31 33 31 3a f1 8a  |F=4.17.4:.131:..|
00002010  46 2c 4e 29 3b 22 20 20  22 3a ed 46 3a ed 4e 20  |F,N);"  ":.F:.N |
00002020  0d 02 f8 1c e7 20 53 43  4e 3c 3e 34 20 8c 20 42  |..... SCN<>4 . B|
00002030  4f 4e 55 53 3d 53 43 4e  2a 34 30 30 0d 03 02 14  |ONUS=SCN*400....|
00002040  e7 20 53 43 4e 3d 31 20  8c 20 e5 20 8d 54 6a 43  |. SCN=1 . . .TjC|
00002050  0d 03 0c 1c e7 20 53 43  4e 3d 32 20 8c 20 47 55  |..... SCN=2 . GU|
00002060  41 52 44 53 3d b9 3a e5  8d 54 6a 43 0d 03 16 2f  |ARDS=.:..TjC.../|
00002070  e7 20 53 43 4e 3d 33 20  8c 20 47 55 41 52 44 53  |. SCN=3 . GUARDS|
00002080  3d b9 3a 42 45 4c 4c 3d  a3 3a 41 52 57 3d b9 3a  |=.:BELL=.:ARW=.:|
00002090  45 53 4d 3d b9 3a e5 8d  54 74 43 0d 03 20 4d e7  |ESM=.:..TtC.. M.|
000020a0  20 53 43 4e 3d 34 20 8c  20 53 43 4e 3d 31 3a 41  | SCN=4 . SCN=1:A|
000020b0  52 57 3d a3 3a 47 55 41  52 44 53 3d a3 3a 4c 45  |RW=.:GUARDS=.:LE|
000020c0  56 45 4c 3d 4c 45 56 45  4c 2d 31 3a 42 4f 4e 55  |VEL=LEVEL-1:BONU|
000020d0  53 3d 53 43 4e 2a 35 30  30 3a 4c 49 56 45 53 3d  |S=SCN*500:LIVES=|
000020e0  4c 49 56 45 53 2b 2e 35  0d 03 2a 2e fb 32 3a f1  |LIVES+.5..*..2:.|
000020f0  8a 31 39 2c 31 30 29 3b  42 45 4c 24 3a e7 20 4c  |.19,10);BEL$:. L|
00002100  45 56 45 4c 3c 31 20 8c  20 4c 45 56 45 4c 3d 31  |EVEL<1 . LEVEL=1|
00002110  3a e1 20 8b 20 e1 0d 03  34 48 e7 20 45 53 4d 3d  |:. . ...4H. ESM=|
00002120  b9 20 8c 20 fb 32 3a f1  8a 31 39 2c 35 29 3b 45  |. . .2:..19,5);E|
00002130  53 4d 24 3a fb 31 32 39  3a fb 33 3a f1 8a 31 38  |SM$:.129:.3:..18|
00002140  2c 36 29 3b bd 31 35 33  2b bd 31 35 33 2b bd 38  |,6);.153+.153+.8|
00002150  2b bd 31 30 2b bd 31 35  33 3a fb 31 33 31 0d 03  |+.10+.153:.131..|
00002160  3e 05 e1 0d 03 48 12 dd  f2 4d 41 4e 4a 55 4d 50  |>....H...MANJUMP|
00002170  52 49 47 48 54 0d 03 52  0d d4 31 2c 31 2c 30 2c  |RIGHT..R..1,1,0,|
00002180  31 30 0d 03 5c 73 f1 8a  58 2c 59 29 3b 53 50 41  |10..\s..X,Y);SPA|
00002190  43 45 24 3b 59 3d 59 2d  31 3a f1 8a 58 2c 59 29  |CE$;Y=Y-1:..X,Y)|
000021a0  3b 4d 41 4e 32 24 3a f1  8a 58 2c 59 29 3b 53 50  |;MAN2$:..X,Y);SP|
000021b0  41 43 45 24 3a 58 3d 58  2b 31 3a f1 8a 58 2c 59  |ACE$:X=X+1:..X,Y|
000021c0  29 4d 41 4e 24 3a f1 8a  58 2c 59 29 3b 53 50 41  |)MAN$:..X,Y);SPA|
000021d0  43 45 24 3a 58 3d 58 2b  31 3a f1 8a 58 2c 59 29  |CE$:X=X+1:..X,Y)|
000021e0  4d 41 4e 32 24 3a f1 8a  58 2c 59 29 3b 53 50 41  |MAN2$:..X,Y);SPA|
000021f0  43 45 24 20 20 0d 03 66  31 e7 20 53 43 4e 3e 31  |CE$  ..f1. SCN>1|
00002200  20 80 20 58 3e 34 20 80  20 28 47 3d 59 20 84 20  | . X>4 . (G=Y . |
00002210  47 3d 59 2b 31 20 84 20  47 3d 59 2d 31 29 20 8c  |G=Y+1 . G=Y-1) .|
00002220  20 f2 44 45 41 44 0d 03  70 05 e1 0d 03 7a 2c f1  | .DEAD..p....z,.|
00002230  8a 32 2c 31 30 29 22 47  20 41 20 4d 20 45 20 20  |.2,10)"G A M E  |
00002240  4f 20 56 20 45 20 52 22  3a e3 20 46 3d 30 20 b8  |O V E R":. F=0 .|
00002250  20 32 35 30 30 3a ed 0d  03 84 1a fb 31 3a db 3a  | 2500:......1:.:|
00002260  f1 27 27 27 89 35 22 51  55 41 53 49 4d 4f 44 4f  |.'''.5"QUASIMODO|
00002270  22 0d 03 8e 20 fb 30 3a  f1 27 27 22 48 20 49 20  |"... .0:.''"H I |
00002280  47 20 48 20 20 53 20 43  20 4f 20 52 20 45 20 53  |G H  S C O R E S|
00002290  22 0d 03 98 15 e7 20 53  43 3e 48 53 43 20 8c 20  |"..... SC>HSC . |
000022a0  48 53 43 3d 53 43 0d 03  a2 1a f1 27 27 89 33 22  |HSC=SC.....''.3"|
000022b0  48 49 47 48 20 53 43 4f  52 45 3d 22 3b 48 53 43  |HIGH SCORE=";HSC|
000022c0  0d 03 ac 19 f1 27 27 89  33 22 59 4f 55 52 20 53  |.....''.3"YOUR S|
000022d0  43 4f 52 45 3d 22 3b 53  43 0d 03 b6 18 f1 8a 35  |CORE=";SC......5|
000022e0  2c 33 30 29 22 50 52 45  53 53 20 53 50 41 43 45  |,30)"PRESS SPACE|
000022f0  22 0d 03 c0 0b 2a 46 58  31 35 2c 30 0d 03 ca 0c  |"....*FX15,0....|
00002300  f5 20 fd 20 a5 3d 33 32  0d 03 d4 09 e5 8d 54 5e  |. . .=32......T^|
00002310  40 0d 03 de 0c dd f2 47  55 41 52 44 53 0d 03 e8  |@......GUARDS...|
00002320  39 f1 8a 34 2c 47 29 53  50 41 43 45 24 3a f1 8a  |9..4,G)SPACE$:..|
00002330  38 2c 47 29 53 50 41 43  45 24 3a f1 8a 31 32 2c  |8,G)SPACE$:..12,|
00002340  47 29 53 50 41 43 45 24  3a f1 8a 31 36 2c 47 29  |G)SPACE$:..16,G)|
00002350  53 50 41 43 45 24 0d 03  f2 13 e7 20 47 55 50 3d  |SPACE$..... GUP=|
00002360  b9 20 8c 20 47 3d 47 2d  31 0d 03 fc 13 e7 20 47  |. . G=G-1..... G|
00002370  55 50 3d a3 20 8c 20 47  3d 47 2b 31 0d 04 06 12  |UP=. . G=G+1....|
00002380  e7 20 47 3d 31 37 20 8c  20 47 55 50 3d b9 0d 04  |. G=17 . GUP=...|
00002390  10 12 e7 20 47 3d 31 31  20 8c 20 47 55 50 3d a3  |... G=11 . GUP=.|
000023a0  0d 04 1a 36 20 fb 35 3a  f1 8a 34 2c 47 29 47 52  |...6 .5:..4,G)GR|
000023b0  44 24 3a f1 8a 38 2c 47  29 47 52 44 24 3a f1 8a  |D$:..8,G)GRD$:..|
000023c0  31 32 2c 47 29 47 52 44  24 3a f1 8a 31 36 2c 47  |12,G)GRD$:..16,G|
000023d0  29 47 52 44 24 20 0d 04  24 05 e1 0d 04 2e 0d dd  |)GRD$ ..$.......|
000023e0  f2 41 52 57 4d 4f 56 45  0d 04 38 0f f1 8a 41 2c  |.ARWMOVE..8...A,|
000023f0  31 33 29 41 52 57 24 0d  04 42 09 41 3d 41 2d 31  |13)ARW$..B.A=A-1|
00002400  0d 04 4c 23 e7 20 41 3d  30 20 8c 20 f1 8a 30 2c  |..L#. A=0 . ..0,|
00002410  31 33 29 22 20 20 22 3a  41 52 57 31 3d a3 3a 41  |13)"  ":ARW1=.:A|
00002420  3d 31 37 0d 04 56 05 e1  0d 04 60 0a dd f2 44 45  |=17..V....`...DE|
00002430  41 44 0d 04 6a 57 4c 49  56 45 53 3d 4c 49 56 45  |AD..jWLIVES=LIVE|
00002440  53 2d 31 3a e3 20 46 3d  34 b8 37 3a d4 30 2c 2d  |S-1:. F=4.7:.0,-|
00002450  31 35 2c 46 2c 32 3a ed  3a e3 20 46 3d 30 b8 35  |15,F,2:.:. F=0.5|
00002460  30 30 3a ed 3a f1 8a 58  2c 59 29 53 50 41 43 45  |00:.:..X,Y)SPACE|
00002470  24 3a 58 3d 30 3a 59 3d  31 33 3a 42 4f 4e 55 53  |$:X=0:Y=13:BONUS|
00002480  3d 53 43 4e 2a 35 30 30  20 0d 04 74 05 e1 0d 04  |=SCN*500 ..t....|
00002490  7e 0a dd f2 4a 55 4d 50  0d 04 88 71 f1 8a 58 2c  |~...JUMP...q..X,|
000024a0  59 29 53 50 41 43 45 24  3a 59 3d 59 2d 31 3a f1  |Y)SPACE$:Y=Y-1:.|
000024b0  8a 58 2c 59 29 4d 41 4e  24 3a f1 8a 58 2c 59 29  |.X,Y)MAN$:..X,Y)|
000024c0  53 50 41 43 45 24 3a 59  3d 59 2d 31 3a f1 8a 58  |SPACE$:Y=Y-1:..X|
000024d0  2c 59 29 4d 41 4e 24 3a  f1 8a 58 2c 59 29 53 50  |,Y)MAN$:..X,Y)SP|
000024e0  41 43 45 24 3a 59 3d 59  2d 31 3a f1 8a 58 2c 59  |ACE$:Y=Y-1:..X,Y|
000024f0  29 4d 41 4e 24 3a f1 8a  58 2c 59 29 53 50 41 43  |)MAN$:..X,Y)SPAC|
00002500  45 24 3a 59 3d 59 2d 31  20 0d 04 92 0f e7 20 59  |E$:Y=Y-1 ..... Y|
00002510  3c 38 20 8c 20 59 3d 38  0d 04 9c 05 e1 0d 04 a6  |<8 . Y=8........|
00002520  14 20 dd f2 45 53 4d 54  55 4e 45 3a f7 8d 64 58  |. ..ESMTUNE:..dX|
00002530  44 0d 04 b0 27 e3 20 51  3d 31 b8 31 30 3a f3 41  |D...'. Q=1.10:.A|
00002540  53 2c 49 3a d4 31 2c 2d  31 35 2c 41 53 2b 32 30  |S,I:.1,-15,AS+20|
00002550  2c 49 3a ed 51 3a e1 20  0d 04 ba 0a dd f2 54 55  |,I:.Q:. ......TU|
00002560  4e 45 0d 04 c4 2a f7 8d  64 4e 44 3a e3 20 51 3d  |NE...*..dND:. Q=|
00002570  31 b8 31 34 3a f3 5a 2c  56 3a d4 31 2c 2d 31 35  |1.14:.Z,V:.1,-15|
00002580  2c 5a 2d 33 30 2c 56 3a  ed 51 3a e1 0d 04 ce 4b  |,Z-30,V:.Q:....K|
00002590  dc 20 34 30 2c 33 2c 34  34 2c 33 2c 34 38 2c 33  |. 40,3,44,3,48,3|
000025a0  2c 35 32 2c 33 2c 34 30  2c 33 2c 34 34 2c 33 2c  |,52,3,40,3,44,3,|
000025b0  34 38 2c 33 2c 35 32 2c  33 2c 34 30 2c 33 2c 34  |48,3,52,3,40,3,4|
000025c0  34 2c 33 2c 34 38 2c 33  2c 35 32 2c 33 2c 34 38  |4,3,48,3,52,3,48|
000025d0  2c 38 2c 33 34 2c 37 0d  04 d8 38 dc 33 30 2c 31  |,8,34,7...8.30,1|
000025e0  30 2c 34 30 2c 37 2c 35  30 2c 35 2c 34 30 2c 31  |0,40,7,50,5,40,1|
000025f0  30 2c 33 30 2c 37 2c 33  30 2c 34 2c 34 30 2c 35  |0,30,7,30,4,40,5|
00002600  2c 36 32 2c 36 2c 36 39  2c 34 2c 36 32 2c 36 0d  |,62,6,69,4,62,6.|
00002610  04 e2 15 eb 36 3a f6 3a  f1 20 9e 3a 2a 46 58 31  |....6:.:. .:*FX1|
00002620  32 2c 30 20 0d ff 04 0f  00 00 0e ff ff 23 80 ff  |2,0 .........#..|
00002630  ff 33 00 00 00 02 1e 00  3a 30 2e 24 2e 47 41 4d  |.3......:0.$.GAM|
00002640  45 53 32 0d 53 54 4f 4e  45 48 45 4e 47 45 0d 73  |ES2.STONEHENGE.s|
00002650  10 00 00 03 7e 10 00 00  00 00 73 10 00 00 0d 00  |....~.....s.....|
00002660  0a 18 f4 20 50 72 6f 67  72 61 6d 20 53 74 6f 6e  |... Program Ston|
00002670  65 68 65 6e 67 65 0d 00  14 12 f4 20 56 65 72 73  |ehenge..... Vers|
00002680  69 6f 6e 20 42 30 2e 31  0d 00 1e 11 f4 20 42 69  |ion B0.1..... Bi|
00002690  6c 6c 20 57 61 6c 6b 65  72 0d 00 28 16 f4 20 42  |ll Walker..(.. B|
000026a0  55 55 42 55 47 20 4a 75  6e 65 20 31 39 38 35 0d  |UUBUG June 1985.|
000026b0  00 32 06 f4 3a 0d 00 46  0e ee 20 85 20 e5 20 8d  |.2..:..F.. . . .|
000026c0  64 58 49 0d 00 50 05 3a  0d 00 64 06 eb 31 0d 00  |dXI..P.:..d..1..|
000026d0  6e 0a f2 73 65 74 75 70  0d 00 78 09 f2 69 6e 69  |n..setup..x..ini|
000026e0  74 0d 00 82 14 e3 20 41  5a 3d 2d 34 30 b8 33 30  |t..... AZ=-40.30|
000026f0  20 88 20 31 30 0d 00 8c  0e 41 4c 3d 33 30 2a 9b  | . 10....AL=30*.|
00002700  b2 41 5a 0d 00 96 09 f2  63 61 6c 63 0d 00 a0 08  |.AZ.....calc....|
00002710  f2 70 69 63 0d 00 aa 08  ed 20 41 5a 0d 00 b4 19  |.pic..... AZ....|
00002720  e3 20 56 58 25 3d 31 30  30 30 b8 32 30 30 30 20  |. VX%=1000.2000 |
00002730  88 20 31 30 30 0d 00 be  09 f2 63 61 6c 63 0d 00  |. 100.....calc..|
00002740  c8 08 f2 70 69 63 0d 00  d2 05 ed 0d 00 dc 06 ef  |...pic..........|
00002750  34 0d 00 e6 05 e0 0d 00  f0 05 3a 0d 03 e8 0b dd  |4.........:.....|
00002760  f2 73 65 74 75 70 0d 03  f2 1c 4e 25 3d 31 31 3a  |.setup....N%=11:|
00002770  f4 20 4e 75 6d 62 65 72  20 6f 66 20 73 74 6f 6e  |. Number of ston|
00002780  65 73 0d 03 fc 1b 53 25  3d 36 30 30 3a f4 20 50  |es....S%=600:. P|
00002790  6c 6f 74 74 69 6e 67 20  73 63 61 6c 65 0d 04 06  |lotting scale...|
000027a0  30 56 58 25 3d 31 30 30  30 3a f4 20 56 69 65 77  |0VX%=1000:. View|
000027b0  70 6f 69 6e 74 20 2d 20  73 63 72 65 65 6e 20 69  |point - screen i|
000027c0  73 20 70 6c 61 6e 65 20  78 3d 56 58 25 0d 04 10  |s plane x=VX%...|
000027d0  24 47 25 3d 2d 32 30 30  3a f4 20 47 72 6f 75 6e  |$G%=-200:. Groun|
000027e0  64 20 69 73 20 61 74 20  68 65 69 67 68 74 20 47  |d is at height G|
000027f0  25 0d 04 1a 18 de 20 42  25 28 4e 25 2c 37 2c 32  |%..... B%(N%,7,2|
00002800  29 2c 54 25 28 37 2c 31  29 0d 04 24 3c f4 20 42  |),T%(7,1)..$<. B|
00002810  25 28 29 20 68 6f 6c 64  73 20 74 68 65 20 33 44  |%() holds the 3D|
00002820  20 63 6f 6f 72 64 69 6e  61 74 65 73 20 20 6f 66  | coordinates  of|
00002830  20 65 61 63 68 20 62 6c  6f 63 6b 27 73 20 63 6f  | each block's co|
00002840  72 6e 65 72 73 0d 04 2e  23 f4 20 54 25 28 29 20  |rners...#. T%() |
00002850  68 6f 6c 64 73 20 74 68  65 20 32 44 20 63 6f 6f  |holds the 2D coo|
00002860  72 64 69 6e 61 74 65 73  0d 04 38 2a 41 5a 3d 33  |rdinates..8*AZ=3|
00002870  30 3a f4 20 53 75 6e 27  73 20 61 6e 67 6c 65 20  |0:. Sun's angle |
00002880  72 6f 75 6e 64 20 66 72  6f 6d 20 20 20 4e 6f 72  |round from   Nor|
00002890  74 68 0d 04 42 2b 41 4c  3d 32 30 3a f4 20 53 75  |th..B+AL=20:. Su|
000028a0  6e 27 73 20 61 6e 67 6c  65 20 75 70 20 66 72 6f  |n's angle up fro|
000028b0  6d 20 20 20 20 20 20 67  72 6f 75 6e 64 0d 04 4c  |m      ground..L|
000028c0  37 f2 63 61 6c 63 3a f4  20 67 65 6e 65 72 61 74  |7.calc:. generat|
000028d0  65 20 73 68 61 64 6f 77  20 20 20 20 20 20 66 61  |e shadow      fa|
000028e0  63 74 6f 72 73 20 66 72  6f 6d 20 41 4c 20 61 6e  |ctors from AL an|
000028f0  64 20 41 5a 0d 04 56 17  f4 20 64 65 66 20 63 68  |d AZ..V.. def ch|
00002900  61 72 73 20 66 6f 72 20  53 75 6e 0d 04 60 1d ef  |ars for Sun..`..|
00002910  32 33 2c 32 32 34 2c 30  2c 30 2c 34 2c 30 2c 32  |23,224,0,0,4,0,2|
00002920  2c 33 2c 34 32 2c 33 31  0d 04 6a 29 ef 32 33 2c  |,3,42,31..j).23,|
00002930  32 32 35 2c 38 2c 35 31  2c 32 33 38 2c 32 32 38  |225,8,51,238,228|
00002940  2c 32 34 36 2c 32 32 33  2c 32 35 35 2c 32 35 35  |,246,223,255,255|
00002950  20 0d 04 74 26 ef 32 33  2c 32 32 36 2c 30 2c 31  | ..t&.23,226,0,1|
00002960  32 38 2c 33 32 2c 38 2c  31 39 32 2c 32 32 34 2c  |28,32,8,192,224,|
00002970  32 32 34 2c 32 35 30 0d  04 7e 23 ef 32 33 2c 32  |224,250..~#.23,2|
00002980  32 37 2c 36 33 2c 32 33  2c 34 33 2c 34 37 2c 37  |27,63,23,43,47,7|
00002990  39 2c 37 39 2c 34 33 2c  35 35 0d 04 88 2f ef 32  |9,79,43,55.../.2|
000029a0  33 2c 32 32 38 2c 32 35  35 2c 32 35 35 2c 32 35  |3,228,255,255,25|
000029b0  35 2c 32 35 35 2c 32 35  35 2c 32 35 35 2c 32 35  |5,255,255,255,25|
000029c0  35 2c 32 35 35 2c 32 35  35 0d 04 92 2b ef 32 33  |5,255,255...+.23|
000029d0  2c 32 32 39 2c 32 34 32  2c 32 35 32 2c 32 34 34  |,229,242,252,244|
000029e0  2c 32 35 31 2c 31 38 38  2c 32 33 38 2c 31 39 30  |,251,188,238,190|
000029f0  2c 32 32 38 0d 04 9c 1d  ef 32 33 2c 32 33 30 2c  |,228.....23,230,|
00002a00  33 31 2c 37 2c 37 2c 31  33 2c 36 2c 30 2c 31 2c  |31,7,7,13,6,0,1,|
00002a10  30 0d 04 a6 27 ef 32 33  2c 32 33 31 2c 32 35 35  |0...'.23,231,255|
00002a20  2c 32 35 34 2c 31 32 37  2c 36 33 2c 32 39 2c 31  |,254,127,63,29,1|
00002a30  31 39 2c 32 32 2c 34 34  0d 04 b0 29 ef 32 33 2c  |19,22,44...).23,|
00002a40  32 33 32 2c 31 36 34 2c  32 33 32 2c 32 34 34 2c  |232,164,232,244,|
00002a50  31 34 34 2c 32 34 30 2c  31 39 32 2c 31 32 38 2c  |144,240,192,128,|
00002a60  30 0d 04 ba 4b 53 55 4e  24 3d bd 32 32 34 2b bd  |0...KSUN$=.224+.|
00002a70  32 32 35 2b bd 32 32 36  2b c4 33 2c bd 38 29 2b  |225+.226+.3,.8)+|
00002a80  bd 31 30 2b bd 32 32 37  2b bd 32 32 38 2b bd 32  |.10+.227+.228+.2|
00002a90  32 39 2b c4 33 2c bd 38  29 2b bd 31 30 2b bd 32  |29+.3,.8)+.10+.2|
00002aa0  33 30 2b bd 32 33 31 2b  bd 32 33 32 0d 04 c4 11  |30+.231+.232....|
00002ab0  ef 32 39 2c 36 34 30 3b  35 31 32 3b 35 0d 04 ce  |.29,640;512;5...|
00002ac0  2d 4d 41 53 4b 3d 32 3a  43 4f 4c 3d 37 3a f4 20  |-MASK=2:COL=7:. |
00002ad0  55 73 65 64 20 69 6e 20  70 61 6c 65 74 74 65 20  |Used in palette |
00002ae0  20 73 77 69 74 63 68 69  6e 67 0d 04 d8 1d f4 20  | switching..... |
00002af0  61 73 73 65 6d 62 6c 65  20 63 6c 73 2f 67 72 6f  |assemble cls/gro|
00002b00  75 6e 64 20 6d 2f 63 0d  04 e2 0c 4d 43 25 3d 26  |und m/c....MC%=&|
00002b10  41 30 30 0d 04 ec 14 e3  49 25 3d 30 b8 32 88 32  |A00.....I%=0.2.2|
00002b20  3a 50 25 3d 4d 43 25 0d  04 f6 0b 5b 4f 50 54 20  |:P%=MC%....[OPT |
00002b30  49 25 0d 05 00 1b 20 4c  44 41 23 26 33 30 3a 53  |I%.... LDA#&30:S|
00002b40  54 41 26 37 31 3b 53 43  52 4e 20 48 49 0d 05 0a  |TA&71;SCRN HI...|
00002b50  18 4c 44 41 23 26 32 38  3a 53 54 41 26 37 32 3b  |.LDA#&28:STA&72;|
00002b60  9c 20 48 49 20 0d 05 14  1a 4c 44 41 23 26 30 30  |. HI ....LDA#&00|
00002b70  3a 53 54 41 26 37 30 3b  53 43 52 4e 20 4c 4f 0d  |:STA&70;SCRN LO.|
00002b80  05 1e 07 54 41 59 0d 05  28 18 4c 44 41 23 26 37  |...TAY..(.LDA#&7|
00002b90  34 3a 80 23 26 35 35 3a  53 54 41 26 37 35 0d 05  |4:.#&55:STA&75..|
00002ba0  32 18 4c 44 41 23 26 37  34 3a 80 23 26 41 41 3a  |2.LDA#&74:.#&AA:|
00002bb0  53 54 41 26 37 36 0d 05  3c 18 4c 44 41 23 26 37  |STA&76..<.LDA#&7|
00002bc0  34 3a 82 23 26 46 46 3a  53 54 41 26 37 34 0d 05  |4:.#&FF:STA&74..|
00002bd0  46 07 54 41 58 0d 05 50  0b 2e 4c 30 20 54 58 41  |F.TAX..P..L0 TXA|
00002be0  0d 05 5a 17 80 28 26 37  30 29 2c 59 3a 53 54 41  |..Z..(&70),Y:STA|
00002bf0  28 26 37 30 29 2c 59 0d  05 64 0e 49 4e 59 3a 42  |(&70),Y..d.INY:B|
00002c00  4e 45 20 4c 30 0d 05 6e  18 49 4e 43 26 37 31 3a  |NE L0..n.INC&71:|
00002c10  44 45 43 26 37 32 3a 42  4e 45 20 4c 30 0d 05 78  |DEC&72:BNE L0..x|
00002c20  13 4c 44 41 23 26 32 38  3a 53 54 41 26 37 32 3b  |.LDA#&28:STA&72;|
00002c30  0d 05 82 0b 2e 4c 31 20  54 58 41 0d 05 8c 1d 80  |.....L1 TXA.....|
00002c40  28 26 37 30 29 2c 59 3a  84 41 26 37 35 3a 53 54  |(&70),Y:.A&75:ST|
00002c50  41 28 26 37 30 29 2c 59  0d 05 96 0b 49 4e 59 3a  |A(&70),Y....INY:|
00002c60  54 58 41 0d 05 a0 1d 80  28 26 37 30 29 2c 59 3a  |TXA.....(&70),Y:|
00002c70  84 41 26 37 36 3a 53 54  41 28 26 37 30 29 2c 59  |.A&76:STA(&70),Y|
00002c80  0d 05 aa 0e 49 4e 59 3a  42 4e 45 20 4c 31 0d 05  |....INY:BNE L1..|
00002c90  b4 18 49 4e 43 26 37 31  3a 44 45 43 26 37 32 3a  |..INC&71:DEC&72:|
00002ca0  42 4e 45 20 4c 31 0d 05  be 07 52 54 53 0d 05 c8  |BNE L1....RTS...|
00002cb0  07 5d 3a ed 0d 05 d2 0c  3f 26 37 34 3d 26 30 46  |.]:.....?&74=&0F|
00002cc0  0d 05 dc 05 e1 0d 05 e6  05 3a 0d 05 f0 0a dd f2  |.........:......|
00002cd0  69 6e 69 74 0d 05 fa 1f  f4 20 42 75 69 6c 64 20  |init..... Build |
00002ce0  73 74 6f 6e 65 73 27 20  63 6f 6f 72 64 69 6e 61  |stones' coordina|
00002cf0  74 65 73 0d 06 04 14 ea  20 42 25 2c 41 25 2c 51  |tes..... B%,A%,Q|
00002d00  41 25 2c 52 2c 52 43 0d  06 0e 1a 52 3d 34 30 30  |A%,R,RC....R=400|
00002d10  3a f4 20 52 61 64 69 75  73 20 6f 66 20 72 69 6e  |:. Radius of rin|
00002d20  67 0d 06 18 28 52 43 3d  33 30 30 3a f4 20 63 65  |g...(RC=300:. ce|
00002d30  6e 74 72 65 20 6f 66 20  72 69 6e 67 20 6f 6e 20  |ntre of ring on |
00002d40  78 20 20 20 20 61 78 69  73 0d 06 22 08 42 25 3d  |x    axis..".B%=|
00002d50  30 0d 06 2c 0a f7 20 8d  44 40 46 0d 06 36 2e f4  |0..,.. .D@F..6..|
00002d60  20 41 6e 67 6c 65 20 6f  66 20 73 74 6f 6e 65 73  | Angle of stones|
00002d70  27 20 76 69 73 69 62 6c  65 20 73 69 64 65 73 20  |' visible sides |
00002d80  74 6f 20 76 69 65 77 65  72 0d 06 40 28 dc 2d 33  |to viewer..@(.-3|
00002d90  30 2c 33 30 2c 30 2c 30  2c 33 30 2c 2d 33 30 2c  |0,30,0,0,30,-30,|
00002da0  36 30 2c 2d 36 30 2c 30  2c 30 2c 33 30 2c 2d 33  |60,-60,0,0,30,-3|
00002db0  30 0d 06 4a 2a 49 25 3d  33 36 30 2f 28 4e 25 2b  |0..J*I%=360/(N%+|
00002dc0  31 29 3a e3 20 41 25 3d  31 38 30 2d 49 25 2f 32  |1):. A%=180-I%/2|
00002dd0  20 b8 20 31 35 20 88 20  2d 49 25 0d 06 54 09 f3  | . 15 . -I%..T..|
00002de0  20 51 41 25 0d 06 5e 16  f2 62 6c 69 6e 69 74 28  | QA%..^..blinit(|
00002df0  42 25 2c 41 25 2c 51 41  25 29 0d 06 68 09 f3 20  |B%,A%,QA%)..h.. |
00002e00  51 41 25 0d 06 72 19 f2  62 6c 69 6e 69 74 28 42  |QA%..r..blinit(B|
00002e10  25 2b 31 2c 2d 41 25 2c  51 41 25 29 0d 06 7c 0b  |%+1,-A%,QA%)..|.|
00002e20  42 25 3d 42 25 2b 32 0d  06 86 05 ed 0d 06 90 05  |B%=B%+2.........|
00002e30  e1 0d 06 9a 05 3a 0d 06  a4 17 dd f2 62 6c 69 6e  |.....:......blin|
00002e40  69 74 28 42 25 2c 41 25  2c 51 41 25 29 0d 06 ae  |it(B%,A%,QA%)...|
00002e50  23 f4 20 62 75 69 6c 64  20 6f 6e 65 20 73 74 6f  |#. build one sto|
00002e60  6e 65 27 73 20 63 6f 6f  72 64 69 6e 61 74 65 73  |ne's coordinates|
00002e70  0d 06 b8 16 ea 20 43 2c  53 2c 58 2c 59 2c 43 58  |..... C,S,X,Y,CX|
00002e80  2c 43 59 2c 49 25 0d 06  c2 12 20 43 58 3d 52 25  |,CY,I%.... CX=R%|
00002e90  2a 9b b2 41 25 2b 52 43  0d 06 cc 0f 20 43 59 3d  |*..A%+RC.... CY=|
00002ea0  52 25 2a b5 b2 41 25 0d  06 d6 0e 53 3d 32 30 2a  |R%*..A%....S=20*|
00002eb0  b5 b2 51 41 25 0d 06 e0  0e 43 3d 32 30 2a 9b b2  |..QA%....C=20*..|
00002ec0  51 41 25 0d 06 ea 11 58  3d 53 2b 43 58 3a 59 3d  |QA%....X=S+CX:Y=|
00002ed0  43 2b 43 59 0d 06 f4 38  20 42 25 28 42 25 2c 30  |C+CY...8 B%(B%,0|
00002ee0  2c 30 29 3d 58 3a 42 25  28 42 25 2c 34 2c 30 29  |,0)=X:B%(B%,4,0)|
00002ef0  3d 58 3a 42 25 28 42 25  2c 30 2c 31 29 3d 59 3a  |=X:B%(B%,0,1)=Y:|
00002f00  42 25 28 42 25 2c 34 2c  31 29 3d 59 0d 06 fe 12  |B%(B%,4,1)=Y....|
00002f10  58 3d 43 2b 43 58 3a 59  3d 2d 53 2b 43 59 0d 07  |X=C+CX:Y=-S+CY..|
00002f20  08 37 42 25 28 42 25 2c  31 2c 30 29 3d 58 3a 42  |.7B%(B%,1,0)=X:B|
00002f30  25 28 42 25 2c 35 2c 30  29 3d 58 3a 42 25 28 42  |%(B%,5,0)=X:B%(B|
00002f40  25 2c 31 2c 31 29 3d 59  3a 42 25 28 42 25 2c 35  |%,1,1)=Y:B%(B%,5|
00002f50  2c 31 29 3d 59 0d 07 12  13 58 3d 2d 53 2b 43 58  |,1)=Y....X=-S+CX|
00002f60  3a 59 3d 2d 43 2b 43 59  0d 07 1c 38 42 25 28 42  |:Y=-C+CY...8B%(B|
00002f70  25 2c 32 2c 30 29 3d 58  3a 42 25 28 42 25 2c 36  |%,2,0)=X:B%(B%,6|
00002f80  2c 30 29 3d 58 3a 42 25  28 42 25 2c 32 2c 31 29  |,0)=X:B%(B%,2,1)|
00002f90  3d 59 3a 42 25 28 42 25  2c 36 2c 31 29 3d 59 20  |=Y:B%(B%,6,1)=Y |
00002fa0  0d 07 26 12 58 3d 2d 43  2b 43 58 3a 59 3d 53 2b  |..&.X=-C+CX:Y=S+|
00002fb0  43 59 0d 07 30 37 42 25  28 42 25 2c 33 2c 30 29  |CY..07B%(B%,3,0)|
00002fc0  3d 58 3a 42 25 28 42 25  2c 37 2c 30 29 3d 58 3a  |=X:B%(B%,7,0)=X:|
00002fd0  42 25 28 42 25 2c 33 2c  31 29 3d 59 3a 42 25 28  |B%(B%,3,1)=Y:B%(|
00002fe0  42 25 2c 37 2c 31 29 3d  59 0d 07 3a 0b e3 49 25  |B%,7,1)=Y..:..I%|
00002ff0  3d 30 b8 33 0d 07 44 15  42 25 28 42 25 2c 49 25  |=0.3..D.B%(B%,I%|
00003000  2c 32 29 3d 47 25 2b 38  30 0d 07 4e 14 42 25 28  |,2)=G%+80..N.B%(|
00003010  42 25 2c 49 25 2b 34 2c  32 29 3d 47 25 0d 07 58  |B%,I%+4,2)=G%..X|
00003020  08 ed 20 49 25 0d 07 62  05 e1 0d 07 6c 05 3a 0d  |.. I%..b....l.:.|
00003030  07 76 0a dd f2 63 61 6c  63 0d 07 80 23 f4 20 73  |.v...calc...#. s|
00003040  68 61 64 6f 77 20 66 61  63 74 6f 72 73 20 66 72  |hadow factors fr|
00003050  6f 6d 20 41 4c 20 61 6e  64 20 41 5a 0d 07 8a 15  |om AL and AZ....|
00003060  53 46 58 3d 9b 20 b2 20  41 5a 2f b7 20 b2 20 41  |SFX=. . AZ/. . A|
00003070  4c 0d 07 94 16 53 46 59  3d 2d b5 20 b2 20 41 5a  |L....SFY=-. . AZ|
00003080  2f b7 20 b2 20 41 4c 0d  07 9e 05 e1 0d 07 a8 05  |/. . AL.........|
00003090  3a 0d 07 b2 09 dd f2 70  69 63 0d 07 bc 1f f4 20  |:......pic..... |
000030a0  64 72 61 77 20 70 69 63  20 67 69 76 65 6e 20 41  |draw pic given A|
000030b0  5a 2c 20 41 4c 20 56 58  25 0d 07 c6 1b e6 32 2c  |Z, AL VX%.....2,|
000030c0  31 32 38 2b 4d 41 53 4b  3a e6 31 2c 4d 41 53 4b  |128+MASK:.1,MASK|
000030d0  20 82 20 33 0d 07 d0 11  4d 41 53 4b 3d 4d 41 53  | . 3....MASK=MAS|
000030e0  4b 20 82 20 33 0d 07 da  09 d6 20 4d 43 25 0d 07  |K . 3..... MC%..|
000030f0  e4 08 f2 73 75 6e 0d 07  ee 1c e3 5a 25 3d 30 20  |...sun.....Z%=0 |
00003100  b8 20 4e 25 3a f2 73 68  61 64 6f 77 28 5a 25 29  |. N%:.shadow(Z%)|
00003110  3a ed 0d 07 f8 19 e3 5a  25 3d 30 20 b8 20 4e 25  |:......Z%=0 . N%|
00003120  3a f2 62 6f 78 28 5a 25  29 3a ed 0d 08 02 29 ef  |:.box(Z%):....).|
00003130  31 39 2c 31 2c 43 4f 4c  3b 30 3b 3a 43 4f 4c 3d  |19,1,COL;0;:COL=|
00003140  43 4f 4c 20 82 20 37 3a  ef 31 39 2c 32 2c 43 4f  |COL . 7:.19,2,CO|
00003150  4c 3b 30 3b 0d 08 0c 05  e1 0d 08 16 05 3a 0d 08  |L;0;.........:..|
00003160  20 0d dd f2 62 6f 78 28  42 25 29 0d 08 2a 14 f4  | ...box(B%)..*..|
00003170  20 64 72 61 77 20 6f 6e  65 20 73 74 6f 6e 65 0d  | draw one stone.|
00003180  08 34 0a ea 20 49 25 2c  4d 0d 08 3e 0b e3 49 25  |.4.. I%,M..>..I%|
00003190  3d 30 b8 37 0d 08 48 1a  4d 3d 53 25 2f 28 56 58  |=0.7..H.M=S%/(VX|
000031a0  25 2d 42 25 28 42 25 2c  49 25 2c 30 29 29 0d 08  |%-B%(B%,I%,0))..|
000031b0  52 31 54 25 28 49 25 2c  30 29 3d 4d 2a 42 25 28  |R1T%(I%,0)=M*B%(|
000031c0  42 25 2c 49 25 2c 31 29  3a 54 25 28 49 25 2c 31  |B%,I%,1):T%(I%,1|
000031d0  29 3d 4d 2a 42 25 28 42  25 2c 49 25 2c 32 29 0d  |)=M*B%(B%,I%,2).|
000031e0  08 5c 05 ed 0d 08 66 3d  f0 34 2c 54 25 28 34 2c  |.\....f=.4,T%(4,|
000031f0  30 29 2c 54 25 28 34 2c  31 29 3a f0 34 2c 54 25  |0),T%(4,1):.4,T%|
00003200  28 35 2c 30 29 2c 54 25  28 35 2c 31 29 3a f0 38  |(5,0),T%(5,1):.8|
00003210  37 2c 54 25 28 30 2c 30  29 2c 54 25 28 30 2c 31  |7,T%(0,0),T%(0,1|
00003220  29 0d 08 70 3f f0 38 37  2c 54 25 28 31 2c 30 29  |)..p?.87,T%(1,0)|
00003230  2c 54 25 28 31 2c 31 29  3a f0 38 37 2c 54 25 28  |,T%(1,1):.87,T%(|
00003240  33 2c 30 29 2c 54 25 28  33 2c 31 29 3a f0 38 37  |3,0),T%(3,1):.87|
00003250  2c 54 25 28 32 2c 30 29  2c 54 25 28 32 2c 31 29  |,T%(2,0),T%(2,1)|
00003260  0d 08 7a 3e f0 34 2c 54  25 28 31 2c 30 29 2c 54  |..z>.4,T%(1,0),T|
00003270  25 28 31 2c 31 29 3a f0  38 37 2c 54 25 28 36 2c  |%(1,1):.87,T%(6,|
00003280  30 29 2c 54 25 28 36 2c  31 29 3a f0 38 37 2c 54  |0),T%(6,1):.87,T|
00003290  25 28 35 2c 30 29 2c 54  25 28 35 2c 31 29 0d 08  |%(5,0),T%(5,1)..|
000032a0  84 3c f0 35 2c 54 25 28  34 2c 30 29 2c 54 25 28  |.<.5,T%(4,0),T%(|
000032b0  34 2c 31 29 3a f0 35 2c  54 25 28 30 2c 30 29 2c  |4,1):.5,T%(0,0),|
000032c0  54 25 28 30 2c 31 29 3a  f0 35 2c 54 25 28 33 2c  |T%(0,1):.5,T%(3,|
000032d0  30 29 2c 54 25 28 33 2c  31 29 0d 08 8e 3c f0 35  |0),T%(3,1)...<.5|
000032e0  2c 54 25 28 32 2c 30 29  2c 54 25 28 32 2c 31 29  |,T%(2,0),T%(2,1)|
000032f0  3a f0 35 2c 54 25 28 36  2c 30 29 2c 54 25 28 36  |:.5,T%(6,0),T%(6|
00003300  2c 31 29 3a f0 35 2c 54  25 28 35 2c 30 29 2c 54  |,1):.5,T%(5,0),T|
00003310  25 28 35 2c 31 29 0d 08  98 3c f0 35 2c 54 25 28  |%(5,1)...<.5,T%(|
00003320  31 2c 30 29 2c 54 25 28  31 2c 31 29 3a f0 35 2c  |1,0),T%(1,1):.5,|
00003330  54 25 28 30 2c 30 29 2c  54 25 28 30 2c 31 29 3a  |T%(0,0),T%(0,1):|
00003340  f0 34 2c 54 25 28 32 2c  30 29 2c 54 25 28 32 2c  |.4,T%(2,0),T%(2,|
00003350  31 29 0d 08 a2 16 f0 35  2c 54 25 28 31 2c 30 29  |1).....5,T%(1,0)|
00003360  2c 54 25 28 31 2c 31 29  0d 08 ac 05 e1 0d 08 b6  |,T%(1,1)........|
00003370  05 3a 0d 08 c0 10 dd f2  73 68 61 64 6f 77 28 42  |.:......shadow(B|
00003380  25 29 0d 08 ca 19 f4 20  64 72 61 77 20 73 74 6f  |%)..... draw sto|
00003390  6e 65 27 73 20 73 68 61  64 6f 77 0d 08 d4 16 ea  |ne's shadow.....|
000033a0  20 48 25 2c 4d 2c 53 30  25 2c 53 31 25 2c 53 32  | H%,M,S0%,S1%,S2|
000033b0  25 0d 08 de 0e e3 49 25  3d 20 30 20 b8 20 37 0d  |%.....I%= 0 . 7.|
000033c0  08 e8 15 48 25 3d 42 25  28 42 25 2c 49 25 2c 32  |...H%=B%(B%,I%,2|
000033d0  29 2d 47 25 0d 08 f2 31  53 30 25 3d 42 25 28 42  |)-G%...1S0%=B%(B|
000033e0  25 2c 49 25 2c 30 29 2b  48 25 2a 53 46 58 3a 53  |%,I%,0)+H%*SFX:S|
000033f0  31 25 3d 42 25 28 42 25  2c 49 25 2c 31 29 2b 48  |1%=B%(B%,I%,1)+H|
00003400  25 2a 53 46 59 0d 08 fc  0a 53 32 25 3d 47 25 0d  |%*SFY....S2%=G%.|
00003410  09 06 12 4d 3d 53 25 2f  28 56 58 25 2d 53 30 25  |...M=S%/(VX%-S0%|
00003420  29 0d 09 10 21 54 25 28  49 25 2c 30 29 3d 4d 2a  |)...!T%(I%,0)=M*|
00003430  53 31 25 3a 54 25 28 49  25 2c 31 29 3d 4d 2a 53  |S1%:T%(I%,1)=M*S|
00003440  32 25 0d 09 1a 05 ed 0d  09 24 3e 20 f0 34 2c 54  |2%.......$> .4,T|
00003450  25 28 30 2c 30 29 2c 54  25 28 30 2c 31 29 3a f0  |%(0,0),T%(0,1):.|
00003460  34 2c 54 25 28 34 2c 30  29 2c 54 25 28 34 2c 31  |4,T%(4,0),T%(4,1|
00003470  29 3a f0 38 37 2c 54 25  28 35 2c 30 29 2c 54 25  |):.87,T%(5,0),T%|
00003480  28 35 2c 31 29 0d 09 2e  3d f0 34 2c 54 25 28 30  |(5,1)...=.4,T%(0|
00003490  2c 30 29 2c 54 25 28 30  2c 31 29 3a f0 38 37 2c  |,0),T%(0,1):.87,|
000034a0  54 25 28 31 2c 30 29 2c  54 25 28 31 2c 31 29 3a  |T%(1,0),T%(1,1):|
000034b0  f0 34 2c 54 25 28 35 2c  30 29 2c 54 25 28 35 2c  |.4,T%(5,0),T%(5,|
000034c0  31 29 0d 09 38 3e f0 38  37 2c 54 25 28 36 2c 30  |1)..8>.87,T%(6,0|
000034d0  29 2c 54 25 28 36 2c 31  29 3a f0 34 2c 54 25 28  |),T%(6,1):.4,T%(|
000034e0  31 2c 30 29 2c 54 25 28  31 2c 31 29 3a f0 38 37  |1,0),T%(1,1):.87|
000034f0  2c 54 25 28 32 2c 30 29  2c 54 25 28 32 2c 31 29  |,T%(2,0),T%(2,1)|
00003500  0d 09 42 3d f0 34 2c 54  25 28 36 2c 30 29 2c 54  |..B=.4,T%(6,0),T|
00003510  25 28 36 2c 31 29 3a f0  38 37 2c 54 25 28 37 2c  |%(6,1):.87,T%(7,|
00003520  30 29 2c 54 25 28 37 2c  31 29 3a f0 34 2c 54 25  |0),T%(7,1):.4,T%|
00003530  28 32 2c 30 29 2c 54 25  28 32 2c 31 29 0d 09 4c  |(2,0),T%(2,1)..L|
00003540  3e f0 38 37 2c 54 25 28  33 2c 30 29 2c 54 25 28  |>.87,T%(3,0),T%(|
00003550  33 2c 31 29 3a f0 34 2c  54 25 28 37 2c 30 29 2c  |3,1):.4,T%(7,0),|
00003560  54 25 28 37 2c 31 29 3a  f0 38 37 2c 54 25 28 34  |T%(7,1):.87,T%(4|
00003570  2c 30 29 2c 54 25 28 34  2c 31 29 0d 09 56 3d f0  |,0),T%(4,1)..V=.|
00003580  34 2c 54 25 28 33 2c 30  29 2c 54 25 28 33 2c 31  |4,T%(3,0),T%(3,1|
00003590  29 3a f0 38 37 2c 54 25  28 30 2c 30 29 2c 54 25  |):.87,T%(0,0),T%|
000035a0  28 30 2c 31 29 3a f0 34  2c 54 25 28 31 2c 30 29  |(0,1):.4,T%(1,0)|
000035b0  2c 54 25 28 31 2c 31 29  0d 09 60 3e f0 38 37 2c  |,T%(1,1)..`>.87,|
000035c0  54 25 28 32 2c 30 29 2c  54 25 28 32 2c 31 29 3a  |T%(2,0),T%(2,1):|
000035d0  f0 34 2c 54 25 28 33 2c  30 29 2c 54 25 28 33 2c  |.4,T%(3,0),T%(3,|
000035e0  31 29 3a f0 38 37 2c 54  25 28 30 2c 30 29 2c 54  |1):.87,T%(0,0),T|
000035f0  25 28 30 2c 31 29 0d 09  6a 16 f0 34 2c 54 25 28  |%(0,1)..j..4,T%(|
00003600  33 2c 30 29 2c 54 25 28  33 2c 31 29 0d 09 74 17  |3,0),T%(3,1)..t.|
00003610  f0 38 37 2c 54 25 28 30  2c 30 29 2c 54 25 28 30  |.87,T%(0,0),T%(0|
00003620  2c 31 29 0d 09 7e 05 e1  0d 09 88 05 3a 0d 09 92  |,1)..~......:...|
00003630  09 dd f2 73 75 6e 0d 09  9c 16 e7 20 41 5a 3e 35  |...sun..... AZ>5|
00003640  30 20 80 20 41 5a 3c 33  31 30 20 e1 0d 09 a6 0e  |0 . AZ<310 .....|
00003650  ea 20 59 25 2c 5a 25 2c  49 25 0d 09 b0 1f 59 25  |. Y%,Z%,I%....Y%|
00003660  3d 38 30 30 2a b5 20 b2  20 41 5a 3a 5a 25 3d 39  |=800*. . AZ:Z%=9|
00003670  30 30 2a b5 20 b2 20 41  4c 0d 09 ba 18 ec 20 59  |00*. . AL..... Y|
00003680  25 2d 34 38 2c 5a 25 2b  34 38 3a f1 20 53 55 4e  |%-48,Z%+48:. SUN|
00003690  24 0d 09 c4 05 e1 0d 09  ce 05 3a 0d 09 d8 09 ee  |$.........:.....|
000036a0  20 85 20 87 0d 09 e2 06  eb 36 0d 09 ec 20 f6 3a  | . ......6... .:|
000036b0  f1 22 20 61 74 20 6c 69  6e 65 20 22 3b 9e 3b 22  |." at line ";.;"|
000036c0  20 45 72 72 6f 72 20 22  3b 9f 0d 09 f6 05 e0 0d  | Error ";.......|
000036d0  ff 04 0f 00 00 0e ff ff  23 80 ff ff 33 00 00 00  |........#...3...|
000036e0  05 03 00 00 00 31 39 2c  32 2c 31 2c 30 2c 30 2c  |.....19,2,1,0,0,|
000036f0  30 0d 00 e6 0f f1 8a 31  33 2c 31 29 3b 22 46 22  |0......13,1);"F"|
00003700  0d 00 f0 5d ec 33 31 2c  39 34 30 3a df 31 32 34  |...].31,940:.124|
00003710  37 2c 39 34 30 3a 58 3d  31 32 30 30 3a ec 33 35  |7,940:X=1200:.35|
00003720  2c 32 30 3a ec 31 32 33  34 2c 32 30 3a f5 3a f0  |,20:.1234,20:.:.|
00003730  38 35 2c 58 2c b3 28 31  30 30 29 2b 32 30 3a f0  |85,X,.(100)+20:.|
00003740  38 35 2c 58 2b b3 28 35  30 29 2c 32 30 3a 58 3d  |85,X+.(50),20:X=|
00003750  58 2d 33 37 35 3a fd 20  58 3c 31 33 35 0d 01 04  |X-375:. X<135...|
00003760  5b 47 58 3d b3 28 31 30  30 30 29 2b 31 30 30 3a  |[GX=.(1000)+100:|
00003770  47 59 3d b3 28 32 30 30  29 3a ef 35 3a ec 47 58  |GY=.(200):.5:.GX|
00003780  2c 47 59 3a f1 bd 28 32  32 34 29 3a e3 49 3d 31  |,GY:..(224):.I=1|
00003790  b8 33 30 2a 64 3a ec b3  28 31 30 30 30 29 2b 31  |.30*d:..(1000)+1|
000037a0  34 30 2c b3 28 35 30 30  29 2b 32 30 30 3a f1 bd  |40,.(500)+200:..|
000037b0  28 32 32 34 29 3a ed 49  0d 01 0e 33 ec b3 28 31  |(224):.I...3..(1|
000037c0  30 30 29 2b 31 34 30 2c  32 30 3a e6 30 2c 32 3a  |00)+140,20:.0,2:|
000037d0  f0 31 2c 30 2c 31 30 30  3a f0 31 2c 32 30 2c 30  |.1,0,100:.1,20,0|
000037e0  3a f0 31 2c 2d 34 30 2c  30 20 20 0d 01 18 83 46  |:.1,-40,0  ....F|
000037f0  3d 31 38 30 3a 56 58 3d  30 3a 56 59 3d 30 3a 55  |=180:VX=0:VY=0:U|
00003800  58 3d b3 28 33 29 3a 55  59 3d b3 28 33 29 3a 41  |X=.(3):UY=.(3):A|
00003810  58 3d 2d 64 3a 42 58 3d  64 3a 41 59 3d 2d 64 3a  |X=-d:BX=d:AY=-d:|
00003820  42 59 3d 2d 64 3a 50 3d  32 32 35 3a 70 3d 50 3a  |BY=-d:P=225:p=P:|
00003830  4c 58 3d b3 28 31 30 30  30 29 2b 31 34 30 3a 53  |LX=.(1000)+140:S|
00003840  58 3d 47 58 3a 53 59 3d  47 59 3a 4c 59 3d 39 30  |X=GX:SY=GY:LY=90|
00003850  30 3a 6c 78 3d 4c 58 3a  6c 79 3d 4c 59 3a 44 58  |0:lx=LX:ly=LY:DX|
00003860  3d 30 3a 44 59 3d 64 2a  32 3a 6d 3d 31 30 0d 01  |=0:DY=d*2:m=10..|
00003870  22 1b f5 ef 34 3a f1 8a  31 2c 31 29 3b 22 20 20  |"...4:..1,1);"  |
00003880  20 22 3b 8a 31 2c 31 29  3b 0d 01 2c 18 e7 56 59  | ";.1,1);..,..VY|
00003890  3e 3d 30 8c 20 f1 22 20  22 3b 8b 20 f1 22 76 22  |>=0. ." ";. ."v"|
000038a0  3b 0d 01 36 11 f1 3b 94  28 a8 28 56 59 29 29 3a  |;..6..;.(.(VY)):|
000038b0  ef 35 0d 01 40 5a e6 30  2c 32 3a ec 6c 78 2c 6c  |.5..@Z.0,2:.lx,l|
000038c0  79 3a f1 bd 28 70 29 3a  e6 30 2c 31 3a ec 4c 58  |y:..(p):.0,1:.LX|
000038d0  2c 4c 59 3a f1 bd 28 50  29 3a e6 32 2c 31 3a ec  |,LY:..(P):.2,1:.|
000038e0  6c 78 2c 6c 79 3a f1 bd  28 70 29 3a 70 3d 50 3a  |lx,ly:..(p):p=P:|
000038f0