Merge branch 'jesusalva/GuidedTour' into 'master'

Guide players by hand to get started on the game.

See merge request evol/serverdata!133

3 files changed, 17 insertions, 1 deletions

diff --git a/npc/000-0-0/sailors.txt b/npc/000-0-0/sailors.txt
index 28f5431d..5aa56deb 100644
--- a/npc/000-0-0/sailors.txt
+++ b/npc/000-0-0/sailors.txt
@@ -9,6 +9,7 @@
 000-0-0,26,23,0	script	Elmo#sailors	NPC_ELMO,{
 
 OnTalk:
+    deltimer("Elmo#sailors::OnSlow");
     setcamnpc;
     mesn "Elmo";
     mesq lg("This girl is lucky we found her before a shark did. I have no idea where she comes from. By the way, did you see the logo on her raft?", "This guy is lucky we found him before a shark did. I have no idea where he comes from. By the way, did you see the logo on his raft?");
@@ -65,6 +66,7 @@ OnTalk:
     restorecam;
     adddefaultskills;
     setq General_Narrator, 0;
+    addtimer(45000,"Magic Arpan::OnSlow");
     warp "000-2-1", 50, 38;
     savepoint "000-2-1", 50, 38;
     closeclientdialog;
@@ -73,6 +75,12 @@ OnTalk:
 OnInit:
     .sex = G_MALE;
     end;
+
+OnSlow:
+    npctalk3(l("(Click on us to continue the introduction.)"));
+    dispbottom(l("Click on the NPCs (Non-Player Characters) around you to continue the introduction."));
+    addtimer(60000,"Elmo#sailors::OnSlow");
+    close;
 }
 
 000-0-0,25,23,0	script	Magic Arpan#sailors	NPC_MAGIC_ARPAN,{
diff --git a/npc/000-0/sailors.txt b/npc/000-0/sailors.txt
index 1adcb678..f412c19c 100644
--- a/npc/000-0/sailors.txt
+++ b/npc/000-0/sailors.txt
@@ -69,6 +69,7 @@ OnTouch:
     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;
diff --git a/npc/000-2-1/arpan.txt b/npc/000-2-1/arpan.txt
index 4af849c4..5002eac1 100644
--- a/npc/000-2-1/arpan.txt
+++ b/npc/000-2-1/arpan.txt
@@ -94,10 +94,11 @@ OnTalk:
     mesn;
 
     if (.@q > 0) goto L_Menu;
+    setq ShipQuests_Arpan, 1;
+    deltimer("Magic Arpan::OnSlow");
 
     mesq lg("Yeye, you are really lucky to be alive. You are in good enough shape for walking, do you remember what happened?");
     next;
-    setq ShipQuests_Arpan, 1;
 
     menu
         lg("I only remember I was rescued by you."), L_Story,
@@ -265,6 +266,12 @@ L_GotoSleep:
 
     goto L_Menu;
 
+OnSlow:
+    dispbottom(l("Use arrow keys to walk around and leave this room."));
+    npctalk3(l("Please come talk to me, I'll help you get dressed."));
+    addtimer(90000,"Magic Arpan::OnSlow");
+    close;
+
 OnInit:
     .sex = G_MALE;
     .distance = 5;