Home » Personal collection » Acorn tapes » Own_Work » drawer_tl_tape03b_d60_acorn_repton_inf.wav » eT.REP5
eT.REP5
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
Tape/disk: | Home » Personal collection » Acorn tapes » Own_Work » drawer_tl_tape03b_d60_acorn_repton_inf.wav |
Filename: | eT.REP5 |
Read OK: | ✔ |
File size: | 08C6 bytes |
Load address: | 0000 |
Exec address: | 0000 |
Duplicates
There are 3 duplicate copies of this file in the archive:
- Personal collection » Acorn ADFS disks » Electron » Data.ADF » Infinity/eT/REP5
- Personal collection » Acorn ADFS disks » Greaseweazled » adfs_Data.adf » Infinity/eT/REP5
- Personal collection » Acorn tapes » Own_Work » drawer_tl_tape03b_d60_acorn_repton_inf.wav » eT.REP5
- Personal collection » Acorn tapes » Own_Work » drawer_tl_tape03b_d60_acorn_repton_inf.wav » eT.REP5
File contents
WOOZY No� Space � � �RockOK �SpiritOK �MonsterOK �Squash �FungusOK �� Repton � � �Under �Transport �FungusOK �SpiritOK �MonsterOK �� WALL � � �Solid �� Transporter � � �Under �Squash �RockOK �SpiritOK �FungusOK �MonsterOK �� Garage � � �Solid �� � �Deadly �Under �CLeft �CRight �� Rock � � �Solid �HPush �CLeft �CRight �Copy �Transport � � ʂS) ʅ � Repton ̅ � ̈ ʈ ʅ RockOK ̛S) ʇ ̅ CLeft SW) ΅ RockOK ЂW) Ѕ RockOK қW) ҍ Ј Έ ̈ ̂S) ̅ CRight SE) ΅ RockOK ЂE) Ѕ RockOK қE) Ј Έ ̈ ʈ �� � �Solid �HPush �VPush �Transport ʕ �Copy � � �S) � � Space ɛS) � ɂE) Ʌ � Space ʛE) ɇ ʂW) ʅ � Space ˛W) ʇ ˂N) ˅ � Space ̛N) ˇ ̎100) ̄Space) ˈ ʈ Ɉ � �� � �Solid �� � �Solid �� � �Solid �� � �Solid �� � �Solid �CLeft �� � �Solid �CRight �� � �Solid �� Radio � � �Solid �HPush �VPush �� Monster � � ʠ ʕ �Deadly �Copy �Transport �FungusOK �Squash �RockOK � � ʅ �75%) ʅ � ̂S) ̅ MonsterOK ΛS) ̇ Ή checklr ̈ ʇ ̅ � N) ΅ MonsterOK ЛN) Ѝ Έ ̈ ʈ � checklr ʅ � ̂W) ̅ MonsterOK ΛW) ̈ ʇ ̅ � E) ΅ MonsterOK ЛE) Έ ̈ ʈ Ɉ � � ʅ � Rock ̎20) ̑134) ʈ �� Plug � � �Solid �VPush �HPush ʕ �� � �Solid � � ʂE) ʅ � On ̂W) ̅ � Space N) ΅ Copy В�) Є�,W) ЄOff,E) Έ ̈ ʈ �� On � � �Solid �� � �Solid �� Off � � �Solid �� No2 � � �Solid �HPush �VPush �Copy ʕ � �� Egg � � �Solid HPush � � ʅ �0) ̂S) ̅ � Space Μ1) Α4) ̈ ʇ ̂S) ̅ � Space ΛS) ̇ ΄BrokenEgg) Α194) ̈ ʈ �� � Solid Copy HPush VPush � � �W) � � No2 ˂E) ˅ � Zero Ύ250) ΄Diamond) ˈ � �� � �Copy �Solid �VPush �HPush �� � �Solid �HPush �VPush ʕ � � �N) ʅ � Garage ̎150) ̄WALL) ʈ �� Zero � � �Solid �HPush �VPush �Copy ʕ �� � �Solid �VPush �HPush ʕ � � �N) � � Plug ɂS) Ʌ � Radio ʎ175) ʄDiamond) Ɉ ɂS) Ʌ � Repton ʋ Ɉ � �� Diamond � � �CLeft �CRight � � ʅ � Repton ̎5) ̏242) ʈ �� BrokenEgg � � �Solid �Deadly � � ʅ �5) ̐ ̅ �0) ΄Monster) ̈ ʈ � � � � � � � � � � � � � � � � �rection CPX # ra ~CMP #&D0 ELLOW BLUE MAGEN KILLREPTON CHANFECT( FLASH( CHANGE( END SCORE( T KILLREPTON CHA SCORE( SOUND( FNDIF GOTO NOT KIILLREPTON CHANGE END SCORE( SOUNMBLE WALK RUN TYMOVE( STATE( LABTATE( LABEL EVEN
00000000 57 4f 4f 5a 59 0d 20 20 20 20 20 20 20 0d 4e 6f |WOOZY. .No| 00000010 80 20 53 70 61 63 65 0d 0d 83 20 98 0d ca 52 6f |. Space... ...Ro| 00000020 63 6b 4f 4b 0d ca 53 70 69 72 69 74 4f 4b 0d ca |ckOK..SpiritOK..| 00000030 4d 6f 6e 73 74 65 72 4f 4b 0d ca 53 71 75 61 73 |MonsterOK..Squas| 00000040 68 0d ca 46 75 6e 67 75 73 4f 4b 0d fe 80 20 52 |h..FungusOK... R| 00000050 65 70 74 6f 6e 0d 0d 83 20 98 0d ca 55 6e 64 65 |epton... ...Unde| 00000060 72 0d ca 54 72 61 6e 73 70 6f 72 74 0d ca 46 75 |r..Transport..Fu| 00000070 6e 67 75 73 4f 4b 0d ca 53 70 69 72 69 74 4f 4b |ngusOK..SpiritOK| 00000080 0d ca 4d 6f 6e 73 74 65 72 4f 4b 0d fe 80 20 57 |..MonsterOK... W| 00000090 41 4c 4c 0d 0d 83 20 98 0d ca 53 6f 6c 69 64 0d |ALL... ...Solid.| 000000a0 0d fe 80 20 54 72 61 6e 73 70 6f 72 74 65 72 0d |... Transporter.| 000000b0 0d 83 20 98 0d ca 55 6e 64 65 72 0d ca 53 71 75 |.. ...Under..Squ| 000000c0 61 73 68 0d ca 52 6f 63 6b 4f 4b 0d ca 53 70 69 |ash..RockOK..Spi| 000000d0 72 69 74 4f 4b 0d ca 46 75 6e 67 75 73 4f 4b 0d |ritOK..FungusOK.| 000000e0 ca 4d 6f 6e 73 74 65 72 4f 4b 0d 0d fe 80 20 47 |.MonsterOK.... G| 000000f0 61 72 61 67 65 0d 0d 83 20 98 0d 0d ca 53 6f 6c |arage... ....Sol| 00000100 69 64 0d 0d fe 83 20 98 0d ca 44 65 61 64 6c 79 |id.... ...Deadly| 00000110 0d ca 55 6e 64 65 72 0d ca 43 4c 65 66 74 0d ca |..Under..CLeft..| 00000120 43 52 69 67 68 74 0d fe 80 20 52 6f 63 6b 0d 0d |CRight... Rock..| 00000130 83 20 98 0d ca 53 6f 6c 69 64 0d ca 48 50 75 73 |. ...Solid..HPus| 00000140 68 0d ca 43 4c 65 66 74 0d ca 43 52 69 67 68 74 |h..CLeft..CRight| 00000150 0d ca 43 6f 70 79 0d ca 54 72 61 6e 73 70 6f 72 |..Copy..Transpor| 00000160 74 0d 0d 83 20 99 0d ca 82 53 29 0d ca 85 20 9f |t... ....S)... .| 00000170 20 52 65 70 74 6f 6e 0d cc 85 20 86 0d ce 8b 0d | Repton... .....| 00000180 cc 88 0d ca 88 0d ca 85 20 52 6f 63 6b 4f 4b 0d |........ RockOK.| 00000190 cc 9b 53 29 0d ca 87 0d cc 85 20 43 4c 65 66 74 |..S)...... CLeft| 000001a0 0d ce 82 53 57 29 0d ce 85 20 52 6f 63 6b 4f 4b |...SW)... RockOK| 000001b0 0d d0 82 57 29 0d d0 85 20 52 6f 63 6b 4f 4b 0d |...W)... RockOK.| 000001c0 d2 9b 57 29 0d d2 8d 0d d0 88 0d ce 88 0d cc 88 |..W)............| 000001d0 0d 0d cc 82 53 29 0d cc 85 20 43 52 69 67 68 74 |....S)... CRight| 000001e0 0d ce 82 53 45 29 0d ce 85 20 52 6f 63 6b 4f 4b |...SE)... RockOK| 000001f0 0d d0 82 45 29 0d d0 85 20 52 6f 63 6b 4f 4b 0d |...E)... RockOK.| 00000200 d2 9b 45 29 0d d0 88 0d ce 88 0d cc 88 0d ca 88 |..E)............| 00000210 0d 0d fe 83 20 98 0d ca 53 6f 6c 69 64 0d ca 48 |.... ...Solid..H| 00000220 50 75 73 68 0d ca 56 50 75 73 68 0d ca 54 72 61 |Push..VPush..Tra| 00000230 6e 73 70 6f 72 74 0d ca 95 0d ca 43 6f 70 79 0d |nsport.....Copy.| 00000240 0d 83 20 99 0d 82 53 29 0d 85 20 9f 20 53 70 61 |.. ...S).. . Spa| 00000250 63 65 0d c9 9b 53 29 0d 87 0d c9 82 45 29 0d c9 |ce...S).....E)..| 00000260 85 20 9f 20 53 70 61 63 65 0d ca 9b 45 29 0d c9 |. . Space...E)..| 00000270 87 0d ca 82 57 29 0d ca 85 20 9f 20 53 70 61 63 |....W)... . Spac| 00000280 65 0d cb 9b 57 29 0d ca 87 0d cb 82 4e 29 0d cb |e...W)......N)..| 00000290 85 20 9f 20 53 70 61 63 65 0d cc 9b 4e 29 0d cb |. . Space...N)..| 000002a0 87 0d cc 8e 31 30 30 29 0d cc 84 53 70 61 63 65 |....100)...Space| 000002b0 29 0d cb 88 0d ca 88 0d c9 88 0d 88 0d 0d 0d fe |)...............| 000002c0 83 20 98 0d ca 53 6f 6c 69 64 0d fe 83 20 98 0d |. ...Solid... ..| 000002d0 ca 53 6f 6c 69 64 0d fe 83 20 98 0d ca 53 6f 6c |.Solid... ...Sol| 000002e0 69 64 0d fe 83 20 98 0d ca 53 6f 6c 69 64 0d 0d |id... ...Solid..| 000002f0 fe 83 20 98 0d ca 53 6f 6c 69 64 0d ca 43 4c 65 |.. ...Solid..CLe| 00000300 66 74 0d fe 83 20 98 0d ca 53 6f 6c 69 64 0d ca |ft... ...Solid..| 00000310 43 52 69 67 68 74 0d fe 83 20 98 0d ca 53 6f 6c |CRight... ...Sol| 00000320 69 64 0d 0d 0d fe 80 20 52 61 64 69 6f 0d 0d 83 |id..... Radio...| 00000330 20 98 0d ca 53 6f 6c 69 64 0d ca 48 50 75 73 68 | ...Solid..HPush| 00000340 0d ca 56 50 75 73 68 0d 0d fe 80 20 4d 6f 6e 73 |..VPush.... Mons| 00000350 74 65 72 0d 0d 83 20 98 0d ca a0 0d ca 95 0d ca |ter... .........| 00000360 44 65 61 64 6c 79 0d ca 43 6f 70 79 0d ca 54 72 |Deadly..Copy..Tr| 00000370 61 6e 73 70 6f 72 74 0d ca 46 75 6e 67 75 73 4f |ansport..FungusO| 00000380 4b 0d ca 53 71 75 61 73 68 0d ca 52 6f 63 6b 4f |K..Squash..RockO| 00000390 4b 0d 0d 83 20 99 0d ca 85 20 93 37 35 25 29 0d |K... .... .75%).| 000003a0 ca 85 20 ab 0d cc 82 53 29 0d cc 85 20 4d 6f 6e |.. ....S)... Mon| 000003b0 73 74 65 72 4f 4b 0d ce 9b 53 29 0d ce 8d 0d cc |sterOK...S).....| 000003c0 87 0d ce 89 20 63 68 65 63 6b 6c 72 0d cc 88 0d |.... checklr....| 000003d0 ca 87 0d cc 85 20 a9 0d ce 82 4e 29 0d ce 85 20 |..... ....N)... | 000003e0 4d 6f 6e 73 74 65 72 4f 4b 0d d0 9b 4e 29 0d d0 |MonsterOK...N)..| 000003f0 8d 0d ce 88 0d cc 88 0d ca 88 0d 0d 9d 20 63 68 |............. ch| 00000400 65 63 6b 6c 72 0d 0d ca 85 20 aa 0d cc 82 57 29 |ecklr.... ....W)| 00000410 0d cc 85 20 4d 6f 6e 73 74 65 72 4f 4b 0d ce 9b |... MonsterOK...| 00000420 57 29 0d ce 8d 0d cc 88 0d ca 87 0d cc 85 20 a8 |W)............ .| 00000430 0d ce 82 45 29 0d ce 85 20 4d 6f 6e 73 74 65 72 |...E)... Monster| 00000440 4f 4b 0d d0 9b 45 29 0d ce 88 0d cc 88 0d ca 88 |OK...E).........| 00000450 0d c9 88 0d 0d 83 20 9a 0d ca 85 20 81 20 52 6f |...... .... . Ro| 00000460 63 6b 0d cc 8e 32 30 29 0d cc 91 31 33 34 29 0d |ck...20)...134).| 00000470 ca 88 0d 0d fe 80 20 50 6c 75 67 0d 0d 83 20 98 |...... Plug... .| 00000480 0d ca 53 6f 6c 69 64 0d ca 56 50 75 73 68 0d ca |..Solid..VPush..| 00000490 48 50 75 73 68 0d ca 95 0d 0d fe 83 20 98 0d ca |HPush....... ...| 000004a0 53 6f 6c 69 64 0d 0d 83 20 99 0d ca 82 45 29 0d |Solid... ....E).| 000004b0 ca 85 20 9f 20 4f 6e 0d cc 82 57 29 0d cc 85 20 |.. . On...W)... | 000004c0 9f 20 53 70 61 63 65 0d ce 82 4e 29 0d ce 85 20 |. Space...N)... | 000004d0 43 6f 70 79 0d d0 92 a7 29 0d d0 84 9f 2c 57 29 |Copy....)....,W)| 000004e0 0d d0 84 4f 66 66 2c 45 29 0d ce 88 0d cc 88 0d |...Off,E).......| 000004f0 ca 88 0d fe 80 20 4f 6e 0d 0d 83 20 98 0d ca 53 |..... On... ...S| 00000500 6f 6c 69 64 0d fe 83 20 98 0d ca 53 6f 6c 69 64 |olid... ...Solid| 00000510 0d 0d 0d fe 80 20 4f 66 66 0d 0d 83 20 98 0d ca |..... Off... ...| 00000520 53 6f 6c 69 64 0d fe 80 20 4e 6f 32 0d 0d 83 20 |Solid... No2... | 00000530 98 0d ca 53 6f 6c 69 64 0d ca 48 50 75 73 68 0d |...Solid..HPush.| 00000540 ca 56 50 75 73 68 0d ca 43 6f 70 79 0d ca 95 0d |.VPush..Copy....| 00000550 0d fe 0d 0d 0d 0d 0d 0d 0d 0d 0d 0d 0d fe 80 20 |............... | 00000560 45 67 67 0d 0d 83 20 98 0d ca 53 6f 6c 69 64 0d |Egg... ...Solid.| 00000570 20 20 48 50 75 73 68 0d 0d 83 20 99 0d ca 85 20 | HPush... .... | 00000580 9c 30 29 0d cc 82 53 29 0d cc 85 20 9f 20 53 70 |.0)...S)... . Sp| 00000590 61 63 65 0d ce 9c 31 29 0d ce 91 34 29 0d cc 88 |ace...1)...4)...| 000005a0 0d ca 87 0d cc 82 53 29 0d cc 85 20 9f 20 53 70 |......S)... . Sp| 000005b0 61 63 65 0d ce 9b 53 29 0d cc 87 0d ce 84 42 72 |ace...S)......Br| 000005c0 6f 6b 65 6e 45 67 67 29 0d ce 91 31 39 34 29 0d |okenEgg)...194).| 000005d0 cc 88 0d ca 88 0d fe 83 20 98 0d 0d 53 6f 6c 69 |........ ...Soli| 000005e0 64 0d 43 6f 70 79 0d 48 50 75 73 68 0d 56 50 75 |d.Copy.HPush.VPu| 000005f0 73 68 0d 0d 83 20 99 0d 82 57 29 0d 85 20 9f 20 |sh... ...W).. . | 00000600 4e 6f 32 0d 0d cb 82 45 29 0d cb 85 20 9f 20 5a |No2....E)... . Z| 00000610 65 72 6f 0d ce 8e 32 35 30 29 0d ce 84 44 69 61 |ero...250)...Dia| 00000620 6d 6f 6e 64 29 0d 0d cb 88 0d 88 0d 0d fe 83 20 |mond).......... | 00000630 98 0d ca 43 6f 70 79 0d ca 53 6f 6c 69 64 0d ca |...Copy..Solid..| 00000640 56 50 75 73 68 0d ca 48 50 75 73 68 0d 0d fe 83 |VPush..HPush....| 00000650 20 98 0d ca 53 6f 6c 69 64 0d ca 48 50 75 73 68 | ...Solid..HPush| 00000660 0d ca 56 50 75 73 68 0d ca 95 0d 0d 83 20 99 0d |..VPush...... ..| 00000670 82 4e 29 0d ca 85 20 9f 20 47 61 72 61 67 65 0d |.N)... . Garage.| 00000680 cc 8e 31 35 30 29 0d cc 84 57 41 4c 4c 29 0d ca |..150)...WALL)..| 00000690 88 0d 0d fe 80 20 5a 65 72 6f 0d 0d 83 20 98 0d |..... Zero... ..| 000006a0 ca 53 6f 6c 69 64 0d ca 48 50 75 73 68 0d ca 56 |.Solid..HPush..V| 000006b0 50 75 73 68 0d ca 43 6f 70 79 0d ca 95 0d 0d fe |Push..Copy......| 000006c0 83 20 98 0d ca 53 6f 6c 69 64 0d ca 56 50 75 73 |. ...Solid..VPus| 000006d0 68 0d ca 48 50 75 73 68 0d ca 95 0d 0d 83 20 99 |h..HPush...... .| 000006e0 0d 82 4e 29 0d 85 20 9f 20 50 6c 75 67 0d c9 82 |..N).. . Plug...| 000006f0 53 29 0d c9 85 20 9f 20 52 61 64 69 6f 0d ca 8e |S)... . Radio...| 00000700 31 37 35 29 0d ca 84 44 69 61 6d 6f 6e 64 29 0d |175)...Diamond).| 00000710 c9 88 0d c9 82 53 29 0d c9 85 20 9f 20 52 65 70 |.....S)... . Rep| 00000720 74 6f 6e 0d ca 8b 0d c9 88 0d 88 0d 0d fe 80 20 |ton............ | 00000730 44 69 61 6d 6f 6e 64 0d 0d 83 20 98 0d ca 43 4c |Diamond... ...CL| 00000740 65 66 74 0d ca 43 52 69 67 68 74 0d 0d 83 20 9a |eft..CRight... .| 00000750 0d ca 85 20 81 20 52 65 70 74 6f 6e 0d cc 8e 35 |... . Repton...5| 00000760 29 0d cc 8f 32 34 32 29 0d ca 88 0d 0d fe 80 20 |)...242)....... | 00000770 42 72 6f 6b 65 6e 45 67 67 0d 0d 83 20 98 0d ca |BrokenEgg... ...| 00000780 53 6f 6c 69 64 0d ca 44 65 61 64 6c 79 0d 0d 83 |Solid..Deadly...| 00000790 20 99 0d ca 85 20 9e 35 29 0d cc 90 0d cc 85 20 | .... .5)...... | 000007a0 9c 30 29 0d ce 84 4d 6f 6e 73 74 65 72 29 0d cc |.0)...Monster)..| 000007b0 88 0d ca 88 0d fe 0d fe 0d fe 0d fe 0d fe 0d fe |................| 000007c0 0d fe 0d fe 0d fe 0d fe 0d fe 0d fe 0d fe 0d fe |................| 000007d0 0d fe 0d fe 0d fe 72 65 63 74 69 6f 6e 0d 17 20 |......rection.. | 000007e0 0a 43 50 58 20 23 00 00 00 00 00 00 00 08 00 00 |.CPX #..........| 000007f0 00 00 00 00 00 00 72 61 0d 18 7e 0c 43 4d 50 20 |......ra..~.CMP | 00000800 23 26 44 30 0d 18 45 4c 4c 4f 57 00 42 4c 55 45 |#&D0..ELLOW.BLUE| 00000810 00 4d 41 47 45 4e 00 4b 49 4c 4c 52 45 50 54 4f |.MAGEN.KILLREPTO| 00000820 4e 00 43 48 41 4e 46 45 43 54 28 00 46 4c 41 53 |N.CHANFECT(.FLAS| 00000830 48 28 00 43 48 41 4e 47 45 28 00 45 4e 44 00 53 |H(.CHANGE(.END.S| 00000840 43 4f 52 45 28 00 54 00 4b 49 4c 4c 52 45 50 54 |CORE(.T.KILLREPT| 00000850 4f 4e 00 43 48 41 00 53 43 4f 52 45 28 00 53 4f |ON.CHA.SCORE(.SO| 00000860 55 4e 44 28 00 46 4e 44 49 46 00 47 4f 54 4f 00 |UND(.FNDIF.GOTO.| 00000870 4e 4f 54 00 4b 49 49 4c 4c 52 45 50 54 4f 4e 00 |NOT.KIILLREPTON.| 00000880 43 48 41 4e 47 45 00 45 4e 44 00 53 43 4f 52 45 |CHANGE.END.SCORE| 00000890 28 00 53 4f 55 4e 4d 42 4c 45 00 57 41 4c 4b 00 |(.SOUNMBLE.WALK.| 000008a0 52 55 4e 00 54 59 4d 4f 56 45 28 00 53 54 41 54 |RUN.TYMOVE(.STAT| 000008b0 45 28 00 4c 41 42 54 41 54 45 28 00 4c 41 42 45 |E(.LABTATE(.LABE| 000008c0 4c 00 45 56 45 4e |L.EVEN| 000008c6
Sprite 0 NAME Space DEFINE TYPE RockOK SpiritOK MonsterOK Squash FungusOK Sprite 1 NAME Repton DEFINE TYPE Under Transport FungusOK SpiritOK MonsterOK Sprite 2 NAME WALL DEFINE TYPE Solid Sprite 3 NAME Transporter DEFINE TYPE Under Squash RockOK SpiritOK FungusOK MonsterOK Sprite 4 NAME Garage DEFINE TYPE Solid Sprite 5 DEFINE TYPE Deadly Under CLeft CRight Sprite 6 NAME Rock DEFINE TYPE Solid HPush CLeft CRight Copy Transport DEFINE ACTION LOOK(S) IF CONTENTS Repton IF MOVING KILLREPTON ENDIF ENDIF IF RockOK MOVE(S) ELSE IF CLeft LOOK(SW) IF RockOK LOOK(W) IF RockOK MOVE(W) END ENDIF ENDIF ENDIF LOOK(S) IF CRight LOOK(SE) IF RockOK LOOK(E) IF RockOK MOVE(E) ENDIF ENDIF ENDIF ENDIF Sprite 7 DEFINE TYPE Solid HPush VPush Transport One Copy DEFINE ACTION LOOK(S) IF CONTENTS Space MOVE(S) ELSE LOOK(E) IF CONTENTS Space MOVE(E) ELSE LOOK(W) IF CONTENTS Space MOVE(W) ELSE LOOK(N) IF CONTENTS Space MOVE(N) ELSE SCORE(100) CREATE(Space) ENDIF ENDIF ENDIF ENDIF Sprite 8 DEFINE TYPE Solid Sprite 9 DEFINE TYPE Solid Sprite 10 DEFINE TYPE Solid Sprite 11 DEFINE TYPE Solid Sprite 12 DEFINE TYPE Solid CLeft Sprite 13 DEFINE TYPE Solid CRight Sprite 14 DEFINE TYPE Solid Sprite 15 NAME Radio DEFINE TYPE Solid HPush VPush Sprite 16 NAME Monster DEFINE TYPE Animate One Deadly Copy Transport FungusOK Squash RockOK DEFINE ACTION IF CHANCE(75%) IF NORTHOF LOOK(S) IF MonsterOK MOVE(S) END ELSE GOTO checklr ENDIF ELSE IF SOUTHOF LOOK(N) IF MonsterOK MOVE(N) END ENDIF ENDIF ENDIF LABEL checklr IF EASTOF LOOK(W) IF MonsterOK MOVE(W) END ENDIF ELSE IF WESTOF LOOK(E) IF MonsterOK MOVE(E) ENDIF ENDIF ENDIF ENDIF DEFINE HITS IF HITBY Rock SCORE(20) EFFECT(134) ENDIF Sprite 17 NAME Plug DEFINE TYPE Solid VPush HPush One Sprite 18 DEFINE TYPE Solid DEFINE ACTION LOOK(E) IF CONTENTS On LOOK(W) IF CONTENTS Space LOOK(N) IF Copy FLASH(WHITE) CREATE(CONTENTS,W) CREATE(Off,E) ENDIF ENDIF ENDIF Sprite 19 NAME On DEFINE TYPE Solid Sprite 20 DEFINE TYPE Solid Sprite 21 NAME Off DEFINE TYPE Solid Sprite 22 NAME No2 DEFINE TYPE Solid HPush VPush Copy One Sprite 23 Sprite 24 NAME Egg DEFINE TYPE Solid HPush DEFINE ACTION IF STATE(0) LOOK(S) IF CONTENTS Space STATE(1) EFFECT(4) ENDIF ELSE LOOK(S) IF CONTENTS Space MOVE(S) ELSE CREATE(BrokenEgg) EFFECT(194) ENDIF ENDIF Sprite 25 DEFINE TYPE Solid Copy HPush VPush DEFINE ACTION LOOK(W) IF CONTENTS No2 LOOK(E) IF CONTENTS Zero SCORE(250) CREATE(Diamond) ENDIF ENDIF Sprite 26 DEFINE TYPE Copy Solid VPush HPush Sprite 27 DEFINE TYPE Solid HPush VPush One DEFINE ACTION LOOK(N) IF CONTENTS Garage SCORE(150) CREATE(WALL) ENDIF Sprite 28 NAME Zero DEFINE TYPE Solid HPush VPush Copy One Sprite 29 DEFINE TYPE Solid VPush HPush One DEFINE ACTION LOOK(N) IF CONTENTS Plug LOOK(S) IF CONTENTS Radio SCORE(175) CREATE(Diamond) ENDIF LOOK(S) IF CONTENTS Repton KILLREPTON ENDIF ENDIF Sprite 30 NAME Diamond DEFINE TYPE CLeft CRight DEFINE HITS IF HITBY Repton SCORE(5) SOUND(242) ENDIF Sprite 31 NAME BrokenEgg DEFINE TYPE Solid Deadly DEFINE ACTION IF EVENT(5) FLIP IF STATE(0) CREATE(Monster) ENDIF ENDIF Sprite 32 Sprite 33 Sprite 34 Sprite 35 Sprite 36 Sprite 37 Sprite 38 Sprite 39 Sprite 40 Sprite 41 Sprite 42 Sprite 43 Sprite 44 Sprite 45 Sprite 46 Sprite 47 Sprite 48 rection CPX #ra ~CMP #&D0 ELLOWBLUEMAGENKILLREPTONCHANFECT(FLASH(CHANGE(ENDSCORE(TKILLREPTONCHASCORE(SOUND(FNDIFGOTONOTKIILLREPTONCHANGEENDSCORE(SOUNMBLEWALKRUNTYMOVE(STATE(LABTATE(LABELEVEN