Phoenix Rebirth: Record first player to rebirth

Monster King: Do not give 641k EXP anymore when someone reborn or Top3 avg >= Lv 100

6 files changed, 34 insertions, 2 deletions

diff --git a/npc/003-3/malindou.txt b/npc/003-3/malindou.txt
index 6b879eb41..6cf77fd0e 100644
--- a/npc/003-3/malindou.txt
+++ b/npc/003-3/malindou.txt
@@ -567,8 +567,11 @@ OnInit:
         query_sql("UPDATE `rodex_items` SET `opt_val0` = '15', `opt_val1` = '0', `opt_idx1` = '0' WHERE (`opt_idx1`=`opt_idx0`) AND (`opt_val0` > '15' AND `opt_val1` > '15')");
 
         // Magic v3
+        $REBIRTH_WINNER$="Crazyfefe";
+
         debugmes "";
         debugmes "* Tolchi mess cleanup";
+        debugmes "* Rebirth Hero";
         debugmes "";
         $UPDATE=1590616575;
     }
diff --git a/npc/025-2/phoenix.txt b/npc/025-2/phoenix.txt
index 0d9904549..c99eab452 100644
--- a/npc/025-2/phoenix.txt
+++ b/npc/025-2/phoenix.txt
@@ -91,7 +91,15 @@
     warp "005-1", 40, 117;
     LOCATION$="Candor";
     kamibroadcast(strcharinfo(0)+" has been reborn.");
-    //$MOST_HEROIC$=strcharinfo(0);
+    // Maybe you were THE FIRST
+    if ($REBIRTH_WINNER$ == "") {
+        $REBIRTH_WINNER$=strcharinfo(0);
+        channelmes("#world", $REBIRTH_WINNER$+" is the first player to REBIRTH!! They are so OP! %%N");
+        announce "All hail ##B"+$REBIRTH_WINNER$+"##b, first player to REBIRTH and become OP!", bc_all|bc_npc;
+        getitem SupremeGift, 1;
+        next;
+    }
+    // These operations can be delayed or fail
     StatusResetReinvest();
     // Open a new dialog
     clear;
diff --git a/npc/functions/clientversion.txt b/npc/functions/clientversion.txt
index 0a33f2a7b..0272aa752 100644
--- a/npc/functions/clientversion.txt
+++ b/npc/functions/clientversion.txt
@@ -825,6 +825,13 @@ function	script	clientupdater	{
             dispbottom l("Crafting rules changed! Your crafting skill was lowered to Level 5, talk to Craftmaster to recover it!");
         }
 
+        // Rebirth Heroics
+        if (strcharinfo(0) == "Crazyfefe") {
+            getitem SupremeGift, 1;
+            channelmes("#world", $REBIRTH_WINNER$+" is the first player to REBIRTH!! They are so OP! %%N");
+            announce "All hail ##B"+$REBIRTH_WINNER$+"##b, first player to REBIRTH and become OP!", bc_all|bc_npc;
+        }
+
         // Mass Provoke replacement
         if (getskilllv(EVOL_AREA_PROVOKE)) {
             getitembound ScholarshipBadge, getskilllv(EVOL_AREA_PROVOKE), 4;
diff --git a/npc/functions/mobpoint.txt b/npc/functions/mobpoint.txt
index 7b29ca155..d0fe5c10b 100644
--- a/npc/functions/mobpoint.txt
+++ b/npc/functions/mobpoint.txt
@@ -54,7 +54,10 @@ OnNPCKillEvent:
     $MONSTERS_KILLED+=1;
     if (killedrid == MonsterKing) {
         announce "An illusionary monster king was killed.", bc_all | bc_pc;
-        getexp min(641500, BaseLevel**3), 0;
+        if ($REBIRTH_WINNER$ == "" && TOP3AVERAGELVL() < 100)
+            getexp min(641500, BaseLevel**3), 0;
+        else
+            Mobpt+=min(1000, BaseLevel*11);
     }
 
     // Remove undue Job exp
diff --git a/npc/functions/scoreboards.txt b/npc/functions/scoreboards.txt
index 462bfcfcf..fb5f76130 100644
--- a/npc/functions/scoreboards.txt
+++ b/npc/functions/scoreboards.txt
@@ -523,6 +523,11 @@ function	script	HallOf2020	{
     mesc l("This schedule is subject to change without prior notice."), 1;
     mesc l("Changes include but are not limited to festive events and dates."), 1;
     next;
+    if ($REBIRTH_WINNER$ != "") {
+        mes l(".:: FIRST PLAYER TO REBIRTH ::.");
+        mes $REBIRTH_WINNER$;
+        mes "";
+    }
     mes l(".:: TMW-2 Anniversary ::.");
     //mesc l("Scheduled: January 13rd");
     mes l("No victor appliable.");
diff --git a/npc/functions/util.txt b/npc/functions/util.txt
index 75f1faf64..45aa5fb7a 100644
--- a/npc/functions/util.txt
+++ b/npc/functions/util.txt
@@ -989,6 +989,12 @@ function	script	MapToLoc	{
     return .@locs$[.@lx];
 }
 
+// Returns TOP 3 Average Level
+// TOP3AVERAGELVL( - )
+function	script	TOP3AVERAGELVL	{
+    return ($@hoblvl_value[0]+$@hoblvl_value[1]+$@hoblvl_value[2])/3;
+}
+
 // Grants newcomers exp boost. Returns bonus %
 // NewcomerEXPDROPUP( - )
 function	script	NewcomerEXPDROPUP	{