*L.Samp/Pl
*L.Font
*L.Flash
(*L.MusCode 2D00
2'�1,1,0,0,0,0,0,0,50,-1,-1,-1,100,90
<(�2,1,0,0,0,0,0,0,126,-5,-5,-5,100,90
F+�3,1,2,-1,0,20,20,0,10,-5,-5,-5,126,100
P�=&2D00:�22,1
Z�23;8202;0;0;0;
d�23;1,64;0;0;0;
n�23;2,88;0;0;0;
x�23;6,20;0;0;0;
��23;7,28;0;0;0;
��a=0�3:�19,a,0;0;:�
�
�131:�
�*L.Screen 3000
��fadein
�
�&2F00
�*L.Prompt 5E00
��=0
��
�A%=1:X%=94:Y%=122:�&A00
��
�� �-69 inst=� � inst=�
�� �-86 � �>499 � inst

� �>499 � �=0

� �-86 � inst

�=&2D00:�22,1

"�23;8202;0;0;0;

,�23;6,16;0;0;0;

6�23;7,26;0;0;0;

@�23;12,11;0;0;0;

J.�28,0,31,39,16,12,26,20,19,2,4;0;19,3,2;0;

T	*Fade

^� inst � �instructions

h�=&2000:�"Run"

r:

|m��comp(x,y,a$):y=y+16:�31,x,y:�a=1 � �(a$):� (�(�a$,a,1))+159 � 224)=224 �(�(�a$,a,1))+63); � �a$,a,1);

��:�

�+��cent(y,a$):�comp(20-�(a$) � 2,y,a$):�

�.��ncent(y,a$):y=y+16:�20-(�(a$)),y);a$;:�

���border:*CODE255

�o� x=2 � 39:�x,16);�14,�8+�10+�32):�:�130:�28,1,30,38,17,12,26:�128:�1:�x=1 � 38:�31,x,16,251,31,x,31,251:�

�j�y=17 � 30:�31,0,y,254,31,39,y,254:�:�31,0,16,250,31,39,16,252,31,0,31,253:�5:�1280,28:�0,1:�127,255,4

��

���instructions

��

��border

��130

�$�23,255,&00FF;&0000;&0000;&0000;

��3
�cent(2,"CYBOT!")
�cent(3,�6,�255))

� c=0 � 3
&� b=5 � 13 � 2
0� b$
:�comp(2,b,b$)
D�x=� � 36:�comp(x,�," "):�
N�
X� � �-99
b�
l�128
v4�28,0,31,39,16:�a=0 � 16:�30,11:�:�23;6,0;0;0;0;
�*L.Samp/Pl
�*L.Flush 3000
�A%=10:X%=48:Y%=128:�&A00
��
��26,23;6,16;0;0;0;
��
�*�"ONCE UPON A TIME IN THE LAND OF SIL"
�'�"LIVED A KINDLY GENTLE PEOPLE WHO"
�'�"WERE ALL OF THE MECHANICAL TYPE."
�+�"UNFORTUNATELY ALONG CAME THE MONSTER"
�%�"TOILET, WHICH WREAKED HAVOC BY"
�*�"FLUSHING ALL THE ROBOTS IT FOUND ON"
�*�"THE WAY DOWN THE DRAIN. YOUR JOB IS"
(�"TO COLLECT ALL THE MAGICAL GLOBES"
*�"WHICH CONTAIN THE FLUSHED ONES, AND"
!�"ESCAPE THROUGH THE PORTAL."
 '�"HERE ARE YOUR CONTROLS FOR FRED:"
*�"X-----RIGHT"
4�"Z-----LEFT"
>�"RET---JUMP"
H�"","OTHER CONTROLS ARE:"
R�"Q-----SOUND OFF"
\�"S-----SOUND ON"
f�"P-----TELEPORT POSITION"
p�"GOOD LUCK."
z:
���fadein
�
� �d^C
�� layer=0 � 2
�	� l,a
��19,l,a;0;
��=0:� � �>4
�	*FX19
��
��
��2,4,1,2,0,7
�

00000000  0d 00 0a 0e 2a 4c 2e 53  61 6d 70 2f 50 6c 0d 00  |....*L.Samp/Pl..|
00000010  14 0b 2a 4c 2e 46 6f 6e  74 0d 00 1e 0c 2a 4c 2e  |..*L.Font....*L.|
00000020  46 6c 61 73 68 0d 00 28  13 2a 4c 2e 4d 75 73 43  |Flash..(.*L.MusC|
00000030  6f 64 65 20 32 44 30 30  0d 00 32 27 e2 31 2c 31  |ode 2D00..2'.1,1|
00000040  2c 30 2c 30 2c 30 2c 30  2c 30 2c 30 2c 35 30 2c  |,0,0,0,0,0,0,50,|
00000050  2d 31 2c 2d 31 2c 2d 31  2c 31 30 30 2c 39 30 0d  |-1,-1,-1,100,90.|
00000060  00 3c 28 e2 32 2c 31 2c  30 2c 30 2c 30 2c 30 2c  |.<(.2,1,0,0,0,0,|
00000070  30 2c 30 2c 31 32 36 2c  2d 35 2c 2d 35 2c 2d 35  |0,0,126,-5,-5,-5|
00000080  2c 31 30 30 2c 39 30 0d  00 46 2b e2 33 2c 31 2c  |,100,90..F+.3,1,|
00000090  32 2c 2d 31 2c 30 2c 32  30 2c 32 30 2c 30 2c 31  |2,-1,0,20,20,0,1|
000000a0  30 2c 2d 35 2c 2d 35 2c  2d 35 2c 31 32 36 2c 31  |0,-5,-5,-5,126,1|
000000b0  30 30 0d 00 50 11 d3 3d  26 32 44 30 30 3a ef 32  |00..P..=&2D00:.2|
000000c0  32 2c 31 0d 00 5a 13 ef  32 33 3b 38 32 30 32 3b  |2,1..Z..23;8202;|
000000d0  30 3b 30 3b 30 3b 0d 00  64 13 ef 32 33 3b 31 2c  |0;0;0;..d..23;1,|
000000e0  36 34 3b 30 3b 30 3b 30  3b 0d 00 6e 13 ef 32 33  |64;0;0;0;..n..23|
000000f0  3b 32 2c 38 38 3b 30 3b  30 3b 30 3b 0d 00 78 13  |;2,88;0;0;0;..x.|
00000100  ef 32 33 3b 36 2c 32 30  3b 30 3b 30 3b 30 3b 0d  |.23;6,20;0;0;0;.|
00000110  00 82 13 ef 32 33 3b 37  2c 32 38 3b 30 3b 30 3b  |....23;7,28;0;0;|
00000120  30 3b 0d 00 8c 17 e3 61  3d 30 b8 33 3a ef 31 39  |0;.....a=0.3:.19|
00000130  2c 61 2c 30 3b 30 3b 3a  ed 0d 00 96 0a fb 31 33  |,a,0;0;:......13|
00000140  31 3a db 0d 00 a0 12 2a  4c 2e 53 63 72 65 65 6e  |1:.....*L.Screen|
00000150  20 33 30 30 30 0d 00 aa  0b f2 66 61 64 65 69 6e  | 3000.....fadein|
00000160  0d 00 b4 0a d6 26 32 46  30 30 0d 00 be 12 2a 4c  |.....&2F00....*L|
00000170  2e 50 72 6f 6d 70 74 20  35 45 30 30 0d 00 c8 07  |.Prompt 5E00....|
00000180  d1 3d 30 0d 00 d2 05 f5  0d 00 dc 1b 41 25 3d 31  |.=0.........A%=1|
00000190  3a 58 25 3d 39 34 3a 59  25 3d 31 32 32 3a d6 26  |:X%=94:Y%=122:.&|
000001a0  41 30 30 0d 00 e6 05 f5  0d 00 f0 1a e7 20 a6 2d  |A00.......... .-|
000001b0  36 39 20 69 6e 73 74 3d  b9 20 8b 20 69 6e 73 74  |69 inst=. . inst|
000001c0  3d a3 0d 00 fa 19 fd 20  a6 2d 38 36 20 84 20 91  |=...... .-86 . .|
000001d0  3e 34 39 39 20 84 20 69  6e 73 74 0d 01 04 11 e7  |>499 . inst.....|
000001e0  20 91 3e 34 39 39 20 8c  20 d1 3d 30 0d 01 0e 11  | .>499 . .=0....|
000001f0  fd 20 a6 2d 38 36 20 84  20 69 6e 73 74 0d 01 18  |. .-86 . inst...|
00000200  11 d3 3d 26 32 44 30 30  3a ef 32 32 2c 31 0d 01  |..=&2D00:.22,1..|
00000210  22 13 ef 32 33 3b 38 32  30 32 3b 30 3b 30 3b 30  |"..23;8202;0;0;0|
00000220  3b 0d 01 2c 13 ef 32 33  3b 36 2c 31 36 3b 30 3b  |;..,..23;6,16;0;|
00000230  30 3b 30 3b 0d 01 36 13  ef 32 33 3b 37 2c 32 36  |0;0;..6..23;7,26|
00000240  3b 30 3b 30 3b 30 3b 0d  01 40 14 ef 32 33 3b 31  |;0;0;0;..@..23;1|
00000250  32 2c 31 31 3b 30 3b 30  3b 30 3b 0d 01 4a 2e ef  |2,11;0;0;0;..J..|
00000260  32 38 2c 30 2c 33 31 2c  33 39 2c 31 36 2c 31 32  |28,0,31,39,16,12|
00000270  2c 32 36 2c 32 30 2c 31  39 2c 32 2c 34 3b 30 3b  |,26,20,19,2,4;0;|
00000280  31 39 2c 33 2c 32 3b 30  3b 0d 01 54 09 2a 46 61  |19,3,2;0;..T.*Fa|
00000290  64 65 0d 01 5e 1a e7 20  69 6e 73 74 20 8c 20 f2  |de..^.. inst . .|
000002a0  69 6e 73 74 72 75 63 74  69 6f 6e 73 0d 01 68 12  |instructions..h.|
000002b0  d0 3d 26 32 30 30 30 3a  d7 22 52 75 6e 22 0d 01  |.=&2000:."Run"..|
000002c0  72 05 3a 0d 01 7c 6d dd  f2 63 6f 6d 70 28 78 2c  |r.:..|m..comp(x,|
000002d0  79 2c 61 24 29 3a 79 3d  79 2b 31 36 3a ef 33 31  |y,a$):y=y+16:.31|
000002e0  2c 78 2c 79 3a e3 61 3d  31 20 b8 20 a9 28 61 24  |,x,y:.a=1 . .(a$|
000002f0  29 3a e7 20 28 97 28 c1  61 24 2c 61 2c 31 29 29  |):. (.(.a$,a,1))|
00000300  2b 31 35 39 20 80 20 32  32 34 29 3d 32 32 34 20  |+159 . 224)=224 |
00000310  f1 bd 28 97 28 c1 61 24  2c 61 2c 31 29 29 2b 36  |..(.(.a$,a,1))+6|
00000320  33 29 3b 20 8b 20 f1 c1  61 24 2c 61 2c 31 29 3b  |3); . ..a$,a,1);|
00000330  0d 01 86 07 ed 3a e1 0d  01 90 2b dd f2 63 65 6e  |.....:....+..cen|
00000340  74 28 79 2c 61 24 29 3a  f2 63 6f 6d 70 28 32 30  |t(y,a$):.comp(20|
00000350  2d a9 28 61 24 29 20 81  20 32 2c 79 2c 61 24 29  |-.(a$) . 2,y,a$)|
00000360  3a e1 0d 01 9a 2e dd f2  6e 63 65 6e 74 28 79 2c  |:.......ncent(y,|
00000370  61 24 29 3a 79 3d 79 2b  31 36 3a f1 8a 32 30 2d  |a$):y=y+16:..20-|
00000380  28 a9 28 61 24 29 29 2c  79 29 3b 61 24 3b 3a e1  |(.(a$)),y);a$;:.|
00000390  0d 01 a4 15 dd f2 62 6f  72 64 65 72 3a 2a 43 4f  |......border:*CO|
000003a0  44 45 32 35 35 0d 01 ae  6f e3 20 78 3d 32 20 b8  |DE255...o. x=2 .|
000003b0  20 33 39 3a f1 8a 78 2c  31 36 29 3b c4 31 34 2c  | 39:..x,16);.14,|
000003c0  bd 38 2b bd 31 30 2b bd  33 32 29 3a ed 3a fb 31  |.8+.10+.32):.:.1|
000003d0  33 30 3a ef 32 38 2c 31  2c 33 30 2c 33 38 2c 31  |30:.28,1,30,38,1|
000003e0  37 2c 31 32 2c 32 36 3a  fb 31 32 38 3a fb 31 3a  |7,12,26:.128:.1:|
000003f0  e3 78 3d 31 20 b8 20 33  38 3a ef 33 31 2c 78 2c  |.x=1 . 38:.31,x,|
00000400  31 36 2c 32 35 31 2c 33  31 2c 78 2c 33 31 2c 32  |16,251,31,x,31,2|
00000410  35 31 3a ed 0d 01 b8 6a  e3 79 3d 31 37 20 b8 20  |51:....j.y=17 . |
00000420  33 30 3a ef 33 31 2c 30  2c 79 2c 32 35 34 2c 33  |30:.31,0,y,254,3|
00000430  31 2c 33 39 2c 79 2c 32  35 34 3a ed 3a ef 33 31  |1,39,y,254:.:.31|
00000440  2c 30 2c 31 36 2c 32 35  30 2c 33 31 2c 33 39 2c  |,0,16,250,31,39,|
00000450  31 36 2c 32 35 32 2c 33  31 2c 30 2c 33 31 2c 32  |16,252,31,0,31,2|
00000460  35 33 3a ef 35 3a ec 31  32 38 30 2c 32 38 3a e6  |53:.5:.1280,28:.|
00000470  30 2c 31 3a ef 31 32 37  2c 32 35 35 2c 34 0d 01  |0,1:.127,255,4..|
00000480  c2 05 e1 0d 01 cc 12 dd  f2 69 6e 73 74 72 75 63  |.........instruc|
00000490  74 69 6f 6e 73 0d 01 d6  05 f7 0d 01 e0 0b f2 62  |tions..........b|
000004a0  6f 72 64 65 72 0d 01 ea  08 fb 31 33 30 0d 01 f4  |order.....130...|
000004b0  24 ef 32 33 2c 32 35 35  2c 26 30 30 46 46 3b 26  |$.23,255,&00FF;&|
000004c0  30 30 30 30 3b 26 30 30  30 30 3b 26 30 30 30 30  |0000;&0000;&0000|
000004d0  3b 0d 01 fe 06 fb 33 0d  02 08 15 f2 63 65 6e 74  |;.....3.....cent|
000004e0  28 32 2c 22 43 59 42 4f  54 21 22 29 0d 02 12 15  |(2,"CYBOT!")....|
000004f0  f2 63 65 6e 74 28 33 2c  c4 36 2c bd 32 35 35 29  |.cent(3,.6,.255)|
00000500  29 0d 02 1c 0d e3 20 63  3d 30 20 b8 20 33 0d 02  |)..... c=0 . 3..|
00000510  26 12 e3 20 62 3d 35 20  b8 20 31 33 20 88 20 32  |&.. b=5 . 13 . 2|
00000520  0d 02 30 08 f3 20 62 24  0d 02 3a 11 f2 63 6f 6d  |..0.. b$..:..com|
00000530  70 28 32 2c 62 2c 62 24  29 0d 02 44 1e e3 78 3d  |p(2,b,b$)..D..x=|
00000540  b1 20 b8 20 33 36 3a f2  63 6f 6d 70 28 78 2c bc  |. . 36:.comp(x,.|
00000550  2c 22 20 22 29 3a ed 0d  02 4e 05 ed 0d 02 58 0c  |," "):...N....X.|
00000560  f5 20 fd 20 a6 2d 39 39  0d 02 62 05 ed 0d 02 6c  |. . .-99..b....l|
00000570  08 fb 31 32 38 0d 02 76  34 ef 32 38 2c 30 2c 33  |..128..v4.28,0,3|
00000580  31 2c 33 39 2c 31 36 3a  e3 61 3d 30 20 b8 20 31  |1,39,16:.a=0 . 1|
00000590  36 3a ef 33 30 2c 31 31  3a ed 3a ef 32 33 3b 36  |6:.30,11:.:.23;6|
000005a0  2c 30 3b 30 3b 30 3b 30  3b 0d 02 80 0e 2a 4c 2e  |,0;0;0;0;....*L.|
000005b0  53 61 6d 70 2f 50 6c 0d  02 8a 11 2a 4c 2e 46 6c  |Samp/Pl....*L.Fl|
000005c0  75 73 68 20 33 30 30 30  0d 02 94 1c 41 25 3d 31  |ush 3000....A%=1|
000005d0  30 3a 58 25 3d 34 38 3a  59 25 3d 31 32 38 3a d6  |0:X%=48:Y%=128:.|
000005e0  26 41 30 30 0d 02 9e 05  db 0d 02 a8 16 ef 32 36  |&A00..........26|
000005f0  2c 32 33 3b 36 2c 31 36  3b 30 3b 30 3b 30 3b 0d  |,23;6,16;0;0;0;.|
00000600  02 b2 05 e1 0d 02 bc 2a  dc 22 4f 4e 43 45 20 55  |.......*."ONCE U|
00000610  50 4f 4e 20 41 20 54 49  4d 45 20 49 4e 20 54 48  |PON A TIME IN TH|
00000620  45 20 4c 41 4e 44 20 4f  46 20 53 49 4c 22 0d 02  |E LAND OF SIL"..|
00000630  c6 27 dc 22 4c 49 56 45  44 20 41 20 4b 49 4e 44  |.'."LIVED A KIND|
00000640  4c 59 20 47 45 4e 54 4c  45 20 50 45 4f 50 4c 45  |LY GENTLE PEOPLE|
00000650  20 57 48 4f 22 0d 02 d0  27 dc 22 57 45 52 45 20  | WHO"...'."WERE |
00000660  41 4c 4c 20 4f 46 20 54  48 45 20 4d 45 43 48 41  |ALL OF THE MECHA|
00000670  4e 49 43 41 4c 20 54 59  50 45 2e 22 0d 02 da 2b  |NICAL TYPE."...+|
00000680  dc 22 55 4e 46 4f 52 54  55 4e 41 54 45 4c 59 20  |."UNFORTUNATELY |
00000690  41 4c 4f 4e 47 20 43 41  4d 45 20 54 48 45 20 4d  |ALONG CAME THE M|
000006a0  4f 4e 53 54 45 52 22 0d  02 e4 25 dc 22 54 4f 49  |ONSTER"...%."TOI|
000006b0  4c 45 54 2c 20 57 48 49  43 48 20 57 52 45 41 4b  |LET, WHICH WREAK|
000006c0  45 44 20 48 41 56 4f 43  20 42 59 22 0d 02 ee 2a  |ED HAVOC BY"...*|
000006d0  dc 22 46 4c 55 53 48 49  4e 47 20 41 4c 4c 20 54  |."FLUSHING ALL T|
000006e0  48 45 20 52 4f 42 4f 54  53 20 49 54 20 46 4f 55  |HE ROBOTS IT FOU|
000006f0  4e 44 20 4f 4e 22 0d 02  f8 2a dc 22 54 48 45 20  |ND ON"...*."THE |
00000700  57 41 59 20 44 4f 57 4e  20 54 48 45 20 44 52 41  |WAY DOWN THE DRA|
00000710  49 4e 2e 20 59 4f 55 52  20 4a 4f 42 20 49 53 22  |IN. YOUR JOB IS"|
00000720  0d 03 02 28 dc 22 54 4f  20 43 4f 4c 4c 45 43 54  |...(."TO COLLECT|
00000730  20 41 4c 4c 20 54 48 45  20 4d 41 47 49 43 41 4c  | ALL THE MAGICAL|
00000740  20 47 4c 4f 42 45 53 22  0d 03 0c 2a dc 22 57 48  | GLOBES"...*."WH|
00000750  49 43 48 20 43 4f 4e 54  41 49 4e 20 54 48 45 20  |ICH CONTAIN THE |
00000760  46 4c 55 53 48 45 44 20  4f 4e 45 53 2c 20 41 4e  |FLUSHED ONES, AN|
00000770  44 22 0d 03 16 21 dc 22  45 53 43 41 50 45 20 54  |D"...!."ESCAPE T|
00000780  48 52 4f 55 47 48 20 54  48 45 20 50 4f 52 54 41  |HROUGH THE PORTA|
00000790  4c 2e 22 0d 03 20 27 dc  22 48 45 52 45 20 41 52  |L.".. '."HERE AR|
000007a0  45 20 59 4f 55 52 20 43  4f 4e 54 52 4f 4c 53 20  |E YOUR CONTROLS |
000007b0  46 4f 52 20 46 52 45 44  3a 22 0d 03 2a 12 dc 22  |FOR FRED:"..*.."|
000007c0  58 2d 2d 2d 2d 2d 52 49  47 48 54 22 0d 03 34 11  |X-----RIGHT"..4.|
000007d0  dc 22 5a 2d 2d 2d 2d 2d  4c 45 46 54 22 0d 03 3e  |."Z-----LEFT"..>|
000007e0  11 dc 22 52 45 54 2d 2d  2d 4a 55 4d 50 22 0d 03  |.."RET---JUMP"..|
000007f0  48 1d dc 22 22 2c 22 4f  54 48 45 52 20 43 4f 4e  |H.."","OTHER CON|
00000800  54 52 4f 4c 53 20 41 52  45 3a 22 0d 03 52 16 dc  |TROLS ARE:"..R..|
00000810  22 51 2d 2d 2d 2d 2d 53  4f 55 4e 44 20 4f 46 46  |"Q-----SOUND OFF|
00000820  22 0d 03 5c 15 dc 22 53  2d 2d 2d 2d 2d 53 4f 55  |"..\.."S-----SOU|
00000830  4e 44 20 4f 4e 22 0d 03  66 1e dc 22 50 2d 2d 2d  |ND ON"..f.."P---|
00000840  2d 2d 54 45 4c 45 50 4f  52 54 20 50 4f 53 49 54  |--TELEPORT POSIT|
00000850  49 4f 4e 22 0d 03 70 11  dc 22 47 4f 4f 44 20 4c  |ION"..p.."GOOD L|
00000860  55 43 4b 2e 22 0d 03 7a  05 3a 0d 03 84 0c dd f2  |UCK."..z.:......|
00000870  66 61 64 65 69 6e 0d 03  8e 0a f7 20 8d 64 5e 43  |fadein..... .d^C|
00000880  0d 03 98 11 e3 20 6c 61  79 65 72 3d 30 20 b8 20  |..... layer=0 . |
00000890  32 0d 03 a2 09 f3 20 6c  2c 61 0d 03 ac 0e ef 31  |2..... l,a.....1|
000008a0  39 2c 6c 2c 61 3b 30 3b  0d 03 b6 0f d1 3d 30 3a  |9,l,a;0;.....=0:|
000008b0  f5 20 fd 20 91 3e 34 0d  03 c0 09 2a 46 58 31 39  |. . .>4....*FX19|
000008c0  0d 03 ca 05 ed 0d 03 d4  05 e1 0d 03 de 10 dc 32  |...............2|
000008d0  2c 34 2c 31 2c 32 2c 30  2c 37 0d ff              |,4,1,2,0,7..|
000008dc