In order to create a wide selection of quests for users, we have created 3 new forums for the Quest writers out there to share, ask questions about, improve and write quests! For more information of Perl Quests, please visit
this tutorial.
Before a quest is passed to the archive, it must meet all the criteria listed
here.
To submit a quest, you must include this header at the top of all quest files.
Code:
#############
#Quest Name:
#Author:
#NPCs Involved:
#Items Involved:
#################
And then below that, enter anything that may change from database to database. Example:
Code:
#############
#Quest Name: Santa Claus is comin' to town.
#Author: Cisyouc
#NPC's Involved: 2
#Items Involved: 1
#############
###NPC 1
#Name: Santa
#Race 1 (Human), Texture of 2, Size 10, gender of 0
#Location: 0,0,0 of the Nexus
#Level: 85
#Type: Quest NPC
#Loot: N/A
#############
###NPC 2
#Name: A Corrupt Rudolph
#Location: 100,100,0 of Great Divide
#Race 6 (dark elf), size 3, texture of 0, gender of 0
#Level: 56
#HP: 5000
#Class: Warrior
#Loot: Head of a Corrupt North Polian
#############
###Item 1
#Name: Head of a Corrupt North Polian
#Stats: 20 AC, 5 WIS, 5 INT, 45 Mana
###
#Note: A custom faction was used in this quest.
#Description: The point of this quest is to raise peoples faction with the North Polians.
#Quest for NPC 1: Santa
sub EVENT_SAY
{
if($text=~/hail/i)
{
quest::say("Oh, no $name. Something terrible has happened. Do you think you can [gather] a few friends and help jolly Ol' Saint Nick?");
}
if($text=~/gather/i)
{
quest::say("Ho ho ho! I think Rudolph, my most loyal companion, has been corrupted by an evil force lurking around! Can you take the poor animal out of his [misery] for me?");
}
if($text=~/misery/i)
{
quest::say("Excellent. If you complete this task, you will not be on the naughty list this year!");
}
}
sub EVENT_ITEM
{
if($itemcount{item1} == 1)
{
quest::say("Thank you, $name. You are forever in all of our debt.");
quest::faction(12, 50);
}
}
Code:
#############
#Quest Name: Santa Claus is comin' to town.
#Author: Cisyouc
#NPC's Involved: 2
#Items Involved: 1
#############
###NPC 1
#Name: Santa
#Race 1 (Human), Texture of 2, Size 10, gender of 0
#Location: 0,0,0 of the Nexus
#Level: 85
#Type: Quest NPC
#Loot: N/A
#############
###NPC 2
#Name: A Corrupt Rudolph
#Location: 100,100,0 of Great Divide
#Race 6 (dark elf), size 3, texture of 0, gender of 0
#Level: 56
#HP: 5000
#Class: Warrior
#Loot: Head of a Corrupt North Polian
#############
###Item 1
#Name: Head of a Corrupt North Polian
#Stats: 20 AC, 5 WIS, 5 INT, 45 Mana
###
#Description: The point of this quest is to raise peoples faction with the North Polians.
#Quest for NPC 2: Rudolph
sub EVENT_DEATH
{
quest::summonitem(item1);
quest::say("You can take my life, but my spirit will remain!");
}