diff options
Diffstat (limited to 'npc/031-4/cindyCave.txt')
| -rw-r--r-- | npc/031-4/cindyCave.txt | 234 |
1 files changed, 234 insertions, 0 deletions
diff --git a/npc/031-4/cindyCave.txt b/npc/031-4/cindyCave.txt new file mode 100644 index 00000000..284a58f8 --- /dev/null +++ b/npc/031-4/cindyCave.txt @@ -0,0 +1,234 @@ + +031-4,42,42,0 script Cindy NPC198,{ + .@q = getq(KaizeiQuest_Cindy); + if ($@FIGHT_YETI_STATUS != 0) goto L_Yeti; + + if (.@q > 4) goto L_Please_Visit; + if (.@q == 3) goto L_Reward; + if (.@q == 2) goto L_Please_Help; + + mes "There is a little girl in a cage. As you come near, she starts to shiver and back off from you as far as she can in that small cage."; + next; + mes "You don't know what to do."; + goto L_close; + +L_Please_Help: + mes "There is a little girl in a cage. As you come near, she starts to shiver and back off from you as far as she can in that small cage."; + next; + menu + "Hello Cindy, I'm here to save you.", L_Next; + +L_Next: + mes "Cindy doesn't look so scared anymore."; + next; + mesn; + mes "\"Hello, adventurer. Did my mother send you?\""; + next; + mes "\"It's so cold in here! Can you please open the cage?\""; + next; + mes "\"But be careful. If the Yetis hear you, they will come!\""; + menu + "Try to open the cage", L_Try_Cage, + "Leave", L_close; + +L_Try_Cage: + if (BaseLevel < .minLevel) + goto L_To_Weak; + if (countitem(TreasureKey) < .KEYS_AMOUNT) + goto L_Not_Enough_Keys; + delitem TreasureKey, .KEYS_AMOUNT; + mes "As you try to open the door of the cage, there is a loud squeaking noise."; + next; + mes "You get an uncomfortable feeling and Cindy starts to shiver."; + if ($@FIGHT_YETI_STATUS != 0) + goto L_Yeti; + npctalk strnpcinfo(0), "Oh no, the Yetis..."; + + // initialize fight + $@FIGHT_YETI_STATUS = 1; + $@FIGHT_YETI_WAVE = 0; + $@YETI_COUNT = 1; + $@FIGHT_YETI_PLAYER_COUNT = getmapusers("031-4"); + areamonster "031-4", 0, 0, 95, 91, "Yeti", Yeti, 1, "Cindy::OnPetDeath"; + + initnpctimer; + goto L_close; + +L_Yeti: + mesn; + mes "\"Watch out, the Yetis!\""; + goto L_close; + +L_Reward: + mesn; + mes "\"You are a hero! All these strong monsters!\""; + next; + mes "\"I've found this thing in the cave - it looks valuable. I want you to have it.\""; + next; + getinventorylist; + if (@inventorylist_count == 100) + goto L_Full_Inv; + + .@reward = rand2(15); + if (.@reward < 10) + goto L_Wizard_Hat; + getitem WoodenStaff, 1; + setq(KaizeiQuest_Cindy, 4); + goto L_Visit; + +L_Wizard_Hat: + // get a wizard hat in one of the ten colors - no white + getitem any(2200, 2201, 2202, 2203, 2204, 2205, 2206, 2207, 2208, 2209), 1; + setq(KaizeiQuest_Cindy, 4); + goto L_Visit; + +L_Visit: + mes "\"Thank you so much; please come to my home. It's the house at the beach.\""; + next; + mes "\"I'm sure my mother wants to thank you as well.\""; + goto L_close; + +L_Please_Visit: + mesn; + mes "\"Thank you, thank you! You're a hero! Please come home with me to our house at the beach!\""; + next; + mesc l("You can relive the memories for %d %s, however, the rewards cannot be obtained again.", .KEYS_AMOUNT*2, getitemlink(TreasureKey)); + if (countitem(TreasureKey) < .KEYS_AMOUNT*2) + goto L_close; + mesc l("Do you want to?"); + next; + if (askyesno() == ASK_YES && + !$@FIGHT_YETI_STATUS && + BaseLevel >= .minLevel) + { + delitem TreasureKey, .KEYS_AMOUNT; + goto L_Try_Cage; + } + goto L_close; + +L_To_Weak: + mes "You try to open the cage, but it's stuck. It seems you're too weak!"; + goto L_close; + +L_Not_Enough_Keys: + mes "You don't have enough keys to open the cage."; + goto L_close; + +L_Full_Inv: + mes "\"Oh, it seems you carry so much stuff - I will keep it for you until you can take it.\""; + goto L_close; + +L_close: + @inventorylist_count = 0; + close; + +OnTimer5000: + setnpctimer 0; + if ($@FIGHT_YETI_STATUS != 0) + goto L_CaveLogic; + goto L_Return_1; + +L_Return_1: + $@FIGHT_YETI_PLAYER_COUNT = 0; + maptimer2 "031-4", 10, "Cindy::OnTick"; + end; + +L_CaveLogic: + $@FIGHT_YETI_ROUND_PEN = $@FIGHT_YETI_PLAYER_COUNT; + if ($@FIGHT_YETI_ROUND_PEN > 60) + $@FIGHT_YETI_ROUND_PEN = 60; + if ($@FIGHT_YETI_PLAYER_COUNT <= 0) + goto L_CleanUp; + set $@FIGHT_YETI_ROUND_TIMER, $@FIGHT_YETI_ROUND_TIMER + 5; // Advance 5 seconds + if (mobcount("031-4", "Cindy::OnPetDeath") <= 0) + goto L_NextWave; + if ($@FIGHT_YETI_ROUND_TIMER + $@FIGHT_YETI_ROUND_PEN >= 120) + goto L_NextWave; + goto L_Return_1; + +L_NextWave: + $@FIGHT_YETI_ROUND_TIMER = 0; + $@FIGHT_YETI_WAVE = $@FIGHT_YETI_WAVE + 1; + if ($@FIGHT_YETI_WAVE > 10 + && $@YETI_COUNT == 0) + goto L_CleanUp; + if ($@FIGHT_YETI_WAVE > 10 + && $@FIGHT_YETI_WAVE < 22) + goto L_Return_1; + if ($@FIGHT_YETI_WAVE > 22) + areamonster "031-4", 0, 0, 95, 91, "Yeti", Yeti, $@FIGHT_YETI_WAVE*2 + $@FIGHT_YETI_PLAYER_COUNT*5, "Cindy::OnPetDeath"; + if ($@FIGHT_YETI_WAVE > 22) + $@YETI_COUNT = $@YETI_COUNT + $@FIGHT_YETI_WAVE*2 + $@FIGHT_YETI_PLAYER_COUNT*5; + $@FIGHT_YETI_NUMBER = (5 + (1 * $@FIGHT_YETI_WAVE) + (2 * $@FIGHT_YETI_PLAYER_COUNT))/4; + $@YETI_COUNT = $@YETI_COUNT + $@FIGHT_YETI_NUMBER; + + areamonster "031-4", 0, 0, 95, 91, "Yeti", Yeti, $@FIGHT_YETI_NUMBER, "Cindy::OnPetDeath"; + + $@msg$ = $@FIGHT_YETI_MESSAGES$[$@FIGHT_YETI_WAVE]; + if ($@msg$ == "") + goto L_Return_1; + mapannounce "031-4", $@msg$, 0; + mapannounce "031-3", $@msg$, 0; + $@msg$ = ""; + goto L_Return_1; + +OnTick: + if (ispcdead()) end; + $@FIGHT_YETI_PLAYER_COUNT = $@FIGHT_YETI_PLAYER_COUNT + 1; + end; + +OnPetDeath: + $@YETI_COUNT = $@YETI_COUNT - 1; + end; + +L_CleanUp: + maptimer2 "031-4", 10, "Cindy::OnReward"; + $@FIGHT_YETI_STATUS = 0; + $@FIGHT_YETI_PLAYER_COUNT = 0; + $@FIGHT_YETI_WAVE = 0; + $@FIGHT_YETI_ROUND_TIMER = 0; + $@YETI_COUNT = 0; + $@FIGHT_YETI_ROUND_PEN = 0; + $@FIGHT_YETI_NUMBER = 0; + killmonster "031-4", "Cindy::OnPetDeath"; + stopnpctimer; + setnpctimer 0; + end; + +OnReward: + if (ispcdead()) end; + @bonus = (BaseLevel/2); + DailyQuestBonus = DailyQuestBonus + @bonus; + message strcharinfo(0), "You feel a temporary rush of power and zest for action. " + @bonus + " daily bonus gained." ; + if (getq(KaizeiQuest_Cindy) != 2) + goto L_End; + setq(KaizeiQuest_Cindy, 3); + message strcharinfo(0), "Cindy looks relieved and as if she wants to talk with you."; + BOSS_POINTS = BOSS_POINTS + 70; + message strcharinfo(0), "You gain 70 Boss Points giving you a total of " + BOSS_POINTS + "."; + goto L_End; + +L_End: + @bonus = 0; + end; + +OnInit: + setarray $@FIGHT_YETI_MESSAGES$[0], + "", // unused + // " : " is magic so that it says "global announcement from" + "Cindy : Yetis!", + "Cindy : Watch out!", + "Cindy : More of them are coming!", + "Cindy : Be careful! More of them!", + "Cindy : Attention! There is another bunch of them!", + "Cindy : Hang on! More of them!", + "Cindy : More Yetis! Will this never end?", + "Cindy : There are coming more and more!", + "Cindy : Watch your back! There are so many of them!", + "Cindy : This seems to be their final attack! I believe in you!"; + + .KEYS_AMOUNT = 10; + .minLevel = 70; + .distance = 5; + end; +} |