script "Infinite Credits"  
run:
    poke $FF726E $09
script "Infinite Time"  
run:
    poke $FF72CA $99
script "Finish this Battle Now!"  
on:
    poke $FF72CA $01
script " "  
script "P1 Infinite Energy"  
run:
    lpoke $FF802C $01160117
script "P1 Drain Most Energy Now!"  
on:
    lpoke $FF802C $00000000
script "P2 Infinite Energy"  
run:
    lpoke $FF842C $01160117
script "P2 Drain Most Energy Now!"  
on:
    lpoke $FF842C $00000000
script " "  
script "No Background Music"  
run:
    cpu audio
    dpoke $F018 $0000
    cpu main
script "Hide Background"  
on:
    
temp0=peek($FF7047)
    temp1=maincpu.ow@002A96

run:
    poke $FF7047 temp0
    maincpu.ow@002A96=temp1

    if (dpeek($FF732C)==$4)
      poke $FF7047 $0
      
maincpu.ow@002A96=$4E71
      poke $FF9800 $0
      poke $FF9900 $0
      poke $FF9A00 $0
      poke $FF9B00 $0
      poke $FF9C00 $0
      poke $FF9D00 $0
      poke $FF9E00 $0
      poke $FF9F00 $0
    endif
off:
    poke $FF7047 temp0
    maincpu.ow@002A96=temp1

script "Select Region" \
 "comm:This cheat sets the machine region - the effectiveness may vary! You have to enable this ASAP - ON or before the ROM check screen! Or enable + RESET" \
 "0x00/Japan"\
 "0x01/USA"\
 "0x02/Euro"\
 "0x03/Asia Sample"\
 "0x04/Asia TW"\
 "0x05/Hispanic"\
 "0x0A/Brazil" 
run:
    poke $FF7445 param
script "Sound Test" \
 inter=1,378,1 
change:
    cpu audio
    dpoke $F007 $0000
    lpoke $F100 $00001000
    lpoke $f104 $009900FF
    lpoke $F108 $00999900
    lpoke $f10c $00000000
    lpoke $F110 $10001000
    lpoke $f114 $00990000
    lpoke $F118 $00999900
    lpoke $f11c $00000000
    if (param<100)
      poke $F111 param
      temp0=param/100
    endif
    if (param>=100)
      poke $F110 temp0
      poke $F111 param-(temp0*100)
      poke $F007 $20
    endif
    cpu main
