script "Infinite Character Selection Time"  
run:
    poke $FFD7FD $63
script "Select Starting Stage Level" \
 "0x00/1"\
 "0x01/2"\
 "0x02/3"\
 "0x03/4"\
 "0x04/5"\
 "0x05/6"\
 "0x06/7"\
 "0x07/Demo Stage" 
run:
    if (peek($FF7341)==$00)
      poke $FF7341 param
    endif
script "Finish Current Stage Now!"  
on:
    if (peek($908681)==$38)&&(peek($FF6ED6)==00)
      poke $FF6ED6 $80
    endif
script " "  
script "P1 Infinite Lives"  
run:
    poke $FF72DD $0A
script "P1 Infinite Bombs"  
run:
    poke $FF72E1 $08
script "P1 Invincibility" \
 "0x01/Enabled"\
 "0x02/Disabled" 
run:
    if (param==$01)
      dpoke $FFAE3A $0003
      poke $FFADEB $40|(peek($FFADEB)&~40)
    endif
    if (param==$02)
      dpoke $FFAE3A $0001
      poke $FFADEB $00|(peek($FFADEB)&~40)
    endif
script "P1 Select Shot" \
 "0x00/Type A Level 1"\
 "0x01/Type A Level 2"\
 "0x02/Type A Level 3"\
 "0x03/Type A Level 4"\
 "0x04/Type B Level 1"\
 "0x05/Type B Level 2"\
 "0x06/Type B Level 3"\
 "0x07/Type B Level 4"\
 "0x08/Type C Level 1"\
 "0x09/Type C Level 2"\
 "0x0A/Type C Level 3"\
 "0x0B/Type C Level 4"\
 "0x0C/Type D Level 1"\
 "0x0D/Type D Level 2"\
 "0x0E/Type D Level 3"\
 "0x0F/Type D Level 4" 
run:
    poke $FF730D param
script "P1 Infinite Reflect Barrier Time"  
run:
    if (dpeek($FF9E70)>0x10)&&(dpeek($FF9E70)<0x20)
      dpoke $FF9E70 $001F
    endif
script "P1 Get Maximum multiplier Now!"  
on:
    lpoke $FF72E4 $49999999
script "P1 Rapid Fire"  
run:
    poke $FFAE30 $00|(peek($FFAE30)&~10)
script "P1 Quick Charge Shield"  
run:
    if (dpeek($FFAE74)>0FC0)&&(dpeek($FFAE74)<1000)
      dpoke $FFAE74 $0000
    endif
script "P1 Select Character" \
 "0x00/Sinnosuke"\
 "0x01/Ruby"\
 "0x02/Isha"\
 "0x03/Stuck"\
 "0x04/Stranger (Buggy-Incomplete GFX)" 
run:
    poke $FF7309 param
script " "  
script "P2 Infinite Lives"  
run:
    poke $FF72DF $0A
script "P2 Infinite Bombs"  
run:
    poke $FF72E3 $08
script "P2 Invincibility" \
 "0x01/Enabled"\
 "0x02/Disabled" 
run:
    if (param==$01)
      dpoke $FFAEFB $0003
      poke $FFAEAB $40|(peek($FFAEAB)&~40)
    endif
    if (param==$02)
      dpoke $FFAEFA $0001
      poke $FFAEFB $00|(peek($FFAEFB)&~40)
    endif
script "P2 Select Shot" \
 "0x00/Type A Level 1"\
 "0x01/Type A Level 2"\
 "0x02/Type A Level 3"\
 "0x03/Type A Level 4"\
 "0x04/Type B Level 1"\
 "0x05/Type B Level 2"\
 "0x06/Type B Level 3"\
 "0x07/Type B Level 4"\
 "0x08/Type C Level 1"\
 "0x09/Type C Level 2"\
 "0x0A/Type C Level 3"\
 "0x0B/Type C Level 4"\
 "0x0C/Type D Level 1"\
 "0x0D/Type D Level 2"\
 "0x0E/Type D Level 3"\
 "0x0F/Type D Level 4" 
run:
    poke $FF7315 param
script "P2 Infinite Reflect Barrier Time"  
run:
    if (dpeek($FF9FF0)>0x10)&&(dpeek($FF9FF0)<0x20)
      dpoke $FF9FF0 $001F
    endif
script "P2 Get Maximum multiplier Now!"  
on:
    lpoke $FF72E8 $49999999
script "P2 Rapid Fire"  
run:
    poke $FFAEF0 $00|(peek($FFAEF0)&~10)
script "P2 Quick Charge Shield"  
run:
    if (dpeek($FFAF34)>0FC0)&&(dpeek($FFAF34)<1000)
      dpoke $FFAF34 $0000
    endif
script "P2 Select Character" \
 "0x00/Sinnosuke"\
 "0x01/Ruby"\
 "0x02/Isha"\
 "0x03/Stuck"\
 "0x04/Stranger (Buggy-Incomplete GFX)" 
run:
    poke $FF7311 param
script " "  
script "No Background Music"  
run:
    cpu audio
    dpoke $F026 $0000
    cpu main
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"\
 "0x02/USA"\
 "0x04/Euro"\
 "0x06/Brazil"\
 "0x08/Hispanic"\
 "0x0A/Asia" 
run:
    poke $FF20B1 param
script "Sound Test" \
 inter=1,1023,1 
change:
    cpu audio
    dpoke $F015 $0000
    lpoke $F100 $00009900
    lpoke $f104 $000000FF
    lpoke $F108 $00999900
    lpoke $f10c $00000000
    lpoke $F110 $10009900
    lpoke $f114 $00000000
    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 $F015 $20
    endif
    cpu main
