/*
CREDITS:
Original work & sounds - Epic Games (UT2004)
Sprite - Ghastly Dragon
*/

ACTOR Redeemer : CustomInventory
{
  Inventory.Amount 1
  Inventory.MaxAmount 4
  Inventory.InterHubAmount 4
  Inventory.Icon "ARTIREDG"
  Inventory.PickupSound "weapons/RedeemerPick"
  Inventory.UseSound "Weapons/RedeemerFire"
  Inventory.PickupMessage "You got the not-so-handy-yet-funny-as-heck ''Redeemer'' quick-nuke launcher! SURPRISE NUKEY!!"
  +INVENTORY.INVBAR
  Scale 1
  States
  {
  Spawn:
    REDG A -1
    Stop
  Use:
    TNT1 A 1  A_FireCustomMissile("RedeemerMissile",0,0)
    Stop
  }
}

ACTOR RedeemerMissile : Rocket
{
 Damage 1000
 Speed 15
 PROJECTILE
 +NOGRAVITY
 -ROCKETTRAIL
 +THRUGHOST
 +DONTSPLASH
 +EXPLODEONWATER
 Obituary "%o was destroy-nished by %k's surprise nukey!"
 SeeSound ""
 DeathSound ""
 Scale 1
 states
 {
 Spawn:
 REDM A 0
 REDM A 0 ACS_ExecuteAlways(704)
 REDM A 0 A_PlaySound("Weapons/RedeemerLoop",5,1.0,1)
 REDM A 0 A_SpawnItemEx("DeathHeadFlameTrail", -23, random(1,-1), random(1,-1), 0, 0, 0, 0, 128, 0)
 REDM AAA 0 A_SpawnItemEx("DeathHeadSmokeTrail", -23, random(3,-3), random(3,-3), 0 ,0, 0, 0, 128, 0)
 REDM A 1 Bright
 Goto Spawn
 Death:
 TNT1 A 0 A_PlaySound("Weapons/StalinowiczExplode",5)
 TNT1 A 0 A_SpawnItemEx("Nuke",0,0,5,0,0,0,0,SXF_TRANSFERPOINTERS|SXF_NOCHECKPOSITION)
 TNT1 AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 1 A_SpawnItemEx("KaBoom",random(-100,100),random(-100,100),random(-100,100),random(-4,4),random(-4,4),random(-2,6),random(0,359),SXF_TRANSFERTRANSLATION|SXF_TRANSFERPOINTERS|SXF_NOCHECKPOSITION,40)
 Stop
 }
}
