That looks awesome Kayen, so simple I can't believe I overlooked it. I fixed the typo in sub EVENT_SPAWN and changed a few bits, saved it as default.pl in tutorialb. I zone in, #repop zone just for OCD's sake, and pulled a train of 30-ish mobs. I'm not noticing it taking effect.
Is it because it uses an if, but doesn't include elseif afterwards? 123309 is near the end of the items table, so I should be seeing quite a variety of items dropping, even if they're useless placeholders or whatnot.
Also tried changing quest::addloot($Select_Itemid); to
quest::addloot($Select_Itemid, charges = 0, equipitem = true)
And all I'm seeing in zone.exe is warning that missing "'s around charges and equipitem might break later revisions.
Code:
sub EVENT_SPAWN
{
my $DropChance = int(rand(99)) + 1;
if ($DropChance < 99)
{
my $Select_Itemid = int(rand(123309))+1;
quest::addloot($Select_Itemid);
}
}
I set the $DropChance < 99 just to ensure I wouldn't be on the losing side of the RNG during testing.
Threaded Mode
