Bring all LoF unique scripts temporary to npc/0000SAVE folder

3 files changed, 286 insertions, 0 deletions

diff --git a/npc/00000SAVE/events/028-1_Easter2010_Portal.txt b/npc/00000SAVE/events/028-1_Easter2010_Portal.txt
new file mode 100644
index 000000000..e33f1429d
--- /dev/null
+++ b/npc/00000SAVE/events/028-1_Easter2010_Portal.txt
@@ -0,0 +1,134 @@
+028-1,69,71,0	script	Portal#_M	NPC400,{
+    if (isin("028-1",65,67,73,73)) goto L_Main;
+    mes "There is something there, but you aren't quite close enough to see exactly what it is.";
+    close;
+
+L_Main:
+    mes "[Portal]";
+    mes "";
+    mes "A strange field hovers about waist high above the ground.";
+    next;
+    mes "[Portal]";
+    mes "";
+    mes "You sense a feeling of familiarity radiating out from it.";
+    mes "";
+    mes "It looks just wide enough to jump through.";
+    next;
+    mes "[Portal]";
+    mes "";
+    mes "You're not quite sure if there will be a way to return once you enter, though.";
+    next;
+    mes "[Portal]";
+    mes "";
+    mes "What do you do?";
+    menu
+        "Jump through, without looking back.", L_No_Hesitation,
+        "Take one more look around.", L_Look,
+        "Leave it alone.", L_close;
+
+L_No_Hesitation:
+    mes "There has been quite enough of this harsh place. You jump through without hesitation...";
+    next;
+    mes "...and fall, and fall...";
+    next;
+    mes "Dizzying colors whirl around you. You collapse.";
+    savepoint "009-1", 52, 39;
+    heal -hp -1, 0, 1;
+    close;
+
+L_Look:
+    mes "[Portal]";
+    mes "";
+    mes "There was a lot here. You don't know where it came from, or quite how you ended up here.";
+    if ((Easter_2010_QuestState >> E10_STATE_ROSE_SHIFT) & E10_STATE_ROSE_MASK == E10_STATE_ROSE_ROSE_COMPLETE)
+        goto L_Full_Helped;
+    if ((Easter_2010_QuestState >> E10_HELPED_DOCTOR_SHIFT) & E10_HELPED_DOCTOR_MASK)
+        goto L_Somewhat_Helped;
+    if ((Easter_2010_QuestState >> E10_FLAG_KNOWS_DOCTOR_SHIFT) & E10_FLAG_KNOWS_DOCTOR)
+        goto L_Met;
+    if ((Easter_2010_QuestState >> E10_FLAG_RETURN_READY_SHIFT) & E10_FLAG_RETURN_READY_MASK)
+        goto L_Unknown_Defeat;
+
+    mes "Come to think of it, there is still quite a lot you're not sure about. There was talk about something big, but you must have missed it... whatever it was, it seems gone now.";
+    goto L_Post_Look;
+
+
+L_Full_Helped:
+    if ((Easter_2010_QuestState >> E10_FLAG_RETURN_READY_SHIFT) & E10_FLAG_RETURN_READY_MASK)
+        goto L_Full_Helped_Defeat;
+    mes "Your assistance was helpful, you know that much. If only you could have faced the darkness that plagued this world more directly...";
+    goto L_Post_Look;
+
+L_Full_Helped_Defeat:
+    mes "You know you have done everything that you could have. Your determination will have surely meant the world will be restored, once more.";
+    goto L_Post_Look;
+
+L_Somewhat_Helped:
+    if ((Easter_2010_QuestState >> E10_FLAG_RETURN_READY_SHIFT) & E10_FLAG_RETURN_READY_MASK)
+        goto L_Somewhat_Helped_Defeat;
+    mes "You feel your help was not for nothing, though you can't quite shake the feeling there was still something more to do.";
+    goto L_Post_Look;
+
+L_Somewhat_Helped_Defeat:
+    mes "Your help was not for nothing. Your destruction of evil would surely help heal this world!";
+    goto L_Post_Look;
+
+L_Met:
+    if ((Easter_2010_QuestState >> E10_FLAG_RETURN_READY_SHIFT) & E10_FLAG_RETURN_READY_MASK)
+        goto L_Met_Defeat;
+    mes "While you only met the Doctor briefly, he seemed to think there was something wrong. If only there was a way you could have helped, somehow.";
+    goto L_Post_Look;
+
+L_Met_Defeat:
+    mes "Striking down that evil, dark, figure would surely make a difference. While you only met the Doctor briefly, he seemed to think there was something wrong... with any luck, this defeat would be, at the very least, a significant setback.";
+    goto L_Post_Look;
+
+L_Unknown_Defeat:
+    mes "Striking down that evil, dark, figure would surely make a difference. You just wish you knew what that was about... if only there had been someone that could have explained it all.";
+    goto L_Post_Look;
+
+L_Post_Look:
+    next;
+    mes "What do you do?";
+    menu
+        "Jump through", L_Jump,
+        "Leave it alone", L_close;
+
+L_Jump:
+    mes "[Portal]";
+    mes "";
+    mes "A tingling sensation surrounds you as you enter.";
+    next;
+    mes "[Portal]";
+    mes "";
+    mes "Inside, your senses seem heightened, sharpened...";
+    next;
+    mes "[Portal]";
+    mes "";
+    mes "You can detect many entities all around you, yet you are not quite sure how.";
+    next;
+    mes "[Portal]";
+    mes "";
+    mes "Colors swirl around you. There is a sensation of great speed, of great power, of energy...";
+    next;
+    mes "[Portal]";
+    mes "";
+    mes "A tearing motion. The blobs of color skew, and stretch into long thin lines... and somehow, a taste of peanuts.";
+    next;
+    mes "[Portal]";
+    mes "";
+    mes "A mass of green and yellow, moving at high speed... or perhaps it is you who is moving?";
+    next;
+    mes "[Portal]";
+    mes "";
+    mes "Whichever it is, one of you slows just as you begin to recognise some details...";
+    warp "009-1", 52, 39;
+    savepoint "009-1", 52, 39;
+    mes "[Home]";
+    mes "";
+    mes "You land softly. It is good to be home...";
+    close;
+
+L_close:
+    close;
+}
diff --git a/npc/00000SAVE/events/030-2_XMAS_glitter_helper.txt b/npc/00000SAVE/events/030-2_XMAS_glitter_helper.txt
new file mode 100644
index 000000000..a36ad93e1
--- /dev/null
+++ b/npc/00000SAVE/events/030-2_XMAS_glitter_helper.txt
@@ -0,0 +1,94 @@
+
+030-2,31,81,0	script	Veneri	NPC328,{
+    callfunc "XmasStates";
+
+    if($@xmas_time)
+        goto L_XmasMain;
+    goto L_OffSeason;
+
+L_OffSeason:
+    mes "[Veneri]";
+    mes "\"I should take this time off to go see the doctor in Hurnscald about whether or not I have glitter lung.\"";
+    goto L_close;
+
+L_XmasMain:
+    if (XMASTIME & $@xmas_helper_bit_glitter_ends) goto L_Done;
+    if (XMASTIME & $@xmas_helper_bit_glitter_starts) goto L_Powder;
+    if (@xmas_helper_bit) goto L_Helping;
+
+    mes "[Veneri]";
+    mes "\"Mh? Excuse me, I'm very busy right now.\"";
+    goto L_close;
+
+L_Helping:
+    mes "[Veneri]";
+    mes "\"Hello. We have some problems here. Something went wrong with the shipment of the ingredients for our decoration glitter.";
+    mes "Would you be so kind and get me " + $@xmas_red_amount + " Ruby Powders and " + $@xmas_yellow_amount + " Topaz Powders?\"";
+    next;
+    mes "[Veneri]";
+    mes "\"This material has proven to have the quality we need to make our christmas magic last until it can sparkle under every christmas tree. Sadly we made some bad experience in the past. Please make sure you only bring class A powders.\"";
+    XMASTIME = XMASTIME | $@xmas_helper_bit_glitter_starts;
+    goto L_close;
+
+L_Powder:
+    mes "[Veneri]";
+    mes "\"Welcome back. Do you have the " + $@xmas_red_amount + " Ruby Powders and " + $@xmas_yellow_amount + " Topaz Powders needed for the decoration glitter?\"";
+    if ((countitem("RubyPowder") >= $@xmas_red_amount) && (countitem("TopazPowder") >= $@xmas_yellow_amount) && (countitem("RedPowder") >= $@xmas_red_amount) && (countitem("YellowPowder") >= $@xmas_yellow_amount))
+        menu
+            "Yeah, here it is. (Give the gem powders.)",L_GemPowders,
+            "Sure, here you go. (Give the fake powders.)",L_FakePowders,
+            "No, I am still working on that.",L_close;
+    if ((countitem("RubyPowder") >= $@xmas_red_amount) && (countitem("TopazPowder") >= $@xmas_yellow_amount))
+        menu
+            "Yeah, here it is. (Give the gem powders.)",L_GemPowders,
+            "No, I am still working on that.",L_close;
+    if ((countitem("RedPowder") >= $@xmas_red_amount) && (countitem("YellowPowder") >= $@xmas_yellow_amount))
+        menu
+            "Sure, here it is. (Give the fake powders.)",L_FakePowders,
+            "No, I am still working on that.",L_close;
+    goto L_close;
+
+L_GemPowders:
+    if ((countitem("RubyPowder") < $@xmas_red_amount) || (countitem("TopazPowder") < $@xmas_yellow_amount))
+        goto L_NoItems;
+    delitem "RubyPowder", $@xmas_red_amount;
+    delitem "TopazPowder", $@xmas_yellow_amount;
+    XMASTIME = XMASTIME | $@xmas_helper_bit_glitter_ends;
+    @karma_bonus = $@xmas_karma_bonus;
+    callfunc "XmasNice";
+    callfunc "XmasXpReward";
+    mes "[Veneri]";
+    mes "\"Excellent! Thank you very much.\"";
+    goto L_close;
+
+L_FakePowders:
+    if ((countitem("RedPowder") < $@xmas_red_amount) || (countitem("YellowPowder") < $@xmas_yellow_amount))
+        goto L_NoItems;
+    delitem "RedPowder", $@xmas_red_amount;
+    delitem "YellowPowder", $@xmas_yellow_amount;
+    XMASTIME = XMASTIME | $@xmas_helper_bit_glitter_ends;
+    XMASTIME = XMASTIME &~ $@xmas_helper_bit_glitter_starts;
+    @karma_bonus = $@xmas_karma_bonus;
+    callfunc "XmasNaughty";
+    callfunc "XmasXpReward";
+    mes "It seems like he didn't notice that the powder you gave him is bogus.";
+    mes "[Veneri]";
+    mes "\"Excellent! Thank you very much.\"";
+    goto L_close;
+
+L_Done:
+    mes "[Veneri]";
+    if (!(@xmas_helper_glitter))
+        mes "\"Even after your help, the powder still isn't working right. Maybe it got wet.\"";
+    if (@xmas_helper_glitter)
+        mes "\"Thanks for bringing the powders.\"";
+    goto L_close;
+
+L_NoItems:
+    mes "[Veneri]";
+    mes "\"Eh? Are you kidding?\"";
+    goto L_close;
+
+L_close:
+    close;
+}
diff --git a/npc/00000SAVE/events/031-1_frozenbeard.txt b/npc/00000SAVE/events/031-1_frozenbeard.txt
new file mode 100644
index 000000000..b39519109
--- /dev/null
+++ b/npc/00000SAVE/events/031-1_frozenbeard.txt
@@ -0,0 +1,58 @@
+
+031-1,96,113,0	script	Frozenbeard	NPC138,{
+
+    mes "[Frozenbeard]";
+    mes "\"Arrr mate! I'm glad there's a dock here, so I don't have to row boat from my ship anymore!  I pioneered the trade routes between Nivalis and the rest of the World, so now merchants and adventurers can travel to and fro without any hassle other than the harsh weather up here, yarr.\"";
+    close;
+
+
+L_Frozenbeard_Easter2012:
+    mes "[Frozenbeard]";
+    mes "\"Arrrrh mate! Ye be right! I know every single pirate in this world. But not all of them are to be trusted, I must say.\"";
+    next;
+    menu
+        "I need information about the Easter Bunny. I heard some pirates kidnapped him.", L_EasterBunny;
+
+L_EasterBunny:
+    mes "[Frozenbeard]";
+    mes "\"Arrrrh! Ye shouldn't do this to me. Those pirates are dangerous, I can't put myself in such a situation!\"";
+    next;
+    if (countitem("BlackPearl") < 1) goto L_Frozenbeard_Fear;
+    mes "You take a black pearl from your backpack and start to play with it.";
+    next;
+    menu
+        "Hmm, too bad, because I was willing to pay well for information, you know?", L_OfferPearl;
+
+L_OfferPearl:
+    mes "[Frozenbeard]";
+    mes "\"Arrh eh... Did I say dangerous? These pirates are criminals and a shame to our kind. So, if ye give me this pearl I can tell ye all I know about them. It is not much, but maybe it can help.\"";
+    menu
+        "Ok, keep going.", L_GiveInfo;
+
+L_GiveInfo:
+    mes "[Frozenbeard]";
+    mes "\"Well I heard they took him to a small house around this area, where they have their base. But then they brought him to another place. It might be hot there, judging the way they dressed up. The bunny seemed to show no resistance at all when they kidnapped him. It looked as if he did not know what was happening.\"";
+    next;
+    mes "\"But the most important thing is, the leader of the kidnappers is an old friend of George, the treasure hunter. George is very clever, I am sure he knows how the kidnapper thinks and all, maybe he can give ye a more specific information about this.\"";
+    next;
+    menu
+        "Well, that was useful, take your pearl.", L_PayPearl;
+
+L_PayPearl:
+    if (countitem("BlackPearl") < 1)
+        goto L_Frozenbeard_Nopearl;
+    delitem "BlackPearl", 1;
+    QUEST_Easter12 = 3;
+    mes "[Frozenbeard]";
+    mes "\"Arrrrh! Such a beautiful item! Always glad to help.\"";
+    close;
+
+L_Frozenbeard_Fear:
+    mes "Frozenbeard ends the conversation. You can see he is afraid of the kidnappers.";
+    close;
+
+L_Frozenbeard_Nopearl:
+    mes "[Frozenbeard]";
+    mes "\"Arrrrh! I see no pearl!\"";
+    close;
+}