//===== rAthena Script =======================================
//= Jawaii (The Lovers' Paradise) Town
//===== By: ==================================================
//= jAthena (1.0)
//= DNett123 (1.1 - 1.5)
//= L0ne_w0lf
//===== Current Version: =====================================
//= 3.7
//===== Compatible With: =====================================
//= rAthena SVN
//===== Description: =========================================
//= [Official Conversion]
//= Jawaii Town NPCs
//===== Additional Comments: =================================
//= 1.0 Done By jAthena
//= 1.1 Rough Translation [DNett123]
//= 1.2 Started Grammer Corrections [DNett123]
//= 1.3 Some Edits Thanks To Vidar & Fusion [DNett123]
//= 1.4 Edited Dancer, Thanks ceskil [DNett123]
//= 1.5 Fixed Script, and spelling errors, some thanks to Sparkles [DNett123]
//= 1.6 Final corrections (not complete), thanks to the public, and DNett123!
//= 1.6c added missing monsters. Still 1 type is missing [Lupus]
//= 1.7 Fixed a lot of typos [Nexon]
//= 1.8 Removed monster spawns, added aegis ep 8.5 spawns to npc/mobs/fields/jawaii.txt [MasterOfMuppets]
//= 2.0 Updated the npcs according to iRO [MasterOfMuppets]
//= 2.01 fixed missing @ at randomdrink, thanks to theultramage [Lupus]
//= 2.02 Fixed Classic Suite NPC warping directly above a warp [Evera]
//= 3.0 Rescripted to Aegis 10.3 standard. Contains all Jawaii-related NPCs. [L0ne_W0lf]
//= 3.1 Fixed bugs with getpartnerid() (it never returns 1), fixed some conditons,
//=     replaced getpartnerid() with ispartneron() at some tri-forks [Lupus]
//= 3.2 Reverted ispartneron() BACK to getpartnerid(). [L0ne_W0lf]
//=     None of the NPCs need the player's partner to be online.
//= 3.3 Just a small fix up on the Bartender. [L0ne_W0lf]
//= 3.3a Just a little typo error. [Samuray22]
//= 3.4 Added missing checkweights. [L0ne_W0lf]
//= 3.5 Replaced effect numerics with constants. [L0ne_W0lf]
//= 3.6 Fixed bartender so he no longer hangs. [L0ne_W0lf]
//= 3.7 Added Izlude RE coordinates. [Euphy]
//============================================================

// צ
//============================================================
jawaii,239,112,7	script	Ա#toizu	100,{
	mes "[Ա]";
	mes "Ҵ^666699˹³^000000.";
	mes "ôצ޵ʱ? Ӧ";
	mes "ǰһǲЩʲô.";
	next;
	mes "[Ա]";
	mes ", ô.";
	mes "Ҫص˹³?";
	next;
	if (select("ȥ.:ȡ.") == 1) {
		mes "[Ա]";
		mes ", Ҵ˹³ð.";
		close2;
		if(checkre(0))
			warp "izlude",195,212;
		else
			warp "izlude",176,182;
		end;
	}
	mes "[Ա]";
	mes "ż, ࿴";
	mes "ϲĶ.";
	mes "ô˵, Ҳ";
	mes "ܾ,";
	mes "ǲ?";
	close;
}

jawaii,122,263,5	script	Ա#toalbe	100,{
	mes "[Ա]";
	mes "Ҵ^666699^000000.";
	mes "ôצ޵ʱ? Ӧ";
	mes "ǰһǲЩʲô.";
	next;
	mes "[Ա]";
	mes ", ô.";
	mes "Ҫص?";
	next;
	if (select("ȥ.:ȡ.") == 1) {
		mes "[Ա]";
		mes ", Ҵذ.";
		close2;
		warp "alberta",192,157;
		end;
	}
	mes "[Ա]";
	mes "ǵ...";
	mes "ܵ";
	mes "ļڰ. ";
	mes "׼õʱ,";
	mes ".";
	close;
}

jawaii,188,218,7	script	ƹС#Jawaii	80,{
	mes "[С]";
	mes ", װ!";
	mes "㲻Ҫȥƹݰ, ?";
	next;
	if (select(", ȥ.:Ȼ~") == 1) {
		mes "[С]";
		mes "~!";
		mes "лл!";
		mes "Ǹ...";
		mes "Ǹƹݻ";
		mes "˵, Ǹ";
		mes "ֵĵط.";
		next;
	}
	mes "[С]";
	mes "ʹ﹤, ȻĵطǴڵ! ˵, Ϊľƾ¬ ׵üӶǷǷ!";
	next;
	mes "[С]";
	mes "Ҳ֪ҵ";
	mes "ط. Ѿ˵ڲͬԭ.";
	next;
	mes "[С]";
	mes "δĵֻΪһ! ! ĳЩԭ, ";
	mes "뿪ƹ!";
	next;
	mes "[С]";
	mes "֪׷ʲô?";
	mes "^666666*̾*^000000 Ů, Ҫ㲻Ҫȥ...";
	close;
}

jawaii,220,235,3	script	צ޾#heart	724,{
	mes "[צ צ]";
	mes "֪צʲ";
	mes "ôط?";
	next;
	mes "[צ צ]";
	mes "Ǿﱱ'ĵ'. Χˮ, СĵߵǶ.";
	next;
	mes "[צ צ]";
	mes "˷ʱ";
	mes "ط. ȫֳȥ.";
	next;
	mes "[צ צ]";
	mes "Ȼ, ǵ, ";
	mes "һȥĻɲ";
	mes "һע.";
	mes "㿴һ";
	mes "ҵʧ!";
	close;
}

jawaii,240,146,5	script	צ޾#desc1	724,{
	mes "[ ]";
	mes "ӭצ!";
	next;
	mes "[ ]";
	mes ", Ժú";
	mes "Ҳصκδ. 㶼Ϊ֧õĵŷ!";
	next;
	mes "[ ]";
	mes ", ΧһЩħ, ɱ⹥. һ, Ҳϲ, ͰǵһЩԭסľ.";
	close;
}

jawaii,168,247,5	script	צ޾#desc2	724,{
	mes "[צ צ]";
	mes ", οͰ.";
	mes "·, ôֻҪ. Ϊ»ǽù";
	mes "λצ޵. ס޻Ƿǳ.";
	next;
	mes "[צ צ]";
	mes "ļ䲻ͬķ, ѡθڵһ. ҪѯʸϢ, Χе.";
	next;
	mes "[צ צ]";
	mes "Ҫȥʱ, ǰ";
	mes "Ĵֻ. ȥ˹³, ϷһҴȥǶ.";
	close;
}

jawaii,165,121,1	script	צ޾#desc3	724,{
	mes "[ ]";
	mes "צ~";
	mes "צ~~";
	mes "ҵֵĵط~";
	next;
	mes "[ ]";
	mes ", ﲻ? 㲻ȥ, ֻҪʿ. ";
	mes "צһ.";
	next;
	mes "[ ]";
	mes "! ʱą̊́";
	mes "Ͼֻ. ó";
	mes ", Ϊʲǫ̂Ϊ";
	mes "Ǹ߸һ?";
	next;
	mes "[ ]";
	mes "צ~";
	mes "צ~~";
	mes "ҵֵĵط~";
	close;
}

jawaii,141,200,3	script	ְԱ#sroom	798,{
	mes "[]";
	mes "-ӭ...?";
	mes "--";
	mes "ǵ-ķ.";
	mes ", Ϊ";
	mes "-úõذѷ-";
	mes "-ʰ.";
	next;
	mes "[]";
	mes "-1000 Zeny ÿ-ÿ-ÿ!";
	mes "-֧㹻ķ, , һ";
	mes "ȥ. ҷ... !";
	next;
	mes "[]";
	mes ", Ҳ-ͽȥ. -ȸǰ. , ҵ-ϰ᲻ĵ, ... ^666666**^000000";
	next;
	mes "[]";
	mes "^333333Ҵ...^000000";
	next;
	if (select("ȥ.:ȡ.") == 1) {
		mes "[]";
		if (zeny > 999) {
			mes "ǷǷǳ-л!";
			mes "-ΪΪΪ";
			mes "-ķ.";
			mes "ף-ף.";
			close2;
			set zeny,zeny-1000;
			warp "jawaii_in",116,64;
			end;
		}
		mes ", ! , .";
		mes "-û㹻ĽǮ?";
		mes "-ܱǸ, ҵ-ϰ֪-";
		mes "ѽȥĻ, -Ҵ...";
		close;
	}
	mes "[]";
	mes "^666666**^000000";
	mes "-ұ֤-䷿Ƿǳİ, ǳĸ-ɾ! -ٿǻ-!";
	Emotion e_sob;
	close;
}

jawaii,108,199,5	script	ְԱ#antroom	74,{
	mes "[ ]";
	mes "ӭŵ䷿.";
	next;
	mes "[ ]";
	mes "Ϊṩ˷ǳ";
	mes "ŵĻ.";
	mes "ⷿеÿϸСʻ";
	mes "ڶΪṩ.";
	next;
	mes "[ ]";
	mes "зĻǲ, ÿһ䶼Լһ޶ʺϲͬȺ.";
	next;
	mes "[ ]";
	mes "Ըס, ڽ֮ǰ֧1,000 Zeny. 㵽ҪЩõ»,";
	mes "Ӧסķ.";
	next;
	mes "[ ]";
	mes "Ҫסŵ䷿ʱ, . һѡ,";
	mes "ҽȥ.";
	next;
	if (select("õ.:ȡ.") == 1) {
		mes "[ ]";
		if (zeny > 999) {
			mes "ллʹ";
			mes "ǵ";
			mes ".";
			mes "ô...";
			mes "ףϢ";
			mes ".";
			close2;
			set zeny,zeny-1000;
			warp "jawaii_in",129,110;
			end;
		}
		mes "Ǹ, û㹻ĽǮ. Ϊʲô㵱ǰ";
		mes "ʽ, 㻹ʲô?";
		close;
	}
	mes "[ ]";
	mes "ô...";
	mes "ż.";
	mes "Ͼʱ";
	mes "ôԼ.";
	close;
}

jawaii,107,189,5	script	ְԱ#horoom	93,{
	mes "[ɳ ]";
	mes "ܴȥ۷.";
	mes "Ҫ1,000 Zeny.";
	next;
	mes "[ɳ ]";
	mes "ôҪȥ?";
	next;
	if (select("ǵ.:ȡ.") == 1) {
		mes "[ɳ ]";
		if (zeny > 999) {
			mes ", õ.";
			mes "߰.";
			close2;
			set zeny,zeny-1000;
			warp "jawaii_in",86,117;
			end;
		}
		mes "...";
		mes "û㹻ĽǮ.";
		mes ", ";
		mes "ҪǮ, ?";
		close;
	}
	mes "[ɳ ]";
	mes "ð.";
	close;
}

jawaii,112,173,7	script	ְԱ#villroom	93,{
	mes "[˹ ]";
	mes ", װ,";
	mes "ô?";
	mes "ǲҸ";
	mes "סһ?";
	next;
	mes "[˹ ]";
	mes "Ǳ׼.";
	mes "ϲƼ";
	mes "һ";
	mes "ʻķ.";
	next;
	mes "[˹ ]";
	mes "һ,";
	mes "ס޷Ϊ1,000 Zeny.";
	mes ", һڴ";
	mes "ȥ׼. ";
	mes "Ըȥ?";
	next;
	if (select("Ȼ.:ȡ.") == 1) {
		mes "[˹ ]";
		if (zeny > 999) {
			mes "лл~";
			mes "úܰ.";
			close2;
			set zeny,zeny-1000;
			warp "jawaii_in",87,75;
			end;
		}
		mes ", ̫ϧ!";
		mes "ƺû㹻ĽǮ...?";
		mes "ΪʲôͬһЩʽ?";
		close;
	}
	mes "[˹ ]";
	mes "ð~";
	mes "ϲ, Իȥ۷. ķԱ, ɳ, һߵŮ, 仹ǲ.";
	close;
}

jawaii,214,168,5	script	#Jawaii	71,{
	mes "[]";
	mes "ûеطצ";
	mes "޸ʺ";
	mes "¼.";
	next;
	mes "[]";
	mes "Ϊʲô㲻ʱ, δصõĻ?";
	next;
	mes "[]";
	mes "ʱļƷĲƸ. Ľָ, , ϴĽβ...";
	next;
	mes "[]";
	mes "ʹ, һ";
	mes "ϵĿǲҲǳ? ĽǮһħ, ܰʵ!";
	next;
	mes "[]";
	mes "Ǿ...";
	mes "''!!";
	next;
	mes "[]";
	mes "ƾħ͵ʱһ!";
	mes "ֻҪ50,000 Zeny...";
	next;
	if (select("Ҫ.:, лл.") == 1) {
		mes "[]";
		if (zeny > 49999) {
			set zeny,zeny-50000;
			getitem 681,1; //Ļ 
			mes "ǳлл~!";
			mes "Ҫס, Ӧú";
			mes "İһ";
			mes "˵رĵ";
			mes "ʹ.";
			close;
		}
		mes "''Ϊ50,000 Zeny. ƺûôǮ. İܰ?";
		close;
	}
	mes "[]";
	mes "ʹǵĹϵ,";
	mes "ĻҲñ...";
	close;
}

// צڲ
//============================================================
jawaii_in,25,94,0	script	ְԱ#jaw1	724,{
	mes "[ְԱ ]";
	mes "ӭצ޾ƹ~";
	if (getpartnerid()) {
		mes ", ҷǳ㰮Ѿ. ףԺҸ~";
		next;
		mes "[ְԱ ]";
		mes "κδ³Ŀ, Сһ㰡.";
		mes "ǿܺһЩ޴. ֪";
		mes "ܻ...";
		close;
	}
	else if (!getpartnerid()) {
		mes "ף";
		mes ". ";
		mes "̫~";
		close;
	}
	mes "ף.";
	close;

OnWelcome:
	Emotion e_kis;
	end;
OnSolo:
	Emotion e_omg;
	end;
}

jawaii_in,25,96,0	script	ְԱ#jaw2	724,{
	mes "[ְԱ ]";
	mes "ӭצ޾ƹ~";
	if (getpartnerid()) {
		next;
		mes "[ְԱ ]";
		mes "ϣİϲʱ. Ƿǳ,";
		mes "ĵط?";
		next;
		mes "[ְԱ ]";
		mes "ҪûЩ'սʤĵ'Ļ͸. ֪Ϊʲô,";
		mes "һЩ׳ҵ·. ȥ!";
		close;
	}
	else if (!getpartnerid()) {
		mes "ף! ";
		mes "ķ!";
		close;
	}
	mes "ף~";
	close;

OnWelcome:
	Emotion e_kis;
	end;
OnSolo:
	Emotion e_omg;
	end;
}

jawaii_in,25,98,0	script	ְԱ#jaw3	724,{
	mes "[ְԱ ͷ]";
	mes "ӭצ޾ƹ~";
	if (getpartnerid()) {
		next;
		mes "[ְԱ ͷ]";
		mes "~";
		mes "...";
		if (sex)
			mes "˵,";
		else
			mes "ɷһ,";
		mes "̫";
		mes ", ҲϿ~!";
		close;
	}
	else if (!getpartnerid()) {
		next;
		mes "[ְԱ ͷ]";
		mes "...?";
		mes "û, ǲ?";
		if (sex) {
			next;
			mes "[ְԱ ͷ]";
			mes "⿺ʹɨ治Ŷ";
			mes "^666666**^000000 һ^FF0000ܻ^000000.";
			mes "ô...?";
		}
		close;
	}
	mes "ף.";
	close;

OnWelcome:
	Emotion e_kis;
	end;
OnSolo:
	Emotion e_omg;
	end;
}

jawaii_in,25,100,0	script	ְԱ#jaw4	724,{
	mes "[ְԱ ض]";
	mes "ӭצ޾ƹ~";
	if (getpartnerid()) {
		next;
		mes "[ְԱ ض]";
		mes "~";
		mes "㿴";
		mes "";
		mes "! ~";
		close;
	}
	else if (!getpartnerid()) {
		mes "ϣϲ--";
		mes "һ...!";
		next;
		mes "[ְԱ ض]";
		mes "...";
		mes "ñǲսʤ";
		mes "ĵŵһ!";
		next;
		mes "[ְԱ ض]";
		mes "ð, ʲô, Ҹ, Ժ";
		mes "ȥķ!";
		close;
	}
	mes "ף.";
	close;

OnWelcome:
	Emotion e_kis;
	end;
OnSolo:
	Emotion e_omg;
	end;
}

jawaii_in,30,94,4	script	ְԱ#jaw5	724,{
	mes "[ְԱ ]";
	mes "ӭצ޾ƹ~";
	if (getpartnerid()) {
		next;
		mes "[ְԱ ]";
		mes "ϲİ!";
		next;
		mes "[ְԱ ]";
		mes "^666666*̾...*^000000";
		mes "^333333ϣЩŵİ׳ǱȻЩ޴...";
		close;
	}
	else if (!getpartnerid()) {
		mes ". ...!";
		next;
		mes "[ְԱ ]";
		mes "--!";
		mes "ﲻܻӭ!";
		mes "ͣ-ֹͣȾ! Ͽͣ!";
		close;
	}
	mes "ף.";
	close;

OnWelcome:
	Emotion e_kis;
	end;
OnSolo:
	Emotion e_omg;
	end;
}

jawaii_in,30,96,4	script	ְԱ#jaw6	724,{
	mes "[ְԱ ]";
	mes "ӭצ޾ƹ~";
	if (getpartnerid()) {
		next;
		mes "[ְԱ ]";
		mes ", ѽ...!";
		mes ", һֱڸṩ! 湻ź...";
		close;
	}
	else if (!getpartnerid()) {
		mes "ҪϢ, ȵ̫.";
		close;
	}
	mes "ף.";
	close;
	
OnWelcome:
	Emotion e_kis;
	end;
OnSolo:
	Emotion e_omg;
	end;
}

jawaii_in,30,98,4	script	ְԱ#jaw7	724,{
	mes "[ְԱ ]";
	mes "ӭצ޾ƹ~";
	if (getpartnerid()) {
		mes "! İǶô. , ,";
		mes "һ֧ǹһӵ! ...?";
		next;
		mes "[ְԱ ]";
		mes "...";
		mes "ţ̺ͱô?";
		mes "Ӿ?";
		mes "ǽܻ ˺";
		mes " ˹...?";
		mes "....";
		close;
	}
	else if (!getpartnerid()) {
		next;
		mes "[ְԱ ]";
		mes ", طʺ. , Ⱦû, ֻҪ";
		mes "𳳳ֵ.";
		close;
	}
	mes "ף.";
	close;

OnWelcome:
	Emotion e_kis;
	end;
OnSolo:
	Emotion e_omg;
	end;
}

jawaii_in,30,100,4	script	ְԱ#jaw8	724,{
	mes "[ְԱ ˹]";
	mes "ӭצ޾ƹ~";
	if (getpartnerid()) {
		mes "һ, İǶô. ΪǸ!";
		close;
	}
	else if (!getpartnerid()) {
		next;
		mes "[ְԱ ˹]";
		mes ", ϣĳһҵһ. ף!";
		close;
	}
	mes "ף.";
	close;

OnWelcome:
	Emotion e_kis;
	end;
OnSolo:
	Emotion e_omg;
	end;
}

jawaii_in,28,96,0	script	jaw_em_order#Jawaii	-1,3,3,{
OnTouch:
	if (getpartnerid()) {
		donpcevent "ְԱ#jaw8::OnWelcome";
		donpcevent "ְԱ#jaw7::OnWelcome";
		donpcevent "ְԱ#jaw6::OnWelcome";
		donpcevent "ְԱ#jaw5::OnWelcome";
		donpcevent "ְԱ#jaw4::OnWelcome";
		donpcevent "ְԱ#jaw3::OnWelcome";
		donpcevent "ְԱ#jaw2::OnWelcome";
		donpcevent "ְԱ#jaw1::OnWelcome";
		end;
	}
	donpcevent "ְԱ#jaw8::OnSolo";
	donpcevent "ְԱ#jaw7::OnSolo";
	donpcevent "ְԱ#jaw6::OnSolo";
	donpcevent "ְԱ#jaw5::OnSolo";
	donpcevent "ְԱ#jaw4::OnSolo";
	donpcevent "ְԱ#jaw3::OnSolo";
	donpcevent "ְԱ#jaw2::OnSolo";
	donpcevent "ְԱ#jaw1::OnSolo";
	end;
}
	
jawaii_in,15,104,0	script	Ա#jawaii	80,{
	if (checkweight(1201,1) == 0) {
		mes "^3355FF * һ! *";
		mes "̫Ʒ. ȰһЩŽֿҰ.^000000";
		close;
	}
	if (getpartnerid()) {
		mes "[Ա]";
		mes ",";
		mes "Ϊʲô?";
		Emotion e_kis;
		next;
		switch(select("Ե.:ҵ.:̨?")) {
		case 1:
			mes "[Ա]";
			mes "1 1,000 Zeny.";
			mes "ҪҪһ?";
			next;
			if (select("ǵ.:--! ̫!") == 1) {
				mes "[Ա]";
				if (zeny > 999) {
					set zeny,zeny-1000;
					getitem 517,1; //
					mes "~";
					mes "~!";
					close;
				}
				mes "ܱǸ...";
				mes "û㹻ĽǮ...";
				close;
			}
			mes "[Ա]";
			mes "㻹Ҫ,";
			mes ".";
			close;

		case 2:
			mes "[Ա]";
			mes "1 ƿɫҩˮ1,000 Zeny.";
			mes "ҪҪһƿ?";
			next;
			if (select("ǵ.:--! ̫!") == 1) {
				mes "[Ա]";
				if (zeny > 999) {
					set zeny,zeny-1000;
					getitem 503,1; //ɫҩˮ
					mes "~";
					mes "~!";
					close;
				}
				mes "ܱǸ, û㹻ĽǮ?!";
				close;
			}
			mes "[Ա]";
			mes "㻹Ҫ,";
			mes ".";
			close;

		case 3:
			mes "[Ա]";
			mes ", ƹм.";
			mes "ϣ,";
			mes "Сı̫! ף";
			mes "!";
			close;
		}
	}
	Emotion e_omg;
	mes "[Ա]";
	mes ", ...!";
	mes "Ҳ֪Ϊʲô...";
	next;
	mes "[Ա]";
	mes "ʱǾԲκεļһķϹ.";
	mes "ľȻ";
	mes "뿪!";
	next;
	if (Select("ǵŵĳԱ!!:... ֻף...") == 1) {
		mes "[Ա]";
		mes "ǵ, Ȼ.";
		mes "ֹͣ.";
		mes "Ϊʲô㲻";
		mes "˸˵?!";
		next;
		mes "[Ա]";
		mes "^666666*̾*^000000";
		mes "İ";
		mes ", ܵ";
		mes "ӭ, ?";
		close;
	}
	mes "[Ա]";
	mes "? ղ˵";
	mes "Ҫף?";
	mes ", һ";
	mes "Щ򸾵...";
	next;
	mes "[Ա]";
	mes "Ǹ!";
	mes "ΪҵĴ³еǸ.";
	mes "ף.";
	close;
}

jawaii_in,28,124,0	script	Ʊ#jaw	46,{
	mes "[Ʊ]";
	mes "ӭצ޾ƹݵĮ̇.";
	mes "ȵʲô?";
	next;
	if (zeny < 99) {
		set .@r_jaw,rand(1,100);
		mes "[Ʊ]";
		if (.@r_jaw > 29) {
			mes ", ܱǸ,";
			mes "û㹻";
			mes "Ǯ.";
			close;
		}
		mes ".... ...";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "...!";
		mes "Ʊ...";
		mes "ҵ.";
		next;
		mes "[Ʊ]";
		mes "ð...";
		mes ".";
		mes ".";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "лл.";
		close2;
		percentheal -100,0;
		end;
	}
	while (1) {
		switch(select("ƱĽ.:ǹ־.:Ʋ.:ը.:׾.")) {
		case 1:
			set .@roof_jaw,.@roof_jaw+3;
			if (.@roof_jaw > 9) {
				mes "[Ʊ]";
				mes "...";
				mes "㿴ܺȰ.";
				mes "ȷҪ?";
				next;
				mes "["+strcharinfo(0)+"]";
				mes "Ʊ,";
				mes "";
				mes "Ϊ...";
				input .@inputstr$;
				mes ""+.@inputstr$+"...";
				next;
				mes "[Ʊ]";
				mes "...";
				mes "Ϊ";
				mes "һ^0000FF'J&Z'^000000.";
				mes "Ɑ.";
				next;
				mes "["+strcharinfo(0)+"]";
				mes "ǳ...";
				mes "лл...";
				close2;
				percentheal -100,0;
				end;
			}
			if (zeny > 99) set zeny,zeny-100;
			switch(rand(4)) {
			case 1:
				mes "[Ʊ]";
				mes "...";
				mes "ּβô?";
				next;
				mes "[Ʊ]";
				mes "Ƽ'^0000FFͿ 150^000000'.";
				mes "Ǻǵľ!";
				next;
				mes "^3355FF㿴С";
				mes "ɫҺ...^000000";
				next;
				mes "^3355FFܲС, ʢҲС, ҺǸоΣ...^000000";
				next;
				mes "[Ʊ]";
				mes "ǶôҶ,";
				mes "ܸоĺ";
				mes ".";
				next;
				mes "^3355FFһ.^000000";
				specialeffect2 EF_VENOMDUST;
				percentheal -20,0;
				next;
				break;
			case 2:
				mes "[Ʊ]";
				mes "...";
				mes "ּβô?";
				next;
				mes "[Ʊ]";
				mes "Ƽ'^0000FFɫ˹˫ͷӥ^000000'. оڶ˹һƬ...";
				next;
				mes "^3355FF㿴ŴнбİɫҺ. , ";
				mes "һһλӵ˵ζ.^000000";
				next;
				mes "[Ʊ]";
				mes "Ƽ, Ϊǳ, 㲻";
				mes "üź. ɫ˹˫ͷӥǶ˹ֵľ.";
				next;
				mes "^3355FFһһź,";
				mes "ƷĿڸ,";
				mes "ζ.^000000";
				specialeffect2 EF_FIREIVY;
				percentheal -20,0;
				next;
				break;
			case 3:
				mes "[Ʊ]";
				mes "...";
				mes "ô..?";
				next;
				mes "[Ʊ]";
				mes "Ϊʲô'^0000FF֮^000000'?";
				next;
				mes "[Ʊ]";
				mes "ɱζĺɫƭ. ǱȽҵһ־.";
				next;
				mes "^3355FFӹˮβƲ, ΧıһȦ. ɢ";
				mes "ˮ. , ҲܸоǶôҵļβ.";
				next;
				mes "[Ʊ]";
				mes "ں֮ǰ. ǻ΢Щ, ҸоҲ.";
				next;
				mes "^3355FF.^000000";
				specialeffect2 EF_DECAGILITY;
				percentheal -20,0;
				next;
				break;
			Default:
				mes "[Ʊ]";
				mes "ҿ...";
				mes "";
				mes "ϲʲô.";
				next;
				mes "[Ʊ]";
				mes ", '^0000FF'^000000ô?";
				next;
				mes "[Ʊ]";
				mes "ŵˮʵζ. Ʒʱ, ȫо, ů, Ҳе.";
				next;
				mes "^3355FFӹλõļβƲ, ΧıһȦ֭. ζȷʵˮ. ˿θľôΣ?";
				next;
				mes "[Ʊ]";
				mes "Ϊζ, Ů";
				mes ". ұ֤ϲζ.";
				next;
				mes "^3355FFһζ.^000000";
				specialeffect2 EF_MAGNUMBREAK;
				percentheal -20,0;
				next;
			}
			break;
		case 2:
			callsub S_KillChar,2;
			mes "ܿʱ, ⽫õľ. رζҾ, ǹ־Ƶ̵ͨӡ.";
			next;
			mes "^3355FFӹһʢŻɫҺĲ. Ȼ΢, ƺ. ȵ~";
			next;
			mes "[Ʊ]";
			mes "˾ǿɬҲ, һ. ͷƷλ, Ҫһȵ.";
			next;
			mes "^3355FFغȵеǹ־.^000000";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "ҮҮ~!";
			mes "Ǹţ!";
			mes "  !";
			next;
			specialeffect2 EF_STEAL;
			percentheal -10,0;
			next;
			break;

		case 3:
			callsub S_KillChar,2;
			mes "ǳ˵ԽȿƲ, Խɿ. , һλߵĻһ. κεطκ˺ȵõľ.";
			next;
			mes "^3355FFƱóһװɫҺĿƲ, ǰ. Ǵ.";
			next;
			mes "[Ʊ]";
			mes "һ, ͣ. ";
			mes "˵ϸ.";
			next;
			mes "^3355FFںȵľ.";
			mes "гζ";
			mes "ζ.^000000";
			next;
			mes "["+strcharinfo(0)+"]";
			mes "~!";
			mes "!";
			specialeffect2 EF_SANCTUARY;
			percentheal -10,0;
			next;
			break;

		case 4:
			callsub S_KillChar,2;
			mes "һҪҰ, ʱ, ҪΪɶ˵, ֻǽҪȾƵ˵, ƽ";
			mes "ľ, ȵǶ³θ...";
			next;
			mes "^3355FFӹһʢɫҺƽײ. йɴͻζ. ˻ҩ.^000000";
			next;
			mes "[Ʊ]";
			mes "Ϻȵ, ҽһȥ. ĺ, һʵ.";
			next;
			mes "^3355FFץס, һ˾.^000000";
			next;
			mes "^3355FFоǱصĴ.^000000";
			specialeffect2 EF_BLASTMINEBOMB;
			percentheal -10,0;
			next;
			break;

		case 5:
			callsub S_KillChar,1;
			mes "ϲƵ˲. ϲ, Ƿǳ.";
			next;
			mes "[Ʊ]";
			mes ", Ŵٽʳɫ, ǻƭ˵. 󲿷˺ȹ֮";
			mes "оܿ.";
			next;
			mes "^3355FFӹһʢɫҺ";
			mes "Ĳ. , ǰʱ, оǺ, .";
			next;
			mes "[Ʊ]";
			mes "㲻ȵĻ, ͸. , ͺһ¶.";
			next;
			mes "^3355FFһڸɵ, ̾һ.^000000";
			next;
			mes "^3355FF㷢㲻.^000000";
			specialeffect2 EF_HIT6;
			percentheal -10,0;
			next;
			break;
		}

		mes "["+strcharinfo(0)+"]";
		mes "ϰ...";
		mes "...";
		next;
	}
	end;

S_KillChar:
	if (.@roof_jaw > 8) {
		mes "[Ʊ]";
		mes ".";
		next;
		mes "["+strcharinfo(0)+"]";
		mes "лл...";
		mes "Ʊ...";
		close2;
		percentheal -100,0;
		end;
	}
	if (zeny > 99) set zeny,zeny-100;
	set .@roof_jaw,.@roof_jaw+getarg(0);
	mes "[Ʊ]";
	mes ".";
	next;
	mes "[Ʊ]";
	return;
}
	
jawaii_in,43,115,0	script	˿#jaw_1	97,{
	if (!getpartnerid()) {
		if (zeny > 99) {
			mes "[]";
			mes "...";
			mes "! 治ϲ";
			mes "ط!";
			mes "һ㶼ϲ!";
			next;
			mes "[]";
			mes "! ÿ˵Ŀֶ! ̫ʹ!";
			mes "ͬ?!";
			next;
			mes "[]";
			mes "...";
			mes "Ʊ!";
			mes "õ!";
		}
		mes "[]";
		mes ", ôȾ?";
		mes "Ҳǲʽѷ.";
		mes "֪ĸо. ط, ǲ?";
		next;
		mes "[]";
		mes ".";
		mes "Ҹһ!";
		next;
		mes "[]";
		mes "ȥ, 㱯ҵ! ɱ, ǰľ, δ! , ȵ~!";
		next;
		mes "^3355FFרŸ˱԰.^000000";
		next;
		mes "["+ strcharinfo(0) +"]";
		mes "...!";
		mes "! ҪΪЦ";
		mes "!";
		next;
		mes "^3355FFһ.^000000";
		close;
		percentheal -100,0;
	}
	mes "[]";
	mes "㿴...";
	mes "ףԶ";
	mes "...";
	mes " ";
	mes "^666666*...!*^000000";
	close;
}

jawaii_in,41,106,3	script	˿#Cage	98,{
	mes "[]";
	if (getpartnerid()) {
		mes ".... !";
		mes "ʲô?";
		mes "Ͼ, ÿ˶֪һ, ¶˵ֱǸƭ!";
		next;
		mes "[]";
		if (sex) {
			mes "Ҳκ!";
			mes "Լһ";
			mes "ЩŮǼ";
			mes "ǳ޴!";
			mes "˵?!";
			mes "׳!";
		}
		else {
			mes "Լ!";
			mes "Լһ";
			mes "Щ˧Ǽ";
			mes "ǳ޴!";
			mes "˵?! ׳!";
		}
		next;
		mes "[]";
		mes "ϲ!";
		mes "Ů˿ܴҵ,";
		mes "ǾԴ...";
		mes "ҵ!";
		close;
	}
	mes ", Ⱦ...!!";
	mes ", Ե㶫...!!";
	mes "Ұ,";
	mes "ͬ!";
	next;
	mes "[]";
	mes "ɵ...!";
	mes "ڽĵ˵";
	mes "ǿɵ...!";
	mes "ܸɵĵ...!";
	close;
}

// ¡ڲ
//============================================================
prt_in,173,13,4	script	˿#SoloHan	86,{
	mes "[]";
	if (!getpartnerid()) {
		mes ", ...";
		mes "Ǻ~";
		mes "^666666*...!*^000000";
		next;
		mes "[]";
		mes ", ...!";
		mes "㶮, Բ?!";
		mes "ǲǿЩֵķǶеǳĲ?!";
		mes "ǰ~? Ҳ!";
		next;
		mes "[]";
		mes "ô˵ǰҫǵ--!! ^666666**^000000 Ϊҵ֮, ǾΪǱǺô?!";
		next;
		mes "[]";
		mes "ҼǵǰǶǺܺߵ, ڹźһЩĻ. , ǣ, ڹӵ. ˵, ! ҿȥ!";
		next;
		mes "[]";
		mes "˼, ^666666**^000000, ӦòҪ,";
		mes "ҹ¶ʲô. ҿɲҪŮ~!";
		mes "ǰ, ͳ!";
		next;
		mes "[ͳ]";
		mes "...!";
		emotion e_no1,0,"Customer#Bachewcca";
		next;
		mes "[]";
		mes "ûû";
		mes "ϵ, ? ǲ?!";
		mes "! һȾ!!";
		next;
		mes "^3355FFͻȻҵһλ. Ȼе, ǽ";
		mes "һѵľƲ...^000000";
		next;
		mes "^3355FF*    *^000000";
		percentheal -10,0;
		next;
		set .@jaw_roof,1;
		mes "[]";
		mes "ô, 㵽˵ʲô?";
		mes "ȥкþƵĵط.";
		while (1) {
			next;
			if (select("... ٺȵ.:... ?") == 1) {
				mes "[]";
				mes "ð~!";
				mes "Ͷ!";
				mes ", ͳ...";
				mes "ɱ!";
				next;
				mes "[ͳ]";
				mes "^666666*!*^000000";
				specialeffect EF_TALK_SCREAM,AREA,"Customer#Bachewcca";
				next;
				mes "[]";
				mes "...";
				mes "!";
				mes "-Զ!!!";
				next;
				mes "^3355FF*    *^000000";
				percentheal -10,0;
				next;
				set .@jaw_roof,.@jaw_roof+2;
				mes "[]";
				if (.@jaw_roof > 8) {
					mes "...";
					mes "㻹ð?";
					mes "еȶ...";
					next;
					mes "[]";
					mes "ǩֵʱ! , һ͵!";
					next;
					if (select("ǩ:ܾǩ") == 1) {
						mes "[]";
						mes "õ!";
						mes "Сĵ!";
						mes "!";
						close2;
						percentheal 100,0;
						break;
					}
					mes "[]";
					mes "...";
					mes ".";
					mes ", ƻ";
					mes "ɶ, ǲ?";
					close2;
					end;
				}
			}
			if (.@jaw_roof > 6) {
				mes "[]";
				mes "^666666*!*^000000";
				mes "ҪһЩĵ";
				mes "ʱ? , Ǿǩ. ƾ, ܰ͵õ.";
				next;
				if (select("ǩ:ܾǩ") == 1) {
					mes "[]";
					mes "õ~!";
					mes "Сĵ, ף!";
					mes "ΪһЩЩ鷳, ?";
					close2;
					percentheal 100,0;
					break;
				}
				mes "[]";
				mes "...";
				mes ".";
				mes "ѹǵ. 㶼ǰһôõĻ.";
				close2;
				end;
			}
			set .@jaw_roof,.@jaw_roof+3;
			mes "[]";
			mes "Ȱ, Ȱ!";
			mes "̫!";
			mes "ȵ, !";
			next;
			mes "[]";
			mes "...";
			mes "!";
			mes "Զ!!!";
			next;
			mes "^3355FF*  *^000000";
			percentheal -10,0;
			next;
		}
		warp "jawaii_in",44,124;
		end;
	}
	else if (getpartnerid()) {
		mes ", ...";
		mes "Ǻ~";
		mes "*!*";
		next;
		mes "[]";
		mes "... ʲô!?";
		mes ", !";
		mes "Զҵ߰!";
		if (sex) {
			mes "Ц, ";
			mes "޴ѻ";
			mes "ʲô!";
		}
		else {
			next;
			mes "[]";
			mes "֪ʲô";
			mes "฾! ȥָ";
			mes "˰!";
		}
		next;
		mes "[]";
		mes "Զ!";
		mes "ҿɲκλĿѹ. , ͳ! , ﲻܻӭ!";
		next;
		mes "[ͳ]";
		mes "^666666*...!*^000000";
		specialeffect EF_THROWITEM,AREA,"Customer#Bachewcca";
		close;
	}
	mes ", ...";
	mes "Ǻ~";
	mes "^666666*!*^000000";
	next;
	mes "[]";
	mes "ʲô...?";
	mes "Ѿڵκȵ? ͳ, Ű!";
	close;
}
	
prt_in,170,14,0	script	˿#Bachewcca	89,{
	mes "[ͳ]";
	mes "..............";
	mes "^666666*.... ...*^000000";
	mes "!! óζ!";
	emotion e_sob;
	close;
}

// ˹³
//============================================================
-	script	::Honeymoon_Helper_Izlude	-1,{
	mes "[]";
	mes "»Ǻ;û...";
	mes "ǵצ,";
	mes "ʤ!";
	next;
	switch(select("צ?:ȥצ~!:ȡ.")) {
	case 1:
		mes "[]";
		mes "һԶĵ, ¬ ׵üӶ½ңԶ.";
		mes "һǳĶȼʤ,";
		mes "ֻԷǳ.";
		next;
		mes "[]";
		mes "רΪ¬ ׵üӶĹṩǰرʤص. ۸Ϊ100,000 Zeny, ҲЩ, ʲôֵ.";
		next;
		mes "[]";
		mes "ұ֤ϾһЩ";
		mes "ڽĿֵʱ. ԸΪ";
		mes "֧Щ?";
		close;

	case 2:
		mes "[]";
		if (!getpartnerid()) {
			mes "...";
			mes "ź, ǲϵ. Ϊʲô㲻¡ľưļį?";
			close;
		}
		else if (zeny > 99999) {
			set zeny,zeny-100000;
			mes "һ·ƽ...!!";
			mes "Ҵǰ'צ!'";
			close2;
			warp "jawaii",245,125;
			end;
		}
		mes "˵, 100,000 Zeny ȥݷצ. Ϊ, ΪʲôͬѰ?";
		close;

	case 3:
		mes "[]";
		mes "ûʲôͨһǰңԶصóر,";
		mes "ľʱ.";
		next;
		mes "[]";
		mes "צ޵üڽ˵һ~";
		close;
	}
}
