From 7e6b82f9ee252e862e551493dc0836b0d98047f0 Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Sun, 18 Aug 2019 01:12:22 -0300
Subject: Give more extravagant Homunculus XP, and give you less job exp.
 You'll only get the "basic" experience * 5 as jexp.

---
 npc/017-10/dispatcher.txt | 26 +++++++++++++-------------
 1 file changed, 13 insertions(+), 13 deletions(-)

(limited to 'npc/017-10')

diff --git a/npc/017-10/dispatcher.txt b/npc/017-10/dispatcher.txt
index 23d3e93ba..5dbbf96f5 100644
--- a/npc/017-10/dispatcher.txt
+++ b/npc/017-10/dispatcher.txt
@@ -52,7 +52,7 @@
         recallhomunculus();
         .@xp=lootField(HOMUN_DEPLOYFIELD);
         gethomunexp(.@xp);
-        getexp 0, (.@xp/5);
+        getexp 0, (.@lv*min(10000, gethominfo(3))/10000)*5;
         close;
     }
 
@@ -76,7 +76,7 @@ L_Main:
         case 1:
             mesc ".:: " + l("Piou Fields") + " ::.";
             mesc l("The most basic grinding camp for your homunculus.");
-            mesc l("Average EXP: 100"), 3;
+            mesc l("Average EXP: "+100), 3;
             mesc l("Common Drops: "+
                     getitemlink(PiouFeathers));
             mesc l("Regular Drops: "+
@@ -91,7 +91,7 @@ L_Main:
         case 2:
             mesc ".:: " + l("Herb Fields") + " ::.";
             mesc l("If you need more herbs, the best place to look.");
-            mesc l("Average EXP: 5"), 3;
+            mesc l("Average EXP: "+5), 3;
             mesc l("Common Drops: "+
                     getitemlink(ArtichokeHerb));
             mesc l("Regular Drops: "+
@@ -108,7 +108,7 @@ L_Main:
         case 3:
             mesc ".:: " + l("Ore Mines") + " ::.";
             mesc l("Send your Homunculus to mineration!");
-            mesc l("Average EXP: 12"), 3;
+            mesc l("Average EXP: "+12), 3;
             mesc l("Common Drops: "+
                     getitemlink(Coal));
             mesc l("Regular Drops: "+
@@ -129,7 +129,7 @@ L_Main:
         case 4:
             mesc ".:: " + l("Rare Mines") + " ::.";
             mesc l("Send your Homunculus to mineration!");
-            mesc l("Average EXP: 15"), 3;
+            mesc l("Average EXP: "+15), 3;
             mesc l("Common Drops: "+
                     getitemlink(Pearl));
             mesc l("Regular Drops: "+
@@ -150,7 +150,7 @@ L_Main:
         case 5:
             mesc ".:: " + l("Slime Nest") + " ::.";
             mesc l("Send your Homunculus to a slime nest!");
-            mesc l("Average EXP: 500"), 3;
+            mesc l("Average EXP: "+800), 3;
             mesc l("Common Drops: "+
                     getitemlink(MaggotSlime)+
                     getitemlink(Arrow));
@@ -174,7 +174,7 @@ L_Main:
         case 6:
             mesc ".:: " + l("Snake Pit") + " ::.";
             mesc l("Send your Homunculus to hold off snakes!");
-            mesc l("Average EXP: 1000"), 3;
+            mesc l("Average EXP: "+format_number(2250)), 3;
             mesc l("Common Drops: "+
                     getitemlink(SnakeEgg)+
                     getitemlink(SnakeTongue));
@@ -191,7 +191,7 @@ L_Main:
         case 7:
             mesc ".:: " + l("Dangerous Area") + " ::.";
             mesc l("Send your Homunculus to hold off snakes!");
-            mesc l("Average EXP: 10000"), 3;
+            mesc l("Average EXP: "+format_number(70000)), 3;
             mesc l("Common Drops: None");
             mesc l("Regular Drops: "+
                     getitemlink(MoubooSteak)+
@@ -213,7 +213,7 @@ L_Main:
         case 8:
             mesc ".:: " + l("Monster King Basement") + " ::.";
             mesc l("Send your Homunculus to one of the most dangerous...!");
-            mesc l("Average EXP: 20000"), 3;
+            mesc l("Average EXP: "+format_number(1000000)), 3;
             mesc l("Common Drops: None");
             mesc l("Regular Drops: "+
                     getitemlink(Curshroom)+
@@ -324,7 +324,7 @@ function lootField {
                 BlueManaPearl, 1, 1);
         break;
     case HCD_SLIMENEST:
-        .@val+=500;
+        .@val+=800;
         anyloot(MaggotSlime, .@lv, 10000,
                 Arrow, .@lv, 9000,
                 IronArrow, .@lv, 4000,
@@ -340,7 +340,7 @@ function lootField {
                 IcedBottle, 1, 60);
         break;
     case HCD_SNAKEPIT:
-        .@val+=1000;
+        .@val+=2250;
         anyloot(SnakeEgg, limit(1, .@lv/8, 10), 9600,
                 SnakeTongue, limit(1, .@lv/16, 5), 9500,
                 SnakeSkin, limit(1, .@lv/20, 3), 7000,
@@ -349,7 +349,7 @@ function lootField {
                 Kanabo, 1, 1); // Teasing Xanthem for mapping here
         break;
     case HCD_DANGERAREA:
-        .@val+=10000;
+        .@val+=70000;
         anyloot(MoubooSteak, limit(1, .@lv/28, 6), 2500,
                 HastePotion, limit(1, .@lv/20, 10), 2000,
                 StrengthPotion, limit(1, .@lv/20, 10), 2000,
@@ -363,7 +363,7 @@ function lootField {
                 MagicApple, 1, 40);
         break;
     case HCD_MKBASEMENT:
-        .@val+=20000;
+        .@val+=1000000;
         anyloot(Curshroom, limit(1, .@lv/28, 6), 3000,
                 HastePotion, limit(1, .@lv/20, 10), 3000,
                 StrengthPotion, limit(1, .@lv/20, 10), 3000,
-- 
cgit v1.2.3-60-g2f50