ACTOR TK3VampireGun : Weapon
{
  Weapon.Kickback 100
  scale 0.2
  Inventory.PickupMessage "Vampire Gun"
  Obituary  "%k hsssssed %o out with the Vampire Gun."
  	inventory.Icon "TKA5I0"
	Weapon.SelectionOrder 9999
  	Inventory.PickupSound "Turok3/Items/PickupWeapon"
		+WEAPON.MELEEWEAPON
		Tag "Vampire Gun"
  States
  {
  Spawn:
    TKA3 E -1
    Loop
  Ready:
	TNT1 A 0 A_PlaySound ("Turok3/Weapons/HPDrainerUp","Weapon")
    TK30 A 2 
    TK30 B 2
    TK30 C 2
    TK30 D 2
    TK30 E 2
    TK30 F 2
    TK30 G 2
	TK30 H 2
	TK30 I 2
	TK30 J 2
	TK30 K 2
	TK30 L 2
	TK30 M 2
	TK30 N 2
	TK30 O 2
    TK30 O -1 A_WeaponReady
    Goto Ready+9
  Deselect:
    TK31 A 2
    TK31 B 2
	TK09 CD 2
    TK09 D 0 A_Lower
    wait
  Select: 
    TK30 A 0 A_Raise 
    Loop  
  Fire: 
    	TK01 A 0 A_JumpIfInventory("PowerStrength",1,"SwingPower")
 	TNT1 A 0 A_PlaySound ("Turok3/Weapons/HPDrainerAttack","Weapon")
    TK30 P 2 
    TK30 Q 2 
    TK30 R 2 A_CustomPunch(30, false, 0)
    TK30 S 2
    TK30 T 2  
    TK30 U 2
    TK30 V 2 
    TK30 X 2
	TK30 Y 2
	TK30 Z 2
    Goto Ready+13
	
	  SwingPower: 
 	TNT1 A 0 A_PlaySound ("Turok3/Weapons/HPDrainerAttack","Weapon")
    TK30 P 1 
    TK30 Q 1 
    TK30 R 1 A_CustomPunch(60, FALSE, 0)
    TK30 S 1
    TK30 T 1  
    TK30 U 1
    TK30 V 1 
    TK30 X 1
	TK30 Y 1
	TK30 Z 1
    Goto Ready+13
	
  }
}