EQEmulator Forums

EQEmulator Forums (https://www.eqemulator.org/forums/index.php)
-   Quests::Custom (https://www.eqemulator.org/forums/forumdisplay.php?f=671)
-   -   Custom Quest Help (https://www.eqemulator.org/forums/showthread.php?t=42956)

indigo_hermit 05-24-2020 09:38 PM

Custom Quest Help
 
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.

Code:

#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);
}


indigo_hermit 05-24-2020 09:41 PM

I guess I should elaborate. I can hail the NPC, all the links work. Just the turn ins don't. They hand the items back.

indigo_hermit 05-26-2020 03:03 PM

Ah, I figured it out. Sorry for the trouble.


All times are GMT -4. The time now is 06:21 PM.

Powered by vBulletin®, Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.