[everlastnmn]

here is the script I'm running :


#############
#Written By : Cubber
#Quest Name: Small Server Help
#Quest Zone: Bazaar
#Quest NPC: Galarono_McHalorsos
#################
sub EVENT_SAY
{
if($text=~/Hail/i)
{
quest::say("Hello there $name, Looking for some new toys are ya? I just may have a some special equipment stashed away here somewhere, are you [interested] ?");
}
if ($text=~/interested/i)

{
quest::say("Tell me $race what are ya looking for? [Bags], [Special Items], [Pet Gear], an [Adventurer's Stone], some [Dye] for your armour, or your [Epic]? I can also help you catch up to your friends by granting you some [Levels].");
}

if ($text=~/bags/i)
{
quest::say("Here are some bags to help carry all your loot!");
quest::SummonItem("17800");
quest::SummonItem("17800");
quest::SummonItem("17800");
}

if ($text=~/Special Items/i)
{
quest::say("Here are a few special items to help you along in your travels!");
quest::SummonItem("31951");
quest::SummonItem("31883");
quest::SummonItem("31881");
quest::SummonItem("31885");
quest::SummonItem("31954");
}

if ($text=~/Pet Gear/i)
{
quest::say("Here are some goodies for your pet!");
quest::SummonItem("46987");
quest::SummonItem("28595");
quest::SummonItem("28595");
quest::SummonItem("28596");
quest::SummonItem("28596");
quest::SummonItem("28598");
}

if ($text=~/Adventurer's Stone/i)
{
quest::say("Good luck on your adventures!");
quest::SummonItem("41000");
}

if ($text=~/Dye/i)
{
quest::say("Don't go to crazy with this stuff now!");
quest::SummonItem("32557");
quest::SummonItem("32557");
quest::SummonItem("32557");
quest::SummonItem("32557");
quest::SummonItem("32557");
quest::SummonItem("32557");
quest::SummonItem("32557");
quest::SummonItem("32557");
quest::SummonItem("32557");
quest::SummonItem("32557");
}

if ($text=~/Epic/i)
{
quest::say("HaHa! I got ya $class ... You need to earn that one for yourself!");
}

if ($text=~/Levels/i)
{
quest::say("What level would you like me to grant you? [10], [20], [30], [40], or [50]?");
}

if ($text=~/10/i)
{
quest::say("There you are! Don't forget to go train, and get your new spells or skills.");
quest::level(10);
}

if ($text=~/20/i)
{
quest::say("There you are! Don't forget to go train, and get your new spells or skills.");
quest::level(20);
}

if ($text=~/30/i)
{
quest::say("There you are! Don't forget to go train, and get your new spells or skills.");
quest::level(30);
}

if ($text=~/40/i)
{
quest::say("There you are! Don't forget to go train, and get your new spells or skills.");
quest::level(40);
}

if ($text=~/50/i)
{
quest::say("There you are! Don't forget to go train, and get your new spells or skills.");
quest::level(50);
}

}