Initial commit

6 files changed, 131 insertions, 0 deletions

diff --git a/npc/001-2-24/_import.txt b/npc/001-2-24/_import.txt
new file mode 100644
index 000000000..34c43a0b5
--- /dev/null
+++ b/npc/001-2-24/_import.txt
@@ -0,0 +1,7 @@
+// Map 001-2-24: Nard's Room
+// This file is generated automatically. All manually added changes will be removed when running the Converter.
+"npc/001-2-24/_warps.txt",
+"npc/001-2-24/hammock.txt",
+"npc/001-2-24/mapflags.txt",
+"npc/001-2-24/nard.txt",
+"npc/001-2-24/piourocket.txt",
diff --git a/npc/001-2-24/_warps.txt b/npc/001-2-24/_warps.txt
new file mode 100644
index 000000000..945c3aca1
--- /dev/null
+++ b/npc/001-2-24/_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-24: Nard's Room warps
+001-2-24,19,27,0	warp	#001-2-24_19_27	0,0,001-2-21,32,28
diff --git a/npc/001-2-24/hammock.txt b/npc/001-2-24/hammock.txt
new file mode 100644
index 000000000..f43193587
--- /dev/null
+++ b/npc/001-2-24/hammock.txt
@@ -0,0 +1,17 @@
+// Evol scripts.
+// Author:
+//    Reid
+// Description:
+//    Animated hammock at the top level of the ship.
+
+001-2-24,28,24,0	script	#nardArtisHammock	NPC_LEFT_HAMMOCK,1,0,{
+
+OnTouch:
+    hamTouchRight;
+
+OnUnTouch:
+    hamUnTouch;
+
+OnTimer5440:
+    hamTimerRight;
+}
diff --git a/npc/001-2-24/mapflags.txt b/npc/001-2-24/mapflags.txt
new file mode 100644
index 000000000..4506b385f
--- /dev/null
+++ b/npc/001-2-24/mapflags.txt
@@ -0,0 +1 @@
+001-2-24	mapflag	town
diff --git a/npc/001-2-24/nard.txt b/npc/001-2-24/nard.txt
new file mode 100644
index 000000000..6c8458388
--- /dev/null
+++ b/npc/001-2-24/nard.txt
@@ -0,0 +1,94 @@
+// Evol scripts.
+// Authors:
+//    Qwerty Dragon
+//    Reid
+// Description:
+//    Captain Nard dialogs.
+//    Nard does the introduction with a small quest.
+//    This quest is meant to teach the player how to use a weapon,and to bring food to the ship.
+//    4 bits array:
+//    ShipQuests
+// Variable:
+//    0    ShipQuests_Nard
+//    1    ShipQuests_Gugli
+//    2    ShipQuests_ChefGado
+// Values:
+//    00   Introduction of the boxes and Nard. This is displayed when the player never spoke to Nard or his box.
+//    01   Nard spoke and gave access to the outdoor of the ship.
+//    02   Completed the Gugli quest.
+//    03   ChefGado Quest accepted.
+//    04   ChefGado Quest completed and "Introduction" chapter finalized.
+//    05   Reward taken from the box.
+//    10   Never talked with Gugli.
+//    11   Gugli gives you the task.
+//    12   Gave all of the boxes to Gugli.
+
+001-2-24,25,26,0	script	Nard#Artis	NPC_NARD,{
+
+    checkclientversion;
+    mesn;
+    mesq g(l("Good day miss."), l("Good day mister."));
+    next;
+    mesq l("What can I do for you?");
+    .@q = getq(ArtisQuests_Enora);
+
+    // Before the player sees Enora, the menu shows L_Lost on top
+    // If the player saw Enora, the menu shows L_Lost at the bottom
+    // Because he shouldn't be lost after having talked to her, so the priority in menu changes
+    menu
+        rif(.@q == 0, lg("I'm lost, where should I go?")), L_Lost,
+        rif(.@q > 0, l("Tell me, where are we right now?")), L_Info,
+        l("How long will you stay here?"), -,
+        rif(.@q > 0, lg("I'm lost, where should I go?")), L_Lost;
+
+    speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+        l("We just returned from a long journey and Artis is a good city to rest and to conclude our exchange."),
+        l("I think that we will stay in port for a great time."),
+        l("Although, if you want to visit a place nearby, we could take you there."),
+        l("Do you want to go somewhere?");
+
+    switch (select(l("Drasil Island."),
+                   l("Nowhere, I'm fine here.")))
+    {
+        case 1:
+            speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+                l("Let's set sail then!");
+
+            savepoint "000-2-1", 50, 38;
+            if (!getmapxy(.@map$, .@x, .@y, 0))
+            {
+                warp "000-2-3", .@x, .@y;
+            }
+            else
+            {
+                warp "000-2-3", 22, 27;
+            }
+
+            closedialog;
+            close;
+        case 2:
+            speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+                l("Ok we stay docked here if you need our help.");
+
+            closedialog;
+            close;
+    }
+L_Info:
+    closedialog;
+    npctalk3 l("Don't you recognize the great city of Artis?");
+    close;
+
+L_Lost:
+    mes "";
+    mesn;
+    mesq l("Julia made an appeal to the Legion of Aemil to get in touch with you, exit the ship and you should see your escort!");
+    next;
+
+    closedialog;
+    close;
+
+OnInit:
+    .sex = G_MALE;
+    .distance = 5;
+    end;
+}
diff --git a/npc/001-2-24/piourocket.txt b/npc/001-2-24/piourocket.txt
new file mode 100644
index 000000000..3bcc914bd
--- /dev/null
+++ b/npc/001-2-24/piourocket.txt
@@ -0,0 +1,9 @@
+// Evol scripts.
+// Author:
+//    Ablu
+// Description:
+//    Jumping piou.
+
+// actual source is in npc/000-2-3/piourocket.txt
+
+001-2-24,27,23,4	duplicate(#piourocket)	#piourocketArtis	NPC_PIOU_ROCKET