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

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

Reply
 
Thread Tools Display Modes
  #1  
Old 06-11-2009, 02:04 PM
Capheus
Hill Giant
 
Join Date: Apr 2008
Location: Milwaukee
Posts: 141
Default

Try this

Code:
########(1.0 Rewarder)
####Zone:PoK
########

sub EVENT_SAY
{
 
  if ($ulevel>=46)
    	{

  	if ($text=~/Hail/i)
  		{
  		quest::say("Greetings $name, do you seek your first [epic] weapon for yourself and or bots?");
  		}

	if ($text=~/epic/i)
  		{
  		quest::say("As a reward for the great deeds you have done I will reward you with a weapon of great power, please tell me which class you need the item for.");
  		}

	if ($text=~/berserker/i)
    		{
      		quest::summonitem (68299);
     		quest::ding();
    		}

  	if ($text=~/cleric/i)
    		{
     	 	quest::summonitem (5532);
      		quest::ding();
  	 	}

 	if ($text=~/druid/i)
   		{
      		quest::summonitem (20490);
      		quest::ding();
    		}

  	if ($text=~/magician/i)
    		{
     		quest::summonitem (28034);
      		quest::ding();
    		}

  	if ($text=~/necromancer/i)
    		{
      		quest::summonitem (20544);
      		quest::ding();
   		 }

  	if ($text=~/enchanter/i)
		{
      		quest::summonitem (10650);
      		quest::ding();
    		}

  	if ($text=~/monk/i)
     		{
      		quest::summonitem (1683);
      		quest::ding();
    		}

  	if ($text=~/beastlord/i)
      		{
      		quest::summonitem (8495);
      		quest::summonitem (8496);
      		quest::ding();
    		}

  	if ($text=~/rogue/i)
      		{
      		quest::summonitem (11057);
      		quest::ding();
   		}  

  	if ($text=~/ranger/i)
      		{
      		quest::summonitem (20487);
      		quest::summonitem (20488);
      		quest::ding();
    		} 
 
  	if ($text=~/bard/i)
     		 {
      		quest::summonitem (20542);
      		quest::ding();
    		}
  
 	if ($text=~/shaman/i)
      		{
      		quest::summonitem (10651);
     		 quest::ding();
    		}

  	if ($text=~/warrior/i)
      		{
      		quest::summonitem (10908);
      		quest::summonitem (17859);
      		quest::ding();
    		}

  	if ($text=~/wizard/i)
      		{
      		quest::summonitem (14341);
      		quest::ding();
   		 }

  	if ($text=~/shadowknight/i)
      		{
      		quest::summonitem (14383);
      		quest::ding();
    		}

  	if ($text=~/paladin/i)
      		{
     		quest::summonitem (10099);
      		quest::ding();
		}

	}

  elsif (($text=~/Hail/i) && ($ulevel<=46))
	{
	quest::say("Sorry young $class, I am afraid you are too young still, please return to me when you are level 46.");
	}
}
Reply With Quote
  #2  
Old 06-11-2009, 02:14 PM
Capheus
Hill Giant
 
Join Date: Apr 2008
Location: Milwaukee
Posts: 141
Default

Forgot to mention. sub EVENT_ITEM is only needed when someone if giving an item to the NPC.
Reply With Quote
  #3  
Old 06-11-2009, 02:20 PM
Vainglory69
Fire Beetle
 
Join Date: Jun 2009
Location: Mi
Posts: 6
Default

Grrr, ok, I corrected the "((" issues and added the missing ;'s and would only get the text but no item, maybe that is what the deal was.

Your script worked perfectly! And I thank you for the help. New to perl but I am trying to learn

Thanks guys!
Reply With Quote
  #4  
Old 06-11-2009, 03:07 PM
Andrew80k
Dragon
 
Join Date: Feb 2007
Posts: 659
Default

Out of curiousity, why do you not check $class to determine the item to summon as opposed to $text? If I am a rogue and I say "berserker" I get the berserker epic? Why would you do that? There are some circumstances where this might be appropriate, but for the most part I would think you'd want to give an appropriate epic to the appropriate class based on the class.
Reply With Quote
  #5  
Old 06-11-2009, 03:28 PM
ChaosSlayerZ's Avatar
ChaosSlayerZ
Demi-God
 
Join Date: Mar 2009
Location: Umm
Posts: 1,492
Default

Quote:
Originally Posted by Andrew80k View Post
Out of curiousity, why do you not check $class to determine the item to summon as opposed to $text? If I am a rogue and I say "berserker" I get the berserker epic? Why would you do that? There are some circumstances where this might be appropriate, but for the most part I would think you'd want to give an appropriate epic to the appropriate class based on the class.
cuase he may want to give it to his bot perhaps


Quote:
quest::say("Greetings $name, do you seek your first [epic] weapon for yourself and or bots?");
Reply With Quote
  #6  
Old 06-11-2009, 03:39 PM
Vainglory69
Fire Beetle
 
Join Date: Jun 2009
Location: Mi
Posts: 6
Default

Hehe, yes, no other way to get epics for the bot army
Reply With Quote
  #7  
Old 06-11-2009, 03:55 PM
Andrew80k
Dragon
 
Join Date: Feb 2007
Posts: 659
Default

And what benefits do the bots get from them? Do weapons on bots proc? I know that you can't use the clickies on bot items, so other than maybe special procs, such as the Ranger epic that procs a slow, what is there to gain from giving them the epic? "It looks cool" is an acceptable answer, like I said I'm just curious. Some folks come up with some really cool ideas for customization and I often am curious as to what purpose they want to do this or that. For the most part there are MUCH better weapons than the epics so I never even considered giving my bots epics.
Reply With Quote
  #8  
Old 06-11-2009, 03:57 PM
Andrew80k
Dragon
 
Join Date: Feb 2007
Posts: 659
Default

Quote:
Originally Posted by ChaosSlayerZ View Post
cuase he may want to give it to his bot perhaps
Oh, I didn't read the text of the script, I just looked at the syntax.... :\
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 07:51 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 - 2025, Jelsoft Enterprises Ltd.
Template by Bluepearl Design and vBulletin Templates - Ver3.3