Rewrite part of Nard to a switch

1 files changed, 33 insertions, 37 deletions

diff --git a/npc/002-3/nard.txt b/npc/002-3/nard.txt
index 631d32bf1..d57961778 100644
--- a/npc/002-3/nard.txt
+++ b/npc/002-3/nard.txt
@@ -30,16 +30,40 @@ L_Checker:
     mesq l("So, how do you feel? I see that Juliet did a marvellous job! You look like you're in good health now.");
     next;
 
-L_Menu:
-    menu
-        lg("I feel ok."), L_Ok,
-        l("Who's this Juliet?"), L_Juliet,
-        lg("I'm a bit sick..."), -;
-
+    select
+        lg("I feel ok."),
+        l("Who's this Juliet?"),
+        lg("I'm a bit sick...");
     mes "";
-    mesn;
-    mesq l("Oh, I was going to ask you if you wanted to help the crew search for some food and explore the island out there.");
-    next;
+    switch (@menu) {
+    case 1:
+        mesn;
+        mesq l("Good to know.");
+        next;
+        mesq l("We have made a stop at a little island, before making it on to the port of Tulimshar.");
+        next;
+        mesq l("It would be good for you to do some exercise, the ship isn't big enough for that.");
+        next;
+        mesq l("I know that you are just starting to feel better, but I'd like you to explore the island we're currently at.");
+        next;
+        break;
+    case 2:
+        mesn;
+        mesq l("You have an awful case of amnesia.");
+        next;
+        mesq l("She is the nurse and shipkeeper of this ship.");
+        next;
+        mesq lg("But most important, she is the one who took care of you when you were unconscious.");
+        next;
+        mesq l("I know that you are just starting to feel better, but I'd like you to explore the island we're currently at.");
+        next;
+        break;
+    case 3:
+        mesn;
+        mesq l("Oh, I was going to ask you if you wanted to help the crew search for some food and explore the island out there.");
+        next;
+        break;
+    }
 
 L_MenuQuest:
     menu
@@ -137,34 +161,6 @@ L_NeedHead:
     next;
     goto L_MenuQuest;
 
-L_Ok:
-    mes "";
-    mesn;
-    mesq l("Good to know.");
-    next;
-    mesq l("We have made a stop at a little island, before making it on to the port of Tulimshar.");
-    next;
-    mesq l("It would be good for you to do some exercise, the ship isn't big enough for that.");
-    next;
-
-    goto L_SpecialTask;
-
-L_Juliet:
-    mes "";
-    mesn;
-    mesq l("You have an awful case of amnesia.");
-    next;
-    mesq l("She is the nurse and shipkeeper of this ship.");
-    next;
-    mesq lg("But most important, she is the one who took care of you when you were unconscious.");
-    next;
-
-L_SpecialTask:
-    mesq l("I know that you are just starting to feel better, but I'd like you to explore the island we're currently at.");
-    next;
-
-    goto L_MenuQuest;
-
 L_CandorIsland:
     mes "";
     mesn;