Rescue three quests from LoF forums, and add them to 0000SAVE (not converted)

3 files changed, 365 insertions, 0 deletions

diff --git a/npc/00000SAVE/016-1_NewPaxel.forum.deserthelmet.txt b/npc/00000SAVE/016-1_NewPaxel.forum.deserthelmet.txt
new file mode 100644
index 000000000..902faa28c
--- /dev/null
+++ b/npc/00000SAVE/016-1_NewPaxel.forum.deserthelmet.txt
@@ -0,0 +1,145 @@
+// This is to replace Paxel
+//----------------------------------------------------
+// Desert Helmet quest
+// Create Quest: Darlord (Depredador) 
+//----------------------------------------------------
+
+012-1.gat,122,115,0 script Warrior 126,{
+if(QUEST_Warrior1 == 2) goto L_Done1;
+if(QUEST_Warrior1 == 1) goto L_Ask2; 
+
+if (BaseLevel >= 60 && countitem("IronOre") > 0)
+goto L_Ask1;
+
+mes "[Warrior]";
+mes "\"Hello! Calm wind today!\"";
+menu
+"Yes, but I like windy days.", L_Wind,
+"Hmm... sorry but gotta go...", L_Go;
+close;
+
+L_Go:
+mes "[Warrior]";
+mes "\"Ok, good trip then.\"";
+close;
+
+L_Wind:
+mes "[Warrior]";
+mes "\"I don't like them, i can't fly straight.\"";
+close;
+
+// ----------------------------------------------------
+// Desert Helmet quest start
+// ----------------------------------------------------
+L_Ask1:
+mes "[Warrior]";
+mes "\"Hello "+ strcharinfo(0) + "! I see you have some [Iron Ore] with you!\"";
+
+menu
+"Yes... right... what about [Iron Ore]?", L_Quest1,
+"Yes, but i have grown attached to [Iron Ore]...", L_No,
+"Right, but now i have business in other places.", L_Rude;
+close;
+
+L_Quest1:
+mes "[Warrior]";
+mes "\"Iron Ore is a really special item. People without helmets can't understand [Iron Ore] real power, anyway if you could give me some of them you would understand why they are so special.\"";
+
+menu
+"Certainly, you can have all my [Iron Ore]", L_Check1,
+"Sorry but i am not interested in that.", L_No;
+close;
+
+L_No:
+mes "[Warrior]";
+mes "\"Ok, come back me when you want to know [Iron Ore] real power\"";
+close;
+
+L_Rude:
+mes "[Warrior]";
+mes "\"Well, good luck with your business.\"";
+close;
+
+L_Check1:
+if (countitem("IronOre") > 11)
+goto L_Progress1;
+goto L_More_Needed1;
+
+L_More_Needed1:
+mes "[Warrior]";
+mes "\"Your [Iron Ore] are not enough, please look for more.\"";
+close;
+
+// ----------------------------------------------------
+// Got Iron Ores
+// ----------------------------------------------------
+L_Progress1:
+delitem "IronOre", 12;
+getexp 10000, 0;
+set QUEST_Warrior1, 1;
+mes "[Angel]";
+mes "\"Perfect! you have enough Iron Ore, i will take them for now but i need other items in order to bring them to life.\"";
+
+L_Ask2:
+mes "[Warrior]";
+mes "\"I need a two Infantry Helmet to enchant them, one Warlord Helmet to make them full of vitality and a lot of Terrnaite Ore to bleach them.\"";
+
+menu
+"Please have a look, i have what you asked", L_Check2,
+"On my way to get what you need.", -;
+close;
+
+
+L_Check2:
+if (countitem("InfantryHelmet") > 0 && countitem("WarlordHelmet") > 0 && countitem("TerraniteOre") > 0)
+goto L_Progress2;
+goto L_More_Needed2;
+
+
+L_More_Needed2:
+mes "[Warrior]";
+mes "\"I am sorry but i can see that you don't have all that i asked you.\"";
+next;
+mes "[Warrior]";
+mes "\"Please bring me that or i won't be able to make something really special for you.\"";
+close;
+
+// ----------------------------------------------------
+// Got Desert
+// ----------------------------------------------------
+L_Progress2:
+if (@inventorylist_count == 100) goto L_noRoom;
+delitem "InfantryHelmet", 1;
+delitem "WarlordHelmet", 1;
+delitem "TerraniteOre", 20;
+getexp 60000, 0;
+getitem "DesertHelmet", 1;
+set QUEST_Warrior1, 2;
+mes "[Warrior]";
+mes "\"There you go a special Desert Helmet!.\"";
+close;
+L_noRoom:
+mes "[Warrior]";
+mes "\"You don't have enough room left for helmet... Please do spring cleaning in your inventory.\"";
+close;
+
+L_Done1:
+mes "[Warrior]";
+mes "\"Hello winged friend! How is the wind today?\"";
+
+menu
+"Calm, perfect for a fly!", L_Fly,
+"Gale, not good to fly.", L_Wind2;
+close;
+
+L_Fly:
+mes "[Warrior]";
+mes "\"Haha yes, you are right!\"";
+close;
+
+L_Wind2:
+mes "[Warrior]";
+mes "\"Yep, i never fly in these days.\"";
+close;
+
+}
diff --git a/npc/00000SAVE/021-1_michel.forum.txt b/npc/00000SAVE/021-1_michel.forum.txt
new file mode 100644
index 000000000..1cd1e1cb1
--- /dev/null
+++ b/npc/00000SAVE/021-1_michel.forum.txt
@@ -0,0 +1,41 @@
+021-1.gat,49,123,0|script |Michel|111,{
+
+mes "[Michel]";
+mes "\"I need some help could you help me please?"";
+goto L_Michelmenu;
+
+L_Michelmenu:
+menu
+"Sure i will help you", L_Sure
+"Nooo Michel", L_WrongKey
+goto L_Close;
+
+
+L_Sure:
+mes "[Michel]";
+mes "\"I need 25 Raw Logs, 20 Roots, 15 Reed Bundles and 10.000 gp for Iten.\"";
+menu
+"Sure.", L_Sure,
+"What a ripoff! , No way!", -;
+goto L_Close;
+
+L_Sure:
+if (countitem("Raw Log") < 25) goto L_Missing;
+if (countitem("Reed Bundle") <15) goto L_Missing;
+if (countitem("Root") <20) goto L_Missing;
+if (Zeny < 10000) goto L_NotEnoughMoney;
+getinventorylist;
+if (@inventorylist_count == 100 && countitem("Raw Log") > 25 && countitem("Reed Bundle") > 15 && countitem("Root") > 20) goto L_Full;
+
+delitem "Raw Log", 25;
+delitem "Reed Bundle", 15;
+delitem "Root", 20;
+set Zeny, Zeny - 10000
+getitem "Iten", 1; 
+mes "\"Here its your towel..Enjoy it.\"";
+goto L_Close;
+
+L_WrongKey:
+mes "Land of Fire is beautiful server.";
+close;
+)
diff --git a/npc/00000SAVE/andy_alex.forum.txt b/npc/00000SAVE/andy_alex.forum.txt
new file mode 100644
index 000000000..18a25ece0
--- /dev/null
+++ b/npc/00000SAVE/andy_alex.forum.txt
@@ -0,0 +1,179 @@
+// All .forum.txt files were not converted
+// author: TomphaA
+
+
+//Alex
+
+009-1.gat,??,??,?|script|Alex|???,{
+
+
+    if (TOM_Quest == 1) goto L_Alex_Waits_1;
+    if (TOM_Quest == 2) goto L_Alex_Tablet;
+    if (TOM_Quest == 3) goto L_Alex_Didyou;
+    if (TOM_Quest == 4) goto L_Alex_Okay;
+    if (TOM_Quest == 5) goto L_Alex_End;
+	
+
+    mes "[Alex]";
+    mes "\"Hey there!  Mind giving us a hand?\"";
+    menu
+	
+        "Yeah, what do you need?", L_Alex_Help,
+		
+        "I Don't have time, sorry.", -;
+		
+    close;
+	
+L_Alex_Help
+	
+	mes "[Alex]";
+	mes "\"He shows you little wooden box.\"";
+    mes "\"Give these to Andy you can find him somewhere around in Dark World, I'm sure he'll reward you.\"";
+	set TOM_Quest, 1;
+	close;
+	
+L_Alex_Tablet:
+
+    mes "[Alex]";
+    mes "\"Hey, I heard you have something for me...\"";
+	mes "\"You give Alex the stone tablet, Alex looks at it and seems to be very happy\"";
+	mes "[Alex]";
+	mes "\"I need you to tell Andy that we found what we we're looking for and that we dont have to examine those Dark World creatures anymore, I'm sure he'll understand.\"";
+	set TOM_Quest, 3;
+    close;
+	
+L_Alex_Didyou:
+
+    mes "[Alex]";	
+    mes "\"Did you tell it to him already, if not please hurry!\"";
+    close;
+	
+L_Alex_Waits_1:
+
+    mes "[Alex]";
+    mes "\"Did you give that box to Andy?\"";
+    close;
+	
+L_Alex_Okay:
+
+	mes "[Alex]";
+    mes "Did you tell him what I asked you to tell him?";
+    menu
+	
+        "Yes I did, but he asked me to tell you that he is going to stay in Dark World because he likes that place.", L_Alex_Damn,
+		
+		"No I didn't", -;
+		
+    close;
+	
+L_Alex_Damn:
+
+	set TOM_Quest, 5;
+    mes "[Alex]";
+    mes "\"Ah, thank you. Hope he's mentally okay...\"";
+	mes "\"Here is your reward anyways, Andy found these a year ago from Dark World...\"";
+	getinventorylist;
+    if (@inventorylist_count == 100) goto L_Alex_TooMany;
+	getexp 3000, 0;
+	set Zeny, Zeny + 4000;
+	getitem "Whiterabbitears", 1;
+	close;
+	
+L_Alex_TooMany:
+
+    mes "[Alex]";
+    mes "\"You have too many items for me to give you a reward.\"";
+    close;
+	
+L_Alex_End:
+
+    mes "[Alex]";
+    mes "\"Be safe out there, Dark World is dangerous for the unexperienced!\"";
+    close;
+	
+}
+
+
+
+
+
+
+
+
+
+
+
+
+//Andy
+
+???-?.gat,??,??,?|script|Andy|???,{
+	
+    if (TOM_Quest == 1) goto L_Andy_Okay;
+    if (TOM_Quest == 2) goto L_Andy_Tablet;
+    if (TOM_Quest == 3) goto L_Andy_Tell;
+    if (TOM_Quest == 4) goto L_Andy_whatdidhesay;
+    if (TOM_Quest == 5) goto L_Andy_End;
+	
+    mes "[Andy]";
+    mes "\"Lots of work to do.\"";
+    close;
+	
+L_Andy_Okay:
+
+    mes "[Andy]";
+    mes "\"Oh, hello there.\"";
+	next;
+	mes "\"You show him the wooden box Alex gave you earlier.\"";
+	mes "\"Alex wanted you to give me that? Okay, let me see...\"";
+	getexp 1000, 0;
+	set Zeny, Zeny + 1000;
+    goto L_Andy_Help
+	
+L_Andy_Help:
+
+    mes "[Andy]";
+    mes "\"I need Alex to see this...\"";
+	mes "\"Andy shows you a stone tablet.\"";
+	mes "\"Please get this to Alex!\"";
+	set TOM_Quest, 2;
+    close;
+	
+L_Andy_Tablet:
+
+    mes "[Andy]";
+    mes "\"Did you show Alex that tablet\"";
+    close;
+
+L_Andy_Tell
+	
+    mes "[Andy]";
+    mes "\"What did he say?\"";
+	menu
+	
+        "He said that you have found what you were looking for and you dont have to stay here in Dark World anymore.", L_Andy_Well,
+		
+        "Nothing...", -;
+		
+		close;
+	
+L_Andy_Well:
+
+    mes "[Andy]";
+    mes "\"Thats great news, but tell Alex that I'm going to stay here because I like this place.\"";
+	getexp 1000, 0;
+	set TOM_Quest, 4;
+    close;
+	
+L_Andy_Whatdidhesay:
+
+    mes "[Andy]";
+    mes "\"Pleasy hurry!\"";
+    close;
+	
+L_Andy_End:
+
+    mes "[Andy]";
+    mes "\"Thanks for your help again!\"";
+    close;
+	
+}