summaryrefslogtreecommitdiff
path: root/world/map/npc/xmas/2012/reinbooFlightProblems.txt
diff options
context:
space:
mode:
Diffstat (limited to 'world/map/npc/xmas/2012/reinbooFlightProblems.txt')
-rw-r--r--world/map/npc/xmas/2012/reinbooFlightProblems.txt185
1 files changed, 185 insertions, 0 deletions
diff --git a/world/map/npc/xmas/2012/reinbooFlightProblems.txt b/world/map/npc/xmas/2012/reinbooFlightProblems.txt
new file mode 100644
index 00000000..c45117b3
--- /dev/null
+++ b/world/map/npc/xmas/2012/reinbooFlightProblems.txt
@@ -0,0 +1,185 @@
+// This file is part of Christmas Event 2012
+// author: Jenalya
+
+044-1.gat,71,101,0|script|Neiremes|331,{
+ callfunc "xmas2012time";
+
+ set @reinboo, (xmas2012 & NIBBLE_0_MASK) >> NIBBLE_0_SHIFT;
+
+ if (@xmas_time == $@xmas2012_no_event_time)
+ goto L_NoEvent;
+ if (@xmas_time == $@xmas2012_reward_time)
+ goto L_RewardTime;
+
+ if (@reinboo == 14) goto L_Done;
+ if (@reinboo > 8) goto L_Training;
+ if (@reinboo == 8) goto L_Neimeres;
+ if (@reinboo > 6) goto L_Acorn;
+ if (@reinboo == 6) goto L_Hungry;
+ if (@reinboo > 1) goto L_Blanket;
+
+ mes "[Neiremes]";
+ mes "\"Hello? Please don't disturb me. I'm practicing.\"";
+ if (@reinboo == 0)
+ goto L_Close;
+ menu
+ "I'm here to help you!", -,
+ "Ok, sorry.", L_Close;
+ mes "[Neiremes]";
+ mes "\"Help me? Oh, that's kind. Now that you say it, I can smell Grombadil on you. He sent you, right? He's so friendly to me. And I fear I'll dissapoint him.\"";
+ menu
+ "I'm sure you won't. What's causing you problems?", -,
+ "Pull yourself together! What's your problem?", -;
+ mes "[Neiremes]";
+ mes "\"I... I have problems with flying. I can manage a short flight, but... well, first of all it's so terribly cold in the upper air!";
+ mes "I don't like freezing.\"";
+ menu
+ "I'll try to get something to keep you warm.", -;
+ mes "[Neiremes]";
+ mes "\"Oh, that's very kind! But... it has to be red, ok? It's Santa's color. I can't wear a different color!\"";
+ set @reinboo, 2;
+ callfunc "xmas2012update_reinboo_var";
+ goto L_Close;
+
+L_Blanket:
+ mes "[Neiremes]";
+ mes "\"Did you find something to keep me warm yet? I'm sure that'll help me to stay in the air for a longer time. And remember, I can only wear something red. Because it's Santa's color.\"";
+ if (@reinboo != 5)
+ goto L_Close;
+ menu
+ "I have a Red Saddle Rug for you!", -,
+ "Not yet.", L_Close;
+
+ if (countitem("RedSaddleRug") < 1)
+ goto L_NoItem;
+ delitem "RedSaddleRug", 1;
+ set @reinboo, 6;
+ callfunc "xmas2012update_reinboo_var";
+
+ mes "[Neiremes]";
+ mes "\"Oh, oh, oh! Amazing! It's so fluffy! And red! And warm! Thank you!\"";
+ mes "He takes the rug with his mouth and puts it on his back.";
+ next;
+ mes "[Neiremes]";
+ mes "\"Can you fasten it onto my back? Pull that strap. Yes, that's right.\"";
+ next;
+ mes "\"Oh, I'm so happy. I'm sure now I can stay in the cold air for a longer time.";
+ mes "\"Unless...";
+ menu
+ "Unless?", -,
+ "What's now the problem?", -;
+L_Hungry:
+ mes "[Neiremes]";
+ mes "\"Oh, I... I feel hungry now. It's hard to concentrate when I'm hungry. And I feel exhausted because of that. Yes. I need to eat first.\"";
+ next;
+ mes "\"Leiremes, my trainer, said it's not good to go on a long flight when you're hungry.\"";
+ menu
+ "Are you sure you aren't just afraid?", -,
+ "Ok, I'll get you something.", L_Close;
+
+ mes "[Neiremes]";
+ mes "\"Oh, don't be mean! I'm really hungry! I'm doing my best.\"";
+ goto L_Close;
+
+L_Acorn:
+ mes "[Neiremes]";
+ mes "\"That Red Saddle Rug you brought me is really nice and warm. But I can't go on a long training flight when I'm hungry. Leiremes said it's dangerous to fly when you're hungry. He's my trainer and he's very wise.\"";
+ menu
+ "I'll try to find something appropriate.", L_Close,
+ "I've got some Roasted Acorns for you.", -;
+
+ if (countitem("RoastedAcorn") < $@xmas2012_roasted_acorn_amount)
+ goto L_NoItem;
+ delitem "RoastedAcorn", $@xmas2012_roasted_acorn_amount;
+ set @reinboo, 8;
+ callfunc "xmas2012update_reinboo_var";
+
+ mes "[Neiremes]";
+ mes "\"Roasted Acorns! Yum, yum, yum. Tasty!\"";
+ mes "Neiremes munches the acorns with visible delight.";
+ next;
+ mes "[Neiremes]";
+ mes "\"Now I'm going back to training.\"";
+ next;
+L_Neimeres:
+ mes "[Neiremes]";
+ mes "\"Neimeres wanted to talk to you. I told her about the nice saddle rug you brought me and she got curious about you. She is just over there at the well.\"";
+ next;
+ mes "\"Mh... I think you have to go through that cave further downhill.\"";
+ goto L_Close;
+
+L_Training:
+ mes "[Neiremes]";
+ mes "\"I'm training. Thank you for bringing me the saddle rug and the food. I'm doing my best now.";
+ mes "... If I only wouldn't have to fly so high...\"";
+ if (@reinboo != 13)
+ goto L_Close;
+ menu
+ "I have a Flight Talisman for you!", -,
+ "You just have to train harder!", L_Close;
+ mes "[Neiremes]";
+ mes "\"Oh, exciting! What does it do? Does it help me?\"";
+ menu
+ "It'll keep you safe while you're flying.", -;
+ if (countitem("FlightTalisman") < 1)
+ goto L_NoItem;
+ delitem "FlightTalisman", 1;
+ set @reinboo, 14;
+ callfunc "xmas2012update_reinboo_var";
+ mes "You give Neiremes the talisman.";
+ mes "[Neiremes]";
+ mes "\"Oh, I already feel more safe. It's really powerful, is it? Thank you so much. I'm going to do another training flight, to test it.\"";
+ goto L_Close;
+
+L_Done:
+ mes "[Neiremes]";
+ mes "\"Hello! I just made a very long and high training flight. And I didn't feel cold and I wasn't nervous! Are you proud of me? Thank you so much for bringing this Flight Talisman.\"";
+ next;
+ mes "\"Will you come to see how I did after Christmas?\"";
+ menu
+ "Of course I will!", -,
+ "When I have the time...", L_Please;
+ mes "[Neiremes]";
+ mes "\"Yay!\"";
+ goto L_Close;
+
+L_Please:
+ mes "[Neiremes]";
+ mes "\"Oh, please come!\"";
+ goto L_Close;
+
+L_NoItem:
+ mes "[Neiremes]";
+ mes "\"Hey? You don't have it! That's mean.\"";
+ mes "Neiremes looks very sad.";
+ goto L_Close;
+
+L_NoEvent:
+ mes "Neiremes the Reinboo hums happily.";
+ goto L_Close;
+
+L_RewardTime:
+ mes "[Neiremes]";
+ mes "\"Thank you so much for your help! It was really great to fly with Santa and the others. Neimeres was so happy too.\"";
+ if (@reinboo != 14)
+ goto L_Close;
+
+ getinventorylist;
+ if ((checkweight("RedNose", 1) == 0) || (@inventorylist_count == 100))
+ goto L_Inventory;
+ mes "\"Here, this is for you.\"";
+ getitem "RedNose", 1;
+ set @reinboo, 15;
+ callfunc "xmas2012update_reinboo_var";
+ goto L_Close;
+
+L_Inventory:
+ mes "[Neiremes]";
+ mes "\"Oh, I want to give you a gift, but you can't carry it.\"";
+ goto L_Close;
+
+L_Close:
+ set @reinboo, 0;
+ set @xmas_time, 0;
+ close;
+}