From 1e70325b384d03da2402fed4ae0bad8cbc238572 Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Mon, 27 Aug 2018 11:20:34 -0300
Subject: Rosen reviewed.

---
 npc/005-4/rosen.txt | 54 +++++++++++++++++++++++++++++++++--------------------
 1 file changed, 34 insertions(+), 20 deletions(-)

(limited to 'npc/005-4')

diff --git a/npc/005-4/rosen.txt b/npc/005-4/rosen.txt
index 83e1bdec3..1b9c173c5 100644
--- a/npc/005-4/rosen.txt
+++ b/npc/005-4/rosen.txt
@@ -4,15 +4,13 @@
 // Description:
 //    Candor Armor&Weapon shop keeper.
 // Variables:
-//    CandorQuest_Rosen (nyi)
+//    CandorQuest_Rosen
 //      Suggestion: Deliver a letter to Zegas, giving player background about
 //      Candor Island and Saxso. Requires level 5. Reward: 150 GP.
 //      Could have an additional step related to Bifs. Even a daily quest asking
 //      for (day % 8) ore, with suitable prices.
 
 005-4,29,36,0	script	Rosen	NPC_GUARD1,{
-    .@q=getq(CandorQuest_Rosen);
-    .@b=getq(ShipQuests_ChefGado);
     function explain_ironingot {
         speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
             l("Did you see Jhedia the blacksmith in Tulimshar? She might know how you could get this."),
@@ -30,7 +28,7 @@
         select
             menuaction(l("Trade")),
             l("How can I get iron ingot?"),
-            rif(getq(CandorQuest_Rosen) < 3, l("I want to improve my equipment.")),
+            l("I want to improve my equipment."),
             menuaction(l("Quit"));
 
         switch (@menu)
@@ -55,45 +53,61 @@
 
 L_Gloves:
     .@q=getq(CandorQuest_Rosen);
+    .@b=getq(ShipQuests_ChefGado);
     mes "";
     if (BaseLevel < 4) goto L_NoLevel;
     if (.@b <= 2) goto L_NoGloves;
+    if (.@q >= 3) goto L_Complete;
     .@k=getq2(CandorQuest_Rosen); // Get number of kills (via getq2)
-    
+
     mesn;
     if (.@q == 0) {
-        mesq l("As i see you have some used gloves, I'm not sure if you can mine with it...");
+        mesq l("Ah, I see you have some used gloves. I'm not sure if you can even mine with it...");
         next;
-        mesq l("Ah! let's do a test. Go mine 10 @@. You should found some source at nord east of the Island.", getmonsterlink(DiamondBif));
+        mesn;
+        mesq l("Uhm, maybe I could teach you something, too. Go mine 10 @@. You should find some at northeast of the Island.", getmonsterlink(DiamondBif));
+        next;
+        mesn;
+        mesq l("These monsters are a great source of raw crafting materials.");
         setq CandorQuest_Rosen, 1, 0;
     } else if (.@q == 1) {
-        mesq l("You done mine enought @@. The perfect spot is at nord east of this islend.", getmonsterlink(DiamondBif));
+        mesq l("You didn't mine enough @@. The perfect spot is at northeast of this island. It takes a while to them respawn, so don't hurry.", getmonsterlink(DiamondBif));
     } else if (.@q == 2) {
-        mesq l("Wow! those pity gloves arent made for mining.");
-        mesq l("Here, take this @@ It will be better suited!.", getitemlink(CandorGloves));
+        mesq l("Wow! those pity gloves aren'st made for mining. They're almost ruined!");
+        mesq l("Here, take this @@. It will be better suited!", getitemlink(CandorGloves));
         inventoryplace CandorGloves, 1;
         getexp 30, 5;
         getitem CandorGloves, 1;
         setq CandorQuest_Rosen, 3, 0;
     }
     close;
-    
+
 L_NoLevel:
     mesn;
-    mesq l("You aren't strong enought.");
+    mesq l("You aren't strong enough.");
     next;
     mesn;
-    mesq l("Go see someone else..");
+    mesq l("Go see someone else for now. Yes, you need level to take most tasks available on the world!");
     close;
-    
+
 L_NoGloves:
     mesn;
-    mesq l("A miner have real decent gloves dude.");
+    mesq l("You should have some decent gloves, dude. These offer defense, as it's easier to handle your weapon and parry attacks.");
     next;
     mesn;
-    mesq l("For sure Chef of Nard's ship can spare you a pair of glove.");
+    mesq l("For sure the chef of Nard's ship could spare you a pair of gloves.");
     close;
 
+L_Complete:
+    mesn;
+    mesq l("Ah, uhm, I'm not sure. We at Candor don't need much.");
+    next;
+    mesn;
+    mesq l("You could try to get new equipment by doing more quests. You need level to use them, though.");
+    next;
+    mesn;
+    mesq l("Alternatively, I think someone at the Land Of Fire Village is able to refine some items. Why don't you try it sometime?");
+    close;
 
     function rosen_add_kills
     {
@@ -119,7 +133,7 @@ OnKillMBif:
             message strcharinfo(0), l("Go back to Rosen!");
         } else {
             rosen_add_kills();
-            message strcharinfo(0), l("@@/10 Emerald Bif", .@k+1);
+            message strcharinfo(0), l("@@/10 @@", .@k+1, getmonsterlink(DiamondBif));
         }
     }
     end;
@@ -137,11 +151,11 @@ OnInit:
              "wait", 31, 0,
              "move", 25, 35,
              "dir", UP, 0,
-             "wait", 2, 0,    
+             "wait", 2, 0,
              "move", 29, 36,
              "dir", DOWN, 0,
-             "wait", 31, 0;       
+             "wait", 31, 0;
     initialmove;
     initnpctimer;
     .distance = 5;
-}             
+}
-- 
cgit v1.2.3-60-g2f50