Code: Select all
<!-- Dock Man (set 1) -->
<mamecheat version="1">
<cheat desc="no hit">
<script state="on">
<action>maincpu.mb@1257 = C9</action> <!-- rock (port) -->
<action>maincpu.mb@12A9 = AB</action> <!-- lift (port) -->
<action>maincpu.mb@3C6C = 6E</action> <!-- dynamite (warehouse) -->
<action>maincpu.mb@440D = C9</action> <!-- player bullet (warehouse) -->
<action>maincpu.mb@445C = C9</action> <!-- rock (warehouse) -->
</script>
<script state="off">
<action>maincpu.mb@1257 = D8</action>
<action>maincpu.mb@12A9 = 58</action>
<action>maincpu.mb@3C6C = 71</action>
<action>maincpu.mb@440D = C8</action>
<action>maincpu.mb@445C = C8</action>
</script>
</cheat>
<cheat desc="sound test mode">
<comment>set "skip ram/rom check" then reset the game (F3)</comment>
<script state="on">
<action>maincpu.mb@4CC7 = 00 </action> <!-- disable title -->
<action>maincpu.mw@282B = 5000 </action>
<action>maincpu.mq@5000 = B00332B00032013E</action>
<action>maincpu.mq@5008 = 04E6A8003A810021</action>
<action>maincpu.mq@5010 = E6A0003A4F070707</action>
<action>maincpu.mq@5018 = 01FEED2847B8B11F</action>
<action>maincpu.mq@5020 = 34012002FE350120</action>
<action>maincpu.mq@5028 = 0618F03E042004FE</action>
<action>maincpu.mq@5030 = 7786103E052008FE</action>
<action>maincpu.mq@5038 = 80F67E052010FE78</action>
<action>maincpu.mq@5040 = 903E052020FE0618</action>
<action>maincpu.mq@5048 = 000000BE18B80032</action>
<!--
5000 | 3E 01 : ld a,$01
5002 | 32 00 B0 : ld ($B000),a // enable interrput
5005 | 32 03 B0 : ld ($B003),a // enable sound
5008 | 21 00 81 : ld hl,$8100 // sound code address
500B | 3A 00 A8 : ld a,($A800) // read start button
500E | E6 04 : and $04
5010 | 07 : rlca
5011 | 07 : rlca
5012 | 07 : rlca
5013 | 4F : ld c,a
5014 | 3A 00 A0 : ld a,($A000) // read other inputs
5017 | E6 1F : and $1F
5019 | B1 : or c
501A | B8 : cp b
501B | 47 : ld b,a
501C | 28 ED : jr z,$500B
501E | FE 01 : cp $01
5020 | 20 01 : jr nz,$5023
5022 | 35 : dec (hl) // decrease code -01
5023 | FE 02 : cp $02
5025 | 20 01 : jr nz,$5028
5027 | 34 : inc (hl) // increase code +01
5028 | FE 04 : cp $04
502A | 20 04 : jr nz,$5030
502C | 3E F0 : ld a,$F0 // decrease code -10
502E | 18 06 : jr $5036
5030 | FE 08 : cp $08
5032 | 20 05 : jr nz,$5039
5034 | 3E 10 : ld a,$10 // increase code +10
5036 | 86 : add a,(hl)
5037 | 77 : ld (hl),a
5038 | 78 : ld a,b
5039 | FE 10 : cp $10
503B | 20 05 : jr nz,$5042
503D | 7E : ld a,(hl) // play sound
503E | F6 80 : or $80
5040 | 18 06 : jr $5048
5042 | FE 20 : cp $20
5044 | 20 05 : jr nz,$504B
5046 | 3E 90 : ld a,$90 // stop sound
5048 | 32 00 B8 : ld ($B800),a // send sound code
504B | 18 BE : jr $500B
-->
</script>
<script state="run">
<output format="----- sound test mode -----" line="10" align="center" />
<output format="left : decrease code -01" line="11" align="center" />
<output format="right : increase code +01" line="12" align="center" />
<output format="down : decrease code -10" line="13" align="center" />
<output format="up : increase code +10" line="14" align="center" />
<output format="button 1 : play sound" line="15" align="center" />
<output format="start : stop sound" line="16" align="center" />
<output format="----------------------------" line="17" align="center" />
<output format="<< sound code %02X >>" line="19" align="center" >
<argument>maincpu.pb@8100</argument>
</output>
</script>
<script state="off">
<action>maincpu.mb@4CC7 = 01 </action>
<action>maincpu.mw@282B = 284E </action>
<action>maincpu.mq@5000 = 0000000000000000</action>
<action>maincpu.mq@5008 = 0000000000000000</action>
<action>maincpu.mq@5010 = 0000000000000000</action>
<action>maincpu.mq@5018 = 0000000000000000</action>
<action>maincpu.mq@5020 = 0000000000000000</action>
<action>maincpu.mq@5028 = 0000000000000000</action>
<action>maincpu.mq@5030 = 0000000000000000</action>
<action>maincpu.mq@5038 = 0000000000000000</action>
<action>maincpu.mq@5040 = 0000000000000000</action>
<action>maincpu.mq@5048 = 0000000000000000</action>
</script>
</cheat>
<cheat desc="skip ram/rom check">
<script state="on">
<action>maincpu.md@2B6A = 062800C3</action>
</script>
<script state="off">
<action>maincpu.md@2B6A = 06800021</action>
</script>
</cheat>
</mamecheat>
Code: Select all
<!-- Dock Man (set 2) -->
<mamecheat version="1">
<cheat desc="no hit">
<script state="on">
<action>maincpu.mb@1257 = C9</action> <!-- rock (port) -->
<action>maincpu.mb@12A9 = AB</action> <!-- lift (port) -->
<action>maincpu.mb@3C6C = 6E</action> <!-- dynamite (warehouse) -->
<action>maincpu.mb@440D = C9</action> <!-- player bullet (warehouse) -->
<action>maincpu.mb@445C = C9</action> <!-- rock (warehouse) -->
</script>
<script state="off">
<action>maincpu.mb@1257 = D8</action>
<action>maincpu.mb@12A9 = 58</action>
<action>maincpu.mb@3C6C = 71</action>
<action>maincpu.mb@440D = C8</action>
<action>maincpu.mb@445C = C8</action>
</script>
</cheat>
<cheat desc="sound test mode">
<comment>set "skip ram/rom check" then reset the game (F3)</comment>
<script state="on">
<action>maincpu.mb@4CC7 = 00 </action> <!-- disable title -->
<action>maincpu.mw@282B = 5000 </action>
<action>maincpu.mq@5000 = B00332B00032013E</action>
<action>maincpu.mq@5008 = 04E6A8003A810021</action>
<action>maincpu.mq@5010 = E6A0003A4F070707</action>
<action>maincpu.mq@5018 = 01FEED2847B8B11F</action>
<action>maincpu.mq@5020 = 34012002FE350120</action>
<action>maincpu.mq@5028 = 0618F03E042004FE</action>
<action>maincpu.mq@5030 = 7786103E052008FE</action>
<action>maincpu.mq@5038 = 80F67E052010FE78</action>
<action>maincpu.mq@5040 = 903E052020FE0618</action>
<action>maincpu.mq@5048 = 000000BE18B80032</action>
<!--
5000 | 3E 01 : ld a,$01
5002 | 32 00 B0 : ld ($B000),a // enable interrput
5005 | 32 03 B0 : ld ($B003),a // enable sound
5008 | 21 00 81 : ld hl,$8100 // sound code address
500B | 3A 00 A8 : ld a,($A800) // read start button
500E | E6 04 : and $04
5010 | 07 : rlca
5011 | 07 : rlca
5012 | 07 : rlca
5013 | 4F : ld c,a
5014 | 3A 00 A0 : ld a,($A000) // read other inputs
5017 | E6 1F : and $1F
5019 | B1 : or c
501A | B8 : cp b
501B | 47 : ld b,a
501C | 28 ED : jr z,$500B
501E | FE 01 : cp $01
5020 | 20 01 : jr nz,$5023
5022 | 35 : dec (hl) // decrease code -01
5023 | FE 02 : cp $02
5025 | 20 01 : jr nz,$5028
5027 | 34 : inc (hl) // increase code +01
5028 | FE 04 : cp $04
502A | 20 04 : jr nz,$5030
502C | 3E F0 : ld a,$F0 // decrease code -10
502E | 18 06 : jr $5036
5030 | FE 08 : cp $08
5032 | 20 05 : jr nz,$5039
5034 | 3E 10 : ld a,$10 // increase code +10
5036 | 86 : add a,(hl)
5037 | 77 : ld (hl),a
5038 | 78 : ld a,b
5039 | FE 10 : cp $10
503B | 20 05 : jr nz,$5042
503D | 7E : ld a,(hl) // play sound
503E | F6 80 : or $80
5040 | 18 06 : jr $5048
5042 | FE 20 : cp $20
5044 | 20 05 : jr nz,$504B
5046 | 3E 90 : ld a,$90 // stop sound
5048 | 32 00 B8 : ld ($B800),a // send sound code
504B | 18 BE : jr $500B
-->
</script>
<script state="run">
<output format="----- sound test mode -----" line="10" align="center" />
<output format="left : decrease code -01" line="11" align="center" />
<output format="right : increase code +01" line="12" align="center" />
<output format="down : decrease code -10" line="13" align="center" />
<output format="up : increase code +10" line="14" align="center" />
<output format="button 1 : play sound" line="15" align="center" />
<output format="start : stop sound" line="16" align="center" />
<output format="----------------------------" line="17" align="center" />
<output format="<< sound code %02X >>" line="19" align="center" >
<argument>maincpu.pb@8100</argument>
</output>
</script>
<script state="off">
<action>maincpu.mb@4CC7 = 01 </action>
<action>maincpu.mw@282B = 284E </action>
<action>maincpu.mq@5000 = 0000000000000000</action>
<action>maincpu.mq@5008 = 0000000000000000</action>
<action>maincpu.mq@5010 = 0000000000000000</action>
<action>maincpu.mq@5018 = 0000000000000000</action>
<action>maincpu.mq@5020 = 0000000000000000</action>
<action>maincpu.mq@5028 = 0000000000000000</action>
<action>maincpu.mq@5030 = 0000000000000000</action>
<action>maincpu.mq@5038 = 0000000000000000</action>
<action>maincpu.mq@5040 = 0000000000000000</action>
<action>maincpu.mq@5048 = 0000000000000000</action>
</script>
</cheat>
<cheat desc="skip ram/rom check">
<script state="on">
<action>maincpu.md@2B6A = 062800C3</action>
</script>
<script state="off">
<action>maincpu.md@2B6A = 06800021</action>
</script>
</cheat>
</mamecheat>
Code: Select all
<!-- Dock Man (set 3) -->
<mamecheat version="1">
<cheat desc="no hit">
<script state="on">
<action>maincpu.mb@1257 = C9</action> <!-- rock (port) -->
<action>maincpu.mb@12A9 = AB</action> <!-- lift (port) -->
<action>maincpu.mb@3C6C = 6E</action> <!-- dynamite (warehouse) -->
<action>maincpu.mb@440D = C9</action> <!-- player bullet (warehouse) -->
<action>maincpu.mb@445C = C9</action> <!-- rock (warehouse) -->
</script>
<script state="off">
<action>maincpu.mb@1257 = D8</action>
<action>maincpu.mb@12A9 = 58</action>
<action>maincpu.mb@3C6C = 71</action>
<action>maincpu.mb@440D = C8</action>
<action>maincpu.mb@445C = C8</action>
</script>
</cheat>
<cheat desc="sound test mode">
<comment>set "skip ram/rom check" then reset the game (F3)</comment>
<script state="on">
<action>maincpu.mb@4CC7 = 00 </action> <!-- disable title -->
<action>maincpu.mw@282B = 5000 </action>
<action>maincpu.mq@5000 = B00332B00032013E</action>
<action>maincpu.mq@5008 = 04E6A8003A810021</action>
<action>maincpu.mq@5010 = E6A0003A4F070707</action>
<action>maincpu.mq@5018 = 01FEED2847B8B11F</action>
<action>maincpu.mq@5020 = 34012002FE350120</action>
<action>maincpu.mq@5028 = 0618F03E042004FE</action>
<action>maincpu.mq@5030 = 7786103E052008FE</action>
<action>maincpu.mq@5038 = 80F67E052010FE78</action>
<action>maincpu.mq@5040 = 903E052020FE0618</action>
<action>maincpu.mq@5048 = 000000BE18B80032</action>
<!--
5000 | 3E 01 : ld a,$01
5002 | 32 00 B0 : ld ($B000),a // enable interrput
5005 | 32 03 B0 : ld ($B003),a // enable sound
5008 | 21 00 81 : ld hl,$8100 // sound code address
500B | 3A 00 A8 : ld a,($A800) // read start button
500E | E6 04 : and $04
5010 | 07 : rlca
5011 | 07 : rlca
5012 | 07 : rlca
5013 | 4F : ld c,a
5014 | 3A 00 A0 : ld a,($A000) // read other inputs
5017 | E6 1F : and $1F
5019 | B1 : or c
501A | B8 : cp b
501B | 47 : ld b,a
501C | 28 ED : jr z,$500B
501E | FE 01 : cp $01
5020 | 20 01 : jr nz,$5023
5022 | 35 : dec (hl) // decrease code -01
5023 | FE 02 : cp $02
5025 | 20 01 : jr nz,$5028
5027 | 34 : inc (hl) // increase code +01
5028 | FE 04 : cp $04
502A | 20 04 : jr nz,$5030
502C | 3E F0 : ld a,$F0 // decrease code -10
502E | 18 06 : jr $5036
5030 | FE 08 : cp $08
5032 | 20 05 : jr nz,$5039
5034 | 3E 10 : ld a,$10 // increase code +10
5036 | 86 : add a,(hl)
5037 | 77 : ld (hl),a
5038 | 78 : ld a,b
5039 | FE 10 : cp $10
503B | 20 05 : jr nz,$5042
503D | 7E : ld a,(hl) // play sound
503E | F6 80 : or $80
5040 | 18 06 : jr $5048
5042 | FE 20 : cp $20
5044 | 20 05 : jr nz,$504B
5046 | 3E 90 : ld a,$90 // stop sound
5048 | 32 00 B8 : ld ($B800),a // send sound code
504B | 18 BE : jr $500B
-->
</script>
<script state="run">
<output format="----- sound test mode -----" line="10" align="center" />
<output format="left : decrease code -01" line="11" align="center" />
<output format="right : increase code +01" line="12" align="center" />
<output format="down : decrease code -10" line="13" align="center" />
<output format="up : increase code +10" line="14" align="center" />
<output format="button 1 : play sound" line="15" align="center" />
<output format="start : stop sound" line="16" align="center" />
<output format="----------------------------" line="17" align="center" />
<output format="<< sound code %02X >>" line="19" align="center" >
<argument>maincpu.pb@8100</argument>
</output>
</script>
<script state="off">
<action>maincpu.mb@4CC7 = 01 </action>
<action>maincpu.mw@282B = 284E </action>
<action>maincpu.mq@5000 = 0000000000000000</action>
<action>maincpu.mq@5008 = 0000000000000000</action>
<action>maincpu.mq@5010 = 0000000000000000</action>
<action>maincpu.mq@5018 = 0000000000000000</action>
<action>maincpu.mq@5020 = 0000000000000000</action>
<action>maincpu.mq@5028 = 0000000000000000</action>
<action>maincpu.mq@5030 = 0000000000000000</action>
<action>maincpu.mq@5038 = 0000000000000000</action>
<action>maincpu.mq@5040 = 0000000000000000</action>
<action>maincpu.mq@5048 = 0000000000000000</action>
</script>
</cheat>
<cheat desc="skip ram/rom check">
<script state="on">
<action>maincpu.md@2B6A = 062800C3</action>
</script>
<script state="off">
<action>maincpu.md@2B6A = 06800021</action>
</script>
</cheat>
</mamecheat>
Code: Select all
<!-- Port Man -->
<mamecheat version="1">
<cheat desc="no hit">
<script state="on">
<action>maincpu.mb@1257 = C9</action> <!-- rock (port) -->
<action>maincpu.mb@12A9 = AB</action> <!-- lift (port) -->
<action>maincpu.mb@3C6C = 6E</action> <!-- dynamite (warehouse) -->
<action>maincpu.mb@440D = C9</action> <!-- player bullet (warehouse) -->
<action>maincpu.mb@445C = C9</action> <!-- rock (warehouse) -->
</script>
<script state="off">
<action>maincpu.mb@1257 = D8</action>
<action>maincpu.mb@12A9 = 58</action>
<action>maincpu.mb@3C6C = 71</action>
<action>maincpu.mb@440D = C8</action>
<action>maincpu.mb@445C = C8</action>
</script>
</cheat>
<cheat desc="sound test mode">
<comment>set "skip ram/rom check" then reset the game (F3)</comment>
<script state="on">
<action>maincpu.mb@4CC7 = 00 </action> <!-- disable title -->
<action>maincpu.mw@282B = 5000 </action>
<action>maincpu.mq@5000 = B00332B00032013E</action>
<action>maincpu.mq@5008 = 04E6A8003A810021</action>
<action>maincpu.mq@5010 = E6A0003A4F070707</action>
<action>maincpu.mq@5018 = 01FEED2847B8B11F</action>
<action>maincpu.mq@5020 = 34012002FE350120</action>
<action>maincpu.mq@5028 = 0618F03E042004FE</action>
<action>maincpu.mq@5030 = 7786103E052008FE</action>
<action>maincpu.mq@5038 = 80F67E052010FE78</action>
<action>maincpu.mq@5040 = 903E052020FE0618</action>
<action>maincpu.mq@5048 = 000000BE18B80032</action>
<!--
5000 | 3E 01 : ld a,$01
5002 | 32 00 B0 : ld ($B000),a // enable interrput
5005 | 32 03 B0 : ld ($B003),a // enable sound
5008 | 21 00 81 : ld hl,$8100 // sound code address
500B | 3A 00 A8 : ld a,($A800) // read start button
500E | E6 04 : and $04
5010 | 07 : rlca
5011 | 07 : rlca
5012 | 07 : rlca
5013 | 4F : ld c,a
5014 | 3A 00 A0 : ld a,($A000) // read other inputs
5017 | E6 1F : and $1F
5019 | B1 : or c
501A | B8 : cp b
501B | 47 : ld b,a
501C | 28 ED : jr z,$500B
501E | FE 01 : cp $01
5020 | 20 01 : jr nz,$5023
5022 | 35 : dec (hl) // decrease code -01
5023 | FE 02 : cp $02
5025 | 20 01 : jr nz,$5028
5027 | 34 : inc (hl) // increase code +01
5028 | FE 04 : cp $04
502A | 20 04 : jr nz,$5030
502C | 3E F0 : ld a,$F0 // decrease code -10
502E | 18 06 : jr $5036
5030 | FE 08 : cp $08
5032 | 20 05 : jr nz,$5039
5034 | 3E 10 : ld a,$10 // increase code +10
5036 | 86 : add a,(hl)
5037 | 77 : ld (hl),a
5038 | 78 : ld a,b
5039 | FE 10 : cp $10
503B | 20 05 : jr nz,$5042
503D | 7E : ld a,(hl) // play sound
503E | F6 80 : or $80
5040 | 18 06 : jr $5048
5042 | FE 20 : cp $20
5044 | 20 05 : jr nz,$504B
5046 | 3E 90 : ld a,$90 // stop sound
5048 | 32 00 B8 : ld ($B800),a // send sound code
504B | 18 BE : jr $500B
-->
</script>
<script state="run">
<output format="----- sound test mode -----" line="10" align="center" />
<output format="left : decrease code -01" line="11" align="center" />
<output format="right : increase code +01" line="12" align="center" />
<output format="down : decrease code -10" line="13" align="center" />
<output format="up : increase code +10" line="14" align="center" />
<output format="button 1 : play sound" line="15" align="center" />
<output format="start : stop sound" line="16" align="center" />
<output format="----------------------------" line="17" align="center" />
<output format="<< sound code %02X >>" line="19" align="center" >
<argument>maincpu.pb@8100</argument>
</output>
</script>
<script state="off">
<action>maincpu.mb@4CC7 = 01 </action>
<action>maincpu.mw@282B = 284E </action>
<action>maincpu.mq@5000 = 0000000000000000</action>
<action>maincpu.mq@5008 = 0000000000000000</action>
<action>maincpu.mq@5010 = 0000000000000000</action>
<action>maincpu.mq@5018 = 0000000000000000</action>
<action>maincpu.mq@5020 = 0000000000000000</action>
<action>maincpu.mq@5028 = 0000000000000000</action>
<action>maincpu.mq@5030 = 0000000000000000</action>
<action>maincpu.mq@5038 = 0000000000000000</action>
<action>maincpu.mq@5040 = 0000000000000000</action>
<action>maincpu.mq@5048 = 0000000000000000</action>
</script>
</cheat>
<cheat desc="skip ram/rom check">
<script state="on">
<action>maincpu.md@2B6A = 062800C3</action>
</script>
<script state="off">
<action>maincpu.md@2B6A = 06800021</action>
</script>
</cheat>
</mamecheat>
Code: Select all
<!-- Port Man (Japan) -->
<mamecheat version="1">
<cheat desc="no hit">
<script state="on">
<action>maincpu.mb@1257 = C9</action> <!-- rock (port) -->
<action>maincpu.mb@12A9 = AB</action> <!-- lift (port) -->
<action>maincpu.mb@3C6C = 6E</action> <!-- dynamite (warehouse) -->
<action>maincpu.mb@440D = C9</action> <!-- player bullet (warehouse) -->
<action>maincpu.mb@445C = C9</action> <!-- rock (warehouse) -->
</script>
<script state="off">
<action>maincpu.mb@1257 = D8</action>
<action>maincpu.mb@12A9 = 58</action>
<action>maincpu.mb@3C6C = 71</action>
<action>maincpu.mb@440D = C8</action>
<action>maincpu.mb@445C = C8</action>
</script>
</cheat>
<cheat desc="sound test mode">
<comment>set "skip ram/rom check" then reset the game (F3)</comment>
<script state="on">
<action>maincpu.mb@4CC7 = 00 </action> <!-- disable title -->
<action>maincpu.mw@282B = 5000 </action>
<action>maincpu.mq@5000 = B00332B00032013E</action>
<action>maincpu.mq@5008 = 04E6A8003A810021</action>
<action>maincpu.mq@5010 = E6A0003A4F070707</action>
<action>maincpu.mq@5018 = 01FEED2847B8B11F</action>
<action>maincpu.mq@5020 = 34012002FE350120</action>
<action>maincpu.mq@5028 = 0618F03E042004FE</action>
<action>maincpu.mq@5030 = 7786103E052008FE</action>
<action>maincpu.mq@5038 = 80F67E052010FE78</action>
<action>maincpu.mq@5040 = 903E052020FE0618</action>
<action>maincpu.mq@5048 = 000000BE18B80032</action>
<!--
5000 | 3E 01 : ld a,$01
5002 | 32 00 B0 : ld ($B000),a // enable interrput
5005 | 32 03 B0 : ld ($B003),a // enable sound
5008 | 21 00 81 : ld hl,$8100 // sound code address
500B | 3A 00 A8 : ld a,($A800) // read start button
500E | E6 04 : and $04
5010 | 07 : rlca
5011 | 07 : rlca
5012 | 07 : rlca
5013 | 4F : ld c,a
5014 | 3A 00 A0 : ld a,($A000) // read other inputs
5017 | E6 1F : and $1F
5019 | B1 : or c
501A | B8 : cp b
501B | 47 : ld b,a
501C | 28 ED : jr z,$500B
501E | FE 01 : cp $01
5020 | 20 01 : jr nz,$5023
5022 | 35 : dec (hl) // decrease code -01
5023 | FE 02 : cp $02
5025 | 20 01 : jr nz,$5028
5027 | 34 : inc (hl) // increase code +01
5028 | FE 04 : cp $04
502A | 20 04 : jr nz,$5030
502C | 3E F0 : ld a,$F0 // decrease code -10
502E | 18 06 : jr $5036
5030 | FE 08 : cp $08
5032 | 20 05 : jr nz,$5039
5034 | 3E 10 : ld a,$10 // increase code +10
5036 | 86 : add a,(hl)
5037 | 77 : ld (hl),a
5038 | 78 : ld a,b
5039 | FE 10 : cp $10
503B | 20 05 : jr nz,$5042
503D | 7E : ld a,(hl) // play sound
503E | F6 80 : or $80
5040 | 18 06 : jr $5048
5042 | FE 20 : cp $20
5044 | 20 05 : jr nz,$504B
5046 | 3E 90 : ld a,$90 // stop sound
5048 | 32 00 B8 : ld ($B800),a // send sound code
504B | 18 BE : jr $500B
-->
</script>
<script state="run">
<output format="----- sound test mode -----" line="10" align="center" />
<output format="left : decrease code -01" line="11" align="center" />
<output format="right : increase code +01" line="12" align="center" />
<output format="down : decrease code -10" line="13" align="center" />
<output format="up : increase code +10" line="14" align="center" />
<output format="button 1 : play sound" line="15" align="center" />
<output format="start : stop sound" line="16" align="center" />
<output format="----------------------------" line="17" align="center" />
<output format="<< sound code %02X >>" line="19" align="center" >
<argument>maincpu.pb@8100</argument>
</output>
</script>
<script state="off">
<action>maincpu.mb@4CC7 = 01 </action>
<action>maincpu.mw@282B = 284E </action>
<action>maincpu.mq@5000 = 0000000000000000</action>
<action>maincpu.mq@5008 = 0000000000000000</action>
<action>maincpu.mq@5010 = 0000000000000000</action>
<action>maincpu.mq@5018 = 0000000000000000</action>
<action>maincpu.mq@5020 = 0000000000000000</action>
<action>maincpu.mq@5028 = 0000000000000000</action>
<action>maincpu.mq@5030 = 0000000000000000</action>
<action>maincpu.mq@5038 = 0000000000000000</action>
<action>maincpu.mq@5040 = 0000000000000000</action>
<action>maincpu.mq@5048 = 0000000000000000</action>
</script>
</cheat>
<cheat desc="skip ram/rom check">
<script state="on">
<action>maincpu.md@2B6A = 062800C3</action>
</script>
<script state="off">
<action>maincpu.md@2B6A = 06800021</action>
</script>
</cheat>
</mamecheat>
Code: Select all
<!-- The Porter (bootleg of Port Man) -->
<mamecheat version="1">
<cheat desc="no hit">
<script state="on">
<action>maincpu.mb@112D = C9</action> <!-- rock (port) -->
<action>maincpu.mb@117F = 81</action> <!-- lift (port) -->
<action>maincpu.mb@2D23 = 25</action> <!-- dynamite (warehouse) -->
<action>maincpu.mb@34C4 = C9</action> <!-- player bullet (warehouse) -->
<action>maincpu.mb@3513 = C9</action> <!-- rock (warehouse) -->
</script>
<script state="off">
<action>maincpu.mb@112D = D8</action>
<action>maincpu.mb@117F = 2E</action>
<action>maincpu.mb@2D23 = 28</action>
<action>maincpu.mb@34C4 = C8</action>
<action>maincpu.mb@3513 = C8</action>
</script>
</cheat>
<cheat desc="sound test mode">
<comment>reset the game (F3) to enter sound test mode</comment>
<script state="on">
<action>maincpu.mb@3D7E = 00 </action> <!-- disable title -->
<action>maincpu.mw@20B0 = 5000 </action>
<action>maincpu.mq@5000 = B00332B00032013E</action>
<action>maincpu.mq@5008 = 04E6A8003A410021</action>
<action>maincpu.mq@5010 = E6A0003A4F070707</action>
<action>maincpu.mq@5018 = 01FEED2847B8B11F</action>
<action>maincpu.mq@5020 = 34012002FE350120</action>
<action>maincpu.mq@5028 = 0618F03E042004FE</action>
<action>maincpu.mq@5030 = 7786103E052008FE</action>
<action>maincpu.mq@5038 = 80F67E052010FE78</action>
<action>maincpu.mq@5040 = 903E052020FE0618</action>
<action>maincpu.mq@5048 = 000000BE18B80032</action>
<!--
5000 | 3E 01 : ld a,$01
5002 | 32 00 B0 : ld ($B000),a // enable interrput
5005 | 32 03 B0 : ld ($B003),a // enable sound
5008 | 21 00 41 : ld hl,$4100 // sound code address
500B | 3A 00 A8 : ld a,($A800) // read start button
500E | E6 04 : and $04
5010 | 07 : rlca
5011 | 07 : rlca
5012 | 07 : rlca
5013 | 4F : ld c,a
5014 | 3A 00 A0 : ld a,($A000) // read other inputs
5017 | E6 1F : and $1F
5019 | B1 : or c
501A | B8 : cp b
501B | 47 : ld b,a
501C | 28 ED : jr z,$500B
501E | FE 01 : cp $01
5020 | 20 01 : jr nz,$5023
5022 | 35 : dec (hl) // decrease code -01
5023 | FE 02 : cp $02
5025 | 20 01 : jr nz,$5028
5027 | 34 : inc (hl) // increase code +01
5028 | FE 04 : cp $04
502A | 20 04 : jr nz,$5030
502C | 3E F0 : ld a,$F0 // decrease code -10
502E | 18 06 : jr $5036
5030 | FE 08 : cp $08
5032 | 20 05 : jr nz,$5039
5034 | 3E 10 : ld a,$10 // increase code +10
5036 | 86 : add a,(hl)
5037 | 77 : ld (hl),a
5038 | 78 : ld a,b
5039 | FE 10 : cp $10
503B | 20 05 : jr nz,$5042
503D | 7E : ld a,(hl) // play sound
503E | F6 80 : or $80
5040 | 18 06 : jr $5048
5042 | FE 20 : cp $20
5044 | 20 05 : jr nz,$504B
5046 | 3E 90 : ld a,$90 // stop sound
5048 | 32 00 B8 : ld ($B800),a // send sound code
504B | 18 BE : jr $500B
-->
</script>
<script state="run">
<output format="----- sound test mode -----" line="10" align="center" />
<output format="left : decrease code -01" line="11" align="center" />
<output format="right : increase code +01" line="12" align="center" />
<output format="down : decrease code -10" line="13" align="center" />
<output format="up : increase code +10" line="14" align="center" />
<output format="button 1 : play sound" line="15" align="center" />
<output format="start : stop sound" line="16" align="center" />
<output format="----------------------------" line="17" align="center" />
<output format="<< sound code %02X >>" line="19" align="center" >
<argument>maincpu.pb@4100</argument>
</output>
</script>
<script state="off">
<action>maincpu.mb@3D7E = 01 </action>
<action>maincpu.mw@20B0 = 20D3 </action>
<action>maincpu.mq@5000 = 0000000000000000</action>
<action>maincpu.mq@5008 = 0000000000000000</action>
<action>maincpu.mq@5010 = 0000000000000000</action>
<action>maincpu.mq@5018 = 0000000000000000</action>
<action>maincpu.mq@5020 = 0000000000000000</action>
<action>maincpu.mq@5028 = 0000000000000000</action>
<action>maincpu.mq@5030 = 0000000000000000</action>
<action>maincpu.mq@5038 = 0000000000000000</action>
<action>maincpu.mq@5040 = 0000000000000000</action>
<action>maincpu.mq@5048 = 0000000000000000</action>
</script>
</cheat>
</mamecheat>