1 files changed, 92 insertions, 0 deletions
diff --git a/npc/000-0/sailors.txt b/npc/000-0/sailors.txt
new file mode 100644
index 00000000..d19d4f39
--- /dev/null
+++ b/npc/000-0/sailors.txt
@@ -0,0 +1,92 @@
+// Evol scripts.
+// Authors:
+//    4144
+//    Qwerty Dragon
+//    Reid
+//    Vasily_Makarov
+//    Jesusalva
+// Description:
+//    Starting script of Evol Online.
+
+000-0,23,20,0	script	Sailors	NPC_SAILORS,6,6,{
+
+OnTouch:
+    checkclientversion;
+    .@lang = requestlang();
+    if (.@lang >= 0 && .@lang <= MAX_LANG) Lang = .@lang;
+
+    mesn l("Narrator");
+    mesc(l("You are on a raft, adrift in the sea."), 9);
+    next;
+    mesc(l("With hunger, thirst, and sleep as your only companions, you have the disturbing realization that you can't remember anything of your former life or identity."), 9);
+    next;
+    mesc(l("All of a sudden, you hear voices from above."), 9);
+    next;
+    mesc(l("Your body aches, even your hair hurts, and the bright daylight is painful."), 9);
+    next;
+    mesc(l("But still, you open your eyes and see a large ship before you!"), 9);
+    next;
+    mesc(l("Aboard stand sailors trying to communicate with you."), 9);
+    next;
+
+    setcamnpc "Sailors", -64, -32;
+    mesn l("Kralog Voice");
+    mesq l("Hey Frenchy!");
+    next;
+
+    setcamnpc "Sailors", 0, -32;
+    mesn l("Human Voice");
+    mesq l("Nah, clearly from the East...");
+    next;
+
+    setcamnpc "Sailors", 144, -80;
+    mesn l("Tritan Voice");
+    mesq l("What are you guys saying ? It's a Yoiis!");
+    next;
+
+    setcamnpc;
+    mesn l("Raijin Voice");
+    mesq l("From the East? As in... Ancea?");
+    next;
+    mesq l("Hey you! Can you hear us? Are you okay?");
+    next;
+    restorecam;
+
+    asklanguage(LANG_ON_SEA);
+
+    // Players coming from TMW Legacy didn't got a chance to do this yet.
+    // So allow them now.
+    if (islegacyaccount()) {
+        // Rebirth system
+        if (getlegacylevel() > 90)
+            REBIRTH=1;
+
+        // Race selection
+        BarberChangeRace();
+    }
+
+    setcamnpc;
+    mes "";
+    mesn;
+    mesq l("Oh, still alive? What a relive!");
+    next;
+    setcamnpc "Sailors", 144, -80;
+    mesq l("This castaway needs help, on to the rescue!");
+    next;
+    restorecam;
+
+    mesn l("Narrator");
+    mesc(l("The sailors take you aboard their ship."), 9);
+    next;
+    mesc(l("Click on the NPCs (Non-Player Characters) around you to continue the introduction."), 9);
+    next;
+
+    addtimer(15000,"Elmo#sailors::OnSlow");
+    warp "000-0-0", 26, 28;
+
+    closeclientdialog;
+    close;
+
+OnInit:
+    end;
+}