Zandronum

Code: Select all

actor G36K : weapon 20003
{
   Weapon.AmmoUse 1
   Weapon.AmmoGive 60
   Weapon.AmmoType "7,62"
   Inventory.PickupMessage "Hi-tech weaponry"
   Obituary "%o met death by %k G36K."
   States
   {
   Ready:
     TKGN A 1 A_WeaponReady
     Loop
   Deselect:
     TKGN A 1 A_Lower
     Loop
   Select:
     TKGN A 1 A_Raise
     Loop
   Fire:
     TKGN A 0 Bright
	 TKGN A 0 A_PlaySound("weapons/minigun")
     TKGN B 1 A_FireBullets(2,2,1,20)
	 TKGN C 3
     TKGN A 3
	 TKGN A 0 A_ReFire
     Goto Ready
   Spawn:
     TKGN X -1
     Stop
	 AltFire: //BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB
    G36K S 2 A_WeaponReady(WRF_NoBob)
    G36K S 0 A_JumpIfInventory("M4Zoom", 2, "ZoomOut")
    TNT1 A 0 A_JumpIfInventory("M4Zoom", 1, "Zoom2")
  Zoom2:
    G36K S 0 A_ZoomFactor(4.0)
    TNT1 A 0 A_GiveInventory ("M4Zoom", 1)
    Goto "ReadyScope"
  ZoomOut:
    G36K S 0 A_ZoomFactor(1.0)
    TNT1 A 0 A_TakeInventory ("M4Zoom", 2)
    Goto "Ready"
  AltFireDone:
    G36K S 1 A_ReFire
    Goto "Ready" 
	ReadyScope:
      G36K S 1 A_WeaponReady(WRF_NoBob)
      LOOP
   }
}