Fix bugs on Phoenix Rebirth and rewrite its logic.

Overlevel at rebirth time will now be counted to make further rebirths easier.

1 files changed, 11 insertions, 4 deletions

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:");