//===== rAthena Script ======================================= 
//= Bunny Band Quest
//===== By: ================================================== 
//= rAthena Dev Team
//===== Current Version: ===================================== 
//= 1.6
//===== Compatible With: ===================================== 
//= rAthena SVN
//===== Description: ========================================= 
//= [Official Conversion]
//= Quest to obtain a Bunny Band headgear.
//===== Additional Comments: ================================= 
//= 1.5 Rescripted to Aegis 10.3 standards. [L0ne_W0lf]
//	Changed @BUNYBAN back to BUNYBND, it should be this way.
//	Removed duplicates. NPC is ALberta-only.
//= 1.6 Cleaning. [Euphy]
//============================================================ 

alberta,26,229,0	script	 ְԱ#bunny	83,{
	if (BUNYBND == 1) {
		mes "[ ְԱ]";
		mes "~!";
		mes "ûȤ";
		mes "μǿ˾";
		mes "ٰر";
		mes "^529DFFöȦ^000000?";
		next;
		switch(select("Ȼ,Ҵ˵:Ϣ:Ի")) {
		case 1:
			mes "[ ְԱ]";
			mes "ܺ~ ";
			mes "鷳Եһ,";
			mes "Ҽû";
			mes "еĵ...";
			next;
			setarray .@Items[0],949,100,706,1,722,1,2213,1;
			for(set .@i,0; .@i<8; set .@i,.@i+2)
				if (countitem(.@Items[.@i]) < .@Items[.@i+1]) {
					mes "[ ְԱ]";
					mes ",ҺܱǸ!";
					mes "Ϻ̫.";
					mes "Ҫ";
					mes .@Items[.@i+1]+" "+getitemname(.@Items[.@i])+"ſ԰~";
					close;
				}
			mes "[ ְԱ]";
			mes "ܺ,Ѿ";
			mes "׼ǳ.";
			mes "㹻ĵ.";
			mes "ֻ.";
			mes "Եһ,";
			mes "Ұһ...";
			next;
			for(set .@i,0; .@i<8; set .@i,.@i+2)
				if (countitem(.@Items[.@i]) < .@Items[.@i+1]) {
					mes "[ ְԱ]";
					mes "?Һź,";
					mes "Ĳ";
					mes "Ͽʼ";
					mes "Ҫ "+.@Items[.@i+1]+" "+getitemname(.@Items[.@i])+((!.@i)?"":"");
					mes "ܹ";
					mes "öȦĲһ.";
					close;
				}
			delitem 949,100; //Feather
			delitem 706,1; //Four_Leaf_Clover
			delitem 722,1; //Scarlet_Jewel
			delitem 2213,1; //Cat_Hairband
			mes "[ ְԱ]";
			mes ",~";
			mes "öȦ!";
			mes "ϣϲ.";
			getitem 2214,1; //Bunny_Band
			set BUNYBND,0;
			next;
			mes "[ ְԱ]";
			mes "лμرĻ.";
			mes "ϣԼʹǵķ~";
			mes "ס";
			mes "˾Զ.";
			mes "ټ~";
			close;
		case 2:
			goto L_Info;
		case 3:
			close;
		}
	}
	mes "[ ְԱ]";
	mes "~! Ҫ";
	mes "μɰЭ";
	mes "ɿ˾ٰ";
	mes "ر ^529DFFöȦ^000000 ?";
	mes "ǸرĻŶ!";
	next;
	switch(select("μ:Ϣ:Ի")) {
	case 1:
		set BUNYBND,1;
		mes "[ ְԱ]";
		mes "ܺ!";
		mes "лĲ!";
		mes "ûҪռĵ,";
		mes "޷öȦ...";
		mes "ظһ,";
		mes "Ǻ.";
		next;
		mes "[ ְԱ]";
		mes "μӻ,Ҫ׼µߣ";
		mes "100 ë,";
		mes "1 Ҷ˲,";
		mes "1 èȦԼ 1 .";
		mes "һ";
		mes "ף~";
		close;
	case 2:
		break;
	case 3:
		close;
	}
L_Info:
	mes "[ ְԱ]";
	mes "Ϊ˶Ըʹǿ";
	mes "ðռұʾл!";
	mes "˾ر׼";
	mes "λ.";
	mes "ְԱǽðռҵľۼ.";
	mes "ȴðռҴĵ.";
	next;
	mes "[ ְԱ]";
	mes "μӻ,";
	mes "Ҫ׼µߣ";
	mes "100 ë,";
	mes "1 Ҷ˲,";
	mes "1 èȦ,";
	mes "1 .";
	next;
	mes "[ ְԱ]";
	mes "׼ʱ,";
	mes "Щø,";
	mes "һöȦ.";
	mes "رлλ:";
	mes "(Э)";
	close;
}

//============================================================ 
// Old changelog
//============================================================ 
//= 1.1 using duplicate command
//= 1.2 Fixed NPC location, removed NPC dupes [Lupus]
//= 1.3 RE-Fixed exploit V_V, also cleared used VAR [Lupus]
//= 1.4 replaced BUNYBND with @BUNYBND [Lupus]
//============================================================ 
