From 82f829816533043cad8dce19c2862e5f51e60504 Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Sat, 23 Mar 2019 15:24:21 -0300
Subject: Lower ship prices. First Nard travel is still overcharged (1200 GP)
 La Marine (Tulim<->Hurns<->Nivalis): 810 -> 410 GP La Johanne
 (Candor<->Tulim): 1200 -> 800 GP Note the discount per milestone was also
 changed and is NOT easier to get them.

---
 npc/002-3/nard.txt    | 5 +++--
 npc/016-1/captain.txt | 8 ++++----
 2 files changed, 7 insertions(+), 6 deletions(-)

(limited to 'npc')

diff --git a/npc/002-3/nard.txt b/npc/002-3/nard.txt
index 397e9e1c3..f42975833 100644
--- a/npc/002-3/nard.txt
+++ b/npc/002-3/nard.txt
@@ -12,7 +12,6 @@
     showavatar NPC_NARD;  // this is handled by avatars.xml
 
     .@narrator = getq(General_Narrator);
-    .@price=1200;
 
 L_Checker:
     if (.@narrator) goto L_Travel;
@@ -172,6 +171,7 @@ L_CandorIsland:
     goto L_MenuQuest;
 
 L_NotYet:
+    .@price=1200;
     mesc b(l(".:: Main Quest 1-1 ::.")), 3;
     if (Zeny >= .@price)
         mesc l("* @@/@@ GP", Zeny, .@price), 2;
@@ -222,7 +222,8 @@ L_NotYet:
 
 L_Travel:
     // Current nard_reputation() value for 100% discount: 15
-    .@price-=min(1199, nard_reputation()*80);
+    .@price=800;
+    .@price-=min(799, nard_reputation()*54);
 
     mesn;
     mesq l("Hi @@.", strcharinfo(0));
diff --git a/npc/016-1/captain.txt b/npc/016-1/captain.txt
index ded10c30e..89d42ab5d 100644
--- a/npc/016-1/captain.txt
+++ b/npc/016-1/captain.txt
@@ -5,7 +5,7 @@
 //    Temporary, placeholder.
 
 016-1,19,29,0	script	Captain	NPC_NARD,{
-    .@price=810;
+    .@price=410;
     if (BaseLevel < 20)
         goto L_TooWeak;
 
@@ -27,7 +27,7 @@
 L_TTulim:
     .@x=(reputation("Tulim")+reputation(LOCATION$))/2;
     if (.@x >= 50) .@x+=10;
-    .@price-=min(800, (.@x/10)*80);
+    .@price-=min(400, (.@x/10)*40);
 
     mes "";
     mesn;
@@ -64,7 +64,7 @@ L_TTulim:
 L_THurns:
     .@x=(reputation("Hurns")+reputation(LOCATION$))/2;
     if (.@x >= 50) .@x+=10;
-    .@price-=min(800, (.@x/10)*80);
+    .@price-=min(400, (.@x/10)*40);
 
     mes "";
     mesn;
@@ -100,7 +100,7 @@ L_THurns:
 L_TNival:
     .@x=(reputation("Nival")+reputation(LOCATION$))/2;
     if (.@x >= 50) .@x+=10;
-    .@price-=min(800, (.@x/10)*80);
+    .@price-=min(400, (.@x/10)*40);
 
     // Nivalis Liberation Day. Zero could cause weird bugs.
     if (!$NIVALIS_LIBDATE)
-- 
cgit v1.2.3-60-g2f50