/*

==SIROC==
Samson's second weapon he made. Siroc is a small gauss
pistol that shaves off small bits of a metal block inside
the weapon's ammo reserves, the projectiles are extremely
tiny but fly with high velocity. The weapon is effectively
a sandblaster, making for rapid but extremely weak attacks
*/

actor BowGun : weapon
{
	Weapon.SelectionOrder 800
	+WEAPON.AMMO_OPTIONAL
	Weapon.AmmoType "BowgunDarts"
	+NOAUTOAIM
	Tag "Bowgun"
	states
	{
	spawn:
		ESHT A -1
		stop
	select:
		TNT1 A 0
		TNT1 A 0
	draw:	
		TNT1 A 0
		KPST AAAA 0 A_Raise
		TNT1 A 0 A_JumpIfInventory ("KustamBarrel",1,"PickBarrel")
		B1TG G 1 A_Raise
		loop
	deselect: 
		TNT1 A 0
		TNT1 A 0 A_JumpIfHealthLower (1, "deadlower")
		TNT1 A 0 A_JumpIfInventory ("KustamBarrel",1,"PickBarrel")
		B1TG KJIHG 2
	holster:
		TNT1 A 0
		TNT1 A 1 A_Lower
		TNT1 AA 0 A_Lower
		loop
	PickBarrel:
		TNT1 A 0
		TNT1 A 0 A_TakeInventory ("StartingCharge",99)
		TNT1 A 0 A_TakeInventory ("UsingKustamGun",999)
		TNT1 A 0 A_TakeInventory ("PistolPrep",999)
		TNT1 A 1 A_Lower 
		TNT1 AAAAAAAAAAA 0 A_Lower
		TNT1 A 1 A_SelectWeapon ("KustamBarrel")
		loop
	deadlower:
		TNT1 A 0
		TNT1 A 0
		TNT1 AAAAAAAAAAAAA 0 A_Lower
		TNT1 A 1 A_Lower
		wait		
	Ready:
		TNT1 A 0 
		B1TG GHIJK 2 A_WeaponReady (WRF_ALLOWRELOAD|WRF_NOBOB)
		B1WG A 1
		goto RealReady
	RealReady:
		B1WG A 1 A_WeaponReady (WRF_ALLOWRELOAD|WRF_ALLOWZOOM)
		loop
	Fire:
		TNT1 A 0
		TNT1 A 0 A_JumpIfInventory ("BowgunReady",1,"DartAmmoCheck")
		B1WG BCD 1
		goto DartAmmoCheck
	DartAmmoCheck:
		TNT1 A 0
		TNT1 A 0 A_JumpIfInventory ("BowgunDarts",1,"DartShot")
		B1WG E 2
		TNT1 A 0 a_playsound ("doomslayer/click",0)
		B1WG F 1
		TNT1 A 0 A_GiveInventory ("BowgunReady",1)
		B1WG E 40 A_WeaponReady (WRF_ALLOWRELOAD|WRF_ALLOWZOOM|WRF_NOBOB)
		TNT1 A 0 A_TakeInventory ("BowgunReady",99)
		B1WG DCBA 1
		goto realready		
	DartShot:
		B1WG E 2
		TNT1 A 0 A_FireBullets (0,0,1,0,"flickpuff",FBF_NOFLASH)
		TNT1 A 0 A_FireBullets (2,3,20,0,"flickpuff",FBF_NOFLASH)
		TNT1 A 0 A_FireBullets (3,4,35,0,"flickpuff",FBF_NOFLASH)
		TNT1 A 0 A_PlaySound ("Gauntlet/dart",CHAN_WEAPON)
		TNT1 A 0 A_TakeInventory ("BowgunDarts",1)
		TNT1 A 0 A_FireCustomMissile ("Gauntletbolt",random(-2,2),0,0,0,0,random(-1,1))
		B1WG FF 1
		TNT1 A 0 A_GiveInventory ("BowgunReady",1)
		B1WG E 40 A_WeaponReady (WRF_ALLOWRELOAD|WRF_ALLOWZOOM|WRF_NOBOB)
		TNT1 A 0 A_TakeInventory ("BowgunReady",99)
		B1WG DCBA 1
		goto realready
	Altfire:
		B1TG ABCD 2
		B1TG D 1
		B1TG E 1
		B1TG F 1
		TNT1 A 0 A_TakeInventory ("SamsonCatalyst",20)
		B1TG G 1 A_FireCustomMissile ("spikebomb")
		B1TG G 12
		B1TG HIJK 2 A_WeaponReady (WRF_ALLOWRELOAD|WRF_NOBOB)
		goto realready
	}
}



actor BowgunReady : Powerup
{
  Powerup.Duration 38
}
