ACTOR TK3Shredder : Weapon
{
  Weapon.Kickback 100
  scale 0.2
    	Weapon.AmmoUse 0
	Weapon.AmmoGive 10
	Weapon.AmmoType "TK3ShotgunShells"
		inventory.Icon "TKA5Q0"
  Inventory.PickupMessage "Shotgun With Shredder"
  Obituary  "%k blew %o's head off with a Shotgun."
  Weapon.SelectionOrder 300
  	Inventory.PickupSound "Turok3/Items/PickupWeapon"
	TAG "Shredder"
  States
  {
  Spawn:
    TKA3 R -1
    Loop
  Ready:
	TNT1 A 0 A_PlaySound ("Turok3/Weapons/ShredderUp","Weapon")
    TK27 A 2 
    TK27 B 2
    TK27 D 2
    TK27 E 2
    TK27 F 2
    TK27 G 2
	TK27 H 2
	TK27 I 2
	TK27 J 2
	TK27 K 2
	TK27 L 2
	TK27 M 2
	TK27 N 2 
	TW27 ABCD 2 A_WeaponReady
	TW27 EFGHIJKLMNOPQRSTUVXYZ 2 A_WeaponReady
	TW28 ABCDEF 2 A_WeaponReady
    Goto Ready+16
  Deselect:
    TK28 Z 2
    TK29 ABCDEFGH 2
	TK29 IJ 2
    TK29 GJ 0 A_Lower
    wait
  Select: 
    TK26 A 0 A_Raise 
    Loop  
  Fire: 
      NULL A 0 A_JumpIfInventory("TK3ShotgunShells",1,1)
  goto Ready+14
		TNT1 A 0 A_TakeInventory("TK3ShotgunShells",5,TIF_NOTAKEINFINITE)
 	TNT1 A 0 A_PlaySound ("Turok3/Weapons/ShredderAttack","Weapon")
	TNT1 AAAAAA 0 A_FireCustomMissile("TK3ShredderShot",frandom(-0.5,2),5,frandom(3,9),0,0,frandom(-1.0,3))
    TK27 S 2 BRIGHT
    TK27 TUVXYZ 2 
	TK28 ABCDEFGHIJKLMNOPQRSTUVXY 2
    Goto Ready+14
  }
}

actor TK3ShredderShot
{
  obituary "%o was blown away by %k's shredder."
  radius 8
  height 8
  speed 100
  damage 7
  DamageType Lightning
  scale 0.1
  PROJECTILE
  +HEXENBOUNCE
  +FORCEXYBILLBOARD
    bouncefactor 0.9
  bouncecount 8
  states
  {
  Spawn:
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", 0,               0,              2)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail",     momx /-90.0,     -momy /-90.0, 2+    momz /-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (2 *momx)/-90.0, -(2 *momy)/-90.0, 2+(2 *momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (3 *momx)/-90.0, -(3 *momy)/-90.0, 2+(3 *momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (4 *momx)/-90.0, -(4 *momy)/-90.0, 2+(4 *momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (5 *momx)/-90.0, -(5 *momy)/-90.0, 2+(5 *momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (6 *momx)/-90.0, -(6 *momy)/-90.0, 2+(6 *momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (7 *momx)/-90.0, -(7 *momy)/-90.0, 2+(7 *momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
	  TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (8 *momx)/-90.0, -(8 *momy)/-90.0, 2+(8 *momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (9 *momx)/-90.0, -(9 *momy)/-90.0, 2+(9 *momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (10*momx)/-90.0, -(10*momy)/-90.0, 2+(10*momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (11*momx)/-90.0, -(11*momy)/-90.0, 2+(11*momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (12*momx)/-90.0, -(12*momy)/-90.0, 2+(12*momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (13*momx)/-90.0, -(13*momy)/-90.0, 2+(13*momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (14*momx)/-90.0, -(14*momy)/-90.0, 2+(14*momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (15*momx)/-90.0, -(15*momy)/-90.0, 2+(15*momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (16*momx)/-90.0, -(16*momy)/-90.0, 2+(16*momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (17*momx)/-90.0, -(17*momy)/-90.0, 2+(17*momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (18*momx)/-90.0, -(18*momy)/-90.0, 2+(18*momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (19*momx)/-90.0, -(19*momy)/-90.0, 2+(19*momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (20*momx)/-90.0, -(20*momy)/-90.0, 2+(20*momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (21*momx)/-90.0, -(21*momy)/-90.0, 2+(21*momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (22*momx)/-90.0, -(22*momy)/-90.0, 2+(22*momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (23*momx)/-90.0, -(23*momy)/-90.0, 2+(23*momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (24*momx)/-90.0, -(24*momy)/-90.0, 2+(24*momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (25*momx)/-90.0, -(25*momy)/-90.0, 2+(25*momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (26*momx)/-90.0, -(26*momy)/-90.0, 2+(26*momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (27*momx)/-90.0, -(27*momy)/-90.0, 2+(27*momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (28*momx)/-90.0, -(28*momy)/-90.0, 2+(28*momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 0 A_SpawnItemEx("TK3ShredderShot_trail", (29*momx)/-90.0, -(29*momy)/-90.0, 2+(29*momz)/-90.0, 0,0,0, 0, SXF_ABSOLUTEANGLE)
      TNT1 A 1 BRIGHT
      Loop
  Death:
     TNT1 A 0 A_SpawnItemEx("TK3ShredderRing",0,0,0,0,0,0,0,128,0)
	 TNT1 A 0 A_PlaySound ("Turok3/Weapons/ShredderBounce")
    TNT1 A 0
    stop
  XDeath:  
    TNT1 A 0
    TNT1 A 0 A_SpawnItemEx("TK3ShredderRing",0,0,0,0,0,0,0,128,0)
		 TNT1 A 0 A_PlaySound ("Turok3/Weapons/ShredderBounce")
    stop
  }
}

actor TK3ShredderShot_trail
{
  Scale 0.1
  +NOINTERACTION
  +FORCEXYBILLBOARD
  +CLIENTSIDEONLY
  States
  {
	Spawn:
	  TF46 A 2 BRIGHT
	  Stop
  }
}

ACTOR TK3ShredderRing
{
	Speed 0
	Mass 0
	+Missile
	scale 0.6
	+LOWGRAVITY
	+NOBLOCKMAP
	+NOGRAVITY
	+NOTELEPORT
	+CANNOTPUSH
	+NODAMAGETHRUST
	+FORCEXYBILLBOARD
	States
	{
	Spawn:
		TNT1 A 0 Nodelay A_Setscale(0.05,0.05)
		TF25 A 1 BRIGHT
		TNT1 A 0 A_Setscale(0.1,0.1)
		TF25 A 1 BRIGHT
		TNT1 A 0 A_Setscale(0.15,0.15)
		TF25 A 1 BRIGHT
		TNT1 A 0 A_Setscale(0.2,0.2)
		TF25 A 2 BRIGHT
		TNT1 A 0 A_Setscale(0.25,0.25)
		TF25 A 2 BRIGHT
		TNT1 A 0 A_Setscale(0.3,0.3)
		TF25 A 2 BRIGHT
		TNT1 A 0 A_Setscale(0.4,0.4)
		TF25 B 1 BRIGHT
		TNT1 A 0 A_Setscale(0.5,0.5)
		TF25 B 1 BRIGHT
		TNT1 A 0 A_Setscale(0.6,0.6)
		TF25 B 1 BRIGHT A_Fadeout(0.15)
		wait
	}
}
