ACTOR Longhorn2 : Longhorn replaces MWeapFrost
{
   Game Hexen
   Weapon.AmmoGive 30
   Weapon.AmmoType "BlueMana"
   Weapon.AmmoUse 2
   Tag "Longhorn"
   States
   {  
   RIdle:
	  1GHG A 0 A_JumpIfInventory("SynthFireRight",1,"RFire")
	  1GHG A 1 A_WeaponReady(WRF_NOFIRE|WRF_ALLOWRELOAD|WRF_ALLOWZOOM)
	  TNT1 A 0 A_JumpIf(CallACS("GunslingerMode"),"RIdle")
	  1GHG A 0 A_JumpIfInventory("PowerGunzerking",1,"RIdle")
	  Goto BackToReady
   BackToReady:
	  1GHG A 0 A_GunFlash("Nullify")
	  Goto Ready
   RFire:
	  TNT1 A 0 A_JumpIf(CallACS("GunslingerMode"),2)
	  1GHG A 0 A_JumpIfInventory("PowerGunzerking",1,1) 
	  Goto BackToReady
	  1GHG A 1 A_JumpIfInventory("BlueMana",2,1)
	  Goto RIdle
      1GHF A 0 A_PlaySound("Longhorn/Fire",1,0.4)
      1GHF A 0 A_PlaySound("Longhorn/Alt",5,0.4)
      1GHF A 0 A_PlaySound("Longhorn/Add",6,0.4)
      1GHF A 0 A_SetBlend("Yellow",0.1,7)
      1GHF A 0 A_Recoil(5)
      1GHF A 0 A_AlertMonsters
      1GHF A 0 A_Quake (5, 8, 0, 3, none)
	  2GHF A 0 A_TakeInventory("BlueMana",2,TIF_NOTAKEINFINITE)
	  1GHF AAAA 0 A_FireBullets(0.25,0.5,-1,9*random(1,3),"InvisPuff",FBF_NORANDOM)
      1GHF A 0 A_FireBullets(0.25,0.5,-1,9*random(1,3),"HuegPuff",FBF_NORANDOM) //FBF_USEAMMO|
      1GHF A 0 A_SetPitch(pitch-0.75)
      1GHF A 0 A_SetAngle(angle-0.75)
	  LGHF AA 0 A_FireCustomMissile("GunsmokeSpawner_Small",0,0,18,0)
      1GHF A 1 Bright A_ZoomFactor(0.99)
      1GHR A 0 A_SetPitch(pitch-1.0)
      1GHR A 0 A_SetAngle(angle-0.85)
	  LGHF AA 0 A_FireCustomMissile("GunsmokeSpawner_Small",0,0,22,4)
      1GHR A 1 A_ZoomFactor(0.97)
      1GHR A 0 A_SetPitch(pitch-0.8)
      1GHR A 0 A_SetAngle(angle-0.8)
	  LGHF AA 0 A_FireCustomMissile("GunsmokeSpawner_Small",0,0,26,8)
      1GHR B 1 A_ZoomFactor(0.95)
      1GHR A 0 A_SetPitch(pitch-0.75)
      1GHR A 0 A_SetAngle(angle-0.75)
	  LGHF AA 0 A_FireCustomMissile("GunsmokeSpawner_Small",0,0,30,12)
	  1GHR C 1 A_ZoomFactor(0.94)
      1GHR A 0 A_SetPitch(pitch-0.7)
      1GHR A 0 A_SetAngle(angle-0.7)
	  1GHR D 1 A_ZoomFactor(0.93)
      1GHR A 0 A_SetPitch(pitch-0.65)
      1GHR A 0 A_SetAngle(angle-1.65)
	  1GHR E 1 A_ZoomFactor(0.935)
      1GHR A 0 A_SetPitch(pitch-0.5)
      1GHR A 0 A_SetAngle(angle-0.5)
	  1GHR F 1 A_ZoomFactor(0.94)
      1GHR A 0 A_SetPitch(pitch-0.35)
      1GHR A 0 A_SetAngle(angle-0.35)
      //1GHR A 0 A_PlaySound("Longhorn/Load",6,0.2)
	  1GHR G 1 A_ZoomFactor(0.945)
	  1GHR H 1 A_ZoomFactor(0.95)
      TNT1 A 0 A_SetPitch(pitch+0.15)
      TNT1 A 0 A_SetAngle(angle-0.15)
	  1GHR I 1 A_ZoomFactor(0.96)
      TNT1 A 0 A_SetPitch(pitch+0.25)
      TNT1 A 0 A_SetAngle(angle-0.25)
	  1GHR J 1 A_ZoomFactor(0.97)
      TNT1 A 0 A_SetPitch(pitch+0.35)
      TNT1 A 0 A_SetAngle(angle+0.35)
	  1GHR K 1 A_ZoomFactor(0.98)
      TNT1 A 0 A_SetPitch(pitch+0.45)
      TNT1 A 0 A_SetAngle(angle+0.45)
	  1GHR L 1 A_ZoomFactor(0.99)
      TNT1 A 0 A_SetPitch(pitch+0.65)
      TNT1 A 0 A_SetAngle(angle+0.65)
	  1GHR M 1 A_ZoomFactor(0.995)
      1GHR A 0 A_SetPitch(pitch+0.55)
      1GHR A 0 A_SetAngle(angle+0.55)
	  1GHR N 1 A_ZoomFactor(1)
      1GHR A 0 A_SetPitch(pitch+0.45)
      1GHR A 0 A_SetAngle(angle+0.45)
	  1GHR O 1
      TNT1 A 0 A_SetPitch(pitch+0.35)
      TNT1 A 0 A_SetAngle(angle+0.35)
	  1GHR P 1
      TNT1 A 0 A_SetPitch(pitch+0.25)
      TNT1 A 0 A_SetAngle(angle+0.25)
	  1GHR Q 1
      TNT1 A 0 A_SetPitch(pitch+0.15)
      TNT1 A 0 A_SetAngle(angle+0.15)
	  1GHR R 1
      TNT1 A 0 A_SetPitch(pitch+0.1)
      TNT1 A 0 A_SetAngle(angle+0.1)
	  1GHR S 1
      TNT1 A 0 A_SetPitch(pitch+0.05)
      TNT1 A 0 A_SetAngle(angle+0.05)
	  1GHR T 1
      TNT1 A 0 A_SetPitch(pitch+0.025)
      TNT1 A 0 A_SetAngle(angle+0.025)
	  1GHR U 1
	  1GHR V 1
	  1GHG A 1
	  Goto RIdle
	  
   //Left
   
   Nullify:
	  TNT1 A 0
	  Stop
   Flash:
	  TNT1 A 0 A_Light0
   LIdle:
	  2GHG A 1 A_JumpIfInventory("SynthFireLeft",1,"LFire")
	  Loop
   LFire:
	  TNT1 A 0 A_JumpIf(CallACS("GunslingerMode"),2)
	  2GHG A 0 A_JumpIfInventory("PowerGunzerking",1,1) 
	  Goto Nullify
	  2GHG A 1 A_JumpIfInventory("BlueMana",2,1)
	  Goto LIdle
      2GHF A 0 A_PlaySound("Longhorn/Fire",1,0.4)
      2GHF A 0 A_PlaySound("Longhorn/Alt",5,0.4)
      2GHF A 0 A_PlaySound("Longhorn/Add",6,0.4)
      2GHF A 0 A_SetBlend("Yellow",0.1,7)
      2GHF A 0 A_Recoil(5)
      2GHF A 0 A_AlertMonsters
      2GHF A 0 A_Quake (5, 8, 0, 3, none)
	  2GHF A 0 A_TakeInventory("BlueMana",2,TIF_NOTAKEINFINITE)
	  2GHF AAAA 0 A_FireBullets(0.25,0.5,-1,9*random(1,3),"InvisPuff",FBF_NORANDOM)
      2GHF A 0 A_FireBullets(0.25,0.5,-1,9*random(1,3),"HuegPuff",FBF_NORANDOM) //FBF_USEAMMO|
      2GHF A 0 A_SetPitch(pitch-0.75)
      2GHF A 0 A_SetAngle(angle+0.75)
	  LGHF AA 0 A_FireCustomMissile("GunsmokeSpawner_Small",0,0,-18,0)
      2GHF A 1 Bright A_ZoomFactor(0.99)
      2GHR A 0 A_SetPitch(pitch-1.0)
      2GHR A 0 A_SetAngle(angle+0.85)
	  LGHF AA 0 A_FireCustomMissile("GunsmokeSpawner_Small",0,0,-22,4)
      2GHR A 1 A_ZoomFactor(0.97)
      2GHR A 0 A_SetPitch(pitch-0.8)
      2GHR A 0 A_SetAngle(angle+0.8)
	  LGHF AA 0 A_FireCustomMissile("GunsmokeSpawner_Small",0,0,-26,8)
      2GHR B 1 A_ZoomFactor(0.95)
      2GHR A 0 A_SetPitch(pitch-0.75)
      2GHR A 0 A_SetAngle(angle+0.75)
	  LGHF AA 0 A_FireCustomMissile("GunsmokeSpawner_Small",0,0,-30,12)
	  2GHR C 1 A_ZoomFactor(0.94)
      2GHR A 0 A_SetPitch(pitch-0.7)
      2GHR A 0 A_SetAngle(angle+0.7)
	  2GHR D 1 A_ZoomFactor(0.93)
      2GHR A 0 A_SetPitch(pitch-0.65)
      2GHR A 0 A_SetAngle(angle+1.65)
	  2GHR E 1 A_ZoomFactor(0.935)
      2GHR A 0 A_SetPitch(pitch-0.5)
      2GHR A 0 A_SetAngle(angle+0.5)
	  2GHR F 1 A_ZoomFactor(0.94)
      2GHR A 0 A_SetPitch(pitch-0.35)
      2GHR A 0 A_SetAngle(angle+0.35)
      //2GHR A 0 A_PlaySound("Longhorn/Load",6,0.2)
	  2GHR G 1 A_ZoomFactor(0.945)
	  2GHR H 1 A_ZoomFactor(0.95)
      TNT1 A 0 A_SetPitch(pitch+0.15)
      TNT1 A 0 A_SetAngle(angle+0.15)
	  2GHR I 1 A_ZoomFactor(0.96)
      TNT1 A 0 A_SetPitch(pitch+0.25)
      TNT1 A 0 A_SetAngle(angle+0.25)
	  2GHR J 1 A_ZoomFactor(0.97)
      TNT1 A 0 A_SetPitch(pitch+0.35)
      TNT1 A 0 A_SetAngle(angle-0.35)
	  2GHR K 1 A_ZoomFactor(0.98)
      TNT1 A 0 A_SetPitch(pitch+0.45)
      TNT1 A 0 A_SetAngle(angle-0.45)
	  2GHR L 1 A_ZoomFactor(0.99)
      TNT1 A 0 A_SetPitch(pitch+0.65)
      TNT1 A 0 A_SetAngle(angle-0.65)
	  2GHR M 1 A_ZoomFactor(0.995)
      2GHR A 0 A_SetPitch(pitch+0.55)
      2GHR A 0 A_SetAngle(angle-0.55)
	  2GHR N 1 A_ZoomFactor(1)
      2GHR A 0 A_SetPitch(pitch+0.45)
      2GHR A 0 A_SetAngle(angle-0.45)
	  2GHR O 1
      TNT1 A 0 A_SetPitch(pitch+0.35)
      TNT1 A 0 A_SetAngle(angle-0.35)
	  2GHR P 1
      TNT1 A 0 A_SetPitch(pitch+0.25)
      TNT1 A 0 A_SetAngle(angle-0.25)
	  2GHR Q 1
      TNT1 A 0 A_SetPitch(pitch+0.15)
      TNT1 A 0 A_SetAngle(angle-0.15)
	  2GHR R 1
      TNT1 A 0 A_SetPitch(pitch+0.1)
      TNT1 A 0 A_SetAngle(angle-0.1)
	  2GHR S 1
      TNT1 A 0 A_SetPitch(pitch+0.05)
      TNT1 A 0 A_SetAngle(angle-0.05)
	  2GHR T 1
      TNT1 A 0 A_SetPitch(pitch+0.025)
      TNT1 A 0 A_SetAngle(angle-0.025)
	  2GHR U 1
	  2GHR V 1
	  2GHG A 1
	  Goto LIdle
	}
}
