PDA

View Full Version : 2 quests I made


codyscafe7
06-21-2007, 02:13 AM
here are 2 quests I made you can do whatever you want to them i didnt assign them to any particular person yet so you can choose. Just give credits to me:) .

sub EVENT_SAY {
if($text=~/hail/i){
quest::emote("glares at you");
quest::say("What the hell do you want, Im [busy]!");
}
if($text=!/busy/i){
{
quest::say("Im trying to find a missing [item], what does it mean to you.");
}
if($text=~/item/i){
{
quest::say("Ive lost my friends cloth shirt, would you [help me] find it?");
}
if($text=~/help you/i)
{
quest::emote("smiles");
quest::say("dont take too long");
}
}

sub EVENT_ITEM
{
#handin: 1x cloth shirt
if(plugin::check_handin(\%itemcount, 1004 => 1))
{
quest::say("You are a worthy one. Im sure you have the gods favor.")
quest::exp(10000);
}
else
{
quest::say("I have no use for these things.");
#return the items
if($item1>0)
{
quest::summonitem($item1); #item 1
}
if($item2>0)
{
quest::summonitem($item2); #item 2
}
if($item3>0)
{
quest::summonitem($item3); #item 3
}
if($item4>0)
{
quest::summonitem($item4); #item 4
}
}
}

#made by cody : cody's test server admin




and the second

sub EVENT_SAY {
if ($text=~/hail/i){
quest::say("Oh My God! Where did I put [it]??");
}
if($text=~/it/i)
{
quest::say("IT, is my Element of Fire! Without it I have no magic. If only someone could give me the [materials] to make a new one.");
}
if($text=~/materials/i)
{
quest::say("To craft a new essence I need 4 torches, will you [help] me?");
}
if($text=~/help/i)
{
quest::emote("cheers.");
quest::say("Thanks a million your help wont go unrewarded!");
}
}

sub EVENT_ITEM
{
#handin: 4x torches
if(plugin::check_handin(\%itemcount, 13002 => 4))
{
quest::say("You are the savior of my magic, and as I said it will not go unrewarded.");
quest::exp(5000);
}
else
{
quest::say("I have no use for these things.");
#return the items
if($item1>0)
{
quest::summonitem($item1); #item 1
}
if($item2>0)
{
quest::summonitem($item2); #item 2
}
if($item3>0)
{
quest::summonitem($item3); #item 3
}
if($item4>0)
{
quest::summonitem($item4); #item 4
}
}
}

#made by cody : cody's test server admin

please give feedback. thanks.

Angelox
06-21-2007, 10:14 AM
I deleted one of theses threads as we don't want double-posting.