I attached this script to npc id 9001 (deathfist pawn), spawned a bunch of them, and found a variety of loot on them they would not normally have with a wide variety of IDs.
I changed it to +1001 since that is the first valid item ID.
Code:
sub EVENT_SPAWN
{
my $DropChance = int(rand(99)) + 1;
if($DropChance < 99)
{
my $Select_Itemid = int(rand(100000))+1001;
quest::addloot($Select_Itemid);
}
}
If you only want valid items you might try looping the selection until you get one. This will tell you how to figure out if the item is valid or not:
http://eqemulator.org/forums/showthread.php?t=34188