Initial commit

5 files changed, 117 insertions, 0 deletions

diff --git a/npc/001-2-26/_import.txt b/npc/001-2-26/_import.txt
new file mode 100644
index 000000000..ab0c29703
--- /dev/null
+++ b/npc/001-2-26/_import.txt
@@ -0,0 +1,6 @@
+// Map 001-2-26: Alchemy Lab
+// This file is generated automatically. All manually added changes will be removed when running the Converter.
+"npc/001-2-26/_warps.txt",
+"npc/001-2-26/flask.txt",
+"npc/001-2-26/ivan.txt",
+"npc/001-2-26/mapflags.txt",
diff --git a/npc/001-2-26/_warps.txt b/npc/001-2-26/_warps.txt
new file mode 100644
index 000000000..2b16f5696
--- /dev/null
+++ b/npc/001-2-26/_warps.txt
@@ -0,0 +1,3 @@
+// This file is generated automatically. All manually added changes will be removed when running the Converter.
+// Map 001-2-26: Alchemy Lab warps
+001-2-26,28,43,0	warp	#001-2-26_28_43	0,0,001-1,163,71
diff --git a/npc/001-2-26/flask.txt b/npc/001-2-26/flask.txt
new file mode 100644
index 000000000..8afa58c3f
--- /dev/null
+++ b/npc/001-2-26/flask.txt
@@ -0,0 +1,21 @@
+// Evol scripts.
+// Author:
+//    Reid
+// Description:
+//    Alchemy animation.
+
+001-2-26,32,27,4	script	#FlaskAlchemyLab	NPC_FLASK,{
+    .dir = 2;
+    stopnpctimer;
+    initnpctimer;
+    close;
+
+OnTimer12920:
+    .dir = 4;
+    stopnpctimer;
+    end;
+
+OnInit:
+    .distance = 3;
+    end;
+}
diff --git a/npc/001-2-26/ivan.txt b/npc/001-2-26/ivan.txt
new file mode 100644
index 000000000..251e11073
--- /dev/null
+++ b/npc/001-2-26/ivan.txt
@@ -0,0 +1,86 @@
+// Evol scripts.
+// Author:
+//    Reid
+// Description:
+//    Alchemist NPC
+
+001-2-26,28,30,0	script	Ivan	NPC_IVAN,{
+
+    function ivan_description {
+        speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+            l("I am an alchemist, I bear the name of Ivan."),
+            l("I work under the protection and the supervision of the Legion of Aemil."),
+            l("Alchemical studies are prohibited in every city of the Archipelagos, do not dare to practice it in a public zone!");
+
+        return;
+    }
+
+    function enora_quest {
+        speech S_FIRST_BLANK_LINE | S_LAST_NEXT, l("How many? What kind? I can produce two dozen boxes per day.");
+
+        select(l("5 Piberries Infusions"));
+
+        speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+            l("5 boxes... Alright, @@ are my speciality!", getitemlink(PiberriesInfusion)),
+            l("I can prepare them in an hour or so!");
+
+        select(l("You missunderstood, it's 5 potions."));
+
+        speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+            l("Why would the Legion request my help for only 5 potions?"),
+            l("Is this some kind of joke?!");
+
+        switch (select(l("Enora needs them."),
+                        l("Excuse me that was a mistake.")))
+        {
+            case 1:
+                break;
+            case 2:
+                narrator S_FIRST_BLANK_LINE, l("Ivan grumbles and resumes his work.");
+                emotion E_UPSET;
+                close;
+        }
+
+        speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+            l("Oh... You should have started with this!"),
+            l("I have some spare one, take them, and tell Enora that any fees are paid!");
+
+        setq ArtisQuests_Enora, 9;
+        emotion E_HAPPY;
+        return;
+    }
+
+    .@enora = getq(ArtisQuests_Enora);
+
+    if (.@enora < 8)
+    {
+        npctalk3 l("I'm busy, leave me alone.");
+        end;
+    }
+
+    speech S_LAST_NEXT, l("Yes what do you need?");
+
+    select
+        rif(.@enora == 8, l("The Legion needs some potions.")),
+        rif(.@enora >= 8, l("Who are you?")),
+        menuaction(l("Quit"));
+
+    switch (@menu)
+    {
+        case 1:
+            enora_quest;
+            break;
+        case 2:
+            ivan_description;
+            break;
+    }
+
+    closedialog;
+    goodbye;
+    close;
+
+OnInit:
+    .sex = G_MALE;
+    .distance = 2;
+    end;
+}
diff --git a/npc/001-2-26/mapflags.txt b/npc/001-2-26/mapflags.txt
new file mode 100644
index 000000000..20c3188dc
--- /dev/null
+++ b/npc/001-2-26/mapflags.txt
@@ -0,0 +1 @@
+001-2-26	mapflag	town