Here is the Holly Longtail quest from the PoK. This is part of a series of quests I am working on for the "Antique Series" of quests.
Code:
#############
#Quest Name: Holly Longtail's Replacement Parts
#Author: CrabClaw
#NPCs Involved: Holly_Longtail
#Items Involved: All from Angelox's Database
#zone: poknowledge
#Revised CrabClaw v1.0 WIP
###RELATED QUESTS###
# Curator_Merri: The Collector's Box
sub EVENT_SAY {
if($text=~/Hail/i){
quest::say("Hello. $name. The preservation of ancestors is a time-honored tradition. It's a task one must handle with painstaking care and precision. Please do not fret for the lives of these specimens. They live in the eternal realm of beauty now. I have quite a large collection of stuffed animals ready to go. but many of them have sustained injuries in their capture. In fact. I wouldn't mind some help to collect some [replacement parts] from creatures around the world.");
}elsif($text=~/replacement parts/i){
quest::say("Grab a Collector's Box from [Merri] before you go. You need to recover an Undead Froglok Tongue, Cockatrice Beak, High Quality Cougarskin, and a Tiny Rockhopper Eye. Seal the box tightly and return it to me. If the contents are in sufficient and usable condition, I may have a reward for you."); }
}elsif($text=~/merri/i){
quest::say("Curator Merri is the founder of the museum in the Selia district of New Tanaan. She is a true visionary and a wonderful person as well. It is her dream to turn life's love into something truly grand. She also carries with her the Collector's Boxes. If you need one, be sure to ask her for it."); }
}
sub EVENT_ITEM{
if ($itemcount{28076} == 1){
quest::say("These will do. Please accept this as a show of my appreciation. Now if you'll excuse me I have much work left to do.");
quest::summonitem(28237);
}
}
#END of FILE Zone:poknowledge Holly_Longtail