ACTOR Bazooka : weapon 
{
     SCALE 0.50
     Weapon.SlotNumber 3
     Weapon.SelectionOrder 900
     Weapon.UpSound "gen/wepswitch"
     Inventory.PickupSound "gen/pickup"
     Inventory.Pickupmessage "You Bagged a Bazooka!"
     Weapon.AmmoGive 15
     Weapon.AmmoUse 1 
	 +IGNORESKILL
     Weapon.AmmoType "RottMissiles"
     Obituary "%o \cbwas on the wrong end of\c- %k's \cbbazooka\c-"
     States 

     { 
     Spawn: 
        PBAZ A -1 
        Stop 
     Ready: 
        BAZO A 1 A_WeaponReady 
        LOOP 
     Deselect: 
        BAZO A 1 A_Lower 
        LOOP 
     Select:
      	BAZO A 1 A_Raise 
        LOOP 
        
         Fire: 
		 TNT1 A 0 A_PlaySound("bazooka/shoot")
        BAZO E 1 A_WeaponReady(WRF_NOFIRE|WRF_NOSWITCH)
		TNT1 A 0 A_JumpIfInventory("CoopModeOn", 1, "CoopFire")
		TNT1 A 0 A_FireCustomMissile("CompRottM",0,8,0,-8) // -16
        Continue:
		BAZO F 2 A_WeaponReady(WRF_NOFIRE|WRF_NOSWITCH)
        BAZO G 1 A_WeaponReady(WRF_NOFIRE|WRF_NOSWITCH)
        BAZO B 1 Bright A_WeaponReady(WRF_NOFIRE|WRF_NOSWITCH)
        BAZO C 1 Bright A_WeaponReady(WRF_NOFIRE|WRF_NOSWITCH)
        BAZO D 2 Bright A_WeaponReady(WRF_NOFIRE|WRF_NOSWITCH)
        BAZO H 2  A_WeaponReady(WRF_NOFIRE|WRF_NOSWITCH)
        BAZO A 1 A_WeaponReady(WRF_NOFIRE|WRF_NOSWITCH)
        BAZO A 6 A_WeaponReady(WRF_NOFIRE|WRF_NOSWITCH)
        BAZO A 0 a_refire
        Goto Ready
		CoopFire:
		TNT1 A 0 A_FireCustomMissile("RottMissile",0,8,0,-8) // -16
		Goto Continue
	 } 
}  

actor RottMissile
{
    Radius 11
    Height 8
    Speed 54
    Damage (50)
    SCALE 0.50
    PROJECTILE
    +EXTREMEDEATH 
    +FOILINVUL
    damagetype "RottExplosive"
    DeathSound "god/bang"
	+THRUSPECIES
	Species "Player"
	Decal Scorch
    States
    {
    Spawn:
		TNT1 A 0
        TNT1 A 0 a_playsound("missile/fly")
        MISS AAAAAAAAAAAAAA 1 Bright A_CustomMissile("MissileTrail",0,0,0,0)     
        Loop
    Death:  
    	EXPL A 2 Bright A_Explode(64,48)
        EXPL BCDEFGHIJKLMOPQRST 2 Bright
        Stop
    }
}

Actor CompRottM : RottMissile
{
	Speed 48
	-THRUSPECIES
	Species "None"
	Decal Scorch
}

ACTOR MissileTrail
{
  Radius 2
  Height 2
  Speed 0
  Scale 0.65
  PROJECTILE
  +NOGRAVITY
  +RANDOMIZE
  States
  {
  Spawn:
     TNT1 A 4
     MTRL AAAA 1 Bright
     goto misc
     
  MISC:   
     MTRL BBCCDD 1 Bright A_fadeout
     stop
   
  }
}