//================= Hercules Script =======================================
//=       _   _                     _
//=      | | | |                   | |
//=      | |_| | ___ _ __ ___ _   _| | ___  ___
//=      |  _  |/ _ \ '__/ __| | | | |/ _ \/ __|
//=      | | | |  __/ | | (__| |_| | |  __/\__ \
//=      \_| |_/\___|_|  \___|\__,_|_|\___||___/
//================= License ===============================================
//= This file is part of Hercules.
//= http://herc.ws - http://github.com/HerculesWS/Hercules
//=
//= Copyright (C) 2012-2015  Hercules Dev Team
//= Copyright (C)  Joseph
//= Copyright (C)  Chilly
//= Copyright (C)  Muad_Dib
//=
//= Hercules is free software: you can redistribute it and/or modify
//= it under the terms of the GNU General Public License as published by
//= the Free Software Foundation, either version 3 of the License, or
//= (at your option) any later version.
//=
//= This program is distributed in the hope that it will be useful,
//= but WITHOUT ANY WARRANTY; without even the implied warranty of
//= MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
//= GNU General Public License for more details.
//=
//= You should have received a copy of the GNU General Public License
//= along with this program.  If not, see <http://www.gnu.org/licenses/>.
//=========================================================================
//= El Dicastes Warp Script
//================= File Encoding =========================================
//= CP-949 (EUC-KR compatible). Do NOT read/save it as UTF-8.
//= -If the encoding is correct, the next three lines have the same length-
//= ============ ¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä¡Ä ============
//= ============ ============================================= ============
//= ============ ¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á¡Á ============
//================= Description ===========================================
//= Warp Points for El Dicastes
//================= Current Version =======================================
//= 1.3
//=========================================================================

// Town Warps
dicastes01,283,285,0	warp	eldicastes0001	1,1,dic_in01,45,30
dic_in01,45,28,0	warp	eldicastes0002	1,1,dicastes01,281,284
dicastes01,163,297,0	warp	eldicastes0003	1,1,dic_in01,371,101
dic_in01,372,99,0	warp	eldicastes0004	1,1,dicastes01,163,295
dicastes01,94,259,0	warp	eldicastes0005	1,1,dic_in01,390,53
dic_in01,390,55,0	warp	eldicastes0006	1,1,dicastes01,95,257
dicastes01,136,103,0	warp	eldicastes0007	1,1,dic_in01,26,98
dic_in01,26,96,0	warp	eldicastes0008	1,1,dicastes01,137,106
dicastes01,255,175,0	warp	eldicastes0009	1,1,dic_in01,344,272
dic_in01,342,271,0	warp	eldicastes0010	1,1,dicastes01,255,173
dicastes01,198,353,0	warp	eldicastes0011	1,1,dicastes02,120,80
dicastes02,120,77,0	warp	eldicastes0012	1,1,dicastes01,197,351
dicastes02,120,237,0	warp	eldicastes0013	1,1,dic_in01,45,246
dic_in01,45,244,0	warp	eldicastes0014	1,1,dicastes02,119,235
dic_in01,299,248,0	warp	eldicastes0015	1,1,dic_in01,262,191

dic_in01,242,182,0	script	#eldicastes0016	CLEAR_NPC,{
	if (isequipped(2782)) select("Administrative Office");
	else select("¡÷¡ú¡ð");
	warp "dic_in01",138,221;
	end;
}

// Elevators
-	script	Elevator#main	-1,{
	.@n = atoi(strnpcinfo(2));
	.@eq = (isequipped(2782))?1:0;
	if (.@n <= 4) {
		.@m$ = (.@eq)?"Civil Services:Archive Room:Situation Room:Administrative Office":"¢³¡ð¡Ð:¡ñ¡ñ¡ò:¡ø¡ø¡ð:¡÷¡ú¡ð";
		setarray .@xy, 45,286,36,212,122,282,121,201;
	}
	else if (.@n <= 11) {
		.@m$ = (.@eq)?"Residential Zone 1:Residential Zone 2:Residential Zone 3:Pub Burman Flone":"¡ô¡õ¡ñ ¡þ :¢³¡ü¡Ð ¡ú :¡ï¢³¢¤ ¢² :¢±¡Ð¡ñ";
		setarray .@xy, 42,115,110,108,178,108,260,115;
	}
	else if (.@n <= 13) {
		.@m$ = (.@eq)?"Battle Station:Galten Quarters":"¡ø¡ô¡ï ¡ò :¡ü¡÷¡ó ¡÷ ";
		setarray .@xy, 385,272,385,208;
	}
	.@m = select(.@m$) - 1;
	warp "dic_in01",.@xy[.@m*2],.@xy[.@m*2+1];
	end;
}
dic_in01,46,288,0	duplicate(Elevator#main)	Elevator#1	CLEAR_NPC
dic_in01,122,284,0	duplicate(Elevator#main)	Elevator#2	CLEAR_NPC
dic_in01,121,203,0	duplicate(Elevator#main)	Elevator#3	CLEAR_NPC
dic_in01,35,214,0	duplicate(Elevator#main)	Elevator#4	CLEAR_NPC
dic_in01,44,116,0	duplicate(Elevator#main)	Elevator#5	CLEAR_NPC
dic_in01,112,108,0	duplicate(Elevator#main)	Elevator#6	CLEAR_NPC
dic_in01,180,108,0	duplicate(Elevator#main)	Elevator#7	CLEAR_NPC
dic_in01,261,115,0	duplicate(Elevator#main)	Elevator#8	CLEAR_NPC
dic_in01,57,48,0	duplicate(Elevator#main)	Elevator#9	CLEAR_NPC
dic_in01,137,46,0	duplicate(Elevator#main)	Elevator#10	CLEAR_NPC
dic_in01,222,46,0	duplicate(Elevator#main)	Elevator#11	CLEAR_NPC
dic_in01,388,272,0	duplicate(Elevator#main)	Elevator#12	CLEAR_NPC
dic_in01,389,208,0	duplicate(Elevator#main)	Elevator#13	CLEAR_NPC