View Single Post
  #1  
Old 08-08-2017, 08:30 PM
javewow's Avatar
javewow
Sarnak
 
Join Date: Aug 2012
Location: work
Posts: 74
Default add Valdeholm NPC loots

NO 1----- open http://everquest.allakhazam.com/db/npc.html?id=22410

NO 2------- find a butcher

NO3 ----- copy Known Loot: all to *.txt

icon Amber
icon Black Sapphire
icon Bloodstone
icon Blue Diamond
icon Curzon
icon Diamond
icon Elaborate Defiant Claymore
icon Elaborate Defiant Leather Gloves
icon Elaborate Defiant Plate Gauntlets
icon Elaborate Defiant Plate Helm
icon Elaborate Defiant Silk Sandals
icon Elaborate Defiant Silk Wristband
icon Elegant Adept's Shard
icon Elegant Defiant Forked Spear
icon Elegant Defiant Leather Gloves
icon Elegant Defiant Silk Sleeves ........


Replace icon

NO4 -----to EXCEL tools

SELECT * FROM `items` WHERE `Name` = ' Amber
OR `Name` = ' Black Sapphire
OR `Name` = ' Bloodstone
OR `Name` = ' Blue Diamond
OR `Name` = ' Curzon
.......................
LIMIT 0, 1000


COPY to HeidiSQL tools Check out ALL items's Number

NO5-----Made with Excel watches


Quote:
sub EVENT_SPAWN {
my $randa = quest::ChooseRandom(10022,10036,10019,22503,35085, 10037,50613,50198,50182,50184);
my $randb = quest::ChooseRandom(50208,50205,50459,50627,50232, 50244,10029,12899);
my $randc = quest::ChooseRandom(46642,97328,97327,97329,97003, 46641,10023,35084);
my $randd = quest::ChooseRandom(10015,10028,97001,37859,58067, 37858,58068,45891);
my $rande = quest::ChooseRandom(97380,97379,80399,46643,97002, 35088,34234,34221);
my $randw = quest::ChooseRandom(97286,37847,37844,37846,37845, 37851,37848,37850,37849,37852,35087);
my $rewardr = quest::ChooseRandom(1,2,3,4,5,6,7,8,9,11,12,13,14, 15,16,17,18,19,20);

if($NPCRace!=54)
{

if($rewardr < 4)
{
quest::addloot($randa,1);
quest::addloot($randb,1); }

if($rewardr < 7 && $rewardr > 3) {
quest::addloot($randc,1);}
if($rewardr < 10 && $rewardr > 6) {
quest::addloot($randd,1);}
if($rewardr < 13 && $rewardr > 9) {
quest::addloot($rande,1);}
if($rewardr < 16 && $rewardr > 12) {
quest::addloot($rande,1); }

if($rewardr > 17)
{
quest::addloot($randw,1);
quest::addloot($randd,1);

}
}
}


copy save a_butcher .pl to C:\EQEmuServer\quests\Valdeholm\
__________________
To create the most beautiful server for "!!~[BP] PLARYBOT EQ~!" Welcome to our server
Reply With Quote