ACTOR TK3CerebralBurst : Weapon
{
  Weapon.Kickback 100
  scale 0.2
      	Weapon.AmmoUse 2
	Weapon.AmmoGive 4
	Weapon.AmmoType "TK3SmallCoreAmmo"
  Inventory.PickupMessage "Cerebral Burst"
  	inventory.Icon "TKA5C0"
	Weapon.SelectionOrder 400
  Obituary  "%k used a pistol to shoot down %o."
  	Inventory.PickupSound "Turok3/Items/PickupWeapon"
	+WEAPON.EXPLOSIVE
	TAG "Cerebral Burst"
  States
  {
  Spawn:
    TKA3 I -1
    Loop
  Ready:
	TNT1 A 0 A_PlaySound ("Turok3/Weapons/BoreUp","Weapon")
    TK41 A 2 
    TK41 B 2
    TK41 C 2
    TK41 D 2
    TK41 E 2
    TK41 F 2
    TK41 GJKLMOP 2 A_WeaponReady
	MK24 ABCDEFGHIJKLMNO 2 A_WeaponReady
    Goto Ready+7
  Deselect:
    MK25 NOPQRS 2
    TK09 P 0 A_Lower
    wait
  Select: 
    TK41 G 0 A_Raise 
    Loop  
  Fire: 
 	TNT1 A 0 A_PlaySound ("Turok3/Weapons/BoreAttack","Weapon")
	TNT1 A 0 A_FireCustomMissile("TK3BoreBurstShot", -1, 1, 6, 5)
    MK24 PQRSTUVXYZ 2
	MK25 ABCDEFGHIJKLM 2
    Goto Ready+7
  }
}

actor TK3BoreBurstShot
{
  obituary "%o was never seen again, thanks to %k's Cerebral Burst."
  radius 8
  height 8
  speed 5
        radius 8
  height 8
  damage 90
  DamageType Explosive
  scale 0.2
  PROJECTILE
  	+BLOODSPLATTER
  +RANDOMIZE
  +ROCKETTRAIL
  +SEEKERMISSILE
    +FORCEXYBILLBOARD
  states
  {
  Spawn:
    TF37 A 6 A_PlaySoundEx("Turok3/Weapons/BoreLoop","Body",1)
    loop
DEATH:
NULL A 0
TNT1 A 0 A_PlaySoundEx("Turok3/Weapons/Boom","Weapon",0)
TNT1 A 0 A_StopSoundEx("Body")
NULL A 0 A_ALERTMONSTERS
NULL A 0 A_SPAWNITEMEX("TK3BoreBurstBoom",0,0,0,random(0,0),random(0,0),0)
STOP
}}

ACTOR TK3BoreBurstBoom
{
DamageType Explosive
SCALE 0.5
  obituary "%o was never seen again, thanks to %k's Cerebral Burst."
+NOGRAVITY
+FORCEXYBILLBOARD
+BRIGHT

STATES
{
SPAWN:
NULL A 0
NULL A 0 A_QUAKE(2,100,1,250,"")
NULL A 0 A_EXPLODE(110,80)
1588 HIJKLMNOPQRST 2
STOP
}}
