LDoN Augment Upgrader

[Emmeric]

For whatever reason, the game likes to "favor" certain augments over others, despite the %s listed in the drop events.

I constructed a simple quest NPC from one of the useless NPCs in Everfrost. She takes 2 augments of the same type (primary stats only) and upgrades them into one of the higher level.

sub EVENT_SAY {
  if ($text=~/hail/i) {
quest::say("Hello, $name. I can provide an upgrade service for you. Bring me any two augments found on your adventures and I can fuse them into a more potent version. If you acquire four ancient gemstones of any one type, you might want to talk to Dizzl Nulzik in North Ro. He can provide infusion services to upgrade your Kobold Skull Charm.");
}

}


sub EVENT_ITEM { 
 if ($itemcount{41001} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41002);	
}
 elsif ($itemcount{41002} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41003);	
}
 elsif ($itemcount{41003} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41004);	
}
 elsif ($itemcount{41004} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41005);	
}
 elsif ($itemcount{41005} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41006);	
}
 elsif ($itemcount{41006} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41007);	
}

 elsif ($itemcount{41008} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41009);	
}
 elsif ($itemcount{41009} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41010);	
}
 elsif ($itemcount{41010} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41011);	
}
 elsif ($itemcount{41011} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41012);	
}
 elsif ($itemcount{41012} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41013);	
}
 elsif ($itemcount{41013} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41014);	
}

 elsif ($itemcount{41015} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41016);	
}
 elsif ($itemcount{41016} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41017);	
}
 elsif ($itemcount{41017} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41018);	
}
 elsif ($itemcount{41018} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41019);	
}
 elsif ($itemcount{41019} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41020);	
}
 elsif ($itemcount{41020} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41021);	
}

 elsif ($itemcount{41022} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41023);	
}
 elsif ($itemcount{41023} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41024);	
}
 elsif ($itemcount{41024} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41025);	
}
 elsif ($itemcount{41025} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41026);	
}
 elsif ($itemcount{41026} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41027);	
}
 elsif ($itemcount{41027} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41028);	
}

 elsif ($itemcount{41029} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41030);	
}
 elsif ($itemcount{41030} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41031);	
}
 elsif ($itemcount{41031} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41032);	
}
 elsif ($itemcount{41032} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41033);	
}
 elsif ($itemcount{41033} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41034);	
}
 elsif ($itemcount{41034} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41035);	
}

 elsif ($itemcount{41036} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41037);	
}
 elsif ($itemcount{41037} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41038);	
}
 elsif ($itemcount{41038} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41039);	
}
 elsif ($itemcount{41039} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41040);	
}
 elsif ($itemcount{41040} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41041);	
}
 elsif ($itemcount{41041} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41042);	
}

 elsif ($itemcount{41043} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41044);	
}
 elsif ($itemcount{41044} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41045);	
}
 elsif ($itemcount{41045} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41046);	
}
 elsif ($itemcount{41046} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41047);	
}
 elsif ($itemcount{41047} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41048);	
}
 elsif ($itemcount{41048} == 2){
	quest::say("A quick fuse... and here you go.");
    quest::summonitem(41049);	
}


else {
  plugin::return_items(\%itemcount);
      return 1;
 }
}

I named her Milana_Moonwhisper on my server. She was some non-human figure standing next to Teria Grinntli and the tent in the Everfrost LDoN camp. I made her a high elf female.

I have a follow-up quest using 4 ancients though it is difficult to get 4 of the same. Remove that part of the quest dialog for your server.