Perl Quest Lexicon

[mwmdragon]

quest::settime

Explaination: Changes the time in the zone changing the sky and lighting depending on the time set.

Full Command: quest::settime(hour,minutes)

Hour = The hour of the day in a 24 hour schedule (1:00pm = 13:00)
Minutes = The Minutes into the hour set before it.

Example:

# After hailing the NPC the time is set to five after midnight.

sub EVENT_SAY
{
if($text=~/hail/i)
{
quest::settime(0,5);
}
}

[mwmdragon]

quest::setsky

Explaination: Changes the color of the sky.

Full Command: quest::setsky(n)

n = Anywhere from 0 to 255.

Example:

# After hailing the NPC the sky goes deep red.

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

[mwmdragon]

quest::settimer

Explanation: Starts a time the counts seconds.

Full Command: quest::(timerid,seconds)

Timerid = The ID number of the timer you would like to start. Found in the database.
Seconds = The amount of time you want the timer to run for in seconds.

Example:

# After hailing the NPC timer 1 is set to run for 3 minutes (180 seconds)

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

[mwmdragon]

quest::stoptimer

Explanation: Stops the chosen timer.

Full Command: quest::stoptimer(timerid)

Timerid = The ID of the timer you would like to stop. Can be found in your database.

Example:

# After hailing the NPC the time with the ID 1 is stopped.

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

[mwmdragon]

quest::settarget

Explanation: Sets a mobs target.

Full Command: quest::settarget(type,ID)

Type =
ID = The ID of the NPC or player to target.

Example:

[mwmdragon]

quest::follow

Explanation: Makes the mob or NPC follow a chosen NPC or player.

Full Command: quest::follow(ID)

ID = The ID of the NPC or Player that the mob or NPC is supposed to follow.

Example:

# After hailing the NPC he follow the NPC with the ID of 1024.

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

[mwmdragon]

quest::sfollow

Explanation: Stop the mob from following a player or NPC after making it do so with the follow command.

Full Command: quest::sfollow( )

Example:

# After hailing the NPC again he stops following the player.

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