summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--npc/002-4/nard.txt12
-rw-r--r--npc/functions/util.txt59
2 files changed, 66 insertions, 5 deletions
diff --git a/npc/002-4/nard.txt b/npc/002-4/nard.txt
index aefa1f066..9ff46c1a1 100644
--- a/npc/002-4/nard.txt
+++ b/npc/002-4/nard.txt
@@ -164,12 +164,14 @@ L_NotYet:
close;
L_Travel:
- if (getq(CandorQuest_Barrel) >= 4 &&
- getq(CandorQuest_HAS) >= 4 &&
- getq(CandorQuest_Sailors) >= 3 &&
- getq(CandorQuest_Vincent) >= 2 &&
- getq(CandorQuest_Trainer) >= 12)
+ if (nard_reputation() >= 11)
+ .@price-=1000;
+ else if (nard_reputation() >= 9)
+ .@price-=750;
+ else if (nard_reputation() >= 7)
.@price-=500;
+ else if (nard_reputation() >= 5)
+ .@price-=250;
mesn;
mesq l("Hi @@.", strcharinfo(0));
next;
diff --git a/npc/functions/util.txt b/npc/functions/util.txt
index ae70b233d..10c9fbbfa 100644
--- a/npc/functions/util.txt
+++ b/npc/functions/util.txt
@@ -1,6 +1,8 @@
+// TMW2 Script.
// Evol functions.
// Authors:
// Reid
+// Jesusalva
// Description:
// Util functions
@@ -33,3 +35,60 @@ function script season_direction {
return (.@current_month / 3 + .@is_after_season_day) % 4;
}
+
+// Returns Nard reputation for discounts
+// Currently ranges from 0 to 11.
+function script nard_reputation {
+ .@nr=0; // Base reputation
+
+ // Valon Quest (+1 rep)
+ if (getq(CandorQuest_Trainer) >= 14)
+ .@nr=.@nr+1;
+
+ // Zegas Quest (+1 rep)
+ if (getq(CandorQuest_Barrel) >= 4)
+ .@nr=.@nr+1;
+
+ // Hide And Seek Quest (+1 rep)
+ if (getq(CandorQuest_HAS) >= 4)
+ .@nr=.@nr+1;
+
+ // Sailors Quest (+1 rep)
+ if (getq(CandorQuest_Sailors) >= 3)
+ .@nr=.@nr+1;
+
+ // Vincent Quest (+1 rep)
+ if (getq(CandorQuest_Vincent) >= 2)
+ .@nr=.@nr+1;
+
+ // Tolchi Quest (+1 rep)
+ if (getq(CandorQuest_Tolchi) >= 4)
+ .@nr=.@nr+1;
+
+ // Maya Quest (+1 rep)
+ if (getq(CandorQuest_Maya) >= 4)
+ .@nr=.@nr+1;
+
+ // Dan Quest (+1 rep)
+ if (getq(ShipQuests_Dan) >= 3)
+ .@nr=.@nr+1;
+
+ // Chef Gado Quest (+1 rep)
+ if (getq(ShipQuests_ChefGado) >= 2)
+ .@nr=.@nr+1;
+
+ // Peter Quest (+1 rep)
+ if (getq(ShipQuests_Peter) == 3 || getq(ShipQuests_Peter) == 5)
+ .@nr=.@nr+1;
+
+ // Swezanne Quest (+1 rep)
+ if (getq(TulimsharQuest_Swezanne) >= 1)
+ .@nr=.@nr+1;
+
+ //debugmes "Reputation: "+str(.@nr);
+ return .@nr;
+
+}
+
+
+