Arinna_Trueblade.pl (Updated)

mwmdragon · #1 04-06-2005, 04:48 AM

[code]

############################################
# ZONE: West Freeport (freportw)
# DATABASE: PEQ-Velious
# LAST EDIT DATE: April 5,2005
# VERSION: 2.0
# DEVELOPER: MWMDRAGON
#
# *** NPC INFORMATION ***
#
# NAME: Arinna_Trueblade
# ID: 9100
# TYPE: Guild Master Warrior
# RACE: Human
# LEVEL: 61
#
# *** ITEMS GIVEN OR TAKEN ***
#
# An Enchanted Helm Mold ID-22610
# An Enchanted Bracer Mold ID-22611
# An Enchanted Armguard Mold ID-22613
# An Enchanted Boot Mold ID-22612
# An Enchanted Greaves Mold ID-22614
# An Enchanted Breastplate Mold ID-22616
# Jagged Blade of the Steel Warrior ID-9940
# Pristine Giant Scarab Leg ID-9919
# Lion Paw ID-9918
# Vial of Smoke ID-9923
#
# *** QUESTS INVOLVED IN ***
#
#1 - Steel Warriors Helm
#2 - Steel Warriors Bracer
#3 - Steel Warriors Armguards
#4 - Steel Warriors Boots
#5 - Steel Warriors Greaves
#6 - Steel Warriors Gauntlets
#7 - Steel Warriors Breatplate
#8 - Steel Warriors Final Task
#
# *** QUESTS AVAILABLE TO ***
#
#1 - Warrior
#2 - Warrior
#3 - Warrior
#4 - Warrior
#5 - Warrior
#6 - Warrior
#7 - Warrior
#8 - Warrior
#
############################################

sub EVENT_SAY
{

if($text=~/Hail/i)
{
quest::say("Well met $name. I am Arianna Trueblade. Warlord of the Steel Warriors. I am personally in charge of all the training that our young warriors receive. I take pride in knowing that my teaching can help make the foundation of a Freeport Champion. If you are a [warrior] then we might just have something to talk about.");
}

if($text=~/warrior/i && $class == 'Warrior')
{
quest::say("So you think you have what it takes to become one of Freeports finest? I will warn you now that we expect every single warrior that is brought into our ranks to go through a series of exercises. Rest assured you will be rewarded for your hard work with a set of armor that I will walk you though the process of making. Are you [ready to begin your testing]?");
}

if($text=~/ready to begin my testing/i && $class == 'Warrior' || $text=~/ready to begin your testing/i && $class == 'Warrior')
{
quest::say("Very well $name. Here is your Steel Warriors Mail Kit. This kit will be your main tool in creating your own armor. You will gather various items from all areas of Freeport from monsters and stores alike. You will use specific item combinations in this kit to fashion together armor materials that you will combine in a forge with the appropriate mold to make an armor piece. Once you are ready to attempt a piece of armor simply tell me what piece you [want to craft]. I will then present you with the recipe and mold for Steel Warrior [Helms]. [Bracers]. [Armguards]. [Boots]. [Greaves]. [Gauntlets] and [Breastplates].");
}

if($text=~/want to craft helms/i && $class == 'Warrior' || $text=~/want to craft helm/i && $class == 'Warrior')
{
quest::say("Any Steel Warrior that is caught not wearing a helm is usually placed on probation. We feel it is necessary sometimes to do this so that our younger ones in training will understand the importance of keeping your head well protected. To create your helm material you will need to combine 2 Bricks of Crude Iron Ore. 1 Rat Ear. 1 Meat Pie and 1 Barley in your assembly kit. Once you have created the proper material take it to a forge along with this mold to fashion your very own Steel Warriors Helm.");
# An Enchanted Helm Mold ID-22610
quest::summonitem("22610");
}

if($text=~/want to craft bracers/i && $class == 'Warrior')
{
quest::say("As you progress further through your training you will find yourself in heavy battle more and more often. Bracers will ensure that you are able to fend off your opponents blows with minimum injury. To create your bracer material you will need to combine 1 Brick of Crude Iron Ore. 1 Rotting Zombie Skull. 1 Snake Bile and 1 Tiny Dagger in your assembly kit. Once you have created the proper material take it to a forge along with this mold to fashion your very own Steel Warriors Bracer.");
# An Enchanted Bracer Mold ID-22611
quest::summonitem("22611");
}

if($text=~/want to craft armguards/i && $class == 'Warrior')
{
quest::say("A slash or gash to the arms can greatly hinder a warriors combat abilities. Wearing these armguards will ensure that this does not happen. To create your helm material you will need to combine 2 Bricks of Crude Iron Ore. 2 Young Kodiak Paws. 1 Young Plains Cat Scalp and 1 Freeport Stout in your assembly kit. Once you have created the proper material take it to a forge along with this mold to fashion your very own Steel Warriors Armguards.");
# An Enchanted Armguard Mold ID-22613
quest::summonitem("22613");
}

if($text=~/want to craft boots/i && $class == 'Warrior')
{
quest::say("Boots are very necessary for any warrior especially when you will usually be the one leading most combat units. Being on the front line and treading across terrains first make good boots a must. To create your boots material you will need to combine 3 Bricks of Crude Iron Ore. 1 Shadow Wolf Tibia and 2 Spiderling Eyes in your assembly kit. Once you have created the proper material take it to a forge along with this mold to fashion your very own Steel Warriors Boots.");
# An Enchanted Boot Mold ID-22612
quest::summonitem("22612");
}

if($text=~/want to craft greaves/i && $class == 'Warrior')
{
quest::say("While most armor pieces are very vital to a young warriors survival. greaves are one of the most important armor pieces you will craft. To create your greaves material you will need to combine 4 Bricks of Crude Iron Ore. 1 Giant Fire Beetle Brain. 1 Lion Tail. 1 Bottle and 1 Young Puma Skin in your assembly kit. Once you have created the proper material take it to a forge along with this mold to fashion your very own Steel Warriors Greaves.");
# An Enchanted Greaves Mold ID-22614
quest::summonitem("22614");
}

if($text=~/want to craft breastplates/i && $class == 'Warrior' || $text=~/want to craft breastplate/i && $class == 'Warrior')
{
quest::say("Your dedication to learning everything about your class is impressive $name. I have no doubt that you are ready to collect the pieces for your Steel Warriors Breastplate. To create your helm material you will need to combine 5 Bricks of Crude Iron Ore. 1 Deathfist Orc Skull. 1 Woven Spider Silk. 1 Armadillo Carapace. 1 Matted Lion Pelt and 1 Rusty Short Sword in your assembly kit. Once you have created the proper material take it to a forge along with this mold to fashion your very own Steel Warriors Breastplate. Please come back to see me after you are finished with your breastplate for your [final task].");
# An Enchanted Breastplate Mold ID-22616
quest::summonitem("22616");
}

if($text=~/final task/i && $class == 'Warrior')
{
quest::say("I am in need of some assistance to craft a special sword that I would like to present all graduates of my training like yourself with. However. I don