ShadowKnight Epic - Complete

[FaerinTelDanor]

://EQEMU/Quests/citymist/90093.pl

############################################
# Developer: Faerin
# Modified: July 28, 2005
# Database: PEQ-Kunark
############################################
# *** NPC INFORMATION ***
#
# NAME: lhranc (undead)
# ID: 90093
# Class: Warrior
# Level: 60
# Zone: City of Mist
############################################
# *** Quest Info ***
# Class: ShadowKnight
# Level Range: 50-60
# Quest Name: SK Epic
############################################
# *** Items Needed ***
#
# 1) #1467 - Corrupted Ghoulbane
# 2) #1468 - Heart of the Innocent
# 3) #1469 - Head of the Valliant
# 4) #1470 - Will of Innoruuk
############################################
# *** Rewards **
#
# 1) Loot - #1000 - Lhranc's Coin
############################################ 
sub EVENT_SAY
{
  if($text=~/Hail/i)
  {
    quest::say("Ahh, finally! He has sent you. No time to waste now, you must help me lift the curse at once!");
  }

  if($text=~/curse/i)
  {
    quest::say("Can you not see my condition! I have been unjustly sentenced to an eternity in this wretched form you see before you, never to leave these walls. In exchange for the cure for this curse, I swear to show you a secret that would make you the most powerful of your kind.");
  }

  if($text=~/cure/i)
  {
    quest::say("I require only four things of you, dark one, and one of them you hold now. Bring me the heart of an innocent, the head of the valiant, and the will of Innoruuk. With these, my curse shall be lifted at last and I will craft a weapon that will cast a shadow over all of Norrath.");
  }
}

sub EVENT_ITEM
{
  if ($itemcount{14367} == 1 && $itemcount{14368} == 1 && $itemcount{14369} == 1 && $itemcount{14370} == 1)
  {
    quest::say("Ahh, at last I can free myself of this prison! Centuries have passed since I enjoyed the fruits of mortality.");
    quest::emote("He hurls the components above his head where they remain suspended in midair. They hover in place while he chants the words of an ancient spell. As he speaks, the items begin to rotate around his head, slowly at first, then faster as the chanting grows louder, until it spins in a blur. Soon, the room is filled with a deafening shriek that pierces you to the core.");
    quest::ding();
    quest::summonitem("1000");
    quest::spawn2(90187,0,0,$x,$y,$z,$h);
    quest::depop();
  }
}

[FaerinTelDanor]

://EQEMU/Quests/citymist/90187.pl

############################################
# Developer: Faerin
# Modified: July 28, 2005
# Database: PEQ-Kunark
############################################
# *** NPC INFORMATION ***
#
# NAME: lhranc (human)
# ID: 90187
# Class: ShadowKnight
# Level: 65
# Zone: City of Mist
############################################
# *** Quest Info ***
# Class: ShadowKnight
# Level Range: 50-60
# Quest Name: SK Epic
############################################
# *** Items Needed ***
#
############################################
# *** Rewards **
#
############################################ 
sub EVENT_SPAWN
{
  quest::say("Young one, you cannot fathom how long it has been since I breathed air and felt flesh on my bones. I told you I would show you a weapon that would make you the most powerful of your kind. I said nothing of giving it to you. Feast your eyes on Innoruuk's Curse mortal, thank you for your service.");
}

sub EVENT_DEATH
{
  quest::spawn2(90188,0,0,$x,$y,$z,$h);
}

[FaerinTelDanor]

://EQEMU/Quests/kerraridge/marl_kastane.pl

############################################
# Developer: Faerin
# Modified: July 28, 2005
# Database: PEQ-Kunark
############################################
# *** NPC INFORMATION ***
#
# NAME: marl_kastane
# ID: 90188
# Class: Warrior
# Level: 60
# Zone: City of Mist
############################################
# *** Quest Info ***
# Class: ShadowKnight
# Level Range: 50-60
# Quest Name: SK Epic
############################################
# *** Items Needed ***
#
# 1) #1000 - Lhranc's Coin
############################################
# *** Rewards **
#
# 1) Loot - #14383 - Innoruuk's Curse
############################################ 
sub EVENT_SPAWN
{
    quest::say("Alas, I cannot be the one to carry the sword back to my people as proof in fear they will kill me to possess it for their own. I think a simple trade is in order, perhaps you have a symbol or token of Lhanrc's that I could take back to the others to ease their worries?");
}

sub EVENT_ITEM
{
  if ($itemcount{1000} == 1)
  {
    quest::say("Very good, I will go deliver this right away. The sword is yours, may it serve you well.");
    quest::ding();
    quest::summonitem("14383");
    quest::depop();
  }
}

[FaerinTelDanor]

://EQEMU/Quests/hole/#ghost_of_glohnor.pl

############################################
# Developer: Faerin
# Modified: July 28, 2005
# Database: PEQ-Kunark
############################################
# *** NPC INFORMATION ***
#
# NAME: ghost_of_glohnor
# ID: 39082
# Class: Warrior
# Level: 50
# Zone: The Hole
############################################
# *** Quest Info ***
# Class: ShadowKnight
# Level Range: 50-60
# Quest Name: SK Epic
############################################
# *** Items Needed ***
#
# 1) #14377 - Dark Shroud
############################################
# *** Rewards **
#
# 1) Loot - #14378 - Head of Glohnor
# 2) Loot - #14379 - Glohnor Wrappings
############################################ 

sub EVENT_ITEM
{
  if($itemcount{14377} == 1)
  {
    quest::spawn2(39165,0,0,$x,$y,$z,$h);
    quest::ding();
    quest::depop;
  }
}

[FaerinTelDanor]

://EQEMU/Quests/hole/cardon.pl

############################################
# Developer: Faerin
# Modified: July 28, 2005
# Database: PEQ-Kunark
############################################
# *** NPC INFORMATION ***
#
# NAME: caradon
# ID: 39069
# Class: Paladin
# Level: 55
# Zone: The Hole
############################################
# *** Quest Info ***
# Class: ShadowKnight
# Level Range: 50-60
# Quest Name: SK Epic
############################################
# *** Items Needed ***
#
# 1) #14373 - Cell Key
############################################
# *** Rewards **
#
############################################ 
sub EVENT_SAY
{
  if($text=~/Hail/i)
  {
    quest::say("Please help me get out of here! My companion, Kyrenna, and I are trapped in this hellish place!");
  }

  if($text=~/who is kyrenna/i)
  {
    quest::say("I was with Kyrenna when she attempted to revive the corpse of Glohnor the Valiant. Like fools, we rushed into a trap. Now we sit here and await our deaths.");
  }

  if($text=~/where is kyrenna/i)
  {
    quest::say("She is close by. For a price, I shall tell you. Bring me the key to my freedom and I will betray her, who sentenced me to this fate.");
  }
}

sub EVENT_ITEM
{
  if($itemcount{14373} == 1)
  {
    quest::say("Kyrenna! We are free!");
    quest::spawn2(39155,0,0,$x,$y,$z,$h);
    quest::ding();
    quest::attack($name);
  }
}

[FaerinTelDanor]

://EQEMU/Quests/kerraridge/marl_kastane.pl

############################################
# Developer: Faerin
# Modified: July 28, 2005
# Database: PEQ-Kunark
############################################
# *** NPC INFORMATION ***
#
# NAME: marl_kastane
# ID: 74089
# Class: Warrior
# Level: 50
# Zone: Kerra Isle
############################################
# *** Quest Info ***
# Class: ShadowKnight
# Level Range: 50-60
# Quest Name: SK Epic
############################################
# *** Items Needed ***
#
# 1) #14376 - Note to Marl
# 2) #14381 - Blood of Kyrenna
# 3) #14379 - Glohnor Wrappings
############################################
# *** Rewards **
#
# 1) #14375 - Seal of Kastane
# 2) #14377 - Dark Shroud
# 3) #14370 - Will of Innoruuk
############################################ 
sub EVENT_SAY
{
  if($text=~/Hail/i)
  {
    quest::say("Begone!! You do not have the will to do the things I require!");
  }

  if($text=~/will of innoruuk/i)
  {
    quest::say("You speak of a myth, friend. Such an object does not exist in this age and the secret of its creation lies locked in my mind, where it shall stay. It has been passed down through generations in my line, not to be revealed to a soul until certain events have come to pass.");
  }

  if($text=~/events/i)
  {
    quest::say("My apologies, $name, I have said too much already. Instead, I have an errand to occupy your thoughts. Take this as proof that you are sent from me and find my brother in Paineel. I haven't spoken with him in some time now and his well being is essential to our family's destiny.");
    quest::summonitem("14375");
  }

  if($text=~/prophecy/i)
  {
    quest::say("I suppose it is time for the secret to be shared. Ages ago, two brothers were born. Glohnor was highly favored by the pompous Lightbringer, whose name we do not utter. Lhranc was chosen by the Prince of Hate to bring destruction and turmoil to the sons of men. The one thing they shared in common was their love of the fair priestess, Kyrenna. Kyrenna fell deeply in love with Glohnor. When Lhranc discovered this, he was overcome with rage and unwisely attacked his brother, who happened to be far more adept in combat. The fight cost Lhranc dearly. He lost his dignity as well as an eye in the struggle. He was ordered to leave Freeport and live his life in exile from the only home he had ever known.");
  }

  if($text=~/lhranc/i)
  {
    quest::say("Lhranc wandered the deserts of Ro for weeks, sinking deeper into depression and giving in to rage. Reports from the local merchants and caravans had him roaming the dunes muttering to himself incoherently. Eventually, he was forgotten, blending in with the hermits and madmen common to that region, forgotten by all save one.");
  }

  if($text=~/who is the one/i)
  {
    quest::say("Innoruuk had not forsaken Lhranc. Once his rage and hate had matured and sufficiently altered his soul, the dark prince summoned him and gave him dominion over the demons that had enslaved his mind. He was given a weapon that made him powerful enough to slay any enemy that stood in his way. He was to become the first human to harness the power of the almighty shadowknight. After years of traveling and teaching mankind his newfound abilities, Lhranc sneaked back into Freeport through a series of sewers in search of revenge against his brother and in hopes of kidnapping Kyrenna, the source of his obsession. Waiting until Glohnor was alone, Lhranc sprang from the shadows and slew his brother. This was the act that brought about his curse.");
  }

  if($text=~/curse/i)
  {
    quest::say("As I said, Glohnor was highly favored by the Lightbringer. When the contemptible god of honor discovered what had been done, he transformed Lhranc into a deformed spectral knight and placed him in the ruined city. Lhranc then used what remained of his power to summon Kyrenna to his side and bind her there in a timeless, seamless sphere. He struggled for centuries to break her will and convince her to serve Innoruuk, certain that together they could remove his curse. But then, there was the prediction.");
  }

  if($text=~/secret plan/i)
  {
    quest::say("The plan is a last resort only to be tried if Kyrenna indeed escapes and the remains are discovered. Judging by my brother's words that time is now. It will take the most powerful hero all the courage and dedication he can muster to complete the ritual.");
  }

  if($text=~/I will complete the ritual/i)
  {
    quest::say("It would seem we have no choice, and this is our only hope. I must first make a dark shroud. To do this I must stain it with the blood of an innocent. Go find me this rare blood so I can start the creating of the shroud.");
  }

}

sub EVENT_ITEM
{
  if($itemcount{14376} == 1)
  {
    quest::emote("reads the note, eyes widening in panic. He raises his eyes to you and says,");
    quest::say("This is grave news, friend. If the prophecy is allowed to be fulfilled, our strength will vanish into obscurity. Goodness and purity will spread like a plague across the land and the servants of Hate will be powerless to stop it!");
    quest::ding();
  }

  if($itemcount{14381} == 1)
  {
    quest::say("Here, you take this shroud. You must now find the spirit of glohnor and place this item on him. This should force him back into his mummified body and then you must destroy this newly raised form and return to me its wrappings.");
    quest::summonitem("14377");
    quest::ding();
  }

  if($itemcount{14379} == 1)
  {
    quest::say("You've done it! Your efforts will stand as a tribute to our kind for time eternal, my friend. Although nothing could possibly serve as a just reward for your accomplishments, please accept this as well as my eternal gratitude. It has been fashioned from the wraps of the mummy and shall protect you well.");
    quest::summonitem("14370");
    quest::ding();
  }
}

[FaerinTelDanor]

://EQEMU/Quests/neriaka/smaka.pl

############################################
# Developer: Faerin
# Modified: July 28, 2005
# Database: PEQ-Kunark
############################################
# *** NPC INFORMATION ***
#
# NAME: smaka
# ID: 40034
# Class: Shopkeeper
# Level: 40
# Zone: neriaka
############################################
# *** Quest Info ***
# Class: ShadowKnight
# Level Range: 50-60
# Quest Name: SK Epic
############################################
# *** Items Needed ***
#
# 1) 1000 Platinum
############################################
# *** Rewards **
#
# 1) #14365 - Cough Elixir
############################################ 
sub EVENT_SAY
{
  if($text=~/Hail/i)
  {
    quest::say("You want stuff? Or mebby you looks for a cure?");
  }

  if($text=~/cough elixer/i)
  {
    quest::say("Ahh, you want me cure?! It cost lots of money, big big secret it is. Only us ogres know how to make. You wants? Only 1000 platinum! Make you feels bedder in no times!");
  }
}

sub EVENT_ITEM
{
  if ($platinum == 1000)
  {
    quest::say("Okay, enjoy me drink!");
    quest::summonitem("14365");
    quest::ding();
    quest::faction(69,30);
    quest::faction(87,30);
    quest::faction(88,30);
  }
}