Home » Personal collection » Acorn ADFS disks » Electron » Repton_Infinity.ADF » REPINFIN/eT/Rep4

REPINFIN/eT/Rep4

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 ADFS disks » Electron » Repton_Infinity.ADF
Filename: REPINFIN/eT/Rep4
Read OK:
File size: 09E7 bytes
Load address: 0000
Exec address: 0000
File contents
Roger Legends
No� Space

� �
�RockOK
�SpiritOK
�MonsterOK
�Squash
�FungusOK
�� Repton

� �
�Under
�Transport
�FungusOK
�SpiritOK
�MonsterOK
�� �
�Solid

�� Transporter

� �
�Under
�Squash
�RockOK
�SpiritOK
�FungusOK
�MonsterOK

�� �
�CLeft
�CRight
ʖ

� �
ʂN)
ʅ � Repton
̂S)
̅ � Space
ΛS)
̈
ʇ
̂S)
̅ � Repton
΂N)
΅ � Space
ЛN)
Έ
̈
ʈ

� �
ʎ5)
ʏ242)

�� �
�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)
Ј
Έ
̈
ʈ

�� �
�RockOK
�Under
�Solid

� �
ʄRock,S)
ʄCrown)
�� �
�Solid
�� �
�Solid
�� �
�Solid
�� �
�Solid

�� �
�Solid
�CLeft
�� �
�Solid
�CRight
�� �
�Solid


�� �
�Solid
�� 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)
ʈ
ʅ � Fungus
̎20)
̑134)
ʈ
�� Spirit

� �
�Copy
�Deadly
�Transport
ʠ
ʕ

� �
ʂL)
ʅ SpiritOK
̛L)
̍
ʇ
̂F)
̅ SpiritOK
ΛF)
΍
̇
΂R)
΅ SpiritOK
ЛR)
Ѝ
·
ЂB)
Ѕ SpiritOK
қB)
Ј
Έ
̈
ʈ

�� �
�Solid

� �
ʂE)
ʅ � On
̂W)
̅ � Space
΂N)
΅ Copy
В�)
Є�,W)
ЄOff,E)
Έ
̈
ʈ
�� On

� �
�Solid
�� �
�Solid


�� Off

� �
�Solid
�� Safe

� �
�Solid
�� Cage

� �
�Solid
�SpiritOK
�Under

� �
ʒ�)
ʄDiamond)
ʏ12)
�� Egg

� �
�Solid
  HPush

� �
ʅ �0)
̂S)
̅ � Space
Μ1)
Α4)
̈
ʇ
̂S)
̅ � Space
ΛS)
̇
΄BrokenEgg)
Α194)
̈
ʈ
�� Key

� �
ʌSafe,Diamond)
ʑ192)
�� Fungus

� �
�Deadly
�Transport

� �
ʅ �6)
̐
̅ �0)
΂E)
΅ FungusOK
ЄFungus,E)
Έ
΂W)
΅ FungusOK
ЄFungus,W)
Έ
̇
΂S)
΅ FungusOK
ЄFungus,S)
Έ
΂N)
΅ FungusOK
ЄFungus,N)
Έ
̈
ʈ
�� Block

� �
�Solid
�HPush
�VPush
�Copy
�Transport

� �
ʂW)
ʅ � Block
̂E)
̅ � Block
΄Diamond,W)
΄Diamond,E)
΄Diamond)
̈
ʈ
ʂN)
ʅ � Block
̂S)
̅ � Block
΄Diamond,N)
΄Diamond,S)
΄Diamond)
̈
ʈ

�
�� Crown

� �
�CLeft
�CRight

� �
ʎ20)
ʑ193)
�� Diamond

� �
�CLeft
�CRight

� �
ʅ � Repton
̎5)
̏242)
ʈ

�� BrokenEgg

� �
�Solid
�Deadly

� �
ʅ �5)
̐
̅ �0)
΄Monster)
̈
ʈ
�
�
�
�
�
�
�
�
�
�
�
�
�
�
�
�
�rection
 
CPX #ra
~CMP #&D0
ELLOWBLUEMAGENKILLREPTONCHANFECT(FLASH(CHANGE(ENDSCORE(TKILLREPTONCHASCORE(SOUND(FNDIFGOTONOTKIILLREPTONCHANGEENDSCORE(SOUNMBLEWALKRUNTYMOVE(STATE(LABTATE(LABELEVEN
00000000  52 6f 67 65 72 20 4c 65  67 65 6e 64 73 0d 4e 6f  |Roger Legends.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 83 20 98  |..MonsterOK... .|
00000090  0d ca 53 6f 6c 69 64 0d  0d fe 80 20 54 72 61 6e  |..Solid.... Tran|
000000a0  73 70 6f 72 74 65 72 0d  0d 83 20 98 0d ca 55 6e  |sporter... ...Un|
000000b0  64 65 72 0d ca 53 71 75  61 73 68 0d ca 52 6f 63  |der..Squash..Roc|
000000c0  6b 4f 4b 0d ca 53 70 69  72 69 74 4f 4b 0d ca 46  |kOK..SpiritOK..F|
000000d0  75 6e 67 75 73 4f 4b 0d  ca 4d 6f 6e 73 74 65 72  |ungusOK..Monster|
000000e0  4f 4b 0d 0d fe 83 20 98  0d ca 43 4c 65 66 74 0d  |OK.... ...CLeft.|
000000f0  ca 43 52 69 67 68 74 0d  ca 96 0d 0d 83 20 99 0d  |.CRight...... ..|
00000100  ca 82 4e 29 0d ca 85 20  9f 20 52 65 70 74 6f 6e  |..N)... . Repton|
00000110  0d cc 82 53 29 0d cc 85  20 9f 20 53 70 61 63 65  |...S)... . Space|
00000120  0d ce 9b 53 29 0d cc 88  0d ca 87 0d cc 82 53 29  |...S).........S)|
00000130  0d cc 85 20 9f 20 52 65  70 74 6f 6e 0d ce 82 4e  |... . Repton...N|
00000140  29 0d ce 85 20 9f 20 53  70 61 63 65 0d d0 9b 4e  |)... . Space...N|
00000150  29 0d ce 88 0d cc 88 0d  ca 88 0d 0d 83 20 9a 0d  |)............ ..|
00000160  ca 8e 35 29 0d ca 8f 32  34 32 29 0d 0d fe 83 20  |..5)...242).... |
00000170  98 0d ca 44 65 61 64 6c  79 0d ca 55 6e 64 65 72  |...Deadly..Under|
00000180  0d ca 43 4c 65 66 74 0d  ca 43 52 69 67 68 74 0d  |..CLeft..CRight.|
00000190  fe 80 20 52 6f 63 6b 0d  0d 83 20 98 0d ca 53 6f  |.. Rock... ...So|
000001a0  6c 69 64 0d ca 48 50 75  73 68 0d ca 43 4c 65 66  |lid..HPush..CLef|
000001b0  74 0d ca 43 52 69 67 68  74 0d ca 43 6f 70 79 0d  |t..CRight..Copy.|
000001c0  ca 54 72 61 6e 73 70 6f  72 74 0d 0d 83 20 99 0d  |.Transport... ..|
000001d0  ca 82 53 29 0d ca 85 20  9f 20 52 65 70 74 6f 6e  |..S)... . Repton|
000001e0  0d cc 85 20 86 0d ce 8b  0d cc 88 0d ca 88 0d ca  |... ............|
000001f0  85 20 52 6f 63 6b 4f 4b  0d cc 9b 53 29 0d ca 87  |. RockOK...S)...|
00000200  0d cc 85 20 43 4c 65 66  74 0d ce 82 53 57 29 0d  |... CLeft...SW).|
00000210  ce 85 20 52 6f 63 6b 4f  4b 0d d0 82 57 29 0d d0  |.. RockOK...W)..|
00000220  85 20 52 6f 63 6b 4f 4b  0d d2 9b 57 29 0d d2 8d  |. RockOK...W)...|
00000230  0d d0 88 0d ce 88 0d cc  88 0d 0d cc 82 53 29 0d  |.............S).|
00000240  cc 85 20 43 52 69 67 68  74 0d ce 82 53 45 29 0d  |.. CRight...SE).|
00000250  ce 85 20 52 6f 63 6b 4f  4b 0d d0 82 45 29 0d d0  |.. RockOK...E)..|
00000260  85 20 52 6f 63 6b 4f 4b  0d d2 9b 45 29 0d d0 88  |. RockOK...E)...|
00000270  0d ce 88 0d cc 88 0d ca  88 0d 0d fe 83 20 98 0d  |............. ..|
00000280  ca 52 6f 63 6b 4f 4b 0d  ca 55 6e 64 65 72 0d ca  |.RockOK..Under..|
00000290  53 6f 6c 69 64 0d 0d 83  20 9a 0d ca 84 52 6f 63  |Solid... ....Roc|
000002a0  6b 2c 53 29 0d ca 84 43  72 6f 77 6e 29 0d fe 83  |k,S)...Crown)...|
000002b0  20 98 0d ca 53 6f 6c 69  64 0d fe 83 20 98 0d ca  | ...Solid... ...|
000002c0  53 6f 6c 69 64 0d fe 83  20 98 0d ca 53 6f 6c 69  |Solid... ...Soli|
000002d0  64 0d fe 83 20 98 0d ca  53 6f 6c 69 64 0d 0d fe  |d... ...Solid...|
000002e0  83 20 98 0d ca 53 6f 6c  69 64 0d ca 43 4c 65 66  |. ...Solid..CLef|
000002f0  74 0d fe 83 20 98 0d ca  53 6f 6c 69 64 0d ca 43  |t... ...Solid..C|
00000300  52 69 67 68 74 0d fe 83  20 98 0d ca 53 6f 6c 69  |Right... ...Soli|
00000310  64 0d 0d 0d fe 83 20 98  0d ca 53 6f 6c 69 64 0d  |d..... ...Solid.|
00000320  fe 80 20 4d 6f 6e 73 74  65 72 0d 0d 83 20 98 0d  |.. Monster... ..|
00000330  ca a0 0d ca 95 0d ca 44  65 61 64 6c 79 0d ca 43  |.......Deadly..C|
00000340  6f 70 79 0d ca 54 72 61  6e 73 70 6f 72 74 0d ca  |opy..Transport..|
00000350  46 75 6e 67 75 73 4f 4b  0d ca 53 71 75 61 73 68  |FungusOK..Squash|
00000360  0d ca 52 6f 63 6b 4f 4b  0d 0d 83 20 99 0d ca 85  |..RockOK... ....|
00000370  20 93 37 35 25 29 0d ca  85 20 ab 0d cc 82 53 29  | .75%)... ....S)|
00000380  0d cc 85 20 4d 6f 6e 73  74 65 72 4f 4b 0d ce 9b  |... MonsterOK...|
00000390  53 29 0d ce 8d 0d cc 87  0d ce 89 20 63 68 65 63  |S)......... chec|
000003a0  6b 6c 72 0d cc 88 0d ca  87 0d cc 85 20 a9 0d ce  |klr......... ...|
000003b0  82 4e 29 0d ce 85 20 4d  6f 6e 73 74 65 72 4f 4b  |.N)... MonsterOK|
000003c0  0d d0 9b 4e 29 0d d0 8d  0d ce 88 0d cc 88 0d ca  |...N)...........|
000003d0  88 0d 0d 9d 20 63 68 65  63 6b 6c 72 0d 0d ca 85  |.... checklr....|
000003e0  20 aa 0d cc 82 57 29 0d  cc 85 20 4d 6f 6e 73 74  | ....W)... Monst|
000003f0  65 72 4f 4b 0d ce 9b 57  29 0d ce 8d 0d cc 88 0d  |erOK...W).......|
00000400  ca 87 0d cc 85 20 a8 0d  ce 82 45 29 0d ce 85 20  |..... ....E)... |
00000410  4d 6f 6e 73 74 65 72 4f  4b 0d d0 9b 45 29 0d ce  |MonsterOK...E)..|
00000420  88 0d cc 88 0d ca 88 0d  c9 88 0d 0d 83 20 9a 0d  |............. ..|
00000430  ca 85 20 81 20 52 6f 63  6b 0d cc 8e 32 30 29 0d  |.. . Rock...20).|
00000440  cc 91 31 33 34 29 0d ca  88 0d ca 85 20 81 20 46  |..134)...... . F|
00000450  75 6e 67 75 73 0d cc 8e  32 30 29 0d cc 91 31 33  |ungus...20)...13|
00000460  34 29 0d ca 88 0d fe 80  20 53 70 69 72 69 74 0d  |4)...... Spirit.|
00000470  0d 83 20 98 0d ca 43 6f  70 79 0d ca 44 65 61 64  |.. ...Copy..Dead|
00000480  6c 79 0d ca 54 72 61 6e  73 70 6f 72 74 0d ca a0  |ly..Transport...|
00000490  0d ca 95 0d 0d 83 20 99  0d ca 82 4c 29 0d ca 85  |...... ....L)...|
000004a0  20 53 70 69 72 69 74 4f  4b 0d cc 9b 4c 29 0d cc  | SpiritOK...L)..|
000004b0  8d 0d ca 87 0d cc 82 46  29 0d cc 85 20 53 70 69  |.......F)... Spi|
000004c0  72 69 74 4f 4b 0d ce 9b  46 29 0d ce 8d 0d cc 87  |ritOK...F)......|
000004d0  0d ce 82 52 29 0d ce 85  20 53 70 69 72 69 74 4f  |...R)... SpiritO|
000004e0  4b 0d d0 9b 52 29 0d d0  8d 0d ce 87 0d d0 82 42  |K...R).........B|
000004f0  29 0d d0 85 20 53 70 69  72 69 74 4f 4b 0d d2 9b  |)... SpiritOK...|
00000500  42 29 0d d0 88 0d ce 88  0d cc 88 0d ca 88 0d 0d  |B)..............|
00000510  fe 83 20 98 0d ca 53 6f  6c 69 64 0d 0d 83 20 99  |.. ...Solid... .|
00000520  0d ca 82 45 29 0d ca 85  20 9f 20 4f 6e 0d cc 82  |...E)... . On...|
00000530  57 29 0d cc 85 20 9f 20  53 70 61 63 65 0d ce 82  |W)... . Space...|
00000540  4e 29 0d ce 85 20 43 6f  70 79 0d d0 92 a7 29 0d  |N)... Copy....).|
00000550  d0 84 9f 2c 57 29 0d d0  84 4f 66 66 2c 45 29 0d  |...,W)...Off,E).|
00000560  ce 88 0d cc 88 0d ca 88  0d fe 80 20 4f 6e 0d 0d  |........... On..|
00000570  83 20 98 0d ca 53 6f 6c  69 64 0d fe 83 20 98 0d  |. ...Solid... ..|
00000580  ca 53 6f 6c 69 64 0d 0d  0d fe 80 20 4f 66 66 0d  |.Solid..... Off.|
00000590  0d 83 20 98 0d ca 53 6f  6c 69 64 0d fe 80 20 53  |.. ...Solid... S|
000005a0  61 66 65 0d 0d 83 20 98  0d ca 53 6f 6c 69 64 0d  |afe... ...Solid.|
000005b0  fe 80 20 43 61 67 65 0d  0d 83 20 98 0d ca 53 6f  |.. Cage... ...So|
000005c0  6c 69 64 0d ca 53 70 69  72 69 74 4f 4b 0d ca 55  |lid..SpiritOK..U|
000005d0  6e 64 65 72 0d 0d 83 20  9a 0d ca 92 a3 29 0d ca  |nder... .....)..|
000005e0  84 44 69 61 6d 6f 6e 64  29 0d ca 8f 31 32 29 0d  |.Diamond)...12).|
000005f0  fe 80 20 45 67 67 0d 0d  83 20 98 0d ca 53 6f 6c  |.. Egg... ...Sol|
00000600  69 64 0d 20 20 48 50 75  73 68 0d 0d 83 20 99 0d  |id.  HPush... ..|
00000610  ca 85 20 9c 30 29 0d cc  82 53 29 0d cc 85 20 9f  |.. .0)...S)... .|
00000620  20 53 70 61 63 65 0d ce  9c 31 29 0d ce 91 34 29  | Space...1)...4)|
00000630  0d cc 88 0d ca 87 0d cc  82 53 29 0d cc 85 20 9f  |.........S)... .|
00000640  20 53 70 61 63 65 0d ce  9b 53 29 0d cc 87 0d ce  | Space...S).....|
00000650  84 42 72 6f 6b 65 6e 45  67 67 29 0d ce 91 31 39  |.BrokenEgg)...19|
00000660  34 29 0d cc 88 0d ca 88  0d fe 80 20 4b 65 79 0d  |4)......... Key.|
00000670  0d 83 20 9a 0d ca 8c 53  61 66 65 2c 44 69 61 6d  |.. ....Safe,Diam|
00000680  6f 6e 64 29 0d ca 91 31  39 32 29 0d fe 80 20 46  |ond)...192)... F|
00000690  75 6e 67 75 73 0d 0d 83  20 98 0d ca 44 65 61 64  |ungus... ...Dead|
000006a0  6c 79 0d ca 54 72 61 6e  73 70 6f 72 74 0d 0d 83  |ly..Transport...|
000006b0  20 99 0d ca 85 20 9e 36  29 0d cc 90 0d cc 85 20  | .... .6)...... |
000006c0  9c 30 29 0d ce 82 45 29  0d ce 85 20 46 75 6e 67  |.0)...E)... Fung|
000006d0  75 73 4f 4b 0d d0 84 46  75 6e 67 75 73 2c 45 29  |usOK...Fungus,E)|
000006e0  0d ce 88 0d ce 82 57 29  0d ce 85 20 46 75 6e 67  |......W)... Fung|
000006f0  75 73 4f 4b 0d d0 84 46  75 6e 67 75 73 2c 57 29  |usOK...Fungus,W)|
00000700  0d ce 88 0d cc 87 0d ce  82 53 29 0d ce 85 20 46  |.........S)... F|
00000710  75 6e 67 75 73 4f 4b 0d  d0 84 46 75 6e 67 75 73  |ungusOK...Fungus|
00000720  2c 53 29 0d ce 88 0d ce  82 4e 29 0d ce 85 20 46  |,S)......N)... F|
00000730  75 6e 67 75 73 4f 4b 0d  d0 84 46 75 6e 67 75 73  |ungusOK...Fungus|
00000740  2c 4e 29 0d ce 88 0d cc  88 0d ca 88 0d fe 80 20  |,N)............ |
00000750  42 6c 6f 63 6b 0d 0d 83  20 98 0d ca 53 6f 6c 69  |Block... ...Soli|
00000760  64 0d ca 48 50 75 73 68  0d ca 56 50 75 73 68 0d  |d..HPush..VPush.|
00000770  ca 43 6f 70 79 0d ca 54  72 61 6e 73 70 6f 72 74  |.Copy..Transport|
00000780  0d 0d 83 20 99 0d ca 82  57 29 0d ca 85 20 9f 20  |... ....W)... . |
00000790  42 6c 6f 63 6b 0d cc 82  45 29 0d cc 85 20 9f 20  |Block...E)... . |
000007a0  42 6c 6f 63 6b 0d ce 84  44 69 61 6d 6f 6e 64 2c  |Block...Diamond,|
000007b0  57 29 0d ce 84 44 69 61  6d 6f 6e 64 2c 45 29 0d  |W)...Diamond,E).|
000007c0  ce 84 44 69 61 6d 6f 6e  64 29 0d cc 88 0d ca 88  |..Diamond)......|
000007d0  0d ca 82 4e 29 0d ca 85  20 9f 20 42 6c 6f 63 6b  |...N)... . Block|
000007e0  0d cc 82 53 29 0d cc 85  20 9f 20 42 6c 6f 63 6b  |...S)... . Block|
000007f0  0d ce 84 44 69 61 6d 6f  6e 64 2c 4e 29 0d ce 84  |...Diamond,N)...|
00000800  44 69 61 6d 6f 6e 64 2c  53 29 0d ce 84 44 69 61  |Diamond,S)...Dia|
00000810  6d 6f 6e 64 29 0d cc 88  0d ca 88 0d 0d fe 0d fe  |mond)...........|
00000820  80 20 43 72 6f 77 6e 0d  0d 83 20 98 0d ca 43 4c  |. Crown... ...CL|
00000830  65 66 74 0d ca 43 52 69  67 68 74 0d 0d 83 20 9a  |eft..CRight... .|
00000840  0d ca 8e 32 30 29 0d ca  91 31 39 33 29 0d fe 80  |...20)...193)...|
00000850  20 44 69 61 6d 6f 6e 64  0d 0d 83 20 98 0d ca 43  | Diamond... ...C|
00000860  4c 65 66 74 0d ca 43 52  69 67 68 74 0d 0d 83 20  |Left..CRight... |
00000870  9a 0d ca 85 20 81 20 52  65 70 74 6f 6e 0d cc 8e  |.... . Repton...|
00000880  35 29 0d cc 8f 32 34 32  29 0d ca 88 0d 0d fe 80  |5)...242).......|
00000890  20 42 72 6f 6b 65 6e 45  67 67 0d 0d 83 20 98 0d  | BrokenEgg... ..|
000008a0  ca 53 6f 6c 69 64 0d ca  44 65 61 64 6c 79 0d 0d  |.Solid..Deadly..|
000008b0  83 20 99 0d ca 85 20 9e  35 29 0d cc 90 0d cc 85  |. .... .5)......|
000008c0  20 9c 30 29 0d ce 84 4d  6f 6e 73 74 65 72 29 0d  | .0)...Monster).|
000008d0  cc 88 0d ca 88 0d fe 0d  fe 0d fe 0d fe 0d fe 0d  |................|
000008e0  fe 0d fe 0d fe 0d fe 0d  fe 0d fe 0d fe 0d fe 0d  |................|
000008f0  fe 0d fe 0d fe 0d fe 72  65 63 74 69 6f 6e 0d 17  |.......rection..|
00000900  20 0a 43 50 58 20 23 00  00 00 00 00 00 00 08 00  | .CPX #.........|
00000910  00 00 00 00 00 00 00 72  61 0d 18 7e 0c 43 4d 50  |.......ra..~.CMP|
00000920  20 23 26 44 30 0d 18 45  4c 4c 4f 57 00 42 4c 55  | #&D0..ELLOW.BLU|
00000930  45 00 4d 41 47 45 4e 00  4b 49 4c 4c 52 45 50 54  |E.MAGEN.KILLREPT|
00000940  4f 4e 00 43 48 41 4e 46  45 43 54 28 00 46 4c 41  |ON.CHANFECT(.FLA|
00000950  53 48 28 00 43 48 41 4e  47 45 28 00 45 4e 44 00  |SH(.CHANGE(.END.|
00000960  53 43 4f 52 45 28 00 54  00 4b 49 4c 4c 52 45 50  |SCORE(.T.KILLREP|
00000970  54 4f 4e 00 43 48 41 00  53 43 4f 52 45 28 00 53  |TON.CHA.SCORE(.S|
00000980  4f 55 4e 44 28 00 46 4e  44 49 46 00 47 4f 54 4f  |OUND(.FNDIF.GOTO|
00000990  00 4e 4f 54 00 4b 49 49  4c 4c 52 45 50 54 4f 4e  |.NOT.KIILLREPTON|
000009a0  00 43 48 41 4e 47 45 00  45 4e 44 00 53 43 4f 52  |.CHANGE.END.SCOR|
000009b0  45 28 00 53 4f 55 4e 4d  42 4c 45 00 57 41 4c 4b  |E(.SOUNMBLE.WALK|
000009c0  00 52 55 4e 00 54 59 4d  4f 56 45 28 00 53 54 41  |.RUN.TYMOVE(.STA|
000009d0  54 45 28 00 4c 41 42 54  41 54 45 28 00 4c 41 42  |TE(.LABTATE(.LAB|
000009e0  45 4c 00 45 56 45 4e                              |EL.EVEN|
000009e7
Sprite 0
  NAME Space
  
  DEFINE TYPE
    RockOK
    SpiritOK
    MonsterOK
    Squash
    FungusOK
  
Sprite 1
  NAME Repton
  
  DEFINE TYPE
    Under
    Transport
    FungusOK
    SpiritOK
    MonsterOK
  
Sprite 2
  DEFINE TYPE
    Solid
  
  
Sprite 3
  NAME Transporter
  
  DEFINE TYPE
    Under
    Squash
    RockOK
    SpiritOK
    FungusOK
    MonsterOK
  
  
Sprite 4
  DEFINE TYPE
    CLeft
    CRight
    Two
  
  DEFINE ACTION
    LOOK(N)
    IF CONTENTS Repton
      LOOK(S)
      IF CONTENTS Space
        MOVE(S)
      ENDIF
    ELSE
      LOOK(S)
      IF CONTENTS Repton
        LOOK(N)
        IF CONTENTS Space
          MOVE(N)
        ENDIF
      ENDIF
    ENDIF
  
  DEFINE HITS
    SCORE(5)
    SOUND(242)
  
  
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
    RockOK
    Under
    Solid
  
  DEFINE HITS
    CREATE(Rock,S)
    CREATE(Crown)
  
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
  DEFINE TYPE
    Solid
  
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
    IF HITBY Fungus
      SCORE(20)
      EFFECT(134)
    ENDIF
  
Sprite 17
  NAME Spirit
  
  DEFINE TYPE
    Copy
    Deadly
    Transport
    Animate
    One
  
  DEFINE ACTION
    LOOK(L)
    IF SpiritOK
      MOVE(L)
      END
    ELSE
      LOOK(F)
      IF SpiritOK
        MOVE(F)
        END
      ELSE
        LOOK(R)
        IF SpiritOK
          MOVE(R)
          END
        ELSE
          LOOK(B)
          IF SpiritOK
            MOVE(B)
          ENDIF
        ENDIF
      ENDIF
    ENDIF
  
  
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 Safe
  
  DEFINE TYPE
    Solid
  
Sprite 23
  NAME Cage
  
  DEFINE TYPE
    Solid
    SpiritOK
    Under
  
  DEFINE HITS
    FLASH(YELLOW)
    CREATE(Diamond)
    SOUND(12)
  
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
  NAME Key
  
  DEFINE HITS
    CHANGE(Safe,Diamond)
    EFFECT(192)
  
Sprite 26
  NAME Fungus
  
  DEFINE TYPE
    Deadly
    Transport
  
  DEFINE ACTION
    IF EVENT(6)
      FLIP
      IF STATE(0)
        LOOK(E)
        IF FungusOK
          CREATE(Fungus,E)
        ENDIF
        LOOK(W)
        IF FungusOK
          CREATE(Fungus,W)
        ENDIF
      ELSE
        LOOK(S)
        IF FungusOK
          CREATE(Fungus,S)
        ENDIF
        LOOK(N)
        IF FungusOK
          CREATE(Fungus,N)
        ENDIF
      ENDIF
    ENDIF
  
Sprite 27
  NAME Block
  
  DEFINE TYPE
    Solid
    HPush
    VPush
    Copy
    Transport
  
  DEFINE ACTION
    LOOK(W)
    IF CONTENTS Block
      LOOK(E)
      IF CONTENTS Block
        CREATE(Diamond,W)
        CREATE(Diamond,E)
        CREATE(Diamond)
      ENDIF
    ENDIF
    LOOK(N)
    IF CONTENTS Block
      LOOK(S)
      IF CONTENTS Block
        CREATE(Diamond,N)
        CREATE(Diamond,S)
        CREATE(Diamond)
      ENDIF
    ENDIF
  
  
Sprite 28
  
  
Sprite 29
  NAME Crown
  
  DEFINE TYPE
    CLeft
    CRight
  
  DEFINE HITS
    SCORE(20)
    EFFECT(193)
  
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
REPINFIN/eT/Rep4.m0
REPINFIN/eT/Rep4.m1
REPINFIN/eT/Rep4.m2
REPINFIN/eT/Rep4.m4
REPINFIN/eT/Rep4.m5