Home » Personal collection » Acorn tapes » Commercial_Releases » box03_tape10a_acorn_cheat_it_again_joe_1.wav » Bonecrun-O

Bonecrun-O

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 » Commercial_Releases » box03_tape10a_acorn_cheat_it_again_joe_1.wav
Filename: Bonecrun-O
Read OK:
File size: 0AEC bytes
Load address: 1900
Exec address: 1900
File contents
   10REM Bonecruncher cheat
   20REM Electron tape version
   30MODE1:VDU19,3,6,0,0,0,23,230,0,&FF,0,&FF,0,0,0,0:PROCt:PROCmc1
   40GOTO360
   50END
   60DEFPROCa(A$,A%)
   70PROCb("`"+A$+STRING$(28-LENA$," ")+"@(Y/N)` : @"):A$=GET$:IF A$="Y" THEN PRINT;"Yes" ELSE PRINT;"No":?A%=&60
   80ENDPROC
   90DEFPROCask(A$,B$,L%,M%,A%)
  100PROCb("`"+A$+STRING$(24-LENA$," ")+"@"+B$+"` : @"):INPUT""B%:IF B%<L% OR B%>M% THEN GOTO100 ELSE ?A%=B%
  110ENDPROC
  120DEFPROCb($&1600)
  130CALL&1700:ENDPROC
  140DEFPROCmc1
  150FORI%=0TO2 STEP2
  160P%=&1700
  170[OPTI%
  180LDY#0:.loop2
  190LDA&1600,Y
  200CMP#13:BEQend
  210CMP#ASC"@":BEQcolour1
  220CMP#ASC"`":BEQcolour2
  230JSR&FFEE
  240.backin
  250INY:CPY#0:BNEloop2
  260.end
  270RTS
  280.colour1 LDA#2:JMPchange
  290.colour2 LDA#3
  300.change TAX:LDA#17:JSR&FFEE
  310        TXA:JSR&FFEE
  320        JMPbackin
  330]
  340NEXT
  350ENDPROC
  360code=&CE0
  370PROCmc
  380COLOUR1:COLOUR130:PRINT" BONO "':COLOUR128
  390PROCask("Number of lives","(001-255)",1,255,lives+1)
  400PROCa("Infinite lives",inlives)
  410PROCa("Immortal",immortal)
  420PROCa("Don't collect skeletons",skels)
  430PROCa("Infinite soap bars",insoap)
  440PROCask("Number of bars to make","(001-009)",1,9,bars+1)
  450PROCa("Infinite keys",inkeys)
  460COLOUR1:COLOUR130:PRINT'" FOZZY "':COLOUR128
  470PROCask("Number of lives","(001-255)",1,255,flives+1)
  480PROCask("Amount of energy","(001-255)",1,255,fenergy+1)
  490PROCa("Infinite lives",finlives)
  500PROCa("Infinite energy",finenergy)
  510VDU23;8202;0;0;0;:VDU17,130,17,1:PRINT'"        Press <SPACE> to continue       ":COLOUR128:REPEATUNTILGET=32
  520CLS:PROCt:PROCpass
  530PRINT'':PROCb("`OK@ -` Insert @Bonecruncher` tape, forward       to @Bone_2` and press any key ..")
  540VDU7:A=GET:MODE5:VDU28,0,22,18,20:CALLcode
  550END
  560DEFPROCpass
  570RESTORE350:FORI%=1TO24 STEP2:READA$,B$:PROCb("`"+CHR$(I%+64)+".@ "+A$+" `"+STRING$(10-LENA$," ")+CHR$(65+I%)+". @"+B$):PRINT:NEXTI%
  580ENDPROC
  590DATA BEGINNER,ATOMIC,COMPLEX,ANIMAL,NOMINAL,CABBAGE,TOLERANCE,OVERLORD,CRAZY CAVE,CROSSWORD,INTEREST,PEWTER,UNDERTAKE,COLLAPSE,GENERATOR,TORTURE,AMENDMENT,ULTIMATE,MONOTONE,COUNTDOWN,FATIGUE,SABOTAGE,DARKNESS,EXCALIBUR
  600DEFPROCmc
  610FORI%=0TO2 STEP2
  620P%=code
  630[OPTI%
  640LDA#un MOD 256:STA&220
  650LDA#un DIV 256:STA&221
  660LDA#&0E:LDX#4:JSR&FFF4
  670LDY#load DIV 256:LDX#load MOD 256
  680JSR&FFF7
  690LDA#&0D:LDX#4:JSR&FFF4
  700.lives LDA#0:STA&2574
  710.flives LDA#0:STA&2570
  720.fenergy:LDA#0:STA&2590
  730.bars LDA#0:STA&258C
  740JSRskels
  750JSRimmortal
  760LDA#&EA:JSRinlives
  770JSRfinlives
  780JSRfinenergy
  790JSRinsoap
  800JSRinkeys
  810JMP&68E0
  820.inlives STA&269A::STA&269B:RTS
  830.immortal LDA#&A9:STA&2650:LDA#&00:STA&2651
  840LDA#&85:STA&2652:LDA#&0E:STA&2653:RTS
  850.finlives STA&2B07:STA&2B08:RTS
  860.finenergy STA&2AF8:STA&2AF9:RTS
  870.skels LDA#&EA:STA&290B:STA&290C
  880LDA#&A9:STA&2811:LDA#&01:STA&2812
  890LDA#&85:STA&2813:LDA#&04:STA&2814
  900LDA#&60:STA&2815:RTS
  910.insoap STA&2831:STA&2832:STA&2833
  920        STA&2834:RTS
  930.inkeys STA&28C3:STA&28C4:STA&28C5
  940        STA&28C6:RTS
  950.load EQUS"LOAD BONE_2"+CHR$13
  960.un LDA&3CA:AND#254:STA&3CA:RTS
  970]:NEXTI%
  980ENDPROC
  990DEFPROCt
 1000COLOUR1:PRINT'"Bonecruncher cheat":COLOUR2:PRINT"������������������"'
 1010ENDPROC

� Bonecruncher cheat
� Electron tape version
7�1:�19,3,6,0,0,0,23,230,0,&FF,0,&FF,0,0,0,0:�t:�mc1
(	�DhA
2�
<��a(A$,A%)
FR�b("`"+A$+�28-�A$," ")+"@(Y/N)` : @"):A$=�:� A$="Y" � �;"Yes" � �;"No":?A%=&60
P�
Z��ask(A$,B$,L%,M%,A%)
dQ�b("`"+A$+�24-�A$," ")+"@"+B$+"` : @"):�""B%:� B%<L% � B%>M% � �Dd@ � ?A%=B%
n�
x��b($&1600)
��&1700:�
�	��mc1
��I%=0�2 �2
�P%=&1700
�
[OPTI%
�LDY#0:.loop2
�LDA&1600,Y
�CMP#13:BEQend
�CMP#�"@":BEQcolour1
�CMP#�"`":BEQcolour2
�JSR&FFEE
�.backin
�INY:CPY#0:BNEloop2
.end
RTS
.colour1 LDA#2:JMPchange
".colour2 LDA#3
,.change TAX:LDA#17:JSR&FFEE
6        TXA:JSR&FFEE
@        JMPbackin
J]
T�
^�
h
code=&CE0
r�mc
|�1:�130:�" BONO "':�128
�5�ask("Number of lives","(001-255)",1,255,lives+1)
� �a("Infinite lives",inlives)
��a("Immortal",immortal)
�'�a("Don't collect skeletons",skels)
�#�a("Infinite soap bars",insoap)
�9�ask("Number of bars to make","(001-009)",1,9,bars+1)
��a("Infinite keys",inkeys)
��1:�130:�'" FOZZY "':�128
�6�ask("Number of lives","(001-255)",1,255,flives+1)
�8�ask("Amount of energy","(001-255)",1,255,fenergy+1)
�!�a("Infinite lives",finlives)
�#�a("Infinite energy",finenergy)
�Y�23;8202;0;0;0;:�17,130,17,1:�'"        Press <SPACE> to continue       ":�128:���=32
�:�t:�pass
`�'':�b("`OK@ -` Insert @Bonecruncher` tape, forward       to @Bone_2` and press any key ..")
"�7:A=�:�5:�28,0,22,18,20:�code
&�
0
��pass
:`��D^A:�I%=1�24 �2:�A$,B$:�b("`"+�(I%+64)+".@ "+A$+" `"+�10-�A$," ")+�(65+I%)+". @"+B$):�:�I%
D�
N�� BEGINNER,ATOMIC,COMPLEX,ANIMAL,NOMINAL,CABBAGE,TOLERANCE,OVERLORD,CRAZY CAVE,CROSSWORD,INTEREST,PEWTER,UNDERTAKE,COLLAPSE,GENERATOR,TORTURE,AMENDMENT,ULTIMATE,MONOTONE,COUNTDOWN,FATIGUE,SABOTAGE,DARKNESS,EXCALIBUR
X��mc
b�I%=0�2 �2
lP%=code
v
[OPTI%
�LDA#un � 256:STA&220
�LDA#un � 256:STA&221
�LDA#&0E:LDX#4:JSR&FFF4
�!LDY#load � 256:LDX#load � 256
�JSR&FFF7
�LDA#&0D:LDX#4:JSR&FFF4
�.lives LDA#0:STA&2574
�.flives LDA#0:STA&2570
�.fenergy:LDA#0:STA&2590
�.bars LDA#0:STA&258C
�JSRskels
�JSRimmortal
�LDA#&EA:JSRinlives
JSRfinlives
JSRfinenergy

JSRinsoap
 
JSRinkeys
*JMP&68E0
4#.inlives STA&269A::STA&269B:RTS
>/.immortal LDA#&A9:STA&2650:LDA#&00:STA&2651
H)LDA#&85:STA&2652:LDA#&0E:STA&2653:RTS
R#.finlives STA&2B07:STA&2B08:RTS
\$.finenergy STA&2AF8:STA&2AF9:RTS
f$.skels LDA#&EA:STA&290B:STA&290C
p%LDA#&A9:STA&2811:LDA#&01:STA&2812
z%LDA#&85:STA&2813:LDA#&04:STA&2814
�LDA#&60:STA&2815:RTS
�&.insoap STA&2831:STA&2832:STA&2833
�        STA&2834:RTS
�&.inkeys STA&28C3:STA&28C4:STA&28C5
�        STA&28C6:RTS
�.load EQUS"LOAD BONE_2"+�13
�!.un LDA&3CA:�#254:STA&3CA:RTS
�	]:�I%
��
���t
�7�1:�'"Bonecruncher cheat":�2:�"������������������"'
��
�
00000000  0d 00 0a 18 f4 20 42 6f  6e 65 63 72 75 6e 63 68  |..... Bonecrunch|
00000010  65 72 20 63 68 65 61 74  0d 00 14 1b f4 20 45 6c  |er cheat..... El|
00000020  65 63 74 72 6f 6e 20 74  61 70 65 20 76 65 72 73  |ectron tape vers|
00000030  69 6f 6e 0d 00 1e 37 eb  31 3a ef 31 39 2c 33 2c  |ion...7.1:.19,3,|
00000040  36 2c 30 2c 30 2c 30 2c  32 33 2c 32 33 30 2c 30  |6,0,0,0,23,230,0|
00000050  2c 26 46 46 2c 30 2c 26  46 46 2c 30 2c 30 2c 30  |,&FF,0,&FF,0,0,0|
00000060  2c 30 3a f2 74 3a f2 6d  63 31 0d 00 28 09 e5 8d  |,0:.t:.mc1..(...|
00000070  44 68 41 0d 00 32 05 e0  0d 00 3c 0e dd f2 61 28  |DhA..2....<...a(|
00000080  41 24 2c 41 25 29 0d 00  46 52 f2 62 28 22 60 22  |A$,A%)..FR.b("`"|
00000090  2b 41 24 2b c4 32 38 2d  a9 41 24 2c 22 20 22 29  |+A$+.28-.A$," ")|
000000a0  2b 22 40 28 59 2f 4e 29  60 20 3a 20 40 22 29 3a  |+"@(Y/N)` : @"):|
000000b0  41 24 3d be 3a e7 20 41  24 3d 22 59 22 20 8c 20  |A$=.:. A$="Y" . |
000000c0  f1 3b 22 59 65 73 22 20  8b 20 f1 3b 22 4e 6f 22  |.;"Yes" . .;"No"|
000000d0  3a 3f 41 25 3d 26 36 30  0d 00 50 05 e1 0d 00 5a  |:?A%=&60..P....Z|
000000e0  19 dd f2 61 73 6b 28 41  24 2c 42 24 2c 4c 25 2c  |...ask(A$,B$,L%,|
000000f0  4d 25 2c 41 25 29 0d 00  64 51 f2 62 28 22 60 22  |M%,A%)..dQ.b("`"|
00000100  2b 41 24 2b c4 32 34 2d  a9 41 24 2c 22 20 22 29  |+A$+.24-.A$," ")|
00000110  2b 22 40 22 2b 42 24 2b  22 60 20 3a 20 40 22 29  |+"@"+B$+"` : @")|
00000120  3a e8 22 22 42 25 3a e7  20 42 25 3c 4c 25 20 84  |:.""B%:. B%<L% .|
00000130  20 42 25 3e 4d 25 20 8c  20 e5 8d 44 64 40 20 8b  | B%>M% . ..Dd@ .|
00000140  20 3f 41 25 3d 42 25 0d  00 6e 05 e1 0d 00 78 0f  | ?A%=B%..n....x.|
00000150  dd f2 62 28 24 26 31 36  30 30 29 0d 00 82 0c d6  |..b($&1600).....|
00000160  26 31 37 30 30 3a e1 0d  00 8c 09 dd f2 6d 63 31  |&1700:.......mc1|
00000170  0d 00 96 0e e3 49 25 3d  30 b8 32 20 88 32 0d 00  |.....I%=0.2 .2..|
00000180  a0 0c 50 25 3d 26 31 37  30 30 0d 00 aa 0a 5b 4f  |..P%=&1700....[O|
00000190  50 54 49 25 0d 00 b4 10  4c 44 59 23 30 3a 2e 6c  |PTI%....LDY#0:.l|
000001a0  6f 6f 70 32 0d 00 be 0e  4c 44 41 26 31 36 30 30  |oop2....LDA&1600|
000001b0  2c 59 0d 00 c8 11 43 4d  50 23 31 33 3a 42 45 51  |,Y....CMP#13:BEQ|
000001c0  65 6e 64 0d 00 d2 17 43  4d 50 23 97 22 40 22 3a  |end....CMP#."@":|
000001d0  42 45 51 63 6f 6c 6f 75  72 31 0d 00 dc 17 43 4d  |BEQcolour1....CM|
000001e0  50 23 97 22 60 22 3a 42  45 51 63 6f 6c 6f 75 72  |P#."`":BEQcolour|
000001f0  32 0d 00 e6 0c 4a 53 52  26 46 46 45 45 0d 00 f0  |2....JSR&FFEE...|
00000200  0b 2e 62 61 63 6b 69 6e  0d 00 fa 16 49 4e 59 3a  |..backin....INY:|
00000210  43 50 59 23 30 3a 42 4e  45 6c 6f 6f 70 32 0d 01  |CPY#0:BNEloop2..|
00000220  04 08 2e 65 6e 64 0d 01  0e 07 52 54 53 0d 01 18  |...end....RTS...|
00000230  1c 2e 63 6f 6c 6f 75 72  31 20 4c 44 41 23 32 3a  |..colour1 LDA#2:|
00000240  4a 4d 50 63 68 61 6e 67  65 0d 01 22 12 2e 63 6f  |JMPchange.."..co|
00000250  6c 6f 75 72 32 20 4c 44  41 23 33 0d 01 2c 1f 2e  |lour2 LDA#3..,..|
00000260  63 68 61 6e 67 65 20 54  41 58 3a 4c 44 41 23 31  |change TAX:LDA#1|
00000270  37 3a 4a 53 52 26 46 46  45 45 0d 01 36 18 20 20  |7:JSR&FFEE..6.  |
00000280  20 20 20 20 20 20 54 58  41 3a 4a 53 52 26 46 46  |      TXA:JSR&FF|
00000290  45 45 0d 01 40 15 20 20  20 20 20 20 20 20 4a 4d  |EE..@.        JM|
000002a0  50 62 61 63 6b 69 6e 0d  01 4a 05 5d 0d 01 54 05  |Pbackin..J.]..T.|
000002b0  ed 0d 01 5e 05 e1 0d 01  68 0d 63 6f 64 65 3d 26  |...^....h.code=&|
000002c0  43 45 30 0d 01 72 07 f2  6d 63 0d 01 7c 1b fb 31  |CE0..r..mc..|..1|
000002d0  3a fb 31 33 30 3a f1 22  20 42 4f 4e 4f 20 22 27  |:.130:." BONO "'|
000002e0  3a fb 31 32 38 0d 01 86  35 f2 61 73 6b 28 22 4e  |:.128...5.ask("N|
000002f0  75 6d 62 65 72 20 6f 66  20 6c 69 76 65 73 22 2c  |umber of lives",|
00000300  22 28 30 30 31 2d 32 35  35 29 22 2c 31 2c 32 35  |"(001-255)",1,25|
00000310  35 2c 6c 69 76 65 73 2b  31 29 0d 01 90 20 f2 61  |5,lives+1)... .a|
00000320  28 22 49 6e 66 69 6e 69  74 65 20 6c 69 76 65 73  |("Infinite lives|
00000330  22 2c 69 6e 6c 69 76 65  73 29 0d 01 9a 1b f2 61  |",inlives).....a|
00000340  28 22 49 6d 6d 6f 72 74  61 6c 22 2c 69 6d 6d 6f  |("Immortal",immo|
00000350  72 74 61 6c 29 0d 01 a4  27 f2 61 28 22 44 6f 6e  |rtal)...'.a("Don|
00000360  27 74 20 63 6f 6c 6c 65  63 74 20 73 6b 65 6c 65  |'t collect skele|
00000370  74 6f 6e 73 22 2c 73 6b  65 6c 73 29 0d 01 ae 23  |tons",skels)...#|
00000380  f2 61 28 22 49 6e 66 69  6e 69 74 65 20 73 6f 61  |.a("Infinite soa|
00000390  70 20 62 61 72 73 22 2c  69 6e 73 6f 61 70 29 0d  |p bars",insoap).|
000003a0  01 b8 39 f2 61 73 6b 28  22 4e 75 6d 62 65 72 20  |..9.ask("Number |
000003b0  6f 66 20 62 61 72 73 20  74 6f 20 6d 61 6b 65 22  |of bars to make"|
000003c0  2c 22 28 30 30 31 2d 30  30 39 29 22 2c 31 2c 39  |,"(001-009)",1,9|
000003d0  2c 62 61 72 73 2b 31 29  0d 01 c2 1e f2 61 28 22  |,bars+1).....a("|
000003e0  49 6e 66 69 6e 69 74 65  20 6b 65 79 73 22 2c 69  |Infinite keys",i|
000003f0  6e 6b 65 79 73 29 0d 01  cc 1d fb 31 3a fb 31 33  |nkeys).....1:.13|
00000400  30 3a f1 27 22 20 46 4f  5a 5a 59 20 22 27 3a fb  |0:.'" FOZZY "':.|
00000410  31 32 38 0d 01 d6 36 f2  61 73 6b 28 22 4e 75 6d  |128...6.ask("Num|
00000420  62 65 72 20 6f 66 20 6c  69 76 65 73 22 2c 22 28  |ber of lives","(|
00000430  30 30 31 2d 32 35 35 29  22 2c 31 2c 32 35 35 2c  |001-255)",1,255,|
00000440  66 6c 69 76 65 73 2b 31  29 0d 01 e0 38 f2 61 73  |flives+1)...8.as|
00000450  6b 28 22 41 6d 6f 75 6e  74 20 6f 66 20 65 6e 65  |k("Amount of ene|
00000460  72 67 79 22 2c 22 28 30  30 31 2d 32 35 35 29 22  |rgy","(001-255)"|
00000470  2c 31 2c 32 35 35 2c 66  65 6e 65 72 67 79 2b 31  |,1,255,fenergy+1|
00000480  29 0d 01 ea 21 f2 61 28  22 49 6e 66 69 6e 69 74  |)...!.a("Infinit|
00000490  65 20 6c 69 76 65 73 22  2c 66 69 6e 6c 69 76 65  |e lives",finlive|
000004a0  73 29 0d 01 f4 23 f2 61  28 22 49 6e 66 69 6e 69  |s)...#.a("Infini|
000004b0  74 65 20 65 6e 65 72 67  79 22 2c 66 69 6e 65 6e  |te energy",finen|
000004c0  65 72 67 79 29 0d 01 fe  59 ef 32 33 3b 38 32 30  |ergy)...Y.23;820|
000004d0  32 3b 30 3b 30 3b 30 3b  3a ef 31 37 2c 31 33 30  |2;0;0;0;:.17,130|
000004e0  2c 31 37 2c 31 3a f1 27  22 20 20 20 20 20 20 20  |,17,1:.'"       |
000004f0  20 50 72 65 73 73 20 3c  53 50 41 43 45 3e 20 74  | Press <SPACE> t|
00000500  6f 20 63 6f 6e 74 69 6e  75 65 20 20 20 20 20 20  |o continue      |
00000510  20 22 3a fb 31 32 38 3a  f5 fd a5 3d 33 32 0d 02  | ":.128:...=32..|
00000520  08 0e db 3a f2 74 3a f2  70 61 73 73 0d 02 12 60  |...:.t:.pass...`|
00000530  f1 27 27 3a f2 62 28 22  60 4f 4b 40 20 2d 60 20  |.'':.b("`OK@ -` |
00000540  49 6e 73 65 72 74 20 40  42 6f 6e 65 63 72 75 6e  |Insert @Bonecrun|
00000550  63 68 65 72 60 20 74 61  70 65 2c 20 66 6f 72 77  |cher` tape, forw|
00000560  61 72 64 20 20 20 20 20  20 20 74 6f 20 40 42 6f  |ard       to @Bo|
00000570  6e 65 5f 32 60 20 61 6e  64 20 70 72 65 73 73 20  |ne_2` and press |
00000580  61 6e 79 20 6b 65 79 20  2e 2e 22 29 0d 02 1c 22  |any key ..")..."|
00000590  ef 37 3a 41 3d a5 3a eb  35 3a ef 32 38 2c 30 2c  |.7:A=.:.5:.28,0,|
000005a0  32 32 2c 31 38 2c 32 30  3a d6 63 6f 64 65 0d 02  |22,18,20:.code..|
000005b0  26 05 e0 0d 02 30 0a dd  f2 70 61 73 73 0d 02 3a  |&....0...pass..:|
000005c0  60 f7 8d 44 5e 41 3a e3  49 25 3d 31 b8 32 34 20  |`..D^A:.I%=1.24 |
000005d0  88 32 3a f3 41 24 2c 42  24 3a f2 62 28 22 60 22  |.2:.A$,B$:.b("`"|
000005e0  2b bd 28 49 25 2b 36 34  29 2b 22 2e 40 20 22 2b  |+.(I%+64)+".@ "+|
000005f0  41 24 2b 22 20 60 22 2b  c4 31 30 2d a9 41 24 2c  |A$+" `"+.10-.A$,|
00000600  22 20 22 29 2b bd 28 36  35 2b 49 25 29 2b 22 2e  |" ")+.(65+I%)+".|
00000610  20 40 22 2b 42 24 29 3a  f1 3a ed 49 25 0d 02 44  | @"+B$):.:.I%..D|
00000620  05 e1 0d 02 4e db dc 20  42 45 47 49 4e 4e 45 52  |....N.. BEGINNER|
00000630  2c 41 54 4f 4d 49 43 2c  43 4f 4d 50 4c 45 58 2c  |,ATOMIC,COMPLEX,|
00000640  41 4e 49 4d 41 4c 2c 4e  4f 4d 49 4e 41 4c 2c 43  |ANIMAL,NOMINAL,C|
00000650  41 42 42 41 47 45 2c 54  4f 4c 45 52 41 4e 43 45  |ABBAGE,TOLERANCE|
00000660  2c 4f 56 45 52 4c 4f 52  44 2c 43 52 41 5a 59 20  |,OVERLORD,CRAZY |
00000670  43 41 56 45 2c 43 52 4f  53 53 57 4f 52 44 2c 49  |CAVE,CROSSWORD,I|
00000680  4e 54 45 52 45 53 54 2c  50 45 57 54 45 52 2c 55  |NTEREST,PEWTER,U|
00000690  4e 44 45 52 54 41 4b 45  2c 43 4f 4c 4c 41 50 53  |NDERTAKE,COLLAPS|
000006a0  45 2c 47 45 4e 45 52 41  54 4f 52 2c 54 4f 52 54  |E,GENERATOR,TORT|
000006b0  55 52 45 2c 41 4d 45 4e  44 4d 45 4e 54 2c 55 4c  |URE,AMENDMENT,UL|
000006c0  54 49 4d 41 54 45 2c 4d  4f 4e 4f 54 4f 4e 45 2c  |TIMATE,MONOTONE,|
000006d0  43 4f 55 4e 54 44 4f 57  4e 2c 46 41 54 49 47 55  |COUNTDOWN,FATIGU|
000006e0  45 2c 53 41 42 4f 54 41  47 45 2c 44 41 52 4b 4e  |E,SABOTAGE,DARKN|
000006f0  45 53 53 2c 45 58 43 41  4c 49 42 55 52 0d 02 58  |ESS,EXCALIBUR..X|
00000700  08 dd f2 6d 63 0d 02 62  0e e3 49 25 3d 30 b8 32  |...mc..b..I%=0.2|
00000710  20 88 32 0d 02 6c 0b 50  25 3d 63 6f 64 65 0d 02  | .2..l.P%=code..|
00000720  76 0a 5b 4f 50 54 49 25  0d 02 80 18 4c 44 41 23  |v.[OPTI%....LDA#|
00000730  75 6e 20 83 20 32 35 36  3a 53 54 41 26 32 32 30  |un . 256:STA&220|
00000740  0d 02 8a 18 4c 44 41 23  75 6e 20 81 20 32 35 36  |....LDA#un . 256|
00000750  3a 53 54 41 26 32 32 31  0d 02 94 1a 4c 44 41 23  |:STA&221....LDA#|
00000760  26 30 45 3a 4c 44 58 23  34 3a 4a 53 52 26 46 46  |&0E:LDX#4:JSR&FF|
00000770  46 34 0d 02 9e 21 4c 44  59 23 6c 6f 61 64 20 81  |F4...!LDY#load .|
00000780  20 32 35 36 3a 4c 44 58  23 6c 6f 61 64 20 83 20  | 256:LDX#load . |
00000790  32 35 36 0d 02 a8 0c 4a  53 52 26 46 46 46 37 0d  |256....JSR&FFF7.|
000007a0  02 b2 1a 4c 44 41 23 26  30 44 3a 4c 44 58 23 34  |...LDA#&0D:LDX#4|
000007b0  3a 4a 53 52 26 46 46 46  34 0d 02 bc 19 2e 6c 69  |:JSR&FFF4.....li|
000007c0  76 65 73 20 4c 44 41 23  30 3a 53 54 41 26 32 35  |ves LDA#0:STA&25|
000007d0  37 34 0d 02 c6 1a 2e 66  6c 69 76 65 73 20 4c 44  |74.....flives LD|
000007e0  41 23 30 3a 53 54 41 26  32 35 37 30 0d 02 d0 1b  |A#0:STA&2570....|
000007f0  2e 66 65 6e 65 72 67 79  3a 4c 44 41 23 30 3a 53  |.fenergy:LDA#0:S|
00000800  54 41 26 32 35 39 30 0d  02 da 18 2e 62 61 72 73  |TA&2590.....bars|
00000810  20 4c 44 41 23 30 3a 53  54 41 26 32 35 38 43 0d  | LDA#0:STA&258C.|
00000820  02 e4 0c 4a 53 52 73 6b  65 6c 73 0d 02 ee 0f 4a  |...JSRskels....J|
00000830  53 52 69 6d 6d 6f 72 74  61 6c 0d 02 f8 16 4c 44  |SRimmortal....LD|
00000840  41 23 26 45 41 3a 4a 53  52 69 6e 6c 69 76 65 73  |A#&EA:JSRinlives|
00000850  0d 03 02 0f 4a 53 52 66  69 6e 6c 69 76 65 73 0d  |....JSRfinlives.|
00000860  03 0c 10 4a 53 52 66 69  6e 65 6e 65 72 67 79 0d  |...JSRfinenergy.|
00000870  03 16 0d 4a 53 52 69 6e  73 6f 61 70 0d 03 20 0d  |...JSRinsoap.. .|
00000880  4a 53 52 69 6e 6b 65 79  73 0d 03 2a 0c 4a 4d 50  |JSRinkeys..*.JMP|
00000890  26 36 38 45 30 0d 03 34  23 2e 69 6e 6c 69 76 65  |&68E0..4#.inlive|
000008a0  73 20 53 54 41 26 32 36  39 41 3a 3a 53 54 41 26  |s STA&269A::STA&|
000008b0  32 36 39 42 3a 52 54 53  0d 03 3e 2f 2e 69 6d 6d  |269B:RTS..>/.imm|
000008c0  6f 72 74 61 6c 20 4c 44  41 23 26 41 39 3a 53 54  |ortal LDA#&A9:ST|
000008d0  41 26 32 36 35 30 3a 4c  44 41 23 26 30 30 3a 53  |A&2650:LDA#&00:S|
000008e0  54 41 26 32 36 35 31 0d  03 48 29 4c 44 41 23 26  |TA&2651..H)LDA#&|
000008f0  38 35 3a 53 54 41 26 32  36 35 32 3a 4c 44 41 23  |85:STA&2652:LDA#|
00000900  26 30 45 3a 53 54 41 26  32 36 35 33 3a 52 54 53  |&0E:STA&2653:RTS|
00000910  0d 03 52 23 2e 66 69 6e  6c 69 76 65 73 20 53 54  |..R#.finlives ST|
00000920  41 26 32 42 30 37 3a 53  54 41 26 32 42 30 38 3a  |A&2B07:STA&2B08:|
00000930  52 54 53 0d 03 5c 24 2e  66 69 6e 65 6e 65 72 67  |RTS..\$.finenerg|
00000940  79 20 53 54 41 26 32 41  46 38 3a 53 54 41 26 32  |y STA&2AF8:STA&2|
00000950  41 46 39 3a 52 54 53 0d  03 66 24 2e 73 6b 65 6c  |AF9:RTS..f$.skel|
00000960  73 20 4c 44 41 23 26 45  41 3a 53 54 41 26 32 39  |s LDA#&EA:STA&29|
00000970  30 42 3a 53 54 41 26 32  39 30 43 0d 03 70 25 4c  |0B:STA&290C..p%L|
00000980  44 41 23 26 41 39 3a 53  54 41 26 32 38 31 31 3a  |DA#&A9:STA&2811:|
00000990  4c 44 41 23 26 30 31 3a  53 54 41 26 32 38 31 32  |LDA#&01:STA&2812|
000009a0  0d 03 7a 25 4c 44 41 23  26 38 35 3a 53 54 41 26  |..z%LDA#&85:STA&|
000009b0  32 38 31 33 3a 4c 44 41  23 26 30 34 3a 53 54 41  |2813:LDA#&04:STA|
000009c0  26 32 38 31 34 0d 03 84  18 4c 44 41 23 26 36 30  |&2814....LDA#&60|
000009d0  3a 53 54 41 26 32 38 31  35 3a 52 54 53 0d 03 8e  |:STA&2815:RTS...|
000009e0  26 2e 69 6e 73 6f 61 70  20 53 54 41 26 32 38 33  |&.insoap STA&283|
000009f0  31 3a 53 54 41 26 32 38  33 32 3a 53 54 41 26 32  |1:STA&2832:STA&2|
00000a00  38 33 33 0d 03 98 18 20  20 20 20 20 20 20 20 53  |833....        S|
00000a10  54 41 26 32 38 33 34 3a  52 54 53 0d 03 a2 26 2e  |TA&2834:RTS...&.|
00000a20  69 6e 6b 65 79 73 20 53  54 41 26 32 38 43 33 3a  |inkeys STA&28C3:|
00000a30  53 54 41 26 32 38 43 34  3a 53 54 41 26 32 38 43  |STA&28C4:STA&28C|
00000a40  35 0d 03 ac 18 20 20 20  20 20 20 20 20 53 54 41  |5....        STA|
00000a50  26 32 38 43 36 3a 52 54  53 0d 03 b6 1f 2e 6c 6f  |&28C6:RTS.....lo|
00000a60  61 64 20 45 51 55 53 22  4c 4f 41 44 20 42 4f 4e  |ad EQUS"LOAD BON|
00000a70  45 5f 32 22 2b bd 31 33  0d 03 c0 21 2e 75 6e 20  |E_2"+.13...!.un |
00000a80  4c 44 41 26 33 43 41 3a  80 23 32 35 34 3a 53 54  |LDA&3CA:.#254:ST|
00000a90  41 26 33 43 41 3a 52 54  53 0d 03 ca 09 5d 3a ed  |A&3CA:RTS....]:.|
00000aa0  49 25 0d 03 d4 05 e1 0d  03 de 07 dd f2 74 0d 03  |I%...........t..|
00000ab0  e8 37 fb 31 3a f1 27 22  42 6f 6e 65 63 72 75 6e  |.7.1:.'"Bonecrun|
00000ac0  63 68 65 72 20 63 68 65  61 74 22 3a fb 32 3a f1  |cher cheat":.2:.|
00000ad0  22 86 86 86 86 86 86 86  86 86 86 86 86 86 86 86  |"...............|
00000ae0  86 86 86 22 27 0d 03 f2  05 e1 0d ff              |..."'.......|
00000aec
Bonecrun-O.m0
Bonecrun-O.m1
Bonecrun-O.m2
Bonecrun-O.m4
Bonecrun-O.m5