indigo_hermit
05-24-2020, 09:38 PM
Hi all, as I was working on this quest file I would test it along the way. It worked at first. So I kept going and stopped testing as I was basically repeating the same lines. Now I'm done and its no longer working. So any help going over this would be great.
#Quest file for Tutorialb - Karissah
sub EVENT_SAY {
my $armor = quest::saylink("armor", 1);
my $materials = quest::saylink("materials", 1);
my $pattern = quest::saylink("pattern", 1);
my $crafting_piece = quest::saylink("crafting piece", 1);
my $ring = quest::saylink("ring", 1);
my $necklace = quest::saylink("necklace", 1);
my $upgrades = quest::saylink("upgrades", 1);
my $other_trinkets = quest::saylink("other trinkets", 1);
my $belts = quest::saylink("belts", 1);
my $cloaks = quest::saylink("cloaks", 1);
my $shoulder_items = quest::saylink("shoulder items", 1);
my $backpacks = quest::saylink("backpacks", 1);
if($text=~/hail/i) {
plugin::Whisper("Hail $name. I am a Grandmaster Crafter come all the way from Rivervale to help outfit the escaping prisoners. I can craft you $armor, a $ring, a $necklace, a few $other_trinkets and $backpacks. Are you wanting to know about $upgrades?");
}
elsif($text=~/armor/i) {
plugin::Whisper("I can make you armor provided you have the proper $materials for me.");
}
elsif($text=~/materials/i) {
plugin::Whisper(" Bring me an armor $pattern and the $crafting_piece.");
}
elsif($text=~/pattern/i) {
plugin::Whisper("Indeed, In fact I happen to sell them. My patterns are all-purpose so I can use them for any armor type.");
}
elsif($text=~/crafting piece/i) {
plugin::Whisper("Yes, I will need a chunk of iron for plate, a tattered animal pelt for leather, a chunk of bronze for chain and a coarse silk for cloth. Hand me the pattern you need along with the correct material and I will craft you some armor that will last you awhile!");
}
elsif($text=~/ring/i) {
plugin::Whisper("Yes, I also tinker with crafting rings for attack. For the ring of attack, bring me 1 chunk of iron and 1 whip from a kobold. And if I am not mistaken, Flutterwings gift for its quest is a very nice ring of defense.");
}
elsif($text=~/necklace/i) {
plugin::Whisper("Ah. feeling a bit slow are ya? Bring me 1 scroll of spirit of wolf and 1 coarse silk and I will craft ya a necklace that will help you on your journey. The spell can be bought from the merchants here.");
}
elsif($text=~/other trinkets/i) {
plugin::Whisper("Other trinkets? What are you.... Ohhh.. yea.. almost forgot about those, hahah. Yea, I can craft $belts, $cloaks and $shoulder_items as well.");
}
elsif($text=~/belts/i) {
plugin::Whisper("I can craft 2 types of belts. For the combat type bring me 1 kobold leather belt and 1 chunk of iron. For the caster type bring me 1 kobold leather belt and 1 coarse silk.");
}
elsif($text=~/cloaks/i) {
plugin::Whisper("For the cloaks, I also have the same two types. For the combat cloak bring me 1 tattered animal pelt and 1 coarse silk. For the caster cloak bring me 1 gloomingdeep silk and 1 coarse silk.");
}
elsif($text=~/shoulder items/i) {
plugin::Whisper("Ah yes, the shoulder items, combat mantle needs 1 rough silk and 1 ruined animal pelt. The caster shoulder item requires 1 rough silk and 1 coarse silk.");
}
elsif($text=~/backpacks/i) {
plugin::Whisper("Yes, I can craft you some backpacks. Think of them as knock-off versions of the Leatherfoot Haversacks. With the materials in here it is the best I can possibly do. Bring me 1 mangled animal pelt, 1 tacky silk and 1 tailored backpack pattern for EACH backpack you want. I sell the backpack pattern along with my others.");
}
elsif($text=~/upgrades/i) {
plugin::Whisper("After you leave here and get some levels under your belt, seek out my twin sister Marissa in Plane of Knowledge for upgrades to your equipment that I have made for you, she is even better at this than I am!");
}
}
sub EVENT_ITEM {
%ItemDB = (
1449 => { "ReqItem1" => 59954, "ReqItem2" => 13812}, #Plate Boots
1458 => { "ReqItem1" => 59954, "ReqItem2" => 13808}, #Plate Arms
1447 => { "ReqItem1" => 59954, "ReqItem2" => 13809}, #Plate Wrist
1448 => { "ReqItem1" => 59954, "ReqItem2" => 13810}, #Plate Hands
1450 => { "ReqItem1" => 59954, "ReqItem2" => 13801}, #Plate Head
1502 => { "ReqItem1" => 59954, "ReqItem2" => 13811}, #Plate Legs
1503 => { "ReqItem1" => 59954, "ReqItem2" => 13804}, #Plate Chest
1587 => { "ReqItem1" => 34226, "ReqItem2" => 13812}, #Leather boots
1592 => { "ReqItem1" => 34226, "ReqItem2" => 13808}, #Leather arms
1582 => { "ReqItem1" => 34226, "ReqItem2" => 13809}, #Leather wrists
1586 => { "ReqItem1" => 34226, "ReqItem2" => 13810}, #Leather hands
1591 => { "ReqItem1" => 34226, "ReqItem2" => 13801}, #Leather head
1654 => { "ReqItem1" => 34226, "ReqItem2" => 13811}, #Leather legs
1655 => { "ReqItem1" => 34226, "ReqItem2" => 13804}, #Leather Chest
1568 => { "ReqItem1" => 54229, "ReqItem2" => 13812}, #chain boots
1577 => { "ReqItem1" => 54229, "ReqItem2" => 13808}, #chain arms
1533 => { "ReqItem1" => 54229, "ReqItem2" => 13809}, #chain wrists
1563 => { "ReqItem1" => 54229, "ReqItem2" => 13810}, #chain hands
1569 => { "ReqItem1" => 54229, "ReqItem2" => 13801}, #chain head
1579 => { "ReqItem1" => 54229, "ReqItem2" => 13811}, #chain legs
1581 => { "ReqItem1" => 54229, "ReqItem2" => 13804}, #chain Chest
1658 => { "ReqItem1" => 34211, "ReqItem2" => 13812}, #silk boots
1660 => { "ReqItem1" => 34211, "ReqItem2" => 13808}, #silk arms
1656 => { "ReqItem1" => 34211, "ReqItem2" => 13809}, #silk wrists
1657 => { "ReqItem1" => 34211, "ReqItem2" => 13810}, #silk hands
1659 => { "ReqItem1" => 34211, "ReqItem2" => 13801}, #silk head
1661 => { "ReqItem1" => 34211, "ReqItem2" => 13811}, #silk legs
1662 => { "ReqItem1" => 34211, "ReqItem2" => 13804}, #silk Chest
1663 => { "ReqItem1" => 59954, "ReqItem2" => 82962}, #Ring of Attack
59944 => { "ReqItem1" => 34211, "ReqItem2" => 15278}, #Travel Necklace
1811 => { "ReqItem1" => 59945, "ReqItem2" => 59954}, #combat belt
1812 => { "ReqItem1" => 59945, "ReqItem2" => 34211}, #caster belt
1813 => { "ReqItem1" => 54234, "ReqItem2" => 34211}, #caster cloak
1817 => { "ReqItem1" => 34212, "ReqItem2" => 34211}, #caster shoulder
1818 => { "ReqItem1" => 34226, "ReqItem2" => 34211}, #combat cloak
1819 => { "ReqItem1" => 34212, "ReqItem2" => 34224}, #combat shoulder
1848 => { "ReqItem1" => 34225, "ReqItem2" => 34213, "ReqItem3" => 124627}, #KO Backpacks
);
foreach $id (sort keys %ItemDB)
{
if(plugin::check_handin(\%itemcount, $ItemDB{$id}{"ReqItem1"} => 1, $ItemDB{$id}{"ReqItem2"} => 1, $ItemDB{$id} {"ReqItem3"} => 1)) {
quest::summonitem($id);
}
}
plugin::return_items(\%itemcount);
}
#Quest file for Tutorialb - Karissah
sub EVENT_SAY {
my $armor = quest::saylink("armor", 1);
my $materials = quest::saylink("materials", 1);
my $pattern = quest::saylink("pattern", 1);
my $crafting_piece = quest::saylink("crafting piece", 1);
my $ring = quest::saylink("ring", 1);
my $necklace = quest::saylink("necklace", 1);
my $upgrades = quest::saylink("upgrades", 1);
my $other_trinkets = quest::saylink("other trinkets", 1);
my $belts = quest::saylink("belts", 1);
my $cloaks = quest::saylink("cloaks", 1);
my $shoulder_items = quest::saylink("shoulder items", 1);
my $backpacks = quest::saylink("backpacks", 1);
if($text=~/hail/i) {
plugin::Whisper("Hail $name. I am a Grandmaster Crafter come all the way from Rivervale to help outfit the escaping prisoners. I can craft you $armor, a $ring, a $necklace, a few $other_trinkets and $backpacks. Are you wanting to know about $upgrades?");
}
elsif($text=~/armor/i) {
plugin::Whisper("I can make you armor provided you have the proper $materials for me.");
}
elsif($text=~/materials/i) {
plugin::Whisper(" Bring me an armor $pattern and the $crafting_piece.");
}
elsif($text=~/pattern/i) {
plugin::Whisper("Indeed, In fact I happen to sell them. My patterns are all-purpose so I can use them for any armor type.");
}
elsif($text=~/crafting piece/i) {
plugin::Whisper("Yes, I will need a chunk of iron for plate, a tattered animal pelt for leather, a chunk of bronze for chain and a coarse silk for cloth. Hand me the pattern you need along with the correct material and I will craft you some armor that will last you awhile!");
}
elsif($text=~/ring/i) {
plugin::Whisper("Yes, I also tinker with crafting rings for attack. For the ring of attack, bring me 1 chunk of iron and 1 whip from a kobold. And if I am not mistaken, Flutterwings gift for its quest is a very nice ring of defense.");
}
elsif($text=~/necklace/i) {
plugin::Whisper("Ah. feeling a bit slow are ya? Bring me 1 scroll of spirit of wolf and 1 coarse silk and I will craft ya a necklace that will help you on your journey. The spell can be bought from the merchants here.");
}
elsif($text=~/other trinkets/i) {
plugin::Whisper("Other trinkets? What are you.... Ohhh.. yea.. almost forgot about those, hahah. Yea, I can craft $belts, $cloaks and $shoulder_items as well.");
}
elsif($text=~/belts/i) {
plugin::Whisper("I can craft 2 types of belts. For the combat type bring me 1 kobold leather belt and 1 chunk of iron. For the caster type bring me 1 kobold leather belt and 1 coarse silk.");
}
elsif($text=~/cloaks/i) {
plugin::Whisper("For the cloaks, I also have the same two types. For the combat cloak bring me 1 tattered animal pelt and 1 coarse silk. For the caster cloak bring me 1 gloomingdeep silk and 1 coarse silk.");
}
elsif($text=~/shoulder items/i) {
plugin::Whisper("Ah yes, the shoulder items, combat mantle needs 1 rough silk and 1 ruined animal pelt. The caster shoulder item requires 1 rough silk and 1 coarse silk.");
}
elsif($text=~/backpacks/i) {
plugin::Whisper("Yes, I can craft you some backpacks. Think of them as knock-off versions of the Leatherfoot Haversacks. With the materials in here it is the best I can possibly do. Bring me 1 mangled animal pelt, 1 tacky silk and 1 tailored backpack pattern for EACH backpack you want. I sell the backpack pattern along with my others.");
}
elsif($text=~/upgrades/i) {
plugin::Whisper("After you leave here and get some levels under your belt, seek out my twin sister Marissa in Plane of Knowledge for upgrades to your equipment that I have made for you, she is even better at this than I am!");
}
}
sub EVENT_ITEM {
%ItemDB = (
1449 => { "ReqItem1" => 59954, "ReqItem2" => 13812}, #Plate Boots
1458 => { "ReqItem1" => 59954, "ReqItem2" => 13808}, #Plate Arms
1447 => { "ReqItem1" => 59954, "ReqItem2" => 13809}, #Plate Wrist
1448 => { "ReqItem1" => 59954, "ReqItem2" => 13810}, #Plate Hands
1450 => { "ReqItem1" => 59954, "ReqItem2" => 13801}, #Plate Head
1502 => { "ReqItem1" => 59954, "ReqItem2" => 13811}, #Plate Legs
1503 => { "ReqItem1" => 59954, "ReqItem2" => 13804}, #Plate Chest
1587 => { "ReqItem1" => 34226, "ReqItem2" => 13812}, #Leather boots
1592 => { "ReqItem1" => 34226, "ReqItem2" => 13808}, #Leather arms
1582 => { "ReqItem1" => 34226, "ReqItem2" => 13809}, #Leather wrists
1586 => { "ReqItem1" => 34226, "ReqItem2" => 13810}, #Leather hands
1591 => { "ReqItem1" => 34226, "ReqItem2" => 13801}, #Leather head
1654 => { "ReqItem1" => 34226, "ReqItem2" => 13811}, #Leather legs
1655 => { "ReqItem1" => 34226, "ReqItem2" => 13804}, #Leather Chest
1568 => { "ReqItem1" => 54229, "ReqItem2" => 13812}, #chain boots
1577 => { "ReqItem1" => 54229, "ReqItem2" => 13808}, #chain arms
1533 => { "ReqItem1" => 54229, "ReqItem2" => 13809}, #chain wrists
1563 => { "ReqItem1" => 54229, "ReqItem2" => 13810}, #chain hands
1569 => { "ReqItem1" => 54229, "ReqItem2" => 13801}, #chain head
1579 => { "ReqItem1" => 54229, "ReqItem2" => 13811}, #chain legs
1581 => { "ReqItem1" => 54229, "ReqItem2" => 13804}, #chain Chest
1658 => { "ReqItem1" => 34211, "ReqItem2" => 13812}, #silk boots
1660 => { "ReqItem1" => 34211, "ReqItem2" => 13808}, #silk arms
1656 => { "ReqItem1" => 34211, "ReqItem2" => 13809}, #silk wrists
1657 => { "ReqItem1" => 34211, "ReqItem2" => 13810}, #silk hands
1659 => { "ReqItem1" => 34211, "ReqItem2" => 13801}, #silk head
1661 => { "ReqItem1" => 34211, "ReqItem2" => 13811}, #silk legs
1662 => { "ReqItem1" => 34211, "ReqItem2" => 13804}, #silk Chest
1663 => { "ReqItem1" => 59954, "ReqItem2" => 82962}, #Ring of Attack
59944 => { "ReqItem1" => 34211, "ReqItem2" => 15278}, #Travel Necklace
1811 => { "ReqItem1" => 59945, "ReqItem2" => 59954}, #combat belt
1812 => { "ReqItem1" => 59945, "ReqItem2" => 34211}, #caster belt
1813 => { "ReqItem1" => 54234, "ReqItem2" => 34211}, #caster cloak
1817 => { "ReqItem1" => 34212, "ReqItem2" => 34211}, #caster shoulder
1818 => { "ReqItem1" => 34226, "ReqItem2" => 34211}, #combat cloak
1819 => { "ReqItem1" => 34212, "ReqItem2" => 34224}, #combat shoulder
1848 => { "ReqItem1" => 34225, "ReqItem2" => 34213, "ReqItem3" => 124627}, #KO Backpacks
);
foreach $id (sort keys %ItemDB)
{
if(plugin::check_handin(\%itemcount, $ItemDB{$id}{"ReqItem1"} => 1, $ItemDB{$id}{"ReqItem2"} => 1, $ItemDB{$id} {"ReqItem3"} => 1)) {
quest::summonitem($id);
}
}
plugin::return_items(\%itemcount);
}