Code: Select all
ACTOR AmmoSuply : BackpackItem Replaces Backpack
{
Game Doom
Height 26
+COUNTITEM
+DONTGIB
+INVENTORY.ALWAYSPICKUP
inventory.pickupsound "BACKPK2"
Inventory.PickupMessage "$GOTBACKPACK"
States
{
Spawn:
CMPK ABCDEFG 1
Loop
Pickup:
TNT1 A 0 A_GiveInventory("ShellBox", 1)
TNT1 A 0 A_GiveInventory("ClipBox", 1)
TNT1 A 0 A_GiveInventory("CellPack", 1)
TNT1 A 0 A_GiveInventory("RocketBox", 1)
Stop
}
}
Inventory code as below.
ACTOR Doom2016ShotgunUpgradeSpawner : CustomInventory //Weapon Spawn
{
-COUNTITEM
-INVENTORY.ALWAYSPICKUP
Inventory.Amount 0
Inventory.MaxAmount 1
Inventory.PickupMessage ""
States
{
Spawn:
TNT1 A 0
TNT1 A 0 A_JumpIf(CallACS("GameplayPreset_IB")==1, "SpawnNothing")//Arsenal
TNT1 A 0 A_JumpIf(CallACS("GameplayPreset_IB")==2, "Spawn4Reel")//Doom 2016
TNT1 A 0 A_JumpIf((CallACS("GameplayPreset_IB")==3)||(CallACS("GameplayPreset_IB")==7), "SpawnNothing")//Conjoined (:P)
TNT1 A 0 A_JumpIf(CallACS("GameplayPreset_IB")==4, "Spawn4Reel")//JRMYXD Arsenal
TNT1 A 0 A_JumpIf(CallACS("GameplayPreset_IB")==5, "SpawnNothing")//JRMYXD Classic
TNT1 A 0 A_JumpIf(CallACS("GameplayPreset_IB")==6, "SpawnNothing")//JRMYXD Insanity
TNT1 A 0 A_JumpIf(CallACS("UpgradePresets_IB")==1, "SpawnNothing")//Default
TNT1 A 0 A_JumpIf(CallACS("UpgradePresets_IB")==2, "Spawn4Reel")//Doom 2016
TNT1 A 0 A_JumpIf(CallACS("UpgradePresets_IB")==3, "SpawnNothing")//Extra Arsenal
TNT1 A 0 A_JumpIf(CallACS("UpgradePresets_IB")==4, "Spawn4Reel")//JRMYXD Arsenal
TNT1 A 0 A_JumpIf(CallACS("UpgradePresets_IB")==5, "SpawnNothing")//JRMYXD Classic
TNT1 A 0 A_JumpIf(CallACS("UpgradePresets_IB")==6, "SpawnNothing")//JRMYXD Insanity
Spawn4Reel:
TNT1 A 0
TNT1 A 0 A_JumpIf(ACS_NamedExecuteWithResult("DisableUpgrade")==1,"SpawnNothing")
TNT1 A 0 A_JumpIf(ACS_NamedExecuteWithResult("NoDoom2016ShotgunUpgrade")==1,"SpawnNothing")
TNT1 A 0 A_JumpIF(ACS_NamedExecuteWithResult("IBArsenalUpgradeToggle")==1,"SpawnNothing")
TNT1 A 0 A_JumpIf(ACS_NamedExecuteWithResult("Doom2016UpgradeToggle")==1,"SpawnNothing")
TNT1 A 0 A_JumpIf(ACS_NamedExecuteWithResult("JRMYXDARsenalUpgradeToggle")==1,"SpawnNothing")
Goto Spawn2
SpawnNothing:
TNT1 A 0 A_SpawnItem("ShellBoxSpawnIBNew")
Goto Derp
Spawn2:
TNT1 A 0 A_SpawnItem("Doom2016GrenadeShotgun")
Goto Derp
Derp:
TNT1 A 0
//TNT1 A -1
Stop
}
}