diff options
-rw-r--r-- | npc/00000SAVE/020-1_well.txt | 83 |
1 files changed, 0 insertions, 83 deletions
diff --git a/npc/00000SAVE/020-1_well.txt b/npc/00000SAVE/020-1_well.txt deleted file mode 100644 index aba0e39b8..000000000 --- a/npc/00000SAVE/020-1_well.txt +++ /dev/null @@ -1,83 +0,0 @@ -// Better to skip this quest. It is too poor and would require more work, -// eg. rope and something to make the player take part on it... Probably? -// TODO: We could also throw random stuff (dig script), and use makeitem() to -// make it pop at Terranite Cave, near the lake, suggesting that's where the water -// comes from. - -020-1,99,83,0 script #Well NPC400,{ - if(QL_WELL == 2) goto L_Finished; - - mes "..."; - menu - "Throw something in the well.", L_Throw, - "Leave it alone.", L_close; - -L_Throw: - mes "What do you want to throw?"; - - setarray @response_list$, "Yuck! Who threw that on me?", "Ouch! Who's hurting me?", "White powder!? What's going on up there?", "It's raining in Nivalis?!"; - setarray @item_list$, "MaggotSlime", "RawLog", "PileOfAsh", "BottleOfWater"; - menu - "Maggot slime", L_CheckItem, - "A raw log", L_CheckItem, - "Pile of ash", L_CheckItem, - "Bottle of water", L_CheckItem, - "Leave it alone", L_close; - -L_CheckItem: - @index = @menu - 1; - @response$ = @response_list$[@index]; - @item$ = @item_list$[@index]; - - mes @item$; - - if(countitem(@item$) == 0) - goto L_MissingItem; - delitem @item$, 1; - - if(@item$ == "BottleOfWater") - getitem "EmptyBottle", 1; - - mes "[Mysterious voice inside the well]"; - mes "\"" + @response$ + "\""; - next; - menu - "Who are you?", L_Who, - "How did you get down there?", L_How, - "Do you need help?", L_Help; - -L_Who: - @response$ = "I'll talk about who I am after leaving the well. "; - goto L_GetHelp; - -L_How: - @response$ = "Well, someone pushed me into the well, I'm not sure who. "; - goto L_GetHelp; - -L_Help: - @response$ = "I certainly can't get out on my own. "; - goto L_GetHelp; - -L_GetHelp: - mes "[Mysterious voice inside the well]"; - mes "\"" + @response$ + "So if you can get some help for me... please do so!\""; - QL_WELL = 1; - - cleararray @response_list$, "", 4; - cleararray @item_list$, "", 4; - @index = 0; - @response$ = ""; - - goto L_close; - -L_MissingItem: - mes "You can't throw an item you don't have."; - goto L_close; - -L_Finished: - mes "This is a well."; - goto L_close; - -L_close: - close; -} |