[Striat]

For your initial script, you'll need to change the $item== to $item1 == for all of the messed up lines.

If you wish to use chech_handin and return_item plugins, you can download them from http://eqemuquests.cvs.sourceforge.n...uests/plugins/

You'll put the plugins in your eqemu/plugins folder.

I recently needed help for something like this for several of my quests. With help from the almighty bleh for cleaning up my script and replacing my counters, we came up with this, which is a little easier to work with:

sub EVENT_SAY
{
if ($text =~/hail/i)
{
quest::say("I can make ye a weapon that is bound to be the bane of these orcs! Just hand me a certain [bronze weapon] and three [rotting orc teeth]. When ya give these to me make sure you give me the weapon first and the three teeth in a seperate stack.");
}
elsif ($text =~/bronze weapon/i)
{
quest::say("The bronze weapons I know how to alter are: Mace, Spear, Long Sword, Axe, and Dagger.");
}
elsif ($text =~/rotting orc teeth/i)
{
quest::say("Aye, you find those in the orcs mouth!");
}
}

my %wepchoice = ( #Hash of Hashes. rewarditem is the reward given. rewardmessage is the message given for each item turn in.
6019 => { rewarditem => 1118, rewardmessage => 'Here is your Mace of Orc Bane!' },
7014 => { rewarditem => 1119, rewardmessage => 'Here is your Spear of Orc Bane!' },
5027 => { rewarditem => 1261, rewardmessage => 'Here is your Long Sword of Orc Bane!' },
5032 => { rewarditem => 1264, rewardmessage => 'Here is your Axe of Orc Bane!' },
7012 => { rewarditem => 1265, rewardmessage => 'Here is your Dagger of Orc Bane' }
);

sub EVENT_ITEM {
my %itemcount_copy = %itemcount;
my $gaveitem = 0;

my %wepchoice = ( #Hash of Hashes. rewarditem is the reward given. rewardmessage is the message given for each item turn in.
6019 => { rewarditem => 1118, rewardmessage => 'Here is your Mace of Orc Bane!' },
7014 => { rewarditem => 1119, rewardmessage => 'Here is your Spear of Orc Bane!' },
5027 => { rewarditem => 1261, rewardmessage => 'Here is your Long Sword of Orc Bane!' },
5032 => { rewarditem => 1264, rewardmessage => 'Here is your Axe of Orc Bane!' },
7012 => { rewarditem => 1265, rewardmessage => 'Here is your Dagger of Orc Bane' }
);

if (plugin::check_handin(\%itemcount, 27536 => 3)) { #First check to see if the fangs are turned in
for my $wepchoice ( sort keys %wepchoice) { #Now lets check the 4th item
if (plugin::check_handin(\%itemcount, $wepchoice => 1)) {
quest::summonitem($wepchoice{$wepchoice}{rewardite m}); #Summons rewarditem
quest::say("$wepchoice{$wepchoice}{rewardmessage}" ); #Says corresponding rewardmessage.
$gaveitem = 1;
}
}
}

# did not hand player back quest reward; give them their items back
if ($gaveitem == 0) {
plugin::return_items(\%itemcount_copy);
quest::say("This ain't what I asked for and it ain't the way I wanted it! Take yer garbage elsewhere!");
}
}