Permanent Armor and Upgrades?

[NeoTerraNova]

Greetings and happy holiday season to everyone. Once more, I find myself in need of help, and I'm grateful to anyone that can assist me. Thank you in advance to anyone that stops by.


For various reasons, I'd like to mess around with the armor system. I have a feeling this isn't going to be simple, so I'm prepared to get this done in ZScript. If some simpler, down-scaled version is possible in DECORATE, I'd accept that. My problem is, I have no idea how to go about this, and I've searched the Forum already, and the Wiki, for answers.

My goal is this:
-Have a number of Armor Items in the game. These items would not have "Armor Points" to them in the conventional DOOM sense. Instead, they would be permanent upgrades that never go away. Of course, each would be different, etc.

-(Optional but desired) Have upgrades available. Each "Grade" of armor, from the starting armor to the best armor, would each have a specific number of possible upgrade slots. Each upgrade would add a bonus damage reduction to them (i.e. how conventional BasicArmorPickup can do). This should be stackable somehow. I'd like it if these upgrades were permanent and not removable from the armor they're attached to. These upgrades would be rare drops from certain enemies.

-Set up the spawner so that it never spawns an "inferior Grade" of armor to pick up, always a superior one. My intent is to more or less replace the BlueArmor spawners with at least a chance of finding one of these Permanent Armors, but only be able to find the "nextmost superior" armor (so the Player doesn't go from Grade 1 armor to Grade 5 because of a lucky spawn).

-Set up the Armor so that, if by some chance there IS an "inferior grade" of armor spawned somehow, the player can't pick it up by accident. Equal grade? I don't really care. Whatever's easier.

-I wouldn't care if the Armor could be conventionally discarded/respawned, or was simply destroyed when "superior Grade" armor is picked up.


My main problems are.. well, first, I can't seem to find a code snippet for Armor in ZScript on the Wiki to look at and try and learn from, as a starting point. Second, I have no idea how I'd pull off the Armor Upgrades. And, third, of course, I don't know how to lock out the spawner so it behaves how I want it to.


I realize this may be a very tall order to sort out, but I would be immensely thankful to anyone that can at least point me in the right direction. Thank you all for your time.

[Dan_The_Noob]

DamageFactor is the actor property you would probably use for this. or you could just have armor that is infinite and applies the damage reduction in the same way as normal doom armor.

[NeoTerraNova]

I'm sorry, I don't understand what you're saying. I don't know how to make armor "infinite" in the first place - setting its saveamount to negative one (-1) doesn't do anything, and beyond that, I have no idea how else to make this work. I know how to make custom armor through BasicArmorPickup and BasicArmorBonus, and I know what the DamageFactor flags are for - I mentioned this in my post, though somewhat obtusely. I'm sorry if I didn't make this clear. I have made "standard" armor in the past that does things beyond the scope of BlueArmor and GreenArmor, but they've all been standard Armor-type Actors, with a normal saveamount (Armor Points, if you will).

I understand the basic concept of armor in DECORATE and how to work it, but with what I'm trying to do, I think I need ZScript to pull off. Part of the problem I'm having is that there's no examples of either GreenArmor or BlueArmor in ZScript on the Wiki for me to look at and get some idea of where to start.

I appreciate the answer, Dan, but I'm afraid it didn't help my situation any. Thank you very much for taking the time to respond, though!

[Virathas]

It is all doable in ZScript, and actually not that hard.

First thing, is to think of it differently, do not think that you need to redesign the armor system. For this you need just inventory.

ripping and editing part of my code:

Code: Select all

class MMFlatSpiritualArmor : Inventory 
{
	Default
	{
		Inventory.Amount 1;
		Inventory.MaxAmount 1;
		Inventory.PickupMessage "You've picked up a Spritiual Armor";
	}

	States
	{
	Spawn:
		SPAR ABCDEFGHIJKJIHGFEDCB 2 Bright;
		Loop;
	}

	override void AbsorbDamage (int damage, Name damageType, out int newdamage)
	{
				if (damage <= 10)
				{
				newdamage = 0;
				}
				else
				{
				newdamage = damage - 10;
				}
	}
}

this simple item, once picked up, will cause all damage taken to be reduced by 10. If you want to have a percentage reduction you can simple add that to the equation, and if DamageFactors are required, there is a function [wiki]ApplyDamageFactors[/wiki]

For the spawner, it is significantly harder, but still doable. I don't have any piece of code for this, the best i can do is to send you to viewtopic.php?f=122&t=70725, but it is most definitely harder

Pickup control:

Simple really:

part of the item's code:

Code: Select all

	override bool TryPickup (in out Actor toucher)
	{
if (Toucher.CountInv("BetterArmor)
return false;
return Super.TryPickup(toucher);
        }

This simple code snippet will block pickup if the owner has that particular item. You could have a specific property in your armor that denotes grades, or you could simply have a list of items here.

Discarding armor might be actually more difficult here to do, But simply removing is not a problem:

You could actually create additional conditions in the "TryPickup" method, after "Super.TryPickup(toucher);" resolves:

Code: Select all

	override bool TryPickup (in out Actor toucher)
	{
if (Toucher.CountInv("BetterArmor)
return false;
bool WeGood = Super.TryPickup(toucher);
if (WeGood)
{
Toucher.TakeInventory("CrapArmor, 1)'
return true;
}
else
{
 return false
}
return true;
        }

BONUS UPGRADES:
Yup, fully doable. First, defne two new variables to the new item (Let's call it ArmorBase). "int slotsused" and "int maxslots".
Now we need a pickup item it can be extremely simple item, with no actual functionality, let us call it ArmorUpgrade.
Next we need to create a function in the ArmorBase:

Code: Select all

	override bool HandlePickup (Inventory item)
	{
		if (item.GetClass() == "ArmorUpgrade")
		{
                    if (slotsused < maxslots)
                    {
                     slotsused++;
                    return true;
                   }
		}
                item.bPickupGood = false;
		return false;
	}

(This part of the code is untested, but should at the very least help you start. HandlePickup is called by every single inventory item when attempting to pickup any item, this is how ammo intercepts the pickups, and adds it where it should)

Once we have all this, all that remains is to add the benefits of this armor. Using this in ArmorBase

Code: Select all

	override void AbsorbDamage (int damage, Name damageType, out int newdamage)
	{
				if (damage <= 5 + slotsused)
				{
				newdamage = 0;
				}
				else
				{
				newdamage = damage - (5 + slotsused);
				}
	}

And that should be it
If you have any questions, i am here to help.

[NeoTerraNova]

I'll give this a shot and see what I can come up with. Thank you, again!

EDIT:

For this you need just inventory.

Honestly, I never would have thought of this. Never. I was thinking I had to construct a new Armor thing from scratch, or base it on the existing Armor definitions. Thank you! This solves a lot of problems and kinda somewhat puts me on familiar ground (manipulating things using Inventory).

If you want to have a percentage reduction you can simple add that to the equation, and if DamageFactors are required, there is a function ApplyDamageFactors

..uh, I apologize, where do I add this, exactly? I've only found one code snippet that mentions this, and it's from: viewtopic.php?f=122&t=67423 and the code isn't something I can understand.

Would I create a new array under the ArmorBase, that specifically returns the mathematics of calculating damage against each damage source, since I would prefer to list each incoming damage type and its specific reductions, or would I just add a small line like seen in the code snippet in the first post to the link above? I apologize for asking, but I don't have an example to learn from.

For example, the Grade2Armor item I intend to code would reduce damage from physical hits by 5% (Imp Punches, Demon attacks), Bullet damage by 25% (Zombiemen), and Fire Damage by 12% (Imp Fireballs). Do I need a specific ApplyDamageFactors for each one, and how do I list them in the code?

For the spawner, it is significantly harder, but still doable.

I see that code, and.. I have to ask if there's just a simple method of putting CheckInventory into the spawner's code, and if it returns True, then spawn X item.

For example:
-Player Character starts the level wearing Grade 2 Armor.
-There's a matching Spawner on the level that can give Armor
-Spawner checks to see what Grade of Armor the Player is equipped with at the start of the level. It returns a result of "Grade2Armor."
-Spawner then generates a pickup from a list of possible matches (Grade3Armor, Grade2Armor, random ArmorUpgrade)

For various reasons, of course, multiple matching spawners in the same Level could be.. problematic to the Player, though I would consider this intentional, even on rare levels where there's more than one regular Doom Armor Spawner, I'd consider it logical and fitting for semi-real-world chance that the Player Character might have bad luck and not find superior armor at these spawn points, or find multiple of the same armor, etc. - things to chalk up to RNGsus and simple good or bad luck.

I will admit that while I comprehend the concept here, I don't know how to program the code for it.

EDIT 2:

Discarding armor might be actually more difficult here to do,

This part I figured out on my own. Since I'm running with a usable Inventory, I just made it accessible through that, and discardable normally. Once I realized I could make this a normal Inventory Item, this part made sense once I started messing with the code and such.


Thank you very much for your patience, and your continued help and support.

[Virathas]

For the damage factors reduction you can look into PowerProtection in GZDoom.pk3.

Generally, ApplyDamageFactor is a convienient function that uses the earlier defined "DamageFactor" to modify the resulting damage.

The line code that interests you the most is

Code: Select all

	override void ModifyDamage(int damage, Name damageType, out int newdamage, bool passive, Actor inflictor, Actor source, int flags)
	{
		if (passive && damage > 0)
		{
			newdamage = max(0, ApplyDamageFactors(GetClass(), damageType, damage, damage / 4));
			if (Owner != null && newdamage < damage) Owner.A_StartSound(ActiveSound, CHAN_AUTO, CHANF_DEFAULT, 1.0, ATTN_NONE);
		}
	}

Note that in the earlier example i used [wiki]AbsorbDamage[/wiki] instead of [wiki]ModifyDamage[/wiki]. The main reason is I wanted it to work before any protection powerups. Wiki has more info about both of them.

A simple item code to show it in work:

Code: Select all

class MMFlatSpiritualArmor : Inventory
{
   Default
   {
      Inventory.Amount 1;
      Inventory.MaxAmount 1;
      Inventory.PickupMessage "You've picked up a Spritiual Armor";
      damagefactor "Fire", 0.88;
      damagefactor "Normal", 0.95;
   }

   States
   {
   Spawn:
      SPAR ABCDEFGHIJKJIHGFEDCB 2 Bright;
      Loop;
   }

   override void AbsorbDamage (int damage, Name damageType, out int newdamage)
   {
	newdamage = max(0, ApplyDamageFactors(GetClass(), damageType, damage, damage / 4));
	if (Owner != null && newdamage < damage) Owner.A_PlaySound(ActiveSound, CHAN_AUTO, 1.0, false, ATTN_NONE);
   }
}

To be fair, i have not tried changing those factors "dynamically". You could however, just use your own "system" for this. For example define a new variable "FireReduction" and do something as simple as that.

Code: Select all

   override void AbsorbDamage (int damage, Name damageType, out int newdamage)
   {
        if (damageType == "Fire")
	newdamage = damage * FireReduction;
        else
        newdamage = damage;
   }

For the spawner? If you're willing to wait, i think i can repurpose my spawner system to allow "easy edit".

It would go exactly as your example, includingf the RNG "issues" that could happen.

[NeoTerraNova]

See, this is what I thought - I'd be using some set of arrays (if that's the proper term) within the Actor to quantify damage reduction per damage type that a specific Armor protects against. When I get a chance, I'll code this up and run it through, and report the results.

As for the spawner - take all the time you need. I hope to learn ZScript better by seeing these examples and working with them. I'm not in any rush.

Thank you again for your continued help.

[Virathas]

Got you the spawner, it is pretty robust so i put it in a spoiler.

It contains several actors that are just placeholders, to show what is needed for it to work
Afterwards there is "EditableSpawner" - which is "the spawner you actually want to spawn in the map (either via map, or replaces XXXX)
Then there is SuperSpawner, which is the actual meat, the spawner itself. Unless you have multiple playerclasses that you'd like them to have items filtered in terms of random spawners - you don't have to edit at all.

The main assumptions of the code:
- each armor grade inherits from a single class (ArmorBase in this code).
- Mutiplayer support - we don't check only the highest armor quality, we check both lowest and highest, and choosing based on that.
- There is no "safety" code for cases that player hass several armorgrades at the same time, i.e. gets level2 armor and then level1 -> this would break the spawner, making it think that the player has only level1 (It would check the "latest obtained)

I did test the code a little and all seems as "intended"

---

Code: Select all

class ArmorBase : Inventory
{
	int GradeLevel; // We will use this data as an easy way to handle armor levels for spawners. It could also be used as a variable for comparisons in pickup
	Property GradeLevel : GradeLevel;
}

class Lvl1Armor : ArmorBase
{
	Default
	{
		ArmorBase.GradeLevel 1;
	}
	States
	{
	Spawn:
		TBLU A -1;
		Stop;
	}
}
class Lvl2Armor : ArmorBase
{
	Default
	{
		ArmorBase.GradeLevel 2;
	}
	States
	{
	Spawn:
		TGRN A -1;
		Stop;
	}
}
class Lvl3Armor : ArmorBase
{
	Default
	{
		ArmorBase.GradeLevel 3;
	}
	States
	{
	Spawn:
		TRED A -1;
		Stop;
	}
}
class Lvl4Armor : ArmorBase
{
	Default
	{
		ArmorBase.GradeLevel 4;
	}
	States
	{
	Spawn:
		SMBT A -1;
		Stop;
	}
}
class ArmorUpgrade : Inventory
{
	States
	{
	Spawn:
		ARM1 A -1;
		Stop;
	}
}
class EditableSpawner : SuperSpawner
{
	Default
	{
		DropItem "Lvl1Armor", 255, 1;
		DropItem "Lvl2Armor", 255, 1;
		DropItem "Lvl3Armor", 255, 1;
		DropItem "Lvl4Armor", 255, 1;
		DropItem "ArmorUpgrade", 255, 1;
	}


	// This function is what you want to use to add custom condtions. This here adds mostly what you'd like to have, of course, with placeholder items.
	override Bool ItemCustomCondtions(DropItem di) // For Inherited spawners. By default only checks for possiblity to pickup
	{
		if (!CheckInheritance(di, "ArmorBase"))  // A simple test, if this is not one of the special armors to spawn, we will always consider it a good option
			return true;

		// I am not sure of your "multiplayer compatibility" - as such we will consider every single player's armor class - will get the "lowet" and "highest" 
		// grades, and we'll spawn armor of a quality from "lowest" to "highest"+1.
		int Low = 99; // Default values to comapre
		int High = 0; // Default values to comapre
		
		for (int i = 0; i < MAXPLAYERS; i++)
		{
			if (!playeringame[i])
			{
				continue;
			}
			ArmorBase ArmorCheck = ArmorBase(players[i].mo.FindInventory("ArmorBase",true));
			if (ArmorCheck)
			{
			if (ArmorCheck.GradeLevel < Low)
				Low = ArmorCheck.GradeLevel;
			if (ArmorCheck.GradeLevel > High)
				High = ArmorCheck.GradeLevel;
			}
		}	
		if (Low == 99) // No one has any armor
			Low = 0;
		// At this point we know what kind of armor player has, if any
		// So we can check the default value of "di" which is the current tested object in the spawner
	class<ArmorBase> pclass = di.Name;
		if (null == pclass) // Failsafe
		{
			return false;
		}
	readonly<ArmorBase> TestedItem = GetDefaultByType(pclass);
		if (TestedItem.GradeLevel >= Low && TestedItem.GradeLevel <= High +1)
			return true;
		return false;
	}
}


// Copy this below as is, but feel free to learn from it. If you need class restrictions, you should read the large commented blocks.
class SuperSpawner : RandomSpawner
{
	private class<actor> FallbackActor;
	private int IgnoreRestrictions;
	int ClassRestriction; // This is only used if a superspawner spawns another spawner that inherits from SuperSpawner.
/*
List of values; since it is ripped from my mod. They are kept as an example if you need playerclass requirements for any particular reason
#define PLAYERCLASS_FIGHTER 		1
#define PLAYERCLASS_CLERIC 			2
#define PLAYERCLASS_MAGE 			4
#define PLAYERCLASS_CORVUS 			8
#define PLAYERCLASS_REBEL 			16 
#define PLAYERCLASS_MARINE 			32
#define PLAYERCLASS_FOXIN 			64
#define PLAYERCLASS_NOVA 			128
#define PLAYERCLASS_RANGER 			256
#define PLAYERCLASS_ZASHA 			512
#define PLAYERCLASS_MONSTERMASTER 	1024
*/
	
	property FallBackActor: FallbackActor; // If defined, will spawn this actor if all options are "bad"
	property Ignorerestrictions: IgnoreRestrictions; // Use this only for item spawners, will ignore class restrictions. Not exactly sure i did implement it 100% :P
	property ClassRestriction: ClassRestriction;
	
private static bool IsUsefulToAnyPlayer(DropItem di)
{
	
	class<Inventory> pclass = di.Name;
		if (null == pclass)
		{
			return false;
		}
	readonly<Inventory> TestedItem = GetDefaultByType(pclass);
	
    for (int i = 0; i < MAXPLAYERS; i++)
    {
        if (!playeringame[i])
        {
            continue;
        }
       
        if (TestedItem.CanPickup(players[i].mo))
        {            
			return true;
        }
    }
   
    return false;
}

	virtual Bool IsOkClassForSuperSpawner(int ClassToCheck)
	{
		int ComparisonBit;
		for (int i = 0; i < MAXPLAYERS; i++)
		{
			if (!playeringame[i])
			{
				continue;
			}

/* Use this if you need class specific restrictions
			if (players[i].mo is "FighterReduced")
				ComparisonBit = 1;
			if (players[i].mo is "ClericReduced")
				ComparisonBit = 2;
			if (players[i].mo is "MageReduced")
				ComparisonBit = 4;
			if (players[i].mo is "CorvusModified")
				ComparisonBit = 8;
			if (players[i].mo is "NewStrifePlayer")
				ComparisonBit = 16;
			if (players[i].mo is "NewDoomer")
				ComparisonBit = 32;
			if (players[i].mo is "Foxin")
				ComparisonBit = 64;
			if (players[i].mo is "Ranger")
				ComparisonBit = 128;
			if (players[i].mo is "Nova")
				ComparisonBit = 256;
			if (players[i].mo is "Za'Sha")
				ComparisonBit = 512;
			if (players[i].mo is "MonsterMaster")
				ComparisonBit = 1024;
*/
			if (ClassToCheck & ComparisonBit)
			{
				return true;
			}
		}
			return false;
	}
	virtual Bool ItemCustomCondtions(DropItem di) // For Inherited spawners. By default only checks for possiblity to pickup
	{
		return IsUsefulToAnyPlayer(di);
	}
	static bool CheckInheritance(DropItem di, class<Object> cls)
	{
		// Kudos to Player701 for this function
		class<Object> type = di.Name;
		
		while (type != null)
		{
			if (type == cls)
				return true;
			type = type.GetParentClass();
			
		}
		return false;
	}

	static bool IsItem(DropItem di)
	{
		class<Inventory> pclass = di.Name;
		if (null == pclass)
		{
			return false;
		}

		if (GetDefaultByType(pclass).amount > 0)
		{
			return true;
		}
		else
		{
			return false;
		}
	}
	override void BeginPlay()
	{
		Actor.BeginPlay();
	}
	void RandomObject()
	{
		DropItem di;   // di will be our drop item list iterator
		DropItem drop; // while drop stays as the reference point.
		int n = 0;
		int itemn = 0;
		bool nomonsters = sv_nomonsters || level.nomonsters;

		int Debugging = 0;
/*		if (FallbackActor == null)
		{
			A_Log(TEXTCOLOR_YELLOW .. "No Fallback" .. Pos);			
		}
		else
		{
			A_Log(TEXTCOLOR_YELLOW .. di.Name .. " is a fallback" .. Pos);			
		}
*/		drop = di = GetDropItems();
		if (Self.GetClassName()== "INSERT_SPAWNER_NAME")
		{
			Debugging = 1;
		}
		int WasAnItem = 0;
		int NotOnlyItems = 0;
		int RemoveItemConditions = 0;
		if (IgnoreRestrictions)
		{
			RemoveItemConditions = 1;
		}
		if (di != null)
		{
			while (di != null)
			{
				if (di.Name != 'None')
				{
					if (IsItem(di))
					{
						WasAnItem = 1;
					}
					if ((!nomonsters || !IsMonster(di)) || IsItem(di))
					{
//						if (di is "SuperSpawner") 
						if (CheckInheritance(di, "SuperSpawner")) 
						{
							class<SuperSpawner> pclass = di.Name;
//							GetDefaultByType(pclass).ClassRestriction;
							if (IsOkClassForSuperSpawner(GetDefaultByType(pclass).ClassRestriction))
							{ // Is ok, we want this option
								int amt = di.Amount;
								if (amt < 0) amt = 1; // default value is -1, we need a positive value.
								n += amt; // this is how we can weight the list.
								itemn += amt; // this is how we can weight the list.
								If (Debugging)
									A_Log(TEXTCOLOR_Green .. Di.Name .. " " .. amt .. " - It is a superspawner specific to class. Useful");
							}
							else
							{
								int amt = di.Amount;
								if (amt < 0) amt = 1; // default value is -1, we need a positive value.
								itemn += amt; // this is how we can weight the list.
								If (Debugging)
									A_Log(TEXTCOLOR_Green .. Di.Name .. " " .. amt .. " - It is a superspawner specific to class. Useless");
							}
						}
						else if (IsItem(di) && ItemCustomCondtions(di))
						{
							int amt = di.Amount;
							if (amt < 0) amt = 1; // default value is -1, we need a positive value.
							n += amt; // this is how we can weight the list.
							itemn += amt;
							If (Debugging)
								A_Log(TEXTCOLOR_Green .. Di.Name .. " " .. amt .. " - Useful");
						}
						else if (IsItem(di) && !ItemCustomCondtions(di))
						{
							int amt = di.Amount;
							if (amt < 0) amt = 1; // default value is -1, we need a positive value.
							itemn += amt; // this is how we can weight the list.
							If (Debugging)
								A_Log(TEXTCOLOR_Green .. Di.Name .. " " .. amt .. " - Useless");
						}
						else if (!IsItem(di))
						{
							If (Debugging)
								A_Log(TEXTCOLOR_Blue .. Di.Name .. " Not an item");
							NotOnlyItems = 1;
							Actor SizeTester = null;
							Class<Actor> clx = di.Name;					
							if (clx != null && IsMonster(di))
							{

								SizeTester = Spawn(clx, Pos, NO_REPLACE);
//								readonly<Actor> SizeTester = GetDefaultByType(clx);

								If (SizeTester.TestMobjLocation ())
//								If (GetDefaultByType(clx).TestMobjLocation ())
								{
									int amt = di.Amount;
									if (amt < 0) amt = 1; // default value is -1, we need a positive value.
									n += amt; // this is how we can weight the list.						
									If (Debugging)
										A_Log(TEXTCOLOR_GREEN .. di.Name .. " fits " .. amt);
								}
								else
								{
									If (Debugging)
										A_Log(TEXTCOLOR_RED .. di.Name .. " is too fat at " .. Pos);
								}
								SizeTester.ClearCounters();
								SizeTester.Destroy();
							}
							else if (clx != null && !IsMonster(di)) // General "others"
							{
									int amt = di.Amount;
									if (amt < 0) amt = 1; // default value is -1, we need a positive value.
									n += amt; // this is how we can weight the list.
									If (Debugging)
										A_Log(TEXTCOLOR_Yellow .. n .. " Something Other " .. Di.Name .. " " .. di.Amount);						
							}
						}
						else
						{
							If (Debugging)
								A_Log(TEXTCOLOR_Yellow .. Di.Name .. " " .. di.Amount);						
						}
						
					}
					else
					{
						if (di != null && Debugging)
							A_Log(TEXTCOLOR_Yellow .. Di.Name);
					}
				}
				di = di.Next;
			}
			If (Debugging)
				A_Log(TEXTCOLOR_RED .. n);
//			return;
			if (IgnoreRestrictions)
			{
				n = itemn;
			}
			if (n == 0 && WasAnItem == 0 && FallbackActor == null)
			{ // Nothing left to spawn. They must have all been monsters, and monsters are disabled.
				Destroy();
				return;
			}
			if (n == 0 && NotOnlyItems == 0 && FallbackActor == null)
			{
//				A_Log(TEXTCOLOR_Yellow .. n .. " Anything is good at " .. Pos);
				RemoveItemConditions = 1; // There are no eligble items, let's spawn anything
				n = itemn;
			}
			if (n == 0 && FallbackActor != null)
			{
//				A_Log(TEXTCOLOR_Yellow .. " Nothing is good, but we have a fallback! " .. Pos);
				if (!((!nomonsters || !(GetDefaultByType(FallbackActor).bIsMonster))))
				{
					Destroy(); // Fallback is a monster and they are disabled
					return;
				}
			}
			// Then we reset the iterator to the start position...
			di = drop;
			// Take a random number...
			int oldn = n;
			n = random[randomspawn](0, n-1);
			// And iterate in the array up to the random number chosen.
			while (n > -1 && di != null)
			{	
							If (Debugging)
								A_Log(TEXTCOLOR_White .. n);
				
				if (di.Name != 'None' && ((!nomonsters || !IsMonster(di)) || IsItem(di)))
				{
					if (CheckInheritance(di, "SuperSpawner")) 
					{
						class<SuperSpawner> pclass = di.Name;
						if (IsOkClassForSuperSpawner(GetDefaultByType(pclass).ClassRestriction))
						{ // Is ok, we want this option
							If (Debugging)
								A_Log(TEXTCOLOR_Green .. di.Name .." - It is a superspawner specific to class. Useful, maybe choose?");
							int amt = di.Amount;
							if (amt < 0) amt = 1;
								n -= amt;
							if ((di.Next != null) && (n > -1))
							{
								di = di.Next;
							}
							else
							{
							If (Debugging)
								A_Log(TEXTCOLOR_Yellow .. di.Name .." is chosen!");
								n = -1;
							}
						}
						else
						{
						If (Debugging)
							A_Log(TEXTCOLOR_Red .. di.Name .." It is a superspawner specific to class. Useless, skipped");
							di = di.Next;
						}
					}
					else if (IsItem(di) && (ItemCustomCondtions(di) || RemoveItemConditions))
					{
							If (Debugging)
								A_Log(TEXTCOLOR_Green .. di.Name .." is useful");
							int amt = di.Amount;
							if (amt < 0) amt = 1;
								n -= amt;
							if ((di.Next != null) && (n > -1))
							{
								di = di.Next;
							}
							else
							{
							If (Debugging)
								A_Log(TEXTCOLOR_Yellow .. di.Name .." is chosen");
								n = -1;
							}
					}
					else if (IsItem(di) && !ItemCustomCondtions(di) && RemoveItemconditions == 0)
					{
							If (Debugging)
								A_Log(TEXTCOLOR_Red .. di.Name .." is useless, skipped");
						di = di.Next;
					}
					else if (!IsItem(di) )
					{
							If (Debugging)
								A_Log(TEXTCOLOR_Green .. di.Name .." i am not an item!");
							Actor SizeTester = null;
							Class<Actor> clx = di.Name;					
							if (clx != null && IsMonster(di))
							{
								SizeTester = Spawn(clx, Pos, NO_REPLACE);
								If (SizeTester.TestMobjLocation ())
//								If (GetDefaultByType(clx).TestMobjLocation ())
								{
									int amt = di.Amount;
									if (amt < 0) amt = 1;
										n -= amt;
									if ((di.Next != null) && (n > -1))
									{
										di = di.Next;
									}
									else
									{
										n = -1;
									}
								}
								else
								{
									If (Debugging)
										A_Log(TEXTCOLOR_RED .. di.Name .. " is too fat, skipping, at " .. Pos);
									di = di.Next;
								}
								SizeTester.ClearCounters();
								SizeTester.Destroy();
							}
							else if (clx != null && !IsMonster(di)) // General "others"
							{
									int amt = di.Amount;
									if (amt < 0) amt = 1; // default value is -1, we need a positive value.
									n -= amt; // this is how we can weight the list.													
									If (Debugging)
										A_Log(TEXTCOLOR_Green .. di.Name .." I am other");
									if ((di.Next != null) && (n > -1))
									{
										di = di.Next;
									}
									else
									{
									If (Debugging)
										A_Log(TEXTCOLOR_Yellow .. di.Name .." I am other chosen!!!");
										n = -1;
									}
							}
					}
					else
					{
							If (Debugging)
								A_Log(TEXTCOLOR_Blue .. di.Name .." why am i here?!");
					}
				}
				else
				{
					di = di.Next;
				}
			}
			if (oldn == 0)
			{
				while (di != null)
				{
					di= di.next;
				}
			}
			if (di != null)
			{
				If (Debugging)
				A_Log(TEXTCOLOR_Gold .. n .. di.Name .. " is spawned " .. Pos .. " " .. di.Probability);
			}
			// So now we can spawn the dropped item.
			if (di == null && FallbackActor != null)
				{
					//di.Name = FallBackActor.ClassName;
//					A_Log(TEXTCOLOR_RED .. " Falling Back at " .. Pos);
//					A_Log(TEXTCOLOR_RED .. FallbackActor.GetClassName());
					Species = FallbackActor.GetClassName();
				}
			else if ((di == null || bouncecount >= MAX_RANDOMSPAWNERS_RECURSION) && FallbackActor == null)	// Prevents infinite recursions
			{
				Spawn("Unknown", Pos, NO_REPLACE);		// Show that there's a problem.
				Destroy();
				return;
			}
			else if (random[randomspawn]() <= di.Probability)	// prob 255 = always spawn, prob 0 = almost never spawn.
			{
				// Handle replacement here so as to get the proper speed and flags for missiles
				Class<Actor> cls = di.Name;
				if (cls != null)
				{
//					A_Log(TEXTCOLOR_YELLOW .. "cls is fine ");
					Class<Actor> rep = GetReplacement(cls);
//					A_Log(TEXTCOLOR_YELLOW .. "cls set from " .. Name(cls) .. " to " .. Name(rep));

					if (rep != null)
					{
						cls = rep;
					}
					
				}
				if (cls != null)
				{
					Species = Name(cls);
					readonly<Actor> defmobj = GetDefaultByType(cls);
					Speed = defmobj.Speed;
					bMissile |= defmobj.bMissile;
					bSeekerMissile |= defmobj.bSeekerMissile;
					bSpectral |= defmobj.bSpectral;
//					A_Log(TEXTCOLOR_YELLOW .. "Set Species as ".. Species);
				}
				else
				{
					A_Log(TEXTCOLOR_RED .. "Unknown item class ".. di.Name .." to drop from a random spawner\n");
					Species = 'None';
				}
			}
//		A_Log(TEXTCOLOR_Black .. "-------------");

		}
	}
	override void PostBeginPlay()
	{
		RandomObject();
		Super.PostBeginPlay();
	}
}

If you still have questions, or would like some adjustments, feel free to ask

[NeoTerraNova]

This is amazing. Thank you so much. I'm still testing the last hunk of code you gave me, and trying to integrate it. I will keep you updated. If it takes too long for me to get this done because of IRL issues, I'll just PM you if I have troubles, rather than necro-bump this post.

Again, thank you so very much!