Perl Quest Lexicon

[mwmdragon]

I plan to get this done in a timely fasion. Here is a start of whats to come. I hope this helps newbie quest writers like myself to get a better grip on the commands available.

I have them done in a color coded easy to read format that gets lost when i post them here. After they are all done I'll post them as a PDF.

Please do not post a bunch of stuff in this thread please start another thred for corrections orcomments.

[mwmdragon]

quest::say

Explaination : Makes the mob or NPC say the text in the quotes.

Full Command : quest::say("text");

Text = What you want the mob or NPC to say.

Example:


# Makes the mob greet the player, when hailed.

sub EVENT_SAY
{
if($text=~/hail/i)
{
quest::say("Hello fellow Norrathian.");
}
}

[mwmdragon]

quest::emote

Explaination: Makes the mob or NPC emote the text in the quotes.

Full Command: quest::emote(

[mwmdragon]

quest::shout

Explaination: Makes the mob or NPC shout the text in the quotes.

Full Command: quest::shout(

[mwmdragon]

quest::spawn

Explaination: Spawns a mob or NPC at the location given on the grid given.

Full Command: quest::spawn(npc_type, grid, guildwarset,x,y,z);

Npc_type = The mob or NPCs ID from your database.
Grid = The grid ID you want the mob or NPC to walk along from your database. Leave it as 0 if you don

[mwmdragon]

quest::echo

Explaination: Sends the text in the quotes to the EQEmu console.

Full Command: quest::echo(

[mwmdragon]

quest::summonitem

Explaination: Summons an item for the player who triggers the event.

Full Command: quest::summonitem(itemid,amount or charges)

Itemid = The items ID number from your database.
Charges or Amount = Sets the amount of the item given to the player, or if the item can have a certain amount of charges set on it, it will set charges instead of amount of the item given.

Example:

# Gives the player one instance of the item indicated after being hailed.

sub EVENT_SAY
{
if($text=~/hail/i)
{
quest::summonitem("5120");
}
}

[mwmdragon]

quest::castspell

Explaination: Makes the mob or NPC cast a certain spell on the creature with the indicated ID.

Full Command: quest::castspell(id,spellid)

ID = The ID of the creature the spell is to be cast on.
SpellID = The ID of the spell to cast taken from the spells_us.txt

Example:

# Casts the bind affinity spell on the hailing person.

sub EVENT_SAY
{
if($text=~/hail/i)
{
quest::castspell($userid,2049);
}
}

[mwmdragon]

quest::selfcast

Explaination: Makes the player cast a spell on themselves.

Full Command: quest::selfcast(spellid)

SpellID = The ID of the spell to cast taken from the spells_us.txt

Example:

# After hailing, the player casts bind affinity on themselves.

sub EVENT_SAY
{
if($text=~/hail/i)
{
quest::selfcast($userid,2049);
}
}

[mwmdragon]

quest::depop

Explaination: Makes the mob or NPC depop or unspawn.

Full Command: quest::depop( )

Example:

# After being hailing, the NPC depops.

sub EVENT_SAY
{
if($text=~/hail/i)
{
quest::depop();
}
}

[mwmdragon]

quest::cumflag

Explaination: Flag 50 for mob will increase by 1.

Full Command: quest::cumflag( )

Example:

# After being hailing, the NPCs Flag 50 goes up by 1

sub EVENT_SAY
{
if($text=~/hail/i)
{
quest::cumflag();
}
}

[mwmdragon]

quest::flagnpc

Explaination: Sets flag values on mobs and NPCs mainly for quests.

Full Command: quest::flagnpc(flag,flagvalue)

Flag = a variable you wish to assign the value to.
Flagvalue = the value you want the flag variable to equal

Example:

# After being hailed, a flag on the NPC 7 is set to 1.

sub EVENT_SAY
{
if($text=~/hail/i)
{
quest::flagnpc(7,1);
}
}

[mwmdragon]

quest::flagclient

Explaination: Sets a flag on the player, mainly for quests.

Full Command: quest::flagclient(flag,flagvalue)

Flag = a variable you wish to assign the value to.
Flagvalue = the value you want the flag variable to equal

Example:

# After being hailed the NPC sets a flag on the player 3 to 1.

sub EVENT_SAY
{
if($text=~/hail/i)
{
quest::flagclient(3,1);
}
}

[mwmdragon]

quest::exp

Explaination: Adds an amount of experience to the players character.

Full Command: quest::exp(amount)

Amount = The amount of experience you would like the player to gain.

Example:

# After hailing the NPC the player gains 100 experience.

sub EVENT_SAY
{
if($text=~/hail/i)
{
quest::exp(100);
}
}

[mwmdragon]

quest::level

Explaination: Sets the players character level to the level you specify.

Full Command: quest::level(newlevel)

Newlevel = The level you want the character to be.

Example:

# After hailing the NPC the player is forced to level 25.

sub EVENT_SAY
{
if($text=~/hail/i)
{
quest::level(25);
}
}