summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--world/map/npc/009-6/brodomir.txt70
1 files changed, 40 insertions, 30 deletions
diff --git a/world/map/npc/009-6/brodomir.txt b/world/map/npc/009-6/brodomir.txt
index d7b8895d..3d9d6b35 100644
--- a/world/map/npc/009-6/brodomir.txt
+++ b/world/map/npc/009-6/brodomir.txt
@@ -4,10 +4,19 @@
// CAVE: this script requires a patch by o11c that makes it possible for
// getareausers to check if players are alive or dead.
+// Global Variables:
+// $@BRODOMIR_PVP_STATUS:
+// 1 if players are waiting to be warped into the fight cave
+// 2 if fight is in progress
+// $@BRODOMIR_START_TIME:
+// time when the players will be warped into the fight cave
+// $@BRODOMIR_PLAYERS: number of players taking part in the event
+
+
009-6.gat,36,40,0|script|Brodomir|116,{
- if ($@PVP_STATUS == 2)
+ if ($@BRODOMIR_PVP_STATUS == 2)
goto L_Alreadystarted;
- if ($@PVP_STATUS == 1)
+ if ($@BRODOMIR_PVP_STATUS == 1)
goto L_Wait;
mes "[Brodomir]";
mes "\"Hi Warrior.\"";
@@ -15,8 +24,7 @@
menu
"Yes of course! Don't you remember me?", L_Shorttalk,
"No, who are you?", L_Longtalk,
- "I don't want to know you!", -;
- close;
+ "I don't want to know you!", L_Close;
L_Longtalk:
mes "[Brodomir]";
@@ -50,10 +58,10 @@ L_Menu:
L_Exit:
mes "[Brodomir]";
mes "\"Okay, you can come back anytime.\"";
- close;
+ goto L_Close;
L_Pay:
- if ($@PVP_STATUS == 1)
+ if ($@BRODOMIR_PVP_STATUS == 1)
goto L_Wait;
if (getareausers("009-6.gat", 20, 20, 80, 80, 1) < 3)
goto L_NotEnoughPlayers;
@@ -62,43 +70,43 @@ L_Pay:
L_Go:
set Zeny, Zeny - 5000;
- set $@PVP_STATUS, 1;
- mapannounce "009-6.gat", "In 5 minutes I will bring you all to the PvP cave. If there are less than 3 Players here the event will not start.", 0;
+ set $@BRODOMIR_PVP_STATUS, 1;
+ mapannounce "009-6.gat", "In 5 minutes I will bring you all to the PvP cave. If there are less than 3 players here the event will not start.", 0;
mes "[Brodomir]";
- mes "\"In 5 minutes I will bring you all to the PvP cave. If there are less than 3 Players here the event will not start and your money will be lost.\"";
- set $@ANNOUNCE_TIME, gettimetick(2) + 300;
+ mes "\"In 5 minutes I will bring you all to the PvP cave. If there are less than 3 players here the event will not start and your money will be lost.\"";
+ set $@BRODOMIR_START_TIME, gettimetick(2) + 300;
initnpctimer;
- close;
+ goto L_Close;
L_Wait:
- set $@seconds, ($@ANNOUNCE_TIME - gettimetick(2));
+ set $@brodomir_seconds, ($@BRODOMIR_START_TIME - gettimetick(2));
mes "[Brodomir]";
- if ($@seconds/60 == 0)
- mes "\"Just a little longer. I will bring you there in " + $@seconds + " seconds.\"";
- if ($@seconds/60 > 0)
- mes "\"Just a little longer. I will bring you there in " + $@seconds/60 + " minute(s).\"";
- close;
+ if ($@brodomir_seconds/60 == 0)
+ mes "\"Just a little longer. I will bring you there in " + $@brodomir_seconds + " seconds.\"";
+ if ($@brodomir_seconds/60 > 0)
+ mes "\"Just a little longer. I will bring you there in " + $@brodomir_seconds/60 + " minute(s).\"";
+ goto L_Close;
OnTimer5000:
setnpctimer 0;
- if ($@PVP_STATUS > 1)
+ if ($@BRODOMIR_PVP_STATUS > 1)
goto L_Check;
- if (gettimetick(2) >= $@ANNOUNCE_TIME)
+ if (gettimetick(2) >= $@BRODOMIR_START_TIME)
goto L_Warp;
end;
L_Warp:
if (getareausers("009-6.gat", 20, 20, 80, 80, 1) < 3)
goto L_Warpfail;
- set $@PVP_STATUS, $@PVP_STATUS + 1;
- set $@PRICE, getareausers("009-6.gat", 20, 20, 80, 80, 1);
+ set $@BRODOMIR_PVP_STATUS, $@BRODOMIR_PVP_STATUS + 1;
+ set $@BRODOMIR_PLAYERS, getareausers("009-6.gat", 20, 20, 80, 80, 1);
mapwarp "009-6.gat", "009-5.gat", 0, 0;
mapannounce "009-5.gat", "PvP On!", 0;
pvpon "009-5.gat";
end;
L_Warpfail:
- mapannounce "009-6.gat", "There are not enough Players around to start!", 0;
+ mapannounce "009-6.gat", "There are not enough players around to start!", 0;
goto L_Cleanup;
L_Check:
@@ -111,7 +119,8 @@ onReward:
if (isdead())
end;
message strcharinfo(0), "Congratulations you won!";
- set Zeny, Zeny + (5000 + 150 * $@PRICE);
+ set Zeny, Zeny + (5000 + 150 * $@BRODOMIR_PLAYERS);
+ set $@BRODOMIR_PLAYERS, 0;
end;
L_End:
@@ -121,24 +130,25 @@ L_End:
L_NotEnoughPlayers:
mes "[Brodomir]";
mes "\"There aren't enough players here to start.\"";
- close;
+ goto L_Close;
L_Alreadystarted:
mes "[Brodomir]";
mes "\"Please wait until the cave is clear again.\"";
- close;
+ goto L_Close;
L_NotEnoughMoney:
mes "[Brodomir]";
mes "\"You don't have enough money.\"";
- close;
+ goto L_Close;
L_Cleanup:
- pvpoff "009-5.gat";
- set $@PVP_STATUS , 0;
- set $@ANNOUNCE_TIME, 0;
+ pvpoff "009-5.gat";
+ set $@BRODOMIR_PVP_STATUS , 0;
+ set $@BRODOMIR_START_TIME, 0;
stopnpctimer;
end;
-
+L_Close:
+ close;
}