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)and(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)and(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)and(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)and(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)and(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
