Go Back   EQEmulator Home > EQEmulator Forums > Quests > Quests::Q&A

Quests::Q&A This is the quest support section

Reply
 
Thread Tools Display Modes
  #16  
Old 04-24-2006, 01:11 PM
paaco
Discordant
 
Join Date: Jan 2005
Posts: 320
Default

Quote:
#this command isn't working. maybe quest::return_items returns a false value when it gives soemthing back.
quest::say("These are not the pieces I need.");
}
}
That command does work, just doesn't for some reason in this specific quest, here is another quest I have that works perfect.

Code:
sub EVENT_SAY {     
  if($text=~/Hail/i){
    quest::say("Hail $class , How are ye today? If it's armor your wanting I'm your man. I have all the materials except a mold. If you can bring me a Mold I'll make you the best armor I've got. If it is a weapon you seek then you should speak to my brother.");
  }
  }
sub EVENT_ITEM { 
  if(plugin::check_handin(\%itemcount, 16346 =>1)) { # tunic 
    quest::summonitem(4154); 
    quest::exp(500); 
    quest::emote("Bort smiles warmly as he hands you your reward.");
    quest::say("Enjoy Your new Breastplate");
    quest::ding();
  } 
  elsif(plugin::check_handin(\%itemcount, 16343 =>1)) { # sleeves 
    quest::summonitem(4155); 
    quest::exp(500);  
    quest::emote("Bort smiles warmly as he hands you your reward.");
    quest::say("Enjoy Your new Vambraces");
    quest::ding();     
  } 
  elsif(plugin::check_handin(\%itemcount, 16344 =>1)) { # leggings 
    quest::summonitem(4158); 
    quest::exp(500);  
    quest::emote("Bort smiles warmly as he hands you your reward.");
    quest::say("Enjoy Your new Leggings");
    quest::ding(); 
  } 
  elsif(plugin::check_handin(\%itemcount, 16345 =>1)) { # gauntlets 
    quest::summonitem(4157); 
    quest::exp(500);  
    quest::emote("Bort smiles warmly as he hands you your reward.");
    quest::say("Enjoy Your new Gauntlets");
    quest::ding();  
  } 
  elsif(plugin::check_handin(\%itemcount, 16299 =>1)) { # cap   
    quest::summonitem(4153); 
    quest::exp(500);  
    quest::emote("Bort smiles warmly as he hands you your reward.");
    quest::say("Enjoy Your new Cap");
    quest::ding(); 
  } 
  elsif(plugin::check_handin(\%itemcount, 16297 =>1)) { # bracers 
    quest::summonitem(4156); 
    quest::exp(500);  
    quest::emote("Bort smiles warmly as he hands you your reward.");
    quest::say("Enjoy Your new Bracer");
    quest::ding(); 
  } 
  elsif(plugin::check_handin(\%itemcount, 16298 =>1)) { # boots 
       quest::summonitem(4159); 
       quest::exp(500);  
       quest::emote("Bort smiles warmly as he hands you your reward.");
       quest::say("Enjoy Your new Boots");
       quest::ding();
      } 
    else { 
       plugin::return_items(\%itemcount); 
       quest::say("I can't do anything with this item! You can have it back."); 
    } 
  }
I do appreciate you taking the time to help with this quest though, honestly it was starting to drive me nuts.
Reply With Quote
  #17  
Old 04-24-2006, 01:16 PM
jimbabwe
Hill Giant
 
Join Date: Aug 2005
Posts: 107
Default

I don't know how to test a NOT TRUE case in perl. If you can figure that out, then you can get that quest::say to work.
Reply With Quote
  #18  
Old 04-24-2006, 01:42 PM
paaco
Discordant
 
Join Date: Jan 2005
Posts: 320
Default

Next time you log on my server Jim try handing the armor quest NPC a random item, the quest::say and everything works with him. I'm honestly not sure what the issue is hehe. I'll admit I'm pretty noob with most of this. I've never messed with C++ or perl any. I do manage some sql databases and websites that are pretty php intensive which helps a lot. But I'm no guru for sure. This stuff still confuses me
Reply With Quote
  #19  
Old 04-24-2006, 01:51 PM
jimbabwe
Hill Giant
 
Join Date: Aug 2005
Posts: 107
Default

Yeah, i'm not sure. unless i put the return_item in an if statement, the turn in wouldn't even work. I'm not sure why, perl seems strange with it's logic if you ask me.
Reply With Quote
  #20  
Old 04-24-2006, 01:58 PM
jimbabwe
Hill Giant
 
Join Date: Aug 2005
Posts: 107
Default

you may try taking the version that you said you got working earlier, and adding single quotations around the number in quest::summon_item('3453'); <---Like that. Maybe that'll work.
Reply With Quote
  #21  
Old 04-24-2006, 02:42 PM
paaco
Discordant
 
Join Date: Jan 2005
Posts: 320
Default

This kind of works, but I'm tired of looking at it today, going to go populate my next zone. In this code, the quest works, you get the ding, say, exp, and item, but he also says I cannot use this item, you can have it back and gives you the mold. So now you get the mold back+ the item your supposed to get *boggle* Thinking about this is hurting my head though. I'll sleep on it and tinker more tomorrow


Code:
sub EVENT_SAY {
    if ($text=~/hail/i) {
      quest::say("Hello $name , I am one of the finest weaponsmiths this land has ever seen. If you find me a mold I will craft you a weapon. However if it is armor you seek, my brother makes the best around.");}
    }
    
sub EVENT_ITEM {
  if ($class eq 'Warrior') {
    if (plugin::check_handin(\%itemcount, 6141 => 1)) {
      quest::summonitem(62189);
      quest::exp(750);
      quest::emote("smiles warmly as he hands you your weapon.");
      quest::ding(); 
    }
    }
  if ($class eq 'Paladin') {
    if (plugin::check_handin(\%itemcount, 6141 => 1)) {
      quest::summonitem(62189);
      quest::exp(750);
      quest::emote("smiles warmly as he hands you your weapon.");
      quest::ding(); 
    }
    }
  if ($class eq 'Shadow Knight') {
     if (plugin::check_handin(\%itemcount, 6141 => 1)) {
      quest::summonitem(62189);
      quest::exp(750);
      quest::emote("smiles warmly as he hands you your weapon.");
      quest::ding(); 
    }
    }
  if ($class eq 'Berserker') {
     if (plugin::check_handin(\%itemcount, 6141 => 1)) {
      quest::summonitem(62189);
      quest::exp(750);
      quest::emote("smiles warmly as he hands you your weapon.");
      quest::ding(); 
    }
    }
  if ($class eq 'Monk') {
     if (plugin::check_handin(\%itemcount, 6141 => 1)) {
      quest::summonitem(6611);
      quest::exp(750);
      quest::emote("smiles warmly as he hands you your weapon.");
      quest::ding(); 
    }
    }
  if ($class eq 'Beastlord') {
     if (plugin::check_handin(\%itemcount, 6141 => 1)) {
      quest::summonitem(6611);
      quest::exp(750);
      quest::emote("smiles warmly as he hands you your weapon.");
      quest::ding(); 
    }
    }
  if ($class eq 'Druid') {
     if (plugin::check_handin(\%itemcount, 6141 => 1)) {
      quest::summonitem(29422);
      quest::exp(750);
      quest::emote("smiles warmly as he hands you your weapon.");
      quest::ding(); 
    }
    }
  if ($class eq 'Necromancer') {
     if (plugin::check_handin(\%itemcount, 6141 => 1)) {
      quest::summonitem(29422);
      quest::exp(750);
      quest::emote("smiles warmly as he hands you your weapon.");
      quest::ding(); 
    }
    }    
  if ($class eq 'Wizard') {
     if (plugin::check_handin(\%itemcount, 6141 => 1)) {
      quest::summonitem(29422);
      quest::exp(750);
      quest::emote("smiles warmly as he hands you your weapon.");
      quest::ding(); 
    }
    }
  if ($class eq 'Magician') {
     if (plugin::check_handin(\%itemcount, 6141 => 1)) {
      quest::summonitem(29422);
      quest::exp(750);
      quest::emote("smiles warmly as he hands you your weapon.");
      quest::ding(); 
    }
    }
  if ($class eq 'Enchanter') {
     if (plugin::check_handin(\%itemcount, 6141 => 1)) {
      quest::summonitem(29422);
      quest::exp(750);
      quest::emote("smiles warmly as he hands you your weapon.");
      quest::ding(); 
    }
    }
  if ($class eq 'Shaman') {
     if (plugin::check_handin(\%itemcount, 6141 => 1)) {
      quest::summonitem(29422);
      quest::exp(750);
      quest::emote("smiles warmly as he hands you your weapon.");
      quest::ding(); 
    }
    }
  if ($class eq 'Cleric') {
     if (plugin::check_handin(\%itemcount, 6141 => 1)) {
      quest::summonitem(29442);
      quest::exp(750);
      quest::emote("smiles warmly as he hands you your weapon.");
      quest::ding(); 
    }
    }
      plugin::return_items(\%itemcount); 
      quest::say("These are not the pieces I need.");
    }
    }
Reply With Quote
  #22  
Old 04-24-2006, 07:24 PM
Muuss
Dragon
 
Join Date: May 2003
Posts: 539
Default

Your last quest is how you must write quests with checkhandin now. (except there my be an extra } at its end, check that if it does not work).
If you don't want the NPC to say that he returns items, you must test that there's still some items left in the %itemcount hashtable.


Code:
if (scalar(%itemcount)>0) { 
  quest::say("Take this back");
  plugin::return_items(\%itemcount);
}
Another way is to say nothing and just add return_items.


To test that a string isn't something, use 'ne' and != for an integer

Code:
if ($class ne "Paladin") { }
if ($level != 5) { }
These is the basic perl syntax, there's many tutorials on the web...
__________________
Muuss - [PEQGC] Dobl, the ogre that counts for 2 !
http://www.vilvert.fr/page.php?id=10

Last edited by Muuss; 04-25-2006 at 03:29 AM..
Reply With Quote
  #23  
Old 04-25-2006, 04:49 PM
paaco
Discordant
 
Join Date: Jan 2005
Posts: 320
Default

Final Working version of quest. Works Perfectly ( Thank you Doodman for all the help )

Code:
sub EVENT_SAY
{
  if ($text =~ /hail/i)
    {
      quest::say("Hello $name , I am one of the finest weaponsmiths this land has ever seen. If you find me a mold I will craft you a weapon. However if it is armor you seek, my brother makes the best around.");
    }
}

sub EVENT_ITEM
{
  if ($class eq 'Warrior' && plugin::check_handin (\%itemcount, 6141 => 1))
    {
      quest::summonitem (62189);
      quest::exp (750);
      quest::emote ("smiles warmly as he hands you your weapon.");
      quest::ding ();
    }
  elsif ($class eq 'Paladin' && plugin::check_handin (\%itemcount, 6141 => 1))
    {
      quest::summonitem (62189);
      quest::exp (750);
      quest::emote ("smiles warmly as he hands you your weapon.");
      quest::ding ();
    }
  elsif ($class eq 'Shadow Knight' && plugin::check_handin (\%itemcount, 6141 => 1))
    {
      quest::summonitem (62189);
      quest::exp (750);
      quest::emote ("smiles warmly as he hands you your weapon.");
      quest::ding ();
    }
  elsif ($class eq 'Berserker' && plugin::check_handin (\%itemcount, 6141 => 1))
    {
      quest::summonitem (62189);
      quest::exp (750);
      quest::emote ("smiles warmly as he hands you your weapon.");
      quest::ding ();
    }
  elsif ($class eq 'Monk' && plugin::check_handin (\%itemcount, 6141 => 1))
    {
      quest::summonitem (6611);
      quest::exp (750);
      quest::emote ("smiles warmly as he hands you your weapon.");
      quest::ding ();
    }
  elsif ($class eq 'Beastlord' && plugin::check_handin (\%itemcount, 6141 => 1))
    {
      quest::summonitem (6611);
      quest::exp (750);
      quest::emote ("smiles warmly as he hands you your weapon.");
      quest::ding ();
    }
  elsif ($class eq 'Druid' && plugin::check_handin (\%itemcount, 6141 => 1))
    {
      quest::summonitem (29422);
      quest::exp (750);
      quest::emote ("smiles warmly as he hands you your weapon.");
      quest::ding ();
    }
  elsif ($class eq 'Necromancer' && plugin::check_handin (\%itemcount, 6141 => 1))
    {
      quest::summonitem (29422);
      quest::exp (750);
      quest::emote ("smiles warmly as he hands you your weapon.");
      quest::ding ();
    }
  elsif ($class eq 'Wizard' && plugin::check_handin (\%itemcount, 6141 => 1))
    {
      quest::summonitem (29422);
      quest::exp (750);
      quest::emote ("smiles warmly as he hands you your weapon.");
      quest::ding ();
    }
  elsif ($class eq 'Magician' && plugin::check_handin (\%itemcount, 6141 => 1))
    {
      quest::summonitem (29422);
      quest::exp (750);
      quest::emote ("smiles warmly as he hands you your weapon.");
      quest::ding ();
    }
  elsif ($class eq 'Enchanter' && plugin::check_handin (\%itemcount, 6141 => 1))
    {
      quest::summonitem (29422);
      quest::exp (750);
      quest::emote ("smiles warmly as he hands you your weapon.");
      quest::ding ();
    }
  elsif ($class eq 'Shaman' && plugin::check_handin (\%itemcount, 6141 => 1))
    {
      quest::summonitem (29422);
      quest::exp (750);
      quest::emote ("smiles warmly as he hands you your weapon.");
      quest::ding ();
    }
  elsif ($class eq 'Cleric' && plugin::check_handin (\%itemcount, 6141 => 1))
    {
      quest::summonitem (29442);
      quest::exp (750);
      quest::emote ("smiles warmly as he hands you your weapon.");
      quest::ding ();
    }
  else
    {
      plugin::return_items (\%itemcount);
      quest::say ("These are not the pieces I need.");
    }
}
Reply With Quote
  #24  
Old 04-25-2006, 07:29 PM
Muuss
Dragon
 
Join Date: May 2003
Posts: 539
Default

If you're using the last plugin, i bet you my shirt and my shoes than this won't work for any other class than warrior.

L8rs.
__________________
Muuss - [PEQGC] Dobl, the ogre that counts for 2 !
http://www.vilvert.fr/page.php?id=10
Reply With Quote
  #25  
Old 04-26-2006, 05:28 AM
paaco
Discordant
 
Join Date: Jan 2005
Posts: 320
Default

Just tested with a Beastlord, Warrior, and Necro, give the right item he hands you your wep. Give the wrong item and all you get back is what you gave him with the message telling you it's the wrong item. It seems to work fine even with that last plugin. I have 2 quests that use it and give multiple items. My other quest has 8 different rewards and works.
Reply With Quote
  #26  
Old 04-27-2006, 12:27 AM
Muuss
Dragon
 
Join Date: May 2003
Posts: 539
Default

I retire what i said about warrior. That quest works, but writing it like this is so risky that i wouldn't advise it to a perl beginner (inverse the tests and write 'if (plugin::check_handin(\%itemcount,6461=>1) && ($class eq "Warrior")) {' and it won't work anymore... but well...

Anyway, for that same quest, try to give the item 6461 plus another item, the one you want, and the npc won't return you the extra item.
__________________
Muuss - [PEQGC] Dobl, the ogre that counts for 2 !
http://www.vilvert.fr/page.php?id=10
Reply With Quote
  #27  
Old 06-23-2006, 03:13 PM
Grundy
Sarnak
 
Join Date: Jun 2006
Posts: 38
Default

ehh too much typing i'd just do this

Code:
sub EVENT_ITEM {
  if (plugin::check_handin(\%itemcount, 6164 => 1)) {
    if ( ($class == "Warrior") || ($class == "Paladin") || ($class == "Shadow Knight") || ($class == "Berserker") ) {
      quest::summonitem(62189);
    }
    if ( ($class == "Monk") || ($class == "Beastlord") ) {
      quest::summonitem(6611);
    }
    if ( ($class == "Druid") || ($class == "Shaman") || ($class == "Necromancer") || ($class == "Wizard") || ($class == "Magician") || ($class == "Enchanter") ) {
      quest::summonitem(29422);
    }
    if ( $class == "Cleric" ) {
      quest::summonitem(29442);
    }
    # probably add something for rogues, bards, and rangers
    quest::exp(750);
    quest::emote("smiles warmly as he hands you your weapon.");
    quest::ding();
  }
  else {
    plugin::return_items(\%itemcount); 
    quest::say("These are not the pieces I need.");
  }
}
Reply With Quote
  #28  
Old 06-23-2006, 03:19 PM
fathernitwit
Developer
 
Join Date: Jul 2004
Posts: 773
Default

Just to throw yet another solution to the same problem out:

Code:
sub EVENT_ITEM {
  if (plugin::check_handin(\%itemcount, 6164 => 1)) {
    my %rewards = (
      "Warrior" => 62189, "Paladin" => 62189, "Shadow Knight" => 62189,
      "Monk" => 6611, "Beastlord" => 6611,
      "Cleric" => 29442,
      "Druid" => 29422, "Shaman" => 29422, "Necromancer" => 29422,
      "Wizard" => 29422, "Magician" => 29422, "Enchanter" => 29422
    );
    if(defined($rewards{$class})) {
      quest::summonitem($rewards{$class});
      quest::exp(750);
      quest::emote("smiles warmly as he hands you your weapon.");
      quest::ding();
    }
  }
  else {
    plugin::return_items(\%itemcount); 
    quest::say("These are not the pieces I need.");
  }
}
Reply With Quote
Reply

Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump

   

All times are GMT -4. The time now is 02:04 AM.


 

Everquest is a registered trademark of Daybreak Game Company LLC.
EQEmulator is not associated or affiliated in any way with Daybreak Game Company LLC.
Except where otherwise noted, this site is licensed under a Creative Commons License.
       
Powered by vBulletin®, Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Template by Bluepearl Design and vBulletin Templates - Ver3.3