summaryrefslogtreecommitdiff
path: root/npc
diff options
context:
space:
mode:
Diffstat (limited to 'npc')
-rw-r--r--npc/011-1/manastone.txt17
1 files changed, 16 insertions, 1 deletions
diff --git a/npc/011-1/manastone.txt b/npc/011-1/manastone.txt
index dcc4142c7..3d8df2b5e 100644
--- a/npc/011-1/manastone.txt
+++ b/npc/011-1/manastone.txt
@@ -20,6 +20,7 @@
// .jlvl => Jlv Increment
011-1,0,0,0 script Mana Stone NPC_MANA_STONE,{
+ function dearLord;
if (BaseLevel < $MANA_BLVL) goto L_NotWorthy;
mesn;
@@ -54,6 +55,7 @@ L_Level:
if (mstone(4)) goto L_LevelUp;
if (mstone(5)) goto L_LevelUp;
if (mstone(6)) goto L_LevelUp;
+ if (MAGIC_LVL >= 7) dearLord();
if (MAGIC_LVL >= 7) npctalk3 l("You already got all power I could grant you!");
if (is_gm()) percentheal -20, -50;
if (MAGIC_LVL >= 7 || is_gm()) close;
@@ -84,6 +86,20 @@ L_LevelUp:
die();
close;
+function dearLord {
+ if ($MANASTONE_WINNER$ == "") {
+ $MANASTONE_WINNER$=strcharinfo(0);
+ channelmes("#world", $MANASTONE_WINNER$+" is the first player to reach "+get_race()+"'s magic limit since the Monster King! %%N");
+ announce "All hail ##B"+$MANASTONE_WINNER$+"##b, first to reach "+get_race()+"'s magic limit since the Monster King! %%N", bc_all|bc_npc;
+ getexp 0, 2000;
+ getitem SupremeGift, 1;
+ mesc l("CONGRATULATIONS! You are the first player to harness all power the Mana Stone would willingly give!"), 2;
+ mesc l("You just gained a Supreme Gift, and 2000 Job Exp for your bravery!"), 2;
+ next;
+ }
+ return;
+}
+
OnInit:
movenpc .name$, 20+rand(150), 20+rand(150);
.sex = G_OTHER;
@@ -117,5 +133,4 @@ OnClock2340:
npctalk "Those who are worthy, may get my magic. For the others, death awaits!";
movenpc .name$, 20+rand(150), 20+rand(150);
end;
-
}