ACTOR TK3CerebralPossessor : Weapon
{
  Weapon.Kickback 100
  scale 0.2
      	Weapon.AmmoUse 3
	Weapon.AmmoGive 4
	Weapon.AmmoType "TK3SmallCoreAmmo"
		inventory.Icon "TKA5D0"
  Inventory.PickupMessage "Cerebral Possessor"
  Obituary  "%k used a pistol to shoot down %o."
  	Inventory.PickupSound "Turok3/Items/PickupWeapon"
  States
  {
  Spawn:
    TKA3 P -1
    Loop
  Ready:
	TNT1 A 0 A_PlaySound ("Turok3/Weapons/BoreUp","Weapon")
    TK42 A 2 
    TK42 B 2
    TK42 C 2
    TK42 D 2
    TK42 E 2
    TK42 F 2
    TK42 G 2
    TK42 G -1 A_WeaponReady
    Goto Ready+7
  Deselect:
    TK42 J 2
    TK42 KLM 2
	TK09 O 2
    TK09 O 0 A_Lower
    wait
  Select: 
    TK42 G 0 A_Raise 
    Loop  
  Fire: 
 	TNT1 A 0 A_PlaySound ("Turok3/Weapons/BoreAttack","Weapon")
	TNT1 A 0 A_FireCustomMissile("TK3BorePossessorShot", -1, 1, 6, 5)
    TK42 J 2
    TK42 K 2 
    TK42 L 2 
    TK42 K 2
    TK42 J 2  
    TK42 G 60
    Goto Ready+7
  }
}

actor TK3BorePossessorShot
{
  obituary "%k Possessed %o."
  radius 8
  height 8
  speed 5
  damage 200
        radius 8
  height 8
  scale 0.4
  PROJECTILE
  	+BLOODSPLATTER
  +RANDOMIZE
    +FORCEXYBILLBOARD
  states
  {
  Spawn:
    TF40 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
{
SCALE 1.2
	  obituary "%k Possessed %o."
+NOGRAVITY
+FORCEXYBILLBOARD
+BRIGHT

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