From 85c4ccd29f42e758a2311f0bb5e91d55e9c14852 Mon Sep 17 00:00:00 2001 From: SinSloth Date: Wed, 31 Oct 2007 11:58:30 +0000 Subject: * Forgot Arena warps file ~~ git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@11623 54d463be-8e91-2dee-dedb-b68131a5f0ec --- npc/warps/other/arena.txt | 48 +++++++++++++++++++++++++++++++++++++++++++++-- 1 file changed, 46 insertions(+), 2 deletions(-) (limited to 'npc/warps/other/arena.txt') diff --git a/npc/warps/other/arena.txt b/npc/warps/other/arena.txt index 1ff42c441..e23e1f50f 100644 --- a/npc/warps/other/arena.txt +++ b/npc/warps/other/arena.txt @@ -3,14 +3,15 @@ //===== By: ================================================== //= SinSloth //===== Current Version: ===================================== -//= 1.1 +//= 1.2 //===== Compatible With: ===================================== //= Any Athena Version //===== Description: ========================================= -//= Warp Points related to Izlude Arena && Control Panel(to come) +//= Warp Points related to Izlude Arena && Control Panel //===== Additional Comments: ================================= //= 1.0 First version, done by SinSloth. [MasterOfMuppets] //= 1.1 updated welcome_arena warp coords (was 128,126) [Lupus] +//= 1.2 Made some updates due to Izlude Battle Arena release. [SinSloth] //============================================================ izlude,128,226,0 warp welcome_arena 1,1,arena_room,100,30 @@ -26,3 +27,46 @@ arena_room,136,53,0 warp arn_room_5_2 1,1,arena_room,113,74 arena_room,123,88,0 warp arn_room_3_1 1,1,arena_room,153,87 arena_room,150,87,0 warp arn_room_3_2 1,1,arena_room,120,87 prt_are_in,54,13,0 warp toarn_room 1,1,arena_room,100,77 + +sec_in02,79,180,3 script #arenacontrol 81,{ + +DLGTEMP: + input @input_arena; + if (@input_arena < 0 || @input_arena > 2000) goto DLGTEMP; //CHECK + if (@input == 0) + { + mes "Error!"; + close; + } + else if (@input_arena == 1357) + { + mes "Opening Control Panel"; + mes "' A - R - E - N - A '"; + next; + mes "Please select a"; + mes "state for the arena."; + next; + switch( select( "Open.","Closed.") ) + { + case 1: + mes "Currently"; + mes "opening arena."; + misceffect EF_ENHANCE; //CHECK + enablenpc "welcome_arena"; + next; + break; + case 2: + mes "Currently"; + mes "closing arena."; + misceffect EF_EXIT; //CHECK + disablenpc "welcome_arena"; + next; + break; + } + } + else + { + mes "Closing control panel."; + close; + } +} \ No newline at end of file -- cgit v1.2.3-70-g09d2