OK after deciding I was trying to be too complex with this quest for my small knowledge of perl I completely rewrote it. This is about the ugliest way I could possibly have written it probably, but it is also very simple. This is what I have now. Can someone tell me why she hands me every epic instead of just one? I used an SK to test btw.
Code:
sub EVENT_SAY {
if($text=~/Hail/i) {
quest::say("Hail, $class. I am Luana, The God of Life. I am in this world to see to it that those that have proven themselves worthy will be rewarded. If you have proof that Hanvar is dead, hand it to me."); }
}
sub EVENT_ITEM {
if (plugin::check_handin(\%itemcount, 29294 => 1)) {
if ( $class == "Cleric" ) {
quest::summonitem(5532);
}
if ( $class == "Warrior" ) {
quest::summonitem(66177);
quest::summonitem(66176);
quest::summonitem(10908);
}
if ( $class == "Paladin" ) {
quest::summonitem(10099);
}
if ( $class == "Shadow Knight" ) {
quest::summonitem(14383);
}
if ( $class == "Monk" ) {
quest::summonitem(10652);
}
if ( $class == "Beastlord" ) {
quest::summonitem(29442);
}
if ( $class == "Rogue" ) {
quest::summonitem(11057);
}
if ( $class == "Bard" ) {
quest::summonitem(20542);
}
if ( $class == "Ranger" ) {
quest::summonitem(20487);
quest::summonitem(20488);
}
if ( $class == "Druid" ) {
quest::summonitem(20490);
}
if ( $class == "Shaman" ) {
quest::summonitem(10651);
}
if ( $class == "Necromancer" ) {
quest::summonitem(20544);
}
if ( $class == "Wizard" ) {
quest::summonitem(14341);
}
if ( $class == "Magician" ) {
quest::summonitem(28034);
}
if ( $class == "Enchanter" ) {
quest::summonitem(10650);
}
$client->Message(6, "Luana raises her hands and says a prayer quietly. You feel your whole body begin to tingle as she brings her hands down to your shoulders." );
quest::level(51);
quest::ding();
quest::shout2("Today $name has proved his worth to the gods of this world. He has now joined our ranks as a god himself and is a force to be reckoned with!");
}
else {
plugin::return_items(\%itemcount);
quest::say("I can't use this");
}
}