MQEmulator.net • -

Karam_Dragonforge.pl - Quest File

General Info

Quest File

# items: 14707, 14703, 9240, 11603, 11622, 14402, 1000, 11623
sub EVENT_SAY {
  if($text=~/hail/i){
   quest::say("Welcome. I have a number of platemail items, if you are interested. I am also a master [smith] of exotic materials such as dragon scales.");
  }
  if($text=~/smith/i){
   quest::say("Dragon scales make terrific armor. I can make a [white dragonscale cloak] and [red dragonscale armor]. I have not seen any other colored dragon variants around. But if you see any, be sure to let me know. I would be interested in what can be made from their scales.");
  }
  if($text=~/white dragonscale cloak/i){
   #White Dragonscale Cloak (START)
   quest::say("Hrmmm. A white dragonscale cloak eh? Hrmmm. Well, I will make you a deal. You can save me some footwork and I will craft your cloak. I want to propose to my [fiancee] but I have neither a [wedding ring] nor a [present] for her. So, return with a white dragon hide, a wedding ring, and a present for my fiancee, and I will fashion your cloak for you.");
  }
  if($text=~/fiancee/i){
   #White Dragonscale Cloak 
   quest::say("My fiancee...AHHHH.... The love of my life. My purpose for existing. She is a real woman. Long, golden blonde hair with a similarly colored full beard. A stout broad she is, kind and warm at heart. She knows every nook of my essence. But do not let that fool you. She is as strong as many dwarven men. Between you and me, she has even beaten me once or twice arm-wrestling over who gets the last ale and who has to go to the market.");
  }
  if($text=~/wedding ring/i){
   #White Dragonscale Cloak 
   quest::say("Only the best will do. I will not propose to her with anything less than a platinum and diamond wedding ring.");
  }
  if($text=~/present/i){
   #White Dragonscale Cloak 
   quest::say("Well, she is quite fond of jewelry. And a black sapphire platinum necklace would complement her eyes and beard so exquisitely.");
  }
  if($text=~/red dragonscale armor/i){
   #Red Dragonscale Armor (START)
   quest::say("So you have a red dragon scale, eh? Well, I am wanting very much to return to my fiancee and propose to her. If you could aid me in quickly returning to her with a bit of spare change, we could have a deal. Heck, for the armor, a vial of swirling smoke and 1000 platinum coins is a bargain!");
  }
}

sub EVENT_ITEM {
  #Handin:
  if(plugin::check_handin(\%itemcount, 14707 => 1, 14703 => 1, 9240 => 1)){
   #White Dragonscale Cloak (END) 
   quest::say("My fiancee will be so excited! An exquisite ring for the wedding and a gorgeous necklace as my wedding gift to her. Well, as promised, here is your white dragonscale cloak.");
   #Summon: White Dragonscale Cloak
   quest::summonitem(11603); # Item: White Dragonscale Cloak
  }
  #Handin:
  if (plugin::check_handin(\%itemcount, 11622 => 1, 14402 => 1) && ($platinum >= 1000)) {
   #Red Dragonscale Armor (END) 
   quest::say("Wonderful! Now I can get back to my fiance instantly! Isn't Love grand? As for your Red Dragonscale Armor, it is all done. Farewell!");
   #Summon: Red Dragonscale Armor 
   quest::summonitem(11623); # Item: Red Dragonscale Armor
  }
  plugin::return_items(\%itemcount);
}

# Red Dragonscale Armor by mystic414
#END of FILE : Zone : rathemtn : NPC_ID : 50119 : Karam Dragonforge

Source: 17 Jan 2022
Quest Source: 28 May 2022