From 432adb9bc99d906f8fa7f8c68a60ba57696c4529 Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Sat, 8 Feb 2020 19:54:55 -0300
Subject: Fix bugs on Phoenix Rebirth and rewrite its logic. Overlevel at
 rebirth time will now be counted to make further rebirths easier.

---
 npc/025-2/phoenix.txt | 15 +++++++++++----
 1 file changed, 11 insertions(+), 4 deletions(-)

(limited to 'npc')

diff --git a/npc/025-2/phoenix.txt b/npc/025-2/phoenix.txt
index 4a3a4f74a..72da5aba6 100644
--- a/npc/025-2/phoenix.txt
+++ b/npc/025-2/phoenix.txt
@@ -10,20 +10,27 @@
     mesq l("Hello there. My name is %s.", .name$);
     next;
     mesn;
+    if (REBIRTH)
+        .@blvl=0-(REBIRTH_OVERLEVEL/REBIRTH);
+    else
+        .@blvl=0;
+
     switch (REBIRTH) {
     case 0:
-        mesc l("Once you reach level 99, I'll offer you a life-time opportunity to delete all your levels and experience for your first rebirth!");
-        .@blvl=99;
+        .@blvl+=99;
+        .@rebirth$=l("first");
         break;
     case 4:
-        mesc l("Once you reach level 150, I'll offer you a life-time opportunity to delete all your levels and experience for your first rebirth!");
-        .@blvl=150;
+        .@blvl+=150;
+        .@rebirth$=l("final");
         break;
     default:
+        setpcblock(255, false);
         mesc l("Unfortunately you cannot rebirth anymore!");
         close;
         break;
     }
+    mesc l("Once you reach level %d, I'll offer you a life-time opportunity to delete all your levels and experience for your %s rebirth!", .@blvl, .@rebirth$);
     next;
     mesn;
     mesq l("Rebirth is free. Here are the perks you'll get by doing the rebirth:");
-- 
cgit v1.2.3-60-g2f50