// ------------------------------------------------------------------
// 			A|i̐ݒ
// ------------------------------------------------------------------

// ̃}bvg܂
//map: prontera
//map: prt_are_in
//map: force_1-1

// e|Ȃǂ̋֎~
prt_are_in	mapflag	nomemo	dummy
prt_are_in	mapflag	noteleport	dummy
prt_are_in	mapflag	nosave	prontera,156,191
force_1-1	mapflag	nomemo	dummy
force_1-1	mapflag	noteleport	dummy
force_1-1	mapflag	nosave	prontera,156,191

// veɓu
prontera,160,185,0	script	A[i	116,{
	mes "A[iɔт܂H";
	next;
	menu "",L_GOARENA,"߂",L_YAME;
L_GOARENA:
	warp "prt_are_in",31,82;
	close;
L_YAME:
	close;
}

// ҋ@珀ւ̓]
prt_are_in,29,79,0	script	^CA^bNP	116,{
	if( getmapusers("force_1-1")>0 ) goto L_WAIT;
	mes "̓^CA^bNLv1ł";
	mes "킵܂H";
	menu "͂",L_GOLV1,"߂",L_YAME;
L_GOLV1:
	if( getmapusers("force_1-1")>0 ) goto L_WAIT;
	disablenpc "fc103-1";
	disablenpc "fc105";
	disablenpc "fc107";
	addtimer 5000,"arenatestev0000";
	warp "force_1-1",99,12;
	end;
L_WAIT:
	mes "ݒ풆̕܂̂ŁA";
	mes "΂炭҂B";
L_YAME:
	close;
}

// iPObԁj
force_1-1,99,12,0	script	arenatestev0000	-1,{
	announce "PObɊJn܂",3;
	addtimer 10000,"arenatestev0001";
}

// ۂ̕ւ̓]MOB̐ݒ
force_1-1,99,12,0	script	arenatestev0001	-1,{
	killmonster "force_1-1","arenatestev1000";
	monster "force_1-1",25,25,"--ja--",1002,1,"arenatestev1000";
	monster "force_1-1",20,25,"--ja--",1002,1,"arenatestev1000";
	monster "force_1-1",25,20,"--ja--",1002,1,"arenatestev1000";
	monster "force_1-1",30,25,"--ja--",1002,1,"arenatestev1000";
	monster "force_1-1",25,30,"--ja--",1002,1,"arenatestev1000";
	set $arenatest00,5;
	disablenpc "fc101";
	disablenpc "fc103";
	warp "force_1-1",25,26;
	enablenpc "fc103-1";
	enablenpc "fc105";
	enablenpc "fc107";
	announce "30bȓɟrł",19;
	addtimer 30000,"arenatestev8000";
}

// |
force_1-1,25,26,0	script	arenatestev1000	-1,{
	set $arenatest00, $arenatest00 - 1;
	if( $arenatest00 > 0 ) goto L_CONT;
	deltimer "arenatestev8000";
	announce "NbV!!",3;
	enablenpc "fc101";
	enablenpc "fc103";
	areaannounce "prt_are_in",25,75,40,90,
		strcharinfo(0) + " ^CA^bNLv1NA܂",0;
	addtimer 5000,"arenatestev9000";
L_CONT:
	end;
}

// ^CAEg
force_1-1,25,26,0	script	arenatestev8000	-1,{
	set $arenatest00,99;
	killmonster "force_1-1","arenatestev1000";
	announce "^CI[o[!!",3;
	areaannounce "prt_are_in",25,75,40,90,
		strcharinfo(0) + " ^CA^bNLv1Ɏs܂",0;
	addtimer 5000,"arenatestev9000";
}

// veɋA
force_1-1,25,26,0	script	arenatestev9000	-1,{
	warp "prontera",156,191;
}