diff options
Diffstat (limited to 'world/map/npc/027-2/headless_man.txt')
-rw-r--r-- | world/map/npc/027-2/headless_man.txt | 45 |
1 files changed, 18 insertions, 27 deletions
diff --git a/world/map/npc/027-2/headless_man.txt b/world/map/npc/027-2/headless_man.txt index 94188f5b..4f630d0d 100644 --- a/world/map/npc/027-2/headless_man.txt +++ b/world/map/npc/027-2/headless_man.txt @@ -36,7 +36,8 @@ mes "You jump back a bit, startled, as the head starts talking to you!"; mes "It's a little strange watching him talk, but it's better than looking at what's left of his neck."; next; - if (baselevel < 85) goto L_greet; + if (baselevel < 85) + goto L_greet; mes "[Headless Man]"; mes "\"Hello " + @madamsir$ + ". My name is Thurstan. Could I ask your assistance with something? I seem to be in a spot of difficulty.\""; menu @@ -44,13 +45,11 @@ "Ack, a bloody talking head! Gross, no way!", L_Quest_close; L_greet: - mes "[Headless Man]"; mes "\"Greetings " + @madamsir$ + "! Do you have any duck tape?\""; close; L_Quest_ask: - mes "[Thurstan]"; mes "\"A little while ago there was a patron visiting the inn...I can't remember his name now. He noticed this predicament I am in and offered to help me. He told me that he was an alchemist and that he had a recipe for an adhesive that would keep my head where it's supposed to be. Unfortunately, he wasn't able to stay long enough to gather all the ingredients for the spell, so he gave me the recipe instead. However, it's rather hard to gather things when I have to carry it around all day.\""; next; @@ -61,11 +60,9 @@ L_Quest_ask: "Sorry, I'm kinda busy with, you know, living.", L_Quest_no; L_Quest_close: - close; L_Quest_start: - mes "[Thurstan]"; mes "\"Great! I will need the following things.\""; mes "\"" + @Wisp_Powder + " Wisp Powder,\""; @@ -88,13 +85,11 @@ L_Quest_start: close; L_Quest_no: - mes "[Thurstan]"; mes "\"Very well. Just don't come looking to me when your own head falls off!\""; close; L_Quest_progress: - mes "[Thurstan]"; mes "Have you managed to find those items yet?\""; menu @@ -103,16 +98,16 @@ L_Quest_progress: "No, I'm still working on it.", L_Quest_close; L_Quest_check: - - if (countitem("WispPowder") < @Wisp_Powder || - countitem("PoltergeistPowder") < @Polt_Powder || - countitem("SpectrePowder") < @Spec_Powder || - countitem("IronPotion") < @Iron_Pot || - countitem("ConcentrationPotion") < @Conc_Pot || - countitem("RedDye") < @Red_Dye || - countitem("YellowDye") < @Yellow_Dye || - countitem("LightBlueDye") < @LB_Dye || - countitem("InfantryHelmet") < 1) goto L_Quest_notenough; + if (countitem("WispPowder") < @Wisp_Powder + || countitem("PoltergeistPowder") < @Polt_Powder + || countitem("SpectrePowder") < @Spec_Powder + || countitem("IronPotion") < @Iron_Pot + || countitem("ConcentrationPotion") < @Conc_Pot + || countitem("RedDye") < @Red_Dye + || countitem("YellowDye") < @Yellow_Dye + || countitem("LightBlueDye") < @LB_Dye + || countitem("InfantryHelmet") < 1) + goto L_Quest_notenough; delitem "WispPowder", @Wisp_Powder; delitem "PoltergeistPowder", @Polt_Powder; @@ -150,14 +145,12 @@ L_Quest_check: close; L_Quest_notenough: - mes "Thurstan quickly looks through the items you've brought."; mes "[Thurstan]"; mes "\"It seems you are missing a few things. Please come back once you have everything on the list.\""; close; L_Quest_items: - mes "[Thurstan]"; mes "\"" + @Wisp_Powder + " Wisp Powder,\""; mes "\"" + @Polt_Powder + " Poltergeist Powder,\""; @@ -171,7 +164,6 @@ L_Quest_items: close; L_Quest_finished: - mes "[Thurstan]"; mes "\"Thank you for all your help.\""; next; @@ -179,7 +171,8 @@ L_Quest_finished: mes "\"It worked well and the bond seemed to be holding for a while. Then I started feeling a strange tingling in my neck. I suppose that was the adhesive starting to dissolve. I was leaned over my trunk digging around for something appropriate to give you..Aaaand once again my head left it's proper place.\""; next; getinventorylist; - if (@inventorylist_count == 100) goto L_Full_Inv; + if (@inventorylist_count == 100) + goto L_Full_Inv; mes "[Thurstan]"; mes "\"Please take this for your efforts. I got it in payment of some work I did protecting the pinkie population from a terrible scourge some time ago.\""; getitem "pinkiehelmet", 1; @@ -193,16 +186,14 @@ L_Full_Inv: close; L_Final: - mes "[Thurstan]"; mes "\"I guess I will need to find another way to re-attach my cranium. If you come across any good alchemists who might be able to help, please let me know.\""; close; S_Update_Mask: - - set QUEST_Graveyard_Inn, - (QUEST_Graveyard_Inn & ~(@Graveyard_Inn_MASK)) - | (@state << @Graveyard_Inn_SHIFT); - return; + set QUEST_Graveyard_Inn, + (QUEST_Graveyard_Inn & ~(@Graveyard_Inn_MASK)) + | (@state << @Graveyard_Inn_SHIFT); + return; } |