diff options
Diffstat (limited to 'npc/003-10')
-rw-r--r-- | npc/003-10/quirino.txt | 37 |
1 files changed, 37 insertions, 0 deletions
diff --git a/npc/003-10/quirino.txt b/npc/003-10/quirino.txt index 0ebea21c8..3f845b022 100644 --- a/npc/003-10/quirino.txt +++ b/npc/003-10/quirino.txt @@ -5,8 +5,14 @@ // Description: // Hunger Games™ version for The Mana World Brazil v2, created by Ernando Quirino. // Entrance to Hungry Quirin Arena +// Variables: +// $@EQ_STATUS +// 0: Register open +// 1: Fight happening +// 2: Event finished 001-8,0,0,0 script Quirin NPC_ERNANDO,{ + if (is_gm()) goto L_Hub; if ($EVENT$ != "Hunger") goto L_NoSeason; if ($@EQ_STATUS == 0) goto L_Register; @@ -75,6 +81,37 @@ L_Full: mesq l("You cannot bring anything to the arena. Please put everything on the storage."); close; +L_Hub: + mesn; + mes col("Welcome to HUNGRY QUIRIN ARENA mangment panel.", 9); + mes col("Current Event: "+$EVENT$,9); + mes col("Event stage: "+$@EQ_STATUS, 9); + mes l("Current player count: @@/5 must be online.", getusers(1)); + mes l("Current arena player count: @@ on map. (Min. 3 to begin event)", getmapusers("001-8")); + + // Open event? Minimum 5 connections or GM_OVERRIDE flag. + if ($EVENT$ != "Hunger" && (getusers(1) >= 5 || $@GM_OVERRIDE)) { + next; + mes col("Activate event?", 1); + if (askyesno() == ASK_YES) + $EVENT$="Hunger"; + close; + } + + // Main Control menu. Not using l() on purpose. + + select + rif($@EQ_STATUS == 0 && (getmapusers("001-8") >= 3 || $@GM_OVERRIDE), "Start Event!"), + rif($@EQ_STATUS == 1, "Send wave of items and monsters!"), + "I'm done."; + + if (@menu == 1) + donpcevent("#QuirinoHUB::OnStart"); + if (@menu == 2) + donpcevent("#QuirinoHUB::OnSendWave"); + + close; + OnInit: .sex=G_MALE; .distance=5; |