<mamecheat version="1">

  <cheat desc="Infinite Credits">
    <script state="run">
      <action>maincpu.pb@E006=09</action>
    </script>
  </cheat>

  <cheat desc="Invincibility">
    <script state="on">
      <action>temp0 =maincpu.mb@32A6</action>
      <action>temp1 =maincpu.mb@44B0</action>
      <action>temp2 =maincpu.mb@4B94</action>
      <action>temp3 =maincpu.mb@5345</action>
    </script>
    <script state="run">
      <action>maincpu.mb@32A6=18</action>
      <action>maincpu.mb@44B0=18</action> <!-- 1/4 = red monsters, 2/4 = letter monsters, 3/4 = blue monsters, 4/4 = apples -->
      <action>maincpu.mb@4B94=18</action>
      <action>maincpu.mb@5345=18</action>
    </script>
    <script state="off">
      <action>maincpu.mb@32A6=temp0 </action>
      <action>maincpu.mb@44B0=temp1 </action>
      <action>maincpu.mb@4B94=temp2 </action>
      <action>maincpu.mb@5345=temp3 </action>
    </script>
  </cheat>

  <cheat desc="Fast Empty Space Movement"> <comment>Your character will travel twice the usual speed when there is no digging required</comment>
    <script state="on">
      <action>temp0 =maincpu.mb@2858</action>
      <action>temp1 =maincpu.mb@2841</action>
    </script>
    <script state="run">
      <action>maincpu.mb@2858=FE</action>
      <action>maincpu.mb@2841=01</action>
    </script>
    <script state="off">
      <action>maincpu.mb@2858=temp0 </action>
      <action>maincpu.mb@2841=temp1 </action>
    </script>
  </cheat>

  <cheat desc="Fast Digging Movement"> <comment>Your character will travel twice the usual speed when there is digging required</comment>
    <script state="on">
      <action>temp0 =maincpu.mb@285C</action>
      <action>temp1 =maincpu.mb@2845</action>
    </script>
    <script state="run">
      <action>maincpu.mb@285C=FE</action>
      <action>maincpu.mb@2845=01</action>
    </script>
    <script state="off">
      <action>maincpu.mb@285C=temp0 </action>
      <action>maincpu.mb@2845=temp1 </action>
    </script>
  </cheat>

  <cheat desc=" "/>

  <cheat desc="Select Starting Scene PL1">
    <parameter min="$1" max="$99" step="1"/>
    <script state="run">
      <action condition="(maincpu.pb@E09B==01)">maincpu.pb@E09B=tobcd(param)</action>
    </script>
  </cheat>

  <cheat desc="Infinite Lives PL1">
    <script state="run">
      <action>maincpu.pb@E097=06</action>
    </script>
  </cheat>

  <cheat desc="Select Number of Red Monsters PL1">
    <parameter>
      <item value="0x00">None</item>
      <item value="0x01">One</item>
      <item value="0x21">Many</item>
    </parameter>
    <script state="run">
      <action>maincpu.pb@E0A1=param</action>
    </script>
  </cheat>

  <cheat desc=" "/>

  <cheat desc="Select Starting Scene PL2">
    <parameter min="$1" max="$99" step="1"/>
    <script state="run">
      <action condition="(maincpu.pb@E120==01)">maincpu.pb@E120=tobcd(param)</action>
    </script>
  </cheat>

  <cheat desc="Infinite Lives PL2">
    <script state="run">
      <action>maincpu.pb@E11C=06</action>
    </script>
  </cheat>

  <cheat desc="Select Number of Red Monsters PL2">
    <parameter>
      <item value="0x00">None</item>
      <item value="0x01">One</item>
      <item value="0x21">Many</item>
    </parameter>
    <script state="run">
      <action>maincpu.pb@E126=param</action>
    </script>
  </cheat>

  <cheat desc=" "/>

  <cheat desc="Sound Test">
    <parameter min="1" max="29" step="1"/>
    <script state="on">
      <action condition="maincpu.pb@E006==00">maincpu.pb@E006=01</action>
    </script>
    <script state="change">
      <action condition="(temp0 LT 9)">maincpu.pb@(EC00+temp0)=FF</action>
      <action condition="(temp0 GE 9) AND (temp0 LT 12)">maincpu.pb@(EC00+(temp0+6))=FF</action>
      <action condition="(temp0 GE 12)">maincpu.pb@(EC00+temp0+7)=FF</action>
      <action condition="(param LT 9)">maincpu.pb@(EC00+param)=01</action>
      <action condition="(param GE 9) AND (param LT 12)">maincpu.pb@(EC00+(param+6))=01</action>
      <action condition="(param GE 12)">maincpu.pb@(EC00+(param+7))=01</action>
      <action>temp0=param</action>
    </script>
  </cheat>

</mamecheat>
<!-- Cheat file downloaded from http://www.mamecheat.co.uk, see cheat.txt for list of contributors. -->
