diff options
Diffstat (limited to 'npc')
-rw-r--r-- | npc/xmas2007/after-xmas.txt | 142 | ||||
-rw-r--r-- | npc/xmas2007/pre-xmas.txt | 244 |
2 files changed, 386 insertions, 0 deletions
diff --git a/npc/xmas2007/after-xmas.txt b/npc/xmas2007/after-xmas.txt new file mode 100644 index 00000000..58a31cc0 --- /dev/null +++ b/npc/xmas2007/after-xmas.txt @@ -0,0 +1,142 @@ +new_11-1.gat,78,85,0 script Santa 105,{
+ if (QUEST_xmas07_state == 2) goto L_State2;
+ mes "[Santa Clause]";
+ mes "Ho! Ho! Ho!";
+ mes "You people from The Mana World";
+ mes "were very nice to me. So many";
+ mes "milk and cookies for me...";
+ next;
+
+ if (QUEST_xmas07_milk + QUEST_xmas07_cookies == 0) goto L_Nothing;
+ if (QUEST_xmas07_milk + QUEST_xmas07_cookies < 10) goto L_Notenough;
+
+ set @leastItems, $QUEST_xmas07_milk;
+ if ($QUEST_xmas07_milk > $QUEST_xmas07_cookies) set @leastItems, $QUEST_xmas07_cookies;
+ if (@leastItems >= 100) set @presents, 1;
+ if (@leastItems >= 200) set @presents, 2;
+ if (@leastItems >= 400) set @presents, 3;
+ if (@leastItems >= 800) set @presents, 4;
+ if (@leastItems >= 1600) set @presents, 5;
+ if (@leastItems >= 3200) set @presents, 6;
+ if (@leastItems >= 6400) set @presents, 7;
+ if (@leastItems >= 12800) set @presents, 8;
+ if (@leastItems >= 25600) set @presents, 9;
+ if (@leastItems >= 51200) set @presents, 10;
+ if (@leastItems >= 102400) set @presents, 11;
+ if (@leastItems >= 204800) set @presents, 12;
+ if (@leastItems >= 409600) set @presents, 13;
+ if (@leastItems >= 819200) set @presents, 14;
+
+
+ mes "[Santa Clause]";
+ mes "Now you deserve your presents. I got";
+ mes @presents + " presents for you. Do you";
+ mes "want them now?";
+ next;
+ menu "Yes! Presents! Presents! Presents!", -, "No, maybe later.", L_Close;
+
+ //DEBUG - REMOVE BEFORE RELEASE!
+ set QUEST_xmas07_presents, 0;
+
+ L_Givepresent:
+ if (@presents == QUEST_xmas07_presents) goto L_Enoughpresents;
+
+ mes "[Santa Clause]";
+ mes "Let's see what I got for you in my sack....";
+ next;
+
+ set QUEST_xmas07_presents, QUEST_xmas07_presents + 1;
+ set @TEMP,rand(7);
+ if(@TEMP == 0) goto L_present_0;
+ if(@TEMP == 1) goto L_present_1;
+ if(@TEMP == 2) goto L_present_2;
+ if(@TEMP == 3) goto L_present_3;
+ if(@TEMP == 4) goto L_present_4;
+ if(@TEMP == 5) goto L_present_5;
+ if(@TEMP == 6) goto L_present_6;
+
+
+ L_Enoughpresents:
+ mes "[Santa Clause]";
+ mes "That's all I got for you.";
+ mes "Merry Christmas!";
+ set QUEST_xmas07_state, 2;
+ close;
+
+ L_present_0:
+ mes "[Santa Clause]";
+ mes "Here you got a new funky hat!";
+ getitem 628, 1;
+ next;
+ goto L_Givepresent;
+
+ L_present_1:
+ mes "[Santa Clause]";
+ mes "Here you got a pompouse top hat!";
+ getitem 627, 1;
+ next;
+ goto L_Givepresent;
+
+ L_present_2:
+ mes "[Santa Clause]";
+ mes "Here you got a funny elven hat!";
+ getitem 633, 1;
+ next;
+ goto L_Givepresent;
+
+ L_present_3:
+ mes "[Santa Clause]";
+ mes "Here you got a creepy face mask!";
+ getitem 634, 1;
+ next;
+ goto L_Givepresent;
+
+ L_present_4:
+ mes "[Santa Clause]";
+ mes "Here you got a stylish mushroom hat!";
+ getitem 629, 1;
+ next;
+ goto L_Givepresent;
+
+ L_present_5:
+ mes "[Santa Clause]";
+ mes "Here you got an evil mushroom hat!";
+ getitem 630, 1;
+ next;
+ goto L_Givepresent;
+
+ L_present_6:
+ mes "[Santa Clause]";
+ mes "Here you got a beautiful skirt!";
+ getitem 632, 1;
+ next;
+ goto L_Givepresent;
+
+ L_State2:
+ mes "[Santa Clause]";
+ mes "Ho! Ho! Ho!";
+ mes "I hope you like your presents.";
+ mes "See you next year.";
+ close;
+
+ L_Notenough:
+ mes "[Santa Clause]";
+ mes "But you did nothing to help. You";
+ mes "only donated " + (QUEST_xmas07_milk + QUEST_xmas07_cookies) + " items and now you";
+ mes "want a present while others did";
+ mes "all the work? get lost!";
+ close;
+
+ L_Nothing:
+ mes "[Santa Clause]";
+ mes "But you did nothing to help. You";
+ mes "did not donate one item while";
+ mes "others did all the work.";
+ mes "Get lost!";
+ close;
+
+ L_Close:
+ close;
+
+
+}
\ No newline at end of file diff --git a/npc/xmas2007/pre-xmas.txt b/npc/xmas2007/pre-xmas.txt new file mode 100644 index 00000000..57b7217d --- /dev/null +++ b/npc/xmas2007/pre-xmas.txt @@ -0,0 +1,244 @@ +new_11-1.gat,76,85,0 script Assistant 105,{
+ if (QUEST_xmas07_state == 1) goto L_State1;
+
+ mes "[Santas Assistant]";
+ mes "I got really bad news.";
+ mes "Santa Clause won't come to";
+ mes "the mana world this year.";
+ next;
+ menu "Who cares? I don't want any presents.", L_Close, "Why that?", -;
+ mes "[Santas Assistant]";
+ mes "Well, he is in some kind of";
+ mes "depression. He says people";
+ mes "love him only for his presents";
+ mes "and don't really care about";
+ mes "him as a person.";
+ next;
+ menu "Well, not my problem.", L_Close, "Can't we do something for him?", -;
+ mes "[Santas Assistant]";
+ mes "Well, he really loves milk";
+ mes "and cookies. When we would";
+ mes "collect a really large pile";
+ mes "of milk and cookies he will";
+ mes "maybe come and pay us a visit.";
+ next;
+ menu "Sorry, I got no time for that.", L_Close, "Great idea! Let's begin.", -;
+ set QUEST_xmas07_state, 1;
+
+ L_State1:
+ menu "I got some milk.", L_Exchange_Milk, "I got some cookies.", L_Exchange_Cookies, "How is the collecting going?", L_Status, "Where can I find milk and cookies?", L_Help;
+
+ L_Exchange_Milk:
+ if (countitem(527) == 0) goto L_Exchange_Gotnothing;
+ mes "[Santas Assistant]";
+ mes "Aaaaah, " + countitem(527) + " milk.";
+ mes "Thanks for your contribution.";
+ set QUEST_xmas07_milk, QUEST_xmas07_milk + countitem(527);
+ set $QUEST_xmas07_milk, $QUEST_xmas07_milk + countitem(527);
+ delitem(527), countitem(527);
+ close;
+
+ L_Exchange_Cookies:
+ if (countitem(635) == 0) goto L_Exchange_Gotnothing;
+ mes "[Santas Assistant]";
+ mes "Aaaaah, " + countitem(635) + " cookies.";
+ mes "Thanks for your contribution.";
+ set QUEST_xmas07_cookies, QUEST_xmas07_cookies + countitem(635);
+ set $QUEST_xmas07_cookies, $QUEST_xmas07_cookies + countitem(635);
+ delitem(635), countitem(635);
+ close;
+
+ L_Help:
+ mes "[Santas Assistant]";
+ mes "Milk is dropped by santa slimes and fluffies.";
+ mes "You can find santa slimes on the";
+ mes "snow field to the south and Fluffies";
+ mes "at the coast south of Hurnscald.";
+ next;
+ mes "[Santas Assistant]";
+ mes "Cookies can be found";
+ mes "################";
+ close;
+
+ L_Exchange_Gotnothing:
+ mes "[Santas Assistant]";
+ mes "You don't seem to have any.";
+ close;
+
+ L_Status:
+ mes "[Santas Assistant]";
+ mes "OK, thus far you bought me";
+ mes QUEST_xmas07_milk + " packets of milk and";
+ mes QUEST_xmas07_cookies + " christmas cookies.";
+ mes "All people together bought";
+ mes $QUEST_xmas07_milk + " packets of milk and";
+ mes $QUEST_xmas07_cookies + " christmas cookies.";
+ next;
+ mes "[Santas Assistant]";
+ set @leastItems, $QUEST_xmas07_milk;
+ if ($QUEST_xmas07_milk > $QUEST_xmas07_cookies) set @leastItems, $QUEST_xmas07_cookies;
+ if (@leastItems >= 819200) goto L_Present14;
+ if (@leastItems >= 409600) goto L_Present13;
+ if (@leastItems >= 204800) goto L_Present12;
+ if (@leastItems >= 102400) goto L_Present11;
+ if (@leastItems >= 51200) goto L_Present10;
+ if (@leastItems >= 25600) goto L_Present9;
+ if (@leastItems >= 12800) goto L_Present8;
+ if (@leastItems >= 6400) goto L_Present7;
+ if (@leastItems >= 3200) goto L_Present6;
+ if (@leastItems >= 1600) goto L_Present5;
+ if (@leastItems >= 800) goto L_Present4;
+ if (@leastItems >= 400) goto L_Present3;
+ if (@leastItems >= 200) goto L_Present2;
+ if (@leastItems >= 100) goto L_Present1;
+ mes "I guess that won't impress santa";
+ mes "much. We need at least 100 of";
+ mes "both to make him come to us.";
+ close;
+
+ L_Present1:
+ mes "This means santa will bring";
+ mes "everyone a present. When we";
+ mes "can collect 200 of each he";
+ mes "will maybe give everyone two";
+ mes "presents.";
+ close;
+
+ L_Present2:
+ mes "This means santa will bring";
+ mes "everyone two presents. When we";
+ mes "can collect 400 of each he";
+ mes "will maybe give everyone three";
+ mes "presents.";
+ close;
+
+ L_Present3:
+ mes "This means santa will bring";
+ mes "everyone three presents. When we";
+ mes "can collect 800 of each he";
+ mes "will maybe give everyone four";
+ mes "presents.";
+ close;
+
+ L_Present4:
+ mes "This means santa will bring";
+ mes "everyone four presents. When we";
+ mes "can collect 1600 of each he";
+ mes "will maybe give everyone five";
+ mes "presents.";
+ close;
+
+ L_Present5:
+ mes "This means santa will bring";
+ mes "everyone five presents. When we";
+ mes "can collect 3200 of each he";
+ mes "will maybe give everyone six";
+ mes "presents.";
+ close;
+
+ L_Present6:
+ mes "This means santa will bring";
+ mes "everyone six presents. When we";
+ mes "can collect 6400 of each he";
+ mes "will maybe give everyone seven";
+ mes "presents.";
+ close;
+
+ L_Present7:
+ mes "This means santa will bring";
+ mes "everyone seven presents. When we";
+ mes "can collect 12800 of each he";
+ mes "will maybe give everyone eight";
+ mes "presents.";
+ close;
+
+ L_Present8:
+ mes "This means santa will bring";
+ mes "everyone eight presents. When we";
+ mes "can collect 25600 of each he";
+ mes "will maybe give everyone nine";
+ mes "presents.";
+ close;
+
+ L_Present9:
+ mes "This means santa will bring";
+ mes "everyone nine presents. When we";
+ mes "can collect 51200 of each he";
+ mes "will maybe give everyone ten";
+ mes "presents.";
+ close;
+
+ L_Present10:
+ mes "Over fiftythousand of both?";
+ mes "Did you guys hire some chinese";
+ mes "gold farmers?";
+ mes "This means santa will bring";
+ mes "everyone ten presents. When we";
+ mes "can collect 102400 of each he";
+ mes "will maybe give everyone eleven";
+ mes "presents.";
+ close;
+
+ L_Present11:
+ mes "What? You guys broke the";
+ mes "hundredthousand item limit??";
+ mes "This means santa will bring";
+ mes "everyone eleven presents. When we";
+ mes "can collect 204800 of each he";
+ mes "will maybe give everyone twelve";
+ mes "presents.";
+ close;
+
+ L_Present12:
+ mes "Another hundredthousand of each?";
+ mes "You guys really have no live!";
+ mes "This means santa will bring";
+ mes "everyone twelfe presents. When we";
+ mes "can collect 404800 of each he";
+ mes "will maybe give everyone thirteen";
+ mes "presents.";
+ close;
+
+ L_Present13:
+ mes "What the f...? Four Hundred Thousand???";
+ mes "There is no way people collected";
+ mes "that many stuff in just a week.";
+ mes "This means santa will bring";
+ mes "everyone thirteen presents. When we";
+ mes "can collect 819200 of each he";
+ mes "will maybe give everyone fourteen";
+ mes "presents.";
+ close;
+
+ L_Present14:
+ mes "OK, OK, you guys found a bug";
+ mes "to cheat the christmas event";
+ mes "this year. You will each get";
+ mes "fourteen presents.";
+ mes "But this is really enough.";
+ mes "Are you happy now?";
+ close;
+
+ L_Close:
+ close;
+}
+
+new_11-1.gat,74,85,0 script Debug 105,{
+ menu "Give 10 milk", L_10milk, "Give 10 cookie", L_10cookie, "Double milk", L_2xmilk, "Double cookies", L_2xcookie, "Reset", L_Reset;
+
+ L_10milk:
+ getitem 527, 10;
+ close;
+ L_10cookie:
+ getitem 635, 10;
+ close;
+ L_2xmilk:
+ getitem 527, countitem(527);
+ close;
+ L_2xcookie:
+ getitem 635, countitem(635);
+ close;
+ L_Reset:
+ set $QUEST_xmas07_cookies, 0;
+ set $QUEST_xmas07_milk, 0;
+}
\ No newline at end of file |