General Nerf + Misc Changes (#608)

I have a nerf gun and am not afraid of using it!

* Nerf boss point gain in the crypt fights: -5 for Krukan, -10 for Razha and -15 for Terogan
* **No nerf if** doing Kurkan and level < 90
* **No nerf if** doing Razha and level < 100
* **No nerf if** doing Terogan and level < 120
* _In future, there may be a new boss fight for level < 135 and for level < 150, but this is NYI._
* Nerf upmarmu. if your int is lower than agi, nerf applies by half the difference. If int is higher than agi, same formula, but it is a **boost**.
* This is a nerf for EVERYTHING including mobs ─ Nerf MDEF for Poltergeist (-5), Lightning Ball (-15), The Lost (-10), Witch Guard (-20), JackO (-2), Zombie (-1), Fallen (-2), Terranite (-5), Reaper (-10), Nutcracker (-5), Swashbuckler (-2), Grenadier (-10), Anne (-5), and Tormenta (-20).
* Also nerf General Razha cost in (-2 Eyes)
* Change Terogan cost to be more consistent with exercised drop rates (Eyes <-> Ears)
* Nerf Audsbel asked Grass Snake Tongues from 50 to 40
* Remove Wumpus Egg.
* Add Tomato using Wumpus Egg former ID (usable, 200 HP)
* Add three items archetypes for the upcoming CRC Day.

Also adds Keshlam mobs to Evil Obelisk for 10kGP.

_PS. Actually, 30 tongues for Audsbel would have worked but I prefer to be incremental and the exp would need some reviewing in this case._

1 files changed, 18 insertions, 1 deletions

diff --git a/world/map/npc/functions/evil_obelisk.txt b/world/map/npc/functions/evil_obelisk.txt
index dbfede0d..a5fe6e55 100644
--- a/world/map/npc/functions/evil_obelisk.txt
+++ b/world/map/npc/functions/evil_obelisk.txt
@@ -9,6 +9,7 @@ function|script|EvilObelisk
     set @cost_gy2, 3000;
     set @cost_skull, 2800;
     set @cost_snake, 2500;
+    set @cost_keshlam, 10000;
 
     menu
         "Don't pay it anything.", L_Close,
@@ -16,7 +17,8 @@ function|script|EvilObelisk
         "Pay it " + @cost_gy1 + " gold.", L_GRAVEYARD1,
         "Pay it " + @cost_gy2 + " gold.", L_GRAVEYARD2,
         "Pay it " + @cost_skull + " gold.", L_SKULL,
-        "Pay it " + @cost_snake + " gold.", L_SNAKE;
+        "Pay it " + @cost_snake + " gold.", L_SNAKE,
+        "Pay it " + @cost_keshlam + " gold.", L_KESHLAM;
 
 L_JACKO:
     if (Zeny < @cost_jacko)
@@ -78,6 +80,20 @@ L_SNAKE:
     set Zeny, Zeny - @cost_snake;
     goto L_Summon;
 
+L_KESHLAM:
+    if (Zeny < @cost_keshlam)
+        goto L_NotEnough;
+    set @temp, rand(3);
+    if(@temp == 0)
+        set @mob_id, 1140;  // Tengu
+    if(@temp == 1)
+        set @mob_id, 1141;  // Sasquatch
+    if(@temp == 2)
+        set @mob_id, 1143;  // Mana Slayer
+    set @mob_count, rand(1,3);
+    set Zeny, Zeny - @cost_keshlam;
+    goto L_Summon;
+
 L_Summon:
     areamonster @map$, @x0, @y0, @x1, @y1, "", @mob_id, @mob_count;
     goto L_Close;
@@ -92,6 +108,7 @@ L_Close:
     set @cost_gy2, 0;
     set @cost_skull, 0;
     set @cost_snake, 0;
+    set @cost_keshlam, 0;
     return;
 
 }