Initial commit (Moubootaur Legends fork)

4 files changed, 230 insertions, 0 deletions

diff --git a/npc/017-6/_import.txt b/npc/017-6/_import.txt
new file mode 100644
index 0000000..197e95a
--- /dev/null
+++ b/npc/017-6/_import.txt
@@ -0,0 +1,5 @@
+// Map 017-6: LoF Alchemy Shop
+// This file is generated automatically. All manually added changes will be removed when running the Converter.
+"npc/017-6/_warps.txt",
+"npc/017-6/axzell.txt",
+"npc/017-6/sheila.txt",
diff --git a/npc/017-6/_warps.txt b/npc/017-6/_warps.txt
new file mode 100644
index 0000000..5d600c7
--- /dev/null
+++ b/npc/017-6/_warps.txt
@@ -0,0 +1,5 @@
+// This file is generated automatically. All manually added changes will be removed when running the Converter.
+// Map 017-6: LoF Alchemy Shop warps
+017-6,30,44,0	warp	#017-6_30_44	0,1,017-1,38,139
+017-6,30,32,0	warp	#017-6_30_32	0,1,017-1,38,131
+017-6,30,53,0	warp	#017-6_30_53	0,1,017-1,38,154
diff --git a/npc/017-6/axzell.txt b/npc/017-6/axzell.txt
new file mode 100644
index 0000000..4148d53
--- /dev/null
+++ b/npc/017-6/axzell.txt
@@ -0,0 +1,173 @@
+// TMW2/LoF scripts.
+// Authors:
+//    Jesusalva
+// Dye Quest added by:
+//    Povo
+// Description:
+//    Status Reset. Formely named Bobby
+
+017-6,25,30,0	script	Axzell the Alchemist	NPC_PLAYER,{
+
+    speech S_LAST_NEXT,
+        l("I am @@, an alchemist specialized in reset potions.", .name$);
+
+L_Menu:
+    .@plush_count = BaseLevel*190-(9*210);
+    // Lv 10: 10 GP
+    // Lv 90: 1.690 GP
+    if (BaseLevel > 10)
+        .@plush_count = .@plush_count/(BaseLevel/10);
+
+    select
+        l("Can you reset my stats please?"),
+        l("Hey, nice hat! Can I have it?"),
+        l("Do you make anything else?"),
+        lg("You are weird, I have to go sorry.");
+
+    mes "";
+    switch (@menu) {
+        case 1:
+            goto L_ResetStats;
+        case 2:
+            mesn;
+            mesq l("Maybe.");
+            next;
+            mesn strcharinfo(0);
+            mes l("*_* \"Pretty please?\"");
+            next;
+            mesn;
+            mesq l("Well, I and my brother could make another one, but they are being checked for safety.");
+            next;
+            mesn;
+            mesq l("After all, what would you do if it open a black hole on your head by accident? %%4");
+            next;
+            mesn strcharinfo(0);
+            mesq l("Welp, no, please!");
+            next;
+            mesn;
+            mesq l("%%@ Then wait until Saulc says they are safe!");
+            next;
+            goto L_Menu;
+        case 3:
+            goto L_Dye;
+        case 4:
+            goto L_Quit;
+    }
+
+L_ResetStats:
+    mesn;
+    mesq l("Status point reset can't be undone. Do you really want this?");
+
+L_ConfirmReset:
+    ConfirmStatusReset();
+    goto L_Quit;
+
+L_Dye:
+    mesn;
+    mesq l("Since red is the official color of Land of Fire Village, I craft dye for players who will properly represent our town.",
+                      getitemlink(RedDye));
+    if (BaseLevel < 50) {
+        mesn;
+        mesq l("Right now you are too weak.");
+        mesq l(" What would people think of our village if they come accross a defeated noob wearing our proud colors!");
+        next;
+        mesq l("Come back when you are at a higher level.");
+        next;
+        goto L_Menu;
+    }
+    next;
+    mesq l("Bring me %d %s, %d %s, %d %s, and %d %s, and I will make it for you. I also charge %d GP commission.",
+        1, getitemlink(BottleOfSewerWater),
+        200, getitemlink(AlizarinHerb),
+        20, getitemlink(Coral),
+        10, getitemlink(SulfurPowder), 3500);
+    mesq l("Do you want one?");
+    compareandsetq LoFQuest_Axzell, 0, 1;
+   next;
+    select
+        l("Yeah, I need one."),
+        l("Thanks for the help, but no."),
+        l("Actually, nevermind. Good bye!");
+    mes "";
+    if (@menu == 2)
+        goto L_Menu;
+
+    if (@menu == 3)
+        goto L_Quit;
+
+    L_DyeLoop:
+    if (countitem(BottleOfSewerWater) >= 1 &&
+          countitem(AlizarinHerb) >= 200 &&
+          countitem(Coral) >= 20 &&
+          countitem(SulfurPowder) >= 10 &&
+          Zeny >= 3500) {
+        inventoryplace RedDye, 1, EmptyBottle, 1;
+        delitem BottleOfSewerWater, 1;
+        delitem AlizarinHerb, 200;
+        delitem Coral, 20;
+        delitem SulfurPowder, 10;
+        Zeny-=3500;
+        getitem RedDye, 1;
+        getitem EmptyBottle, 1;
+        if (getq(LoFQuest_Axzell) == 1) {
+            setq LoFQuest_Axzell, 2;
+            getexp 15000, 0;
+        }
+        mesn;
+        mesq l("Thanks! Here you go. Perhaps you want another one?");
+        next;
+        if (askyesno() == ASK_YES)
+            goto L_DyeLoop;
+    } else {
+        mesn;
+        mesq l("Sorry, you don't seem to have everything I need.");
+    }
+    close;
+
+L_Quit:
+    closedialog;
+    goodbye;
+    close;
+
+OnTimer1000:
+    domovestep;
+
+OnInit:
+    .@npcId = getnpcid(.name$);
+    setunitdata(.@npcId, UDT_HEADTOP, ChemistHelmet);
+    setunitdata(.@npcId, UDT_HEADMIDDLE, AlchemistArmor);
+    setunitdata(.@npcId, UDT_HEADBOTTOM, RaidTrousers);
+    setunitdata(.@npcId, UDT_WEAPON, LousyMoccasins); // Boots
+    setunitdata(.@npcId, UDT_HAIRSTYLE, 14);
+    setunitdata(.@npcId, UDT_HAIRCOLOR, 17);
+
+    initpath "move", 25, 30,
+             "dir", DOWN, 0,
+             "wait", 15, 0,
+             "move", 29, 21,
+             "dir", LEFT, 0,
+             "wait", 5, 0,
+             "dir", DOWN, 0,
+             "wait", 15, 0,
+             "move", 28, 34,
+             "dir", RIGHT, 0,
+             "wait", 15, 0,
+             "move", 22, 37,
+             "dir", RIGHT, 0,
+             "wait", 30, 0,
+             "move", 22, 48,
+             "dir", UP, 0,
+             "wait", 15, 0,
+             "move", 28, 62,
+             "dir", UP, 0,
+             "wait", 15, 0,
+             "move", 29, 47,
+             "dir", UP, 0,
+             "wait", 15, 0;
+    initialmove;
+    initnpctimer;
+
+    .sex = G_MALE;
+    .distance = 5;
+    end;
+}
diff --git a/npc/017-6/sheila.txt b/npc/017-6/sheila.txt
new file mode 100644
index 0000000..9c01e11
--- /dev/null
+++ b/npc/017-6/sheila.txt
@@ -0,0 +1,47 @@
+// TMW2/LoF scripts.
+// Authors:
+//    Jesusalva
+// Description:
+//    Makes the Time Potion Of Ozthokk
+
+017-6,27,48,0	script	Sheila the Clockmaker	NPC_SHEILA,{
+    showavatar NPC_SHEILA;
+    mesn;
+    mesq l("Ah, hello... is it @@? Nice to meet you!", strcharinfo(0));
+    next;
+    mesn;
+    mesq l("I am @@, student from the ancient secrets of the Mage of Time, Ozthokk.", .name$);
+    next;
+    mesn;
+    mesq l("My greatest realization thus far, besides some time rewinding clocks, is the @@!", getitemlink(TimeFlask));
+    next;
+    mesn;
+    mesq l("I'm not sure what it needs to move on time, but I managed to make it move in space, back to this village, in no time!");
+    mesq l("Well, maybe it takes a few hours or days of your life, but who cares! It is instant teleport!");
+    next;
+    mesn;
+    mesq l("If you bring me a @@ and 500 GP I can make one for you!", getitemlink(DragonScales));
+    if (!countitem(DragonScales) || Zeny < 500)
+        close;
+    select
+        l("Nice, but no, thanks."),
+        l("Pretty cool! I am interested!");
+    mes "";
+    if (@menu == 1)
+        close;
+    inventoryplace TimeFlask, 1;
+    delitem DragonScales, 1;
+    Zeny=Zeny-500;
+    getitem TimeFlask, 1;
+    mesn;
+    mesq l("Neat, neat! Thanks! Here you go, this amazing bottle! It is life-bond, so having multiple won't reduce the time you need to wait...");
+    next;
+    mesn;
+    mesq l("Do not open. Do not attempt to eat. Be careful with it, to don't cause any time paradoxes. I also heard a NPC may be interested on that, by the way!");
+    close;
+
+OnInit:
+    .sex = G_FEMALE;
+    .distance = 5;
+    end;
+}