//========================
// [ڤ] The PlutoEA Project []
// http://opensvn.csie.org/PlutoEA
// -----------------------------------------
// -  ű -
//========================
//= Japandaת
//========================
prt_church.gat,94,100,4	script	 Ա	71,{
	cutin "wedding_marry01",2;
	mes "[ ]";
	mes "νָ";
	mes "ڴҸǵϣ";
	mes "ǷУ";
	mes "ҪĶ?";
	next;
	switch (select("˵йؽ","Ĺʲô?","Ҫ","޵еĵ!")) {
	case 1:
		mes "[ ]";
		mes "Ŀǰɽ";
		mes "飬æµ";
		mes "ܽ";
		next;
		mes "[ ]";
		mes "ΪѺܶ൥壬";
		mes "ϳɺܶµĹϵ";
		mes "Ҳ 'Ľ 'ǳƣ";
		mes "Ǻ...";
		next;
		mes "[ ]";
		mes "ȻÿæµڹҴ£";
		mes "Ϊ˼³Сڣ";
		mes "ص¡ã";
		mes "ڴ˶ܹҸ";
		mes "ǽĶ";
		next;
		mes "[ ]";
		mes "Ҫأ";
		mes "֣ص";
		mes "ֻҪнһλˣ";
		mes "Ҳָܻԭ״ˣ";
		mes "뿪Ϊֹ";
		mes "Զһ";
		next;
		mes "[ ]";
		mes "ԶŮԣ";
		mes "ŮֻܶԽ飬";
		mes "Ҳпܣ";
		mes "Щ˻ͬԻߺħ飬";
		mes "... ǲᱻ";
		next;
		mes "[ ]";
		mes "ԼδĶĻ";
		mes "鿴ɣ";
		mes "ԸڴδҸˣ";
		mes "ף!!";
		close2;
		cutin "",255;
		end;
	case 2:
		mes "[ ]";
		mes "ȷǣ";
		mes "";
		mes "Ȼλǣûн˲Ŷ԰?";
		mes "Ļֻλ֮";
		mes "뵽";
		next;
		mes "[ ]";
		mes "";
		mes "^0000FFз^000000˵";
		mes "Ȼ˵ҪŮԵ֣";
		mes "ֲܽҪȷ";
		mes "ִ";
		next;
		mes "[ ]";
		mes "껰ʱ";
		mes "Ů";
		mes "㣬";
		mes "Ҫ֣";
		mes "ԵҲһĻشԵ";
		next;
		mes "[ ]";
		mes "ȷĻ";
		mes "ύָ";
		mes "˲俪ʼ";
		mes "˻Զһ𣬲?";
		mes "˵ίľܾҲһ";
		mes "ҲҪ̫ѹ";
		next;
		mes "[ ]";
		mes "Ҫˣ";
		mes "̫ľۼһʱ";
		mes "򣬰˳˵";
		mes "ͬʱģ";
		mes "ֺüԻ";
		next;
		mes "[ ]";
		mes "һ㣬ֺ";
		mes "شҪ";
		mes "^ff0000ɽ껰 3֮ڣ";
		mes "еĹ̶^000000 ҪȻ";
		mes "ֹͣ";
		mes "Ҳܽ";
		next;
		mes "[ ]";
		mes "д֣򵥵ķǣ";
		mes "ȼĸԷһֽ";
		mes "ڶԻӴֵĲݣ";
		mes "ѡͷʾ";
		mes "߼";
		next;
		mes "[ ]";
		mes "ǾͻʾֽԷ֣";
		mes "ס ctrlͬʱ";
		mes "ٰ Cֻᱻ¼";
		mes "ԺҪʱ";
		mes "ס shiftͬʱ";
		mes "ٰ insert ô־ͺܿģ";
		mes "ܷд";
		next;
		mes "[ ]";
		mes "ôһΰɣ";
		mes "Ҫ֣";
		mes "ķʽдһ飬";
		mes "ס ctrlͬʱ";
		mes "ٰ CǼ¼... ?";
		mes "ס shiftͬʱ";
		mes "ٰ insert ";
		next;
		input @test$;
		mes "[ ]";
		mes "??";
		next;
		mes "[ ]";
		mes "ܺãдĲ";
		mes "Ѿ˵ĻһҪ";
		mes "";
		close2;
		cutin "",255;
		end;
	case 3:
		cutin "wedding_marry02",2;
		mes "[ ]";
		mes "ҪĻҪޣ";
		mes "Ҫ^0000881,300,000Һ";
		mes "β1^000000ŮҪ^0000881,200,000";
		mes "Һͽ1^000000";
		mes "Ȼд鼴ɣ";
		mes "Ů˫Ļ";
		mes "ͿԽ";
		next;
		mes "[ ]";
		mes "˻Ҫ׼ָ";
		mes "Ů˫Ҫ^000088ʯָ1^000000";
		mes "ʱһҾͺ";
		next;
		mes "[ ]";
		mes "λ֮";
		mes "Ϳִнˣ";
		mes "Ҫ?";
		next;
		if(select("","")==2) {
			mes "[ ]";
			mes "ףһҸһ..!";
			close2;
			cutin "",255;
			end;
		}
		if(PartnerId) {
			mes "[ ]";
			mes "Ͳ놪";
			close2;
			cutin "",255;
			end;
		}
		if(Upper&2) {
			//δ
			close2;
			cutin "",255;
			end;
		}
		if(@event_marry) {
			mes "[ ]";
			mes "...? ֮ǰ";
			mes "ΪѾˣ";
			mes "һҪĶ";
			mes "Ƿأ";
			mes "λõĻ";
			mes "뵽н";
			close2;
			cutin "",255;
			end;
		}
		if(BaseLevel<45) {
			mes "[ ]";
			mes "˵ΪԼ";
			mes "ڽ򱣻Է";
			mes "ȼ45";
			close2;
			cutin "",255;
			end;
		}
		if(countitem(2613)<1) {
			mes "[ ]";
			mes "ָ?";
			mes "Ǵ!";
			mes "ϸ֮Ұ!";
			close2;
			cutin "",255;
			end;
		}
		if((Sex==0 && countitem(2338)<1) || (Sex==1 && countitem(7170)<1)) {
			mes "[ ]";
			if(Sex==0) {
				mes "ѽ!?";
				mes "ǻװ..";
			}
			else {
				mes "ѽ!β?";
				mes "ǻɵװ..";
			}
			mes "һһε飬׼!";
			close2;
			cutin "",255;
			end;
		}
		if((Sex==0 && Zeny<1200000) || (Sex==1 && Zeny<1300000)) {
			mes "[ ]";
			mes "ܱǸ!ķҪ";
			if(Sex==0)
				mes "1,200,000zeny";
			else
				mes "1,300,000zeny";
			close;
		}
		mes "[ ]";
		mes "﹧ϲ鰡!";
		mes "֪˭ӦúҸ";
		next;
		mes "[ ]";
		mes "ǾͿʼ";
		mes "дһԼְ";
		while(1) {
			next;
			input .@name$;
			if(.@name$ != strcharinfo(0)) {
				mes "[ ]";
				mes "! ֶдȷ";
				mes "Ҫ?";
				mes "ȥѧһ£дֵķɣ";
				mes "дһȽϺð";
				mes "дһ";
				continue;
			}
			break;
		}
		delitem 2613,1;
		if(Sex==0) {
			delitem 2338,1;
			set Zeny,Zeny-1200000;
		}
		else {
			delitem 7170,1;
			set Zeny,Zeny-1300000;
		}
		set @event_marry,1;
		mes "[ ]";
		mes "ǵģȷĽյˣ";
		mes "Ժַʽ";
		mes "Խ˵Ҫ֣";
		mes "Ҫ˵ҲҪȷ֪";
		mes "˽?";
		mes "׼֮ȥ";
		next;
		mes "[ ]";
		mes "ô"+strcharinfo(0)+"  / С...";
		mes "һҪĶ";
		mes "Ƿأ";
		mes "λõĻ";
		mes "Ͽ쵽н";
		mes "...";
		mes "ҪҸԸճɾ~";
		emotion 3;
		close2;
		cutin "",255;
		end;
	case 4:
		cutin "wedding_marry02",2;
		emotion 23;
		hideoffnpc "#¡";
		hideoffnpc "#";
		hideoffnpc "#޿";
		hideoffnpc "#";
		hideoffnpc "#";
		hideoffnpc "#ħ";
		emotion 27,"#¡";
		emotion 27,"#";
		emotion 27,"#޿";
		emotion 27,"#";
		emotion 27,"#";
		emotion 27,"#ħ";
		mes "[]";
		mes "ҪԼŻö!";
		mes "Թݳ޵Ϊ!";
		mes "оĵ NPC!";
		mes "ӳתְԼ!";
		mes "ʥڵʱ򣬵β!";
		mes "޵еĵ!";
		next;
		hideonnpc "#¡";
		hideonnpc "#";
		hideonnpc "#޿";
		hideonnpc "#";
		hideonnpc "#";
		hideonnpc "#ħ";
		emotion 4;
		close2;
		cutin "",255;
		end;
	}
OnInit:
	hideonnpc "#¡";
	hideonnpc "#";
	hideonnpc "#޿";
	hideonnpc "#";
	hideonnpc "#";
	hideonnpc "#ħ";
	end;
}

//========================================================================================
prt_church.gat,100,128,4	script		60,{
	cutin "wedding_bomars01",2;
	if(.flag==1 || (.flag==2 && strcharinfo(0) != .bride$)) {
		mes "[˿]";
		mes "˵Ļڽ...";
		mes "ȵȰ";
		close2;
		cutin "wedding_bomars01",255;
		end;
	}
	if(PartnerId) {
		mes "[˿]";
		mes "Ѿ醪ףҸ";
		close2;
		cutin "wedding_bomars01",255;
		end;
	}
	if(@event_marry==0) {
		mes "[˿]";
		mes "ҪĻ";
		close2;
		cutin "wedding_bomars01",255;
		end;
	}
	if(Sex==1) {
		getpartymember getcharid(1);
		for(set .@i,0; .@i<2; set .@i,.@i+1) {
			if($@partymembername$[.@i] != strcharinfo(0))
				set .@another$,$@partymembername$[.@i];
		}
		if($@partymembercount != 2 || readparam(21,.@another$) == 1) {
			mes "[˿]";
			mes "ҪĻ";
			mes "޶λ֮";
			close2;
			cutin "wedding_bomars01",255;
			end;
		}
		if(readparam(56,.@another$)&2) {
			close2;
			cutin "wedding_bomars01",255;
			end;
		}
		mes "[˿]";
		mes "Ҫ...?";
		mes ""+strcharinfo(0)+"...?";
		mes "Ҫ?";
		next;
		if(select("ǵ","")==2) {
			mes "[˿]";
			mes "úɣϾѡ...";
			close2;
			cutin "wedding_bomars01",255;
			end;
		}
		set .flag,1;
		initnpctimer;
		set .groom$,strcharinfo(0);
		announce "˿: " + .groom$ + "鰡...",9;
		mes "[˿]";
		mes "õ..";
		mes "ְ?";
		next;
		input .bride$;
		if(.bride$ != .@another$) {
			announce "˿: ׼...Ƚһ",9;
			mes "[˿]";
			mes "Ŷ!?ҵϵ۰!";
			mes "ȻǴһ!";
			mes "˫ûͳһ,úһ°!!";
			stopnpctimer;
			set .flag,0;
			close2;
			cutin "wedding_bomars01",255;
			end;
		}
		if(attachrid(getcharid(3,.bride$))) {
			set @defend,0;
			detachrid;
		}
		if(attachrid(getcharid(3,.groom$))) {
			announce "˿:"+.groom$+"  "+.bride$+" СҪ",9;
			mes "[˿]";
			mes "֮ܶ..չһӰ?";
			mes "㷢ʵĴXD...";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "Ըܽ "+.bride$+" ҵӣʵϵ۵ּһ";
			next;
			announce "˿:ӦûŮˣ "+.bride$+" С˼ΰ?",9;
			mes "[˿]";
			mes "ӦûŮˣҪ";
			set .flag,2;
			set @event_marry,0;
		}
		close2;
		cutin "wedding_bomars01",255;
		end;
	}
	if(.flag==0) {
		mes "[˿]";
		mes "ҪĻ...з";
		close2;
		cutin "wedding_bomars01",255;
		end;
	}
	mes "[˿]";
	mes "꼴Ե";
	next;
	announce "˿: " +.bride$+ "...",9;
	mes "[˿]";
	mes "" + .bride$+ "";
	mes "ҪЯ֡빲";
	mes "ɵ";
	mes "" +.groom$+ "";
	next;
	if(select("ǵ","")==2) {
		mes "[˿]";
		mes "ô";
		announce "˿: ׼...Ƚһ",9;
		stopnpctimer;
		set .flag,0;
		close2;
		cutin "wedding_bomars01",255;
		end;
	}
	mes "[˿]";
	mes "" +.bride$+ "";
	mes "Ǻǻ";
	mes "Ǹƶ";
	mes "ǽǼ";
	mes "ǳɹʧܣ";
	mes "Զչ"+.groom$+ "";
	next;
	if(select("Ը","...ҲҪ")==2) {
		mes "[˿]";
		mes "ô";
		announce "˿: ׼...Ƚһ",9;
		stopnpctimer;
		set .flag,0;
		close2;
		cutin "wedding_bomars01",255;
		end;
	}
	if(@defend) {
		set @event_marry,0;
		mes "ʱ䵽...";
		close2;
		cutin "wedding_bomars01",255;
		end;
	}
	//鴦
	if(getcharid(3,.groom$)<=0) {
		stopnpctimer;
		set .flag,0;
		set @event_marry,0;
		mes "ɲ";
		close2;
		cutin "wedding_bomars01",255;
		end;
	}
	set .@dummy,marriage(.groom$);
	wedding;
	sc_start SC_Wedding,3600000,1;
	getitem 2635,1;
	attachrid(getcharid(3,.groom$));
	sc_start SC_Wedding,3600000,1;
	getitem 2634,1;
	detachrid;
	attachrid(getcharid(3,.bride$));
	set .flag,0;
	set @event_marry,0;
	stopnpctimer;
	announce "˿:ôڴףǳΪ!",9;
	announce "˿:"+.groom$+"  "+.bride$+" Ļ!",9;
	mes "[˿]";
	mes "ףҸ..";
	close2;
	cutin "wedding_bomars01",255;
	end;
//˵껰֮֮û˵...
OnTimer180000:
	announce "˿: ش̫...һλ",9;
	set $@marry,0;
	end;
}

//=======================Solo==============================
prt_church.gat,97,102,0	script	#¡	105,{
	mes "[]";
	mes "ҪԼŻö!";
	close;
}

prt_church.gat,98,102,0	script	#	705,{
	mes "[]";
	mes "ڶѨݳ޵Ϊ!";
	close;
}

prt_church.gat,99,102,0	script	#޿	707,{
	mes "[]";
	mes "ҿʩų͵ NPC!";
	close;
}

prt_church.gat,100,102,0	script	#	708,{
	mes "[]";
	mes "ӳתְԼ!";
	close;
}

prt_church.gat,101,102,0	script	#	767,{
	mes "[]";
	mes "ʥڵʱ򣬵β!";
	close;
}

prt_church.gat,102,102,0	script	#ħ	780,{
	mes "[]";
	mes "...޵еĵ!";
	close;
}
