Initial commit

1 files changed, 60 insertions, 0 deletions

diff --git a/npc/marine-2/main.txt b/npc/marine-2/main.txt
new file mode 100644
index 00000000..9ab0dfc0
--- /dev/null
+++ b/npc/marine-2/main.txt
@@ -0,0 +1,60 @@
+// Moubootaur Legends script
+// Originals from TMW-BR
+// Imported by Jesusalva
+
+marine-2,0,0,0	script	#MarineShip	NPC_HIDDEN,{
+    end;
+
+OnEvent:
+    // Handle travel
+    if (@timer_navio_running == 0) end;
+    if      (PC_DEST$ == "Tulim") goto L_Tulim;
+    else if (PC_DEST$ == "Hurns") goto L_Hurns;
+    else if (PC_DEST$ == "Candor") goto L_Candor;
+    else if (PC_DEST$ == "Artis") goto L_Artis;
+    else if (PC_DEST$ == "Argaes") goto L_Argaes;
+    else goto L_Error;
+    end;
+
+L_Tulim:
+    EnterTown("Tulim", true);
+    dispbottom l("%s disembarks at Tulimshar.", strcharinfo(0));
+    end;
+
+L_Hurns:
+    EnterTown("Hurns", true);
+    dispbottom l("%s disembarks at Hurnscald.", strcharinfo(0));
+    end;
+
+L_Candor:
+    EnterTown("Candor", true);
+    dispbottom l("%s disembarks at Candor.", strcharinfo(0));
+    end;
+
+L_Artis:
+    EnterTown("Artis", true);
+    dispbottom l("%s disembarks at Artis.", strcharinfo(0));
+    end;
+
+L_Argaes:
+    if (getq(General_Narrator) == 1) {
+        warp "000-0-1", 26, 28;
+    } else {
+        EnterTown("Argaes", true);
+        dispbottom l("%s disembarks at Argaes.", strcharinfo(0));
+    }
+    end;
+
+L_Error:
+    consolemes(CONSOLEMES_ERROR, "PLAYER INVALID PC_DEST ON #MarineShip: " + PC_DEST$);
+    ReturnLastTown();
+    dispbottom l("An error on your travel happened. Please report.");
+    end;
+}
+
+function	script	TravelFix	{
+    if (getmap() == "marine-2")
+        ReturnLastTown();
+    return;
+}
+