* Forgot Arena warps file ~~

git-svn-id: https://svn.code.sf.net/p/rathena/svn/trunk@11623 54d463be-8e91-2dee-dedb-b68131a5f0ec
This commit is contained in:
SinSloth 2007-10-31 11:58:30 +00:00
parent 95d34e2dce
commit b87ec4fda5

View File

@ -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;
}
}