Change all script folders

Script files fixes are comming

2 files changed, 364 insertions, 0 deletions

diff --git a/npc/xmas/2007/after-xmas.txt b/npc/xmas/2007/after-xmas.txt
new file mode 100644
index 00000000..0d39f858
--- /dev/null
+++ b/npc/xmas/2007/after-xmas.txt
@@ -0,0 +1,140 @@
+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;
+
+
+	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/xmas/2007/pre-xmas.txt b/npc/xmas/2007/pre-xmas.txt
new file mode 100644
index 00000000..8516f7e7
--- /dev/null
+++ b/npc/xmas/2007/pre-xmas.txt
@@ -0,0 +1,224 @@
+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 not?", -;
+	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 "Rudolph and Santa slimes";
+	mes "always bring some cookies with them.";
+	close;
+
+	L_Exchange_Gotnothing:
+	mes "[Santas Assistant]";
+	mes "Actually, you don't seem to have any.";
+	close;
+
+	L_Status:
+	mes "[Santas Assistant]";
+	mes "OK, thus far you brought me";
+	mes QUEST_xmas07_milk + " packets of milk and";
+	mes QUEST_xmas07_cookies + " christmas cookies.";
+	mes "All people together brought";
+	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;
+}