Minor rebalance on Professor, Alfred and Treasure Chests.

- Professor now gives an additional EXP point for every rebirth.
- Max AFK time at professor now grows 1s/day of account age.
- Alfred pays considerably less on Hardcore servers.

3 files changed, 17 insertions, 1 deletions

diff --git a/npc/003-0-1/professor.txt b/npc/003-0-1/professor.txt
index a4d304ac7..ca9bd5b1b 100644
--- a/npc/003-0-1/professor.txt
+++ b/npc/003-0-1/professor.txt
@@ -53,6 +53,8 @@ OnSpeeching:
     // Max AFK time is determined as 30 minutes + 1 second every 10 minutes AFKed
     // Capped at 2 hours (you've AFK'ed 37 days and 12 hours - 900 hours)
     .@maxafk=min(7200, 1800+(AFKING/600));
+    // You gain an additional second per day your acc existed, no caps, pro alts.
+    .@maxafk += ((gettimetick(2) - #REG_DATE) / 86400);
     // If you have been IDLE for at least 2 seconds you'll get the EXP.
     // Note you don't need to sit, only be idle.
     if (is_between(2, .@maxafk, checkidle())) {
@@ -60,6 +62,9 @@ OnSpeeching:
         .@bxp=min(1+.@sk, 12);
         .@jxp=min(1+(.@sk/3), 6);
 
+        // If you have reborn, then you get slightly more EXP
+        .@bxp += min(REBIRTH, 5);
+
         // Adjust the experience to take bonuses in account
         .@bxp = .@bxp * "@exprate"::expRecalc() / 100;
 
diff --git a/npc/003-11/alfred.txt b/npc/003-11/alfred.txt
index 24b2753d0..5205af59b 100644
--- a/npc/003-11/alfred.txt
+++ b/npc/003-11/alfred.txt
@@ -99,6 +99,10 @@ public function _calc_wage {
     if (getq(General_Narrator) >= 1)
         .@wage += 850;
 
+    // Hardcore Deflation
+    if ($HARDCORE)
+        .@wage /= 2;
+
     // Game Storyline Inflation Bonus
     if ($GAME_STORYLINE >= 3)
         .@wage += ($GAME_STORYLINE-2) * 200;
diff --git a/npc/functions/treasure.txt b/npc/functions/treasure.txt
index d5160f3f5..a418fd8c6 100644
--- a/npc/functions/treasure.txt
+++ b/npc/functions/treasure.txt
@@ -41,6 +41,13 @@ function	script	TreasureBox	{
         else if (.@r <= 300) // SR and UR (67% Bonus)
             .@r-=getarg(0, 0)*2/3;
 
+        // Common chances become Uncommon as you, the game, and the world progress
+        .@agedy = (gettimetick(2) - TUT_VAR) / 86400;
+        .@redux = min($GAME_STORYLINE*10, 50) +
+                  min(REBIRTH*10, 50) +
+                  min(getq(General_Narrator) * 10, 230) +
+                  min(.@agedy, 470);
+
         // Select treasure list
         // You're warranted an ultra rare (0.1%) every 149 open chests
         // You're warranted a super rare (2%) every 50 open chests
@@ -52,7 +59,7 @@ function	script	TreasureBox	{
             .@loot=any(MercBoxC, ScrollMagnusHealB, SnakeEgg, LachesisBrew, ArrowAmmoBox, GoldPieces, SilverGift, TerraniteOre, LeadOre, TinOre, SilverOre, GoldOre, TitaniumOre, FluoPowder, Lockpicks, EquipmentBlueprintC, AlchemyBlueprintC, AlchemyBlueprintD, AncientBlueprint, YerbaMate, JasmineTea, DeathPotion, SacredLifePotion, SacredManaPotion, BrokenWarpCrystal, PurificationPotion,  GoldenApple);
         else if (.@r < 1600 || .@t == 0)
             .@loot=any(MercBoxB, MoubooSteak, SmokeGrenade, ClothoLiquor, Coal, RedPlushWine, PrecisionPotion, CoinBag, DodgePotion, MoveSpeedPotion, Dagger, BronzeGift, IronOre, CopperOre, BlueDye, EquipmentBlueprintB, AlchemyBlueprintB, AlchemyBlueprintC, OolongTea);
-        else if (.@r < 5200)
+        else if (.@r < (5200+.@redux))
             .@loot=any(MercBoxA, Croconut, Potatoz, MoubooSteak, ClothoLiquor, Coal, SmallMushroom, HastePotion, StrengthPotion, WoodenLog, LeatherPatch, Beer, StrangeCoin, EquipmentBlueprintA, EquipmentBlueprintB, AlchemyBlueprintA, SpearmintTea, TreasureMap, DungeonMap, IcedBottle);
         else
             .@loot=any(FatesPotion, PiberriesInfusion, EmptyBottle, ChocolateBar, Plushroom, Chagashroom, RawLog, LeatherPatch, BugLeg, ScorpionStinger, SmallKnife, ChamomileTea, EquipmentBlueprintA);