�5
�23;8202;0;0;0;0
�19,7,2;0;19,1,4;0;
(�28,0,31,19,27
2*LOAD FONTS 0C00
<
�legal
F
*LOAD PIC
P&�1,1,0,0,0,0,0,0,126,-1,0,-1,126,0
Z'�2,3,0,0,0,1,1,1,90,-20,-20,-2,90,0
d+�3,2,1,1,0,5,10,40,30,-10,-10,-15,127,0
n+�4,131,0,0,0,25,2,-2,110,0,-4,-8,110,80
x
*FX4,2
�*FX16,2
��28,0,31,19,27,12
��28,0,31,19,27
��
�� 2
�� �2,1);"AROUND THE WORLD"
�� �3,3);"IN 40 SCREENS"
��=0:� � �>=400
��
�!�repton("PLEASE SELECT:",3,1)
��repton("(1) THE GAME",3,3)
�!�repton("(2) THE EDITOR",3,4)
�	*FX15

�

*FX20,1

S=�

"�S<49 � S>50 �error

,�S-49<2

6
�chose

@�

J��error

T�7:�

^��(-129)

h�

r��chose

|�

��S=50 �edits � �games

��

���edits

�$�repton("EDITOR LOADING...",2,3)

��

��

��=&1900:�"EDITOR"

��

���games

�"�repton("GAME LOADING...",3,3)

��

��

��=&1900:�"REPTON1"
�
��repton(A$,X,Y)
�2
&�X,Y);
0
�J%=1��A$
:T$=�A$,J%,1)
DT%=�(T$)
N�T%<65 � T%>90:�T%:�:�
X
�T%+63
b�:�
l��legal
v�A%=128�159:�23,A%
��X%=0�7
��?(X%+&C00+((A%-128)*8))
��:�
��
�����������a���� ����� ������� ��L��L���������'���������`PAGE=&1900
OLD
ONERRORRUN
*FX200,2
RUN
BASIC

00000000  0d 00 0a 06 eb 35 0d 00  14 14 ef 32 33 3b 38 32  |.....5.....23;82|
00000010  30 32 3b 30 3b 30 3b 30  3b 30 0d 00 1e 17 ef 31  |02;0;0;0;0.....1|
00000020  39 2c 37 2c 32 3b 30 3b  31 39 2c 31 2c 34 3b 30  |9,7,2;0;19,1,4;0|
00000030  3b 0d 00 28 12 ef 32 38  2c 30 2c 33 31 2c 31 39  |;..(..28,0,31,19|
00000040  2c 32 37 0d 00 32 14 2a  4c 4f 41 44 20 46 4f 4e  |,27..2.*LOAD FON|
00000050  54 53 20 30 43 30 30 0d  00 3c 0a f2 6c 65 67 61  |TS 0C00..<..lega|
00000060  6c 0d 00 46 0d 2a 4c 4f  41 44 20 50 49 43 0d 00  |l..F.*LOAD PIC..|
00000070  50 26 e2 31 2c 31 2c 30  2c 30 2c 30 2c 30 2c 30  |P&.1,1,0,0,0,0,0|
00000080  2c 30 2c 31 32 36 2c 2d  31 2c 30 2c 2d 31 2c 31  |,0,126,-1,0,-1,1|
00000090  32 36 2c 30 0d 00 5a 27  e2 32 2c 33 2c 30 2c 30  |26,0..Z'.2,3,0,0|
000000a0  2c 30 2c 31 2c 31 2c 31  2c 39 30 2c 2d 32 30 2c  |,0,1,1,1,90,-20,|
000000b0  2d 32 30 2c 2d 32 2c 39  30 2c 30 0d 00 64 2b e2  |-20,-2,90,0..d+.|
000000c0  33 2c 32 2c 31 2c 31 2c  30 2c 35 2c 31 30 2c 34  |3,2,1,1,0,5,10,4|
000000d0  30 2c 33 30 2c 2d 31 30  2c 2d 31 30 2c 2d 31 35  |0,30,-10,-10,-15|
000000e0  2c 31 32 37 2c 30 0d 00  6e 2b e2 34 2c 31 33 31  |,127,0..n+.4,131|
000000f0  2c 30 2c 30 2c 30 2c 32  35 2c 32 2c 2d 32 2c 31  |,0,0,0,25,2,-2,1|
00000100  31 30 2c 30 2c 2d 34 2c  2d 38 2c 31 31 30 2c 38  |10,0,-4,-8,110,8|
00000110  30 0d 00 78 0a 2a 46 58  34 2c 32 0d 00 82 0b 2a  |0..x.*FX4,2....*|
00000120  46 58 31 36 2c 32 0d 00  8c 15 ef 32 38 2c 30 2c  |FX16,2.....28,0,|
00000130  33 31 2c 31 39 2c 32 37  2c 31 32 0d 00 96 12 ef  |31,19,27,12.....|
00000140  32 38 2c 30 2c 33 31 2c  31 39 2c 32 37 0d 00 a0  |28,0,31,19,27...|
00000150  05 db 0d 00 aa 07 fb 20  32 0d 00 b4 1e f1 20 8a  |....... 2..... .|
00000160  32 2c 31 29 3b 22 41 52  4f 55 4e 44 20 54 48 45  |2,1);"AROUND THE|
00000170  20 57 4f 52 4c 44 22 0d  00 be 1b f1 20 8a 33 2c  | WORLD"..... .3,|
00000180  33 29 3b 22 49 4e 20 34  30 20 53 43 52 45 45 4e  |3);"IN 40 SCREEN|
00000190  53 22 0d 00 c8 12 d1 3d  30 3a f5 20 fd 20 91 3e  |S".....=0:. . .>|
000001a0  3d 34 30 30 0d 00 d2 05  db 0d 00 dc 21 f2 72 65  |=400........!.re|
000001b0  70 74 6f 6e 28 22 50 4c  45 41 53 45 20 53 45 4c  |pton("PLEASE SEL|
000001c0  45 43 54 3a 22 2c 33 2c  31 29 0d 00 e6 1f f2 72  |ECT:",3,1).....r|
000001d0  65 70 74 6f 6e 28 22 28  31 29 20 54 48 45 20 47  |epton("(1) THE G|
000001e0  41 4d 45 22 2c 33 2c 33  29 0d 00 f0 21 f2 72 65  |AME",3,3)...!.re|
000001f0  70 74 6f 6e 28 22 28 32  29 20 54 48 45 20 45 44  |pton("(2) THE ED|
00000200  49 54 4f 52 22 2c 33 2c  34 29 0d 00 fa 09 2a 46  |ITOR",3,4)....*F|
00000210  58 31 35 0d 01 04 05 f5  0d 01 0e 0b 2a 46 58 32  |X15.........*FX2|
00000220  30 2c 31 0d 01 18 07 53  3d a5 0d 01 22 17 e7 53  |0,1....S=..."..S|
00000230  3c 34 39 20 84 20 53 3e  35 30 20 f2 65 72 72 6f  |<49 . S>50 .erro|
00000240  72 0d 01 2c 0b fd 53 2d  34 39 3c 32 0d 01 36 0a  |r..,..S-49<2..6.|
00000250  f2 63 68 6f 73 65 0d 01  40 05 e0 0d 01 4a 0b dd  |.chose..@....J..|
00000260  f2 65 72 72 6f 72 0d 01  54 08 ef 37 3a f5 0d 01  |.error..T..7:...|
00000270  5e 0c fd a6 28 2d 31 32  39 29 0d 01 68 05 e1 0d  |^...(-129)..h...|
00000280  01 72 0b dd f2 63 68 6f  73 65 0d 01 7c 05 db 0d  |.r...chose..|...|
00000290  01 86 19 e7 53 3d 35 30  20 f2 65 64 69 74 73 20  |....S=50 .edits |
000002a0  8b 20 f2 67 61 6d 65 73  0d 01 90 05 e1 0d 01 9a  |. .games........|
000002b0  0b dd f2 65 64 69 74 73  0d 01 a4 24 f2 72 65 70  |...edits...$.rep|
000002c0  74 6f 6e 28 22 45 44 49  54 4f 52 20 4c 4f 41 44  |ton("EDITOR LOAD|
000002d0  49 4e 47 2e 2e 2e 22 2c  32 2c 33 29 0d 01 ae 05  |ING...",2,3)....|
000002e0  f1 0d 01 b8 05 f1 0d 01  c2 15 d0 3d 26 31 39 30  |...........=&190|
000002f0  30 3a d7 22 45 44 49 54  4f 52 22 0d 01 cc 05 e1  |0:."EDITOR".....|
00000300  0d 01 d6 0b dd f2 67 61  6d 65 73 0d 01 e0 22 f2  |......games...".|
00000310  72 65 70 74 6f 6e 28 22  47 41 4d 45 20 4c 4f 41  |repton("GAME LOA|
00000320  44 49 4e 47 2e 2e 2e 22  2c 33 2c 33 29 0d 01 ea  |DING...",3,3)...|
00000330  05 f1 0d 01 f4 05 f1 0d  01 fe 16 d0 3d 26 31 39  |............=&19|
00000340  30 30 3a d7 22 52 45 50  54 4f 4e 31 22 0d 02 08  |00:."REPTON1"...|
00000350  05 e1 0d 02 12 14 dd f2  72 65 70 74 6f 6e 28 41  |........repton(A|
00000360  24 2c 58 2c 59 29 0d 02  1c 06 fb 32 0d 02 26 0b  |$,X,Y).....2..&.|
00000370  f1 8a 58 2c 59 29 3b 0d  02 30 0d e3 4a 25 3d 31  |..X,Y);..0..J%=1|
00000380  b8 a9 41 24 0d 02 3a 10  54 24 3d c1 41 24 2c 4a  |..A$..:.T$=.A$,J|
00000390  25 2c 31 29 0d 02 44 0c  54 25 3d 97 28 54 24 29  |%,1)..D.T%=.(T$)|
000003a0  0d 02 4e 1a e7 54 25 3c  36 35 20 84 20 54 25 3e  |..N..T%<65 . T%>|
000003b0  39 30 3a ef 54 25 3a ed  3a e1 0d 02 58 0a ef 54  |90:.T%:.:...X..T|
000003c0  25 2b 36 33 0d 02 62 07  ed 3a e1 0d 02 6c 0b dd  |%+63..b..:...l..|
000003d0  f2 6c 65 67 61 6c 0d 02  76 16 e3 41 25 3d 31 32  |.legal..v..A%=12|
000003e0  38 b8 31 35 39 3a ef 32  33 2c 41 25 0d 02 80 0b  |8.159:.23,A%....|
000003f0  e3 58 25 3d 30 b8 37 0d  02 8a 1c ef 3f 28 58 25  |.X%=0.7.....?(X%|
00000400  2b 26 43 30 30 2b 28 28  41 25 2d 31 32 38 29 2a  |+&C00+((A%-128)*|
00000410  38 29 29 0d 02 94 07 ed  3a ed 0d 02 9e 05 e1 0d  |8)).....:.......|
00000420  ff ad 10 02 8d 84 1d ad  11 02 8d 85 1d a9 00 8d  |................|
00000430  83 1d a9 61 8d 10 02 a9  1d 8d 11 02 a9 15 20 ee  |...a.......... .|
00000440  ff a9 81 a2 00 a0 ff 20  f4 ff e0 00 f0 10 a9 b4  |....... ........|
00000450  a2 19 a0 00 20 f4 ff a2  ae a0 1d 4c f7 ff 4c 00  |.... ......L..L.|
00000460  80 8e 82 1d ae 83 1d bd  86 1d ee 83 1d e0 27 d0  |..............'.|
00000470  0c ae 84 1d 8e 10 02 ae  85 1d 8e 11 02 ae 82 1d  |................|
00000480  18 60 00 00 00 00 50 41  47 45 3d 26 31 39 30 30  |.`....PAGE=&1900|
00000490  0d 4f 4c 44 0d 4f 4e 45  52 52 4f 52 52 55 4e 0d  |.OLD.ONERRORRUN.|
000004a0  2a 46 58 32 30 30 2c 32  0d 52 55 4e 06 0d 42 41  |*FX200,2.RUN..BA|
000004b0  53 49 43 0d                                       |SIC.|
000004b4