'�2:� c%(15),d%(15):�r=0�15:�d%(r):�
�r=0�15:�a:c%(r)=d%(a):�
� space &2000:*RAM
(*SLOAD SHIPIII
2*SCHOOSE TOP
<�&ED,0,960:�x=0�1:�t=0�&27F
Fr?(space+&280*x+t)=(c%(�(t � &FF8)*2+8,1023-32*x-(t � 7)*4))+2*c%(�(t � &FF8)*2,1023-32*x-(t � 7)*4)) � &3F):�,
P.�"SAVE NamBar "+�~space+" "+�~(space+&500)
Z:
d*SCHOOSE BOTTOM
n�&ED,0,704:�x=0�9:�t=0�&27F
xr?(space+&280*x+t)=(c%(�(t � &FF8)*2+8,1023-32*x-(t � 7)*4))+2*c%(�(t � &FF8)*2,1023-32*x-(t � 7)*4)) � &3F):�,
�/�"SAVE ScoBar "+�~space+" "+�~(space+&1700)
�:
�1� 0,1,4,5,16,17,20,21,64,65,68,69,80,81,84,85
�%� 7,7,7,7,7,7,0,0,4,3,2,1,3,2,3,6
�

00000000  0d 00 0a 27 eb 32 3a de  20 63 25 28 31 35 29 2c  |...'.2:. c%(15),|
00000010  64 25 28 31 35 29 3a e3  72 3d 30 b8 31 35 3a f3  |d%(15):.r=0.15:.|
00000020  64 25 28 72 29 3a ed 0d  00 14 1c e3 72 3d 30 b8  |d%(r):......r=0.|
00000030  31 35 3a f3 61 3a 63 25  28 72 29 3d 64 25 28 61  |15:.a:c%(r)=d%(a|
00000040  29 3a ed 0d 00 1e 16 de  20 73 70 61 63 65 20 26  |):...... space &|
00000050  32 30 30 30 3a 2a 52 41  4d 0d 00 28 12 2a 53 4c  |2000:*RAM..(.*SL|
00000060  4f 41 44 20 53 48 49 50  49 49 49 0d 00 32 10 2a  |OAD SHIPIII..2.*|
00000070  53 43 48 4f 4f 53 45 20  54 4f 50 0d 00 3c 1f f0  |SCHOOSE TOP..<..|
00000080  26 45 44 2c 30 2c 39 36  30 3a e3 78 3d 30 b8 31  |&ED,0,960:.x=0.1|
00000090  3a e3 74 3d 30 b8 26 32  37 46 0d 00 46 72 3f 28  |:.t=0.&27F..Fr?(|
000000a0  73 70 61 63 65 2b 26 32  38 30 2a 78 2b 74 29 3d  |space+&280*x+t)=|
000000b0  28 63 25 28 b0 28 74 20  80 20 26 46 46 38 29 2a  |(c%(.(t . &FF8)*|
000000c0  32 2b 38 2c 31 30 32 33  2d 33 32 2a 78 2d 28 74  |2+8,1023-32*x-(t|
000000d0  20 80 20 37 29 2a 34 29  29 2b 32 2a 63 25 28 b0  | . 7)*4))+2*c%(.|
000000e0  28 74 20 80 20 26 46 46  38 29 2a 32 2c 31 30 32  |(t . &FF8)*2,102|
000000f0  33 2d 33 32 2a 78 2d 28  74 20 80 20 37 29 2a 34  |3-32*x-(t . 7)*4|
00000100  29 29 20 80 20 26 33 46  29 3a ed 2c 0d 00 50 2e  |)) . &3F):.,..P.|
00000110  ff 22 53 41 56 45 20 4e  61 6d 42 61 72 20 22 2b  |."SAVE NamBar "+|
00000120  c3 7e 73 70 61 63 65 2b  22 20 22 2b c3 7e 28 73  |.~space+" "+.~(s|
00000130  70 61 63 65 2b 26 35 30  30 29 0d 00 5a 05 3a 0d  |pace+&500)..Z.:.|
00000140  00 64 13 2a 53 43 48 4f  4f 53 45 20 42 4f 54 54  |.d.*SCHOOSE BOTT|
00000150  4f 4d 0d 00 6e 1f f0 26  45 44 2c 30 2c 37 30 34  |OM..n..&ED,0,704|
00000160  3a e3 78 3d 30 b8 39 3a  e3 74 3d 30 b8 26 32 37  |:.x=0.9:.t=0.&27|
00000170  46 0d 00 78 72 3f 28 73  70 61 63 65 2b 26 32 38  |F..xr?(space+&28|
00000180  30 2a 78 2b 74 29 3d 28  63 25 28 b0 28 74 20 80  |0*x+t)=(c%(.(t .|
00000190  20 26 46 46 38 29 2a 32  2b 38 2c 31 30 32 33 2d  | &FF8)*2+8,1023-|
000001a0  33 32 2a 78 2d 28 74 20  80 20 37 29 2a 34 29 29  |32*x-(t . 7)*4))|
000001b0  2b 32 2a 63 25 28 b0 28  74 20 80 20 26 46 46 38  |+2*c%(.(t . &FF8|
000001c0  29 2a 32 2c 31 30 32 33  2d 33 32 2a 78 2d 28 74  |)*2,1023-32*x-(t|
000001d0  20 80 20 37 29 2a 34 29  29 20 80 20 26 33 46 29  | . 7)*4)) . &3F)|
000001e0  3a ed 2c 0d 00 82 2f ff  22 53 41 56 45 20 53 63  |:.,.../."SAVE Sc|
000001f0  6f 42 61 72 20 22 2b c3  7e 73 70 61 63 65 2b 22  |oBar "+.~space+"|
00000200  20 22 2b c3 7e 28 73 70  61 63 65 2b 26 31 37 30  | "+.~(space+&170|
00000210  30 29 0d 00 8c 05 3a 0d  00 96 31 dc 20 30 2c 31  |0)....:...1. 0,1|
00000220  2c 34 2c 35 2c 31 36 2c  31 37 2c 32 30 2c 32 31  |,4,5,16,17,20,21|
00000230  2c 36 34 2c 36 35 2c 36  38 2c 36 39 2c 38 30 2c  |,64,65,68,69,80,|
00000240  38 31 2c 38 34 2c 38 35  0d 00 a0 25 dc 20 37 2c  |81,84,85...%. 7,|
00000250  37 2c 37 2c 37 2c 37 2c  37 2c 30 2c 30 2c 34 2c  |7,7,7,7,7,0,0,4,|
00000260  33 2c 32 2c 31 2c 33 2c  32 2c 33 2c 36 0d ff     |3,2,1,3,2,3,6..|
0000026f