//===========================================
// [] The PlutoEA Project []
// http://opensvn.csie.org/PlutoEA
// -----------------------------------------
// - v벼} - *gJA
//===========================================
// WhG
// 1.}l벼C24Ӥpɷ|ˬd@ơA
//    誺oWL20Ahѱoư
//    @ӡFϤ@襼F20hsp24
//    ӤpɡA賣WL20C
// 2.}l賣u@ӪAIiѶǰeAO
//    un@bo벼ѿAU벼ɡA
//    N|sǰeIX{FϤӿAU
//    N|֤@ӪAIALַ̤|Od@ӡC
// 3.Cѭs벼@C
//-------------------------------------------

-	script	VoteEvent	-1,{
OnInit:
	initnpctimer;
	end;
OnTimer60000:
	set $VoteTime,$VoteTime+1;
	if($VoteResult == 0) {
		if($VoteTime >= 1440) {
			if($VoteKafra < 20 && $VoteZonda < 20)
				set $VoteTime,0;
			else {
				if($VoteKafra >= $VoteZonda) {
					if($VoteZondaP < 2)
						set $VoteZondaP,$VoteZondaP+1;
					set $VoteResult,1;
					set $VoteResult$,"dԪA";
				}
				else {
					if($VoteKafraP < 2)
						set $VoteKafraP,$VoteKafraP+1;
					set $VoteResult,2;
					set $VoteResult$,"㥦";
				}
				announce "v벼wgFA⵲GiDjaF",8;
				sleep 5000;
				announce "벼 G.................",8;
				sleep 5000;
				announce "" +$VoteResult$+ "ohoAoo@^v",8;
				sleep 5000;
				announce "HЦh[ϥ",8;
				set $VoteTime,0;
				initnpctimer;
				end;
			}
		}
		if($VoteTime % 120 == 0)
			announce "ثe|v벼AЦhhѻP",8;
	}
	else if($VoteTime >= 8640) {
		if($VoteResult == 1 && $VoteKafraP > 0)
			set $VoteKafraP,$VoteKafraP-1;
		if($VoteResult == 2 && $VoteZondaP > 0)
			set $VoteZondaP,$VoteZondaP-1;
		set $VoteTime,0;
		set $VoteResult,0;
		set $VoteKafra,0;
		set $VoteZonda,0;
		set $VoteResult$,"";
		set $VoteNumber,$VoteNumber+1;
		announce "ثe|歫sv벼AЦhhѻP",8;
	}
	initnpctimer;
	end;
}
function	script	Kafra_Vote	{
	mes "[dԧ벼 ŶǤH]";
	mes "w{A";
	mes "]㥦MdԪAȤñqw^ff0000'v벼'^000000ڬOqd`qQ촶wԪ벼ŶǤHA";
	mes "аݧگA?";
	next;
	switch(select("v벼Ʊ:ڭnѥ[벼:ϥζǰeA:")) {
	case 1:
		mes "[dԧ벼 ŶǤH]";
		mes "ثedԪAȹUȭ̰FŶǰeAȤ~A ٭p۶ǰeUӬ}ުAȩOA";
		next;
		mes "[dԧ벼 ŶǤH]";
		mes "boӭpPɡA㥦]PϰǰeAMڭAȡA]bQڭ̪DFA";
		next;
		mes "[dԧ벼 ŶǤH]";
		mes "AȩMAȮɶIQDFoơAڭ̶}lM㥦FNWߡA";
		next;
		mes "[dԧ벼 ŶǤH]";
		mes "oˤl̫߳ҤU׬O^ff0000'v벼'^000000]NOA@ӥ~nAȧڭ̴LUȭ̪NӰMwaA";
		next;
		mes "[dԧ벼 ŶǤH]";
		mes "ӥ~Uȭ̬w|AȭǶؤAUȭAѤUǫ̃̄Mwn벼뵹֡A";
		next;
		mes "[dԧ벼 ŶǤH]";
		mes "Lu벼@Y@Ĺ@AȪܡASȷ|ް_ĳAb@wĹo벼HAȫAnۦA@FA";
		next;
		mes "[dԧ벼 ŶǤH]";
		mes "MA벼]OAۦPH]\|@ĹάO@骺YAҥH褬۵uIMIAA";
		next;
		mes "[dԧ벼 ŶǤH]";
		mes "ڭ̥dԪAȡAunOUȭ@NAȪ |ɨүAȪAHЦhhڭ̡A";
		break;
	case 2:
		if(BaseLevel < 60) {
			mes "[dԧ벼 ŶǤH]";
			mes "ܩpA60ťHUa";
			mes "ѻP벼";
			break;
		}
		if($VoteTime >= 8640) {
			mes "[dԧ벼 ŶǤH]";
			mes "e벼έpGMAkwѻP벼̩HƪYAA@|벼";
			next;
		}
		if($VoteResult) {
			mes "[dԧ벼 ŶǤH]";
			mes "{bO벼ɶAҥH벼";
			mes "ЦbU@벼ɡAЧڭ̥dԪAȤ@a";
			mes "A@Ӭn@";
			break;
		}
		if(ZONDA_VOTE > $VoteNumber) {
			mes "[dԧ벼 ŶǤH]";
			mes "iOAwgѥ[L벼FAѻPo벼AЦbU@벼ɡAЧڭ̥dԪAȤ@aA";
			mes " ";
			mes "A@Ӭn@";
			break;
		}
		mes "[dԧ벼 ŶǤH]";
		mes "ڭ̥dԭnwpAȪaϬOApUҥܡG";
		mes " ";
		mes " - ^FF0000}2^000000";
		if($VoteKafraP >= 1) mes " - ^FF0000㺸 aU}3^000000";
		if($VoteKafraP >= 2) mes " - ^FF0000եiùw }2^000000";
		next;
		mes "[dԧ벼 ŶǤH]";
		mes "QnoӰϰ쪺ǰeAȪܡANпܧڭ̥dԪAȧaA";
		mes " ";
		mes "аݧAn뵹dԪAȡA@in@?";
		next;
		if(select("n:O")==1) {
			mes "[dԧ벼 ŶǤH]";
			mes "YUȭ̪NOo˪ܧڤ]SkrAYܷQkܽЦb벼ӧڧiDڧaAϥdԪAȥûMUb@_A";
			mes "򯬧A@Ӭn@o";
			break;
		}
		set ZONDA_VOTE,$VoteNumber+1;
		set $VoteKafra,$VoteKafra+1;
		mes "[dԧ벼 ŶǤH]";
		mes "u§ArAڭ̤|ѰOUȭ̧ڭ̪@Aڭ̷|D`VOdԪAȡA";
		mes "A@Ӭn@";
		break;
	case 3:
		if($VoteResult == 0) {
			mes "[dԧ벼 ŶǤH]";
			mes "ܩpA{bO벼ҥHϥζǰeAȡAеݧ벼A̾ڧ벼G~ϥζǰeAȪ";
			break;
		}
		if($VoteResult == 2) {
			mes "[dԧ벼 ŶǤH]";
			mes "ܩpAھڧ벼G{bdԪAȬOǰeAȪAU@벼ɡAЧڭ̭㥦@aA";
			mes "A@Ӭn@";
			break;
		}
		mes "[dԧ벼 ŶǤH]";
		mes "пܧAتa";
		next;
		if($VoteKafraP >= 1) set @warp1$,"㺸 aU}3 -> 4000 z";
		if($VoteKafraP >= 2) set @warp2$,"եiùw }2 -> 4000 z";
		switch(select("}2 -> 4000 z",@warp1$,@warp2$,"")) {
		case 1:	//}2
			set @mapname$,"xmas_dun02";
			setarray @warp,130,123;
			break;
		case 2:	//㺸 aU}3
			set @mapname$,"alde_dun03";
			setarray @warp,265,22;
			break;
		case 3:	//եiùw}2
			set @mapname$,"mag_dun02";
			setarray @warp,47,40;
			break;
		case 4: break;
		}
		if(@mapname$ != "") {
			if(Zeny < 4000) {
				mes "[dԧ벼 ŶǤH]";
				mes "˷RUȡAz";
				break;
			}
			set Zeny,Zeny-4000;
			warp @mapname$,@warp[0],@warp[1];
			end;
		}
	case 4:
		mes "[dԧ벼 ŶǤH]";
		mes "ڭ̥dԪAȷ|󧹬AȡAHY檺~Ⱥ޲zAUȭ̧wߧKϥΡA̤jVOA";
               	mes " ";
		mes "P±zϥ";
		break;
	}
	close2;
	cutin "",255;
	end;
}

-	script	㥦벼 ŶǤH#vote	874,{
	cutin "zonda_01",2;
	mes "[㥦벼 ŶǤH]";
	mes "AnA";
	mes "MdԪAȩñqw^ff0000'v벼'^000000AڬOq㥦Qoت벼ŶǤHA";
	mes " ";
	mes "аݧگA?";
	next;
	switch(select("v벼Ʊ:ڭnѥ[벼:ϥζǰeA:")) {
	case 1:
		mes "[㥦벼 ŶǤH]";
		mes "{b̼w[SҰǰeAȡAjOdԪAȦboAȪA";
		next;
		mes "[㥦벼 ŶǤH]";
		mes "n㥦MdԪAȰtOƪǰeUӬ}ުAȭpeAO_XndԨ]@˪A";
		next;
		mes "[㥦벼 ŶǤH]";
		mes "ڭ̳oO]dԪAȧ⤧evXGbxAҥHڭ̥unsvALdԨ]O|LoӾAҥHӥ~unĬFA";
		next;
		mes "[㥦벼 ŶǤH]";
		mes "bo˪ߤ̫ҤU׬O^FF0000'v벼'^000000AHUȭ̭n벼ҨMw~ӰAȪA";
		next;
		mes "[㥦벼 ŶǤH]";
		mes "LAJMvwX@]OA誺ߥ߳@w|ϴ_L`A";
		next;
		mes "[㥦벼 ŶǤH]";
		mes "ҥHN]o˧벼äO@NwתALF@qɶA벼@AMA벼ɬF@@ĹAҥH褬۵uIMIAA";
		next;
		mes "[㥦벼 ŶǤH]";
		mes "㥦@HӡAM䥦qtOƪAȡAQUȭ̪A|ɨүAȪAHЦhhڭ̡A";
		break;
	case 2:
		if(BaseLevel < 60) {
			mes "[㥦벼 ŶǤH]";
			mes "ܩpA60ťHUa";
			mes "ѻP벼";
			break;
		}
		if($VoteTime >= 8640) {
			mes "[㥦벼 ŶǤH]";
			mes "e벼έpGMAkwѻP벼̩HƪYAA@|벼";
			next;
		}
		if($VoteResult) {
			mes "[㥦벼 ŶǤH]";
			mes "{bO벼ɶAҥH벼";
			mes "ЦbU@벼ɡAЧڭ̭㥦@a";
			mes "A@Ӭn@";
			break;
		}
		if(ZONDA_VOTE > $VoteNumber) {
			mes "[㥦벼 ŶǤH]";
			mes "iOAwgѥ[L벼FAѻPo벼AЦbU@벼ɡAЧڭ̭㥦@aAA";
			mes " ";
			mes "A@Ӭn@";
			break;
		}
		mes "[㥦벼 ŶǤH]";
		mes "ڭ̭㥦nwpAȪaϬOApUҥܡG";
		mes " ";
		mes " - ^FF0000촵|wq aU}3^000000";
		if($VoteZondaP >= 1) mes " - ^FF0000㺸 aWӼh3^000000";
		if($VoteZondaP >= 2) mes " - ^FF0000JpS~ij^000000";
		next;
		mes "[㥦벼 ŶǤH]";
		mes "QnoӰϰ쪺ǰeAȪܡANпܧڭ̭㥦aA";
		mes " ";
		mes "аݧAn뵹㥦A@in@?";
		next;
		if(select("O:O")==1) {
			mes "[㥦벼 ŶǤH]";
			mes "YUȭ̪NOo˪ܧڤ]SkrAYܷQkܽЦb벼ӧڧiDڧaAϥ㥦ûMUb@_A";
			mes "򯬧A@Ӭn@o";
			break;
		}
		set ZONDA_VOTE,$VoteNumber+1;
		set $VoteZonda,$VoteZonda+1;
		mes "[㥦벼 ŶǤH]";
		mes "u§ArAڭ̷|tOƪAȡAUȭ̺ɳ̤jA";
		mes " ";
		mes "򯬧A@Ӭn@o";
		break;
	case 3:
		if($VoteResult == 0) {
			mes "[㥦벼 ŶǤH]";
			mes "ܩpA{bO벼ҥHϥζǰeAȡAеݧ벼A̾ڧ벼G~ϥζǰeAȪ";
			break;
		}
		if($VoteResult == 1) {
			mes "[㥦벼 ŶǤH]";
			mes "ܩpAھڧ벼G{b㥦eOǰeAȪAU@벼ɡAЧڭ̭㥦@aA";
			mes "A@Ӭn@";
			break;
		}
		mes "[㥦벼 ŶǤH]";
		mes "пܧAتa";
		next;
		if($VoteZondaP >= 1) set @warp1$,"㺸 aWӼh3 -> 4000 z";
		if($VoteZondaP >= 2) set @warp2$,"JpS~ij -> 4000 z";
		switch(select("촵|wq }]3h -> 4000 z",@warp1$,@warp2$,"")) {
		case 1:	//촵|wq }]3h
			set @mapname$,"iz_dun02";
			setarray @warp,234,206;
			break;
		case 2:	//㺸  aW3
			set @mapname$,"c_tower3";
			setarray @warp,64,143;
			break;
		case 3:	//JpS~ij
			set @mapname$,"glast_01";
			setarray @warp,368,303;
			break;
		case 4: break;
		}
		if(@mapname$ != "") {
			if(Zeny < 4000) {
				mes "[㥦벼 ŶǤH]";
				mes "˷RUȡAz";
				break;
			}
			set Zeny,Zeny-4000;
			warp @mapname$,@warp[0],@warp[1];
			end;
		}
	case 4:
		mes "[㥦벼 ŶǤH]";
		mes "ڭ̭㥦|tOƪAȡAUȭ̺ɳ̤jA";
		mes " ";
		mes "P±zϥ";
		break;
	}
	close2;
	cutin "",255;
	end;
}

yuno,162,191,4	script	dԧ벼 ŶǤH#01		861,{
	cutin "kafra_09",2;
	callfunc "Kafra_Vote";
}
yuno,153,191,6	duplicate(㥦벼 ŶǤH#vote)	㥦벼 ŶǤH#01		874

prontera,164,125,4	script	dԧ벼 ŶǤH::w#02		116,{
	cutin "kafra_02",2;
	callfunc "Kafra_Vote";
}
prontera,147,125,6	duplicate(㥦벼 ŶǤH#vote)	㥦벼 ŶǤH#03		874
//morocc,164,114,4	script	dԧ벼 ŶǤH#03	116,{
moc_ruins,104,133,4	script	dԧ벼 ŶǤH#03	116,{
	cutin "kafra_02",2;
	callfunc "Kafra_Vote";
}
morocc,155,114,6	duplicate(㥦벼 ŶǤH#vote)	㥦벼 ŶǤH#04		874
geffen,122,37,4	script	dԧ벼 ŶǤH#04	116,{
	cutin "kafra_02",2;
	callfunc "Kafra_Vote";
}
geffen,117,37,6	duplicate(㥦벼 ŶǤH#vote)	㥦벼 ŶǤH#05		874
payon,158,182,4	script	dԧ벼 ŶǤH#05	116,{
	cutin "kafra_02",2;
	callfunc "Kafra_Vote";
}
payon,153,182,6	duplicate(㥦벼 ŶǤH#vote)	㥦벼 ŶǤH#06		874
alberta,119,70,4	script	dԧ벼 ŶǤH#06	116,{
	cutin "kafra_02",2;
	callfunc "Kafra_Vote";
}
alberta,114,70,6	duplicate(㥦벼 ŶǤH#vote)	㥦벼 ŶǤH#07		874
aldebaran,145,102,4	script	dԧ벼 ŶǤH#07	116,{
	cutin "kafra_02",2;
	callfunc "Kafra_Vote";
}
aldebaran,138,102,6	duplicate(㥦벼 ŶǤH#vote)	㥦벼 ŶǤH#08		874
lighthalzen,163,60,4	script	dԧ벼 ŶǤH#08	861,{
	cutin "kafra_09",2;
	callfunc "Kafra_Vote";
}
lighthalzen,154,60,6	duplicate(㥦벼 ŶǤH#vote)	㥦벼 ŶǤH#02		874