//===== rAthena Script ======================================= 
//= Renters
//===== By: ================================================== 
//= kobra_k88, mod by Lupus
//===== Current Version: ===================================== 
//= 2.2
//===== Compatible With: ===================================== 
//= rAthena SVN
//===== Description: ========================================= 
//= Knight and Crusader Peco Peco Breeders, Falcon Breeder scripts
//===== Additional Comments: ================================= 
//= Fully working
//= Added another Falcon Master into the Hunters Guild [Lupus]
//= 1.2: replaced checkoption(x) with checkriding,checkfalcon [Lupus]
//= 1.3: Added support Adv Classes + Baby Class [Lupus]
//= 1.4: Added different prices for normal, advanced and baby classes
//= but you could set them to the same [Lupus]
//= 1.5: Fixed spelling mistakes [Nexon]
//= 1.5a: Small fix (Falcon Taming -> Falcon Mastery) [Komurka]
//= 1.6: Moved the Falcon Master to Hugel [Poki#3]
//= 1.7 Updated to Aegis 10.3 standards. [L0ne_W0lf]
//= 1.8 Added 3rd Job creature NPCs (Dragon/Gryphon) [L0ne_W0lf]
//= 1.9 Enabled Gryphon Renter NPC and added Mado Gear NPC. [Masao]
//= 2.0 Fixed problems with third classes and new mounts. [Euphy]
//= 2.1 Moved some renters to a separate renewal file. [Daegaladh]
//= 2.2 Added warg checks. [Euphy]
//============================================================ 

// PecoPeco Breeder (for Knights)-------------------------------------------
prontera,55,350,5	script	Ա(ʿ)#knt	105,{
	if(Upper==0) set .@price,2500; //Normal Peco - default price
	if(Upper==1) set .@price,2500; //Armored Peco
	if(Upper==2) set .@price,2500; //Baby Peco

	mes "[Ա]";
	if (BaseJob == Job_Knight && Class < Job_Rune_Knight) {
		mes "գӭ١";
		mes "ҫʿѽҪһֻɰĴ";
		mes "޷ ^FF0000"+.@price+"^000000 ҡ";
		next;
		switch(select("ǵģһֻ:Ի")) {
		case 1:
			if (zeny < .@price) {
				mes "[Ա]";
				mes "û㹻ĽǮӴ";
				mes "ѵ...Ʋˣ";
				close;
			}
			else if(getskilllv("KN_RIDING") == 0) {
				mes "[Ա]";
				mes "ܱǸ޷ʹñΪƲ˴";
				mes "ѧϰһ¼бе^0000FF^000000֮Ұɡ";
				close;
			}
			else if(checkriding()) {
				mes "[Ա]";
				mes "ѾһֻɰĴӴ";
				mes "һͬʱֻһֻ ^-^";
				close;
			}
			else if(ismounting()) {
				mes "[Ա]";
				mes "Ӵ㻹̳أȴ̳ɣȻ˴Ҳûѽ";
				close;
			}
			set zeny,zeny-.@price;
			setriding;
			mes "[Ա]";
			mes "õΣĴƴӴ";
			close;
		case 2:
			mes "[Ա]";
			mes "..ˡ";
			mes "ףи飬ټ";
			close;
		}
	} else {
		mes "ã...ܱǸ";
		mes "ֻ^0000FFʿ^000000^0000FFʿ^000000";
		close;
	}
}

// Grand PecoPeco Breeder (for Crusaders)-------------------------------------------
prontera,232,318,3	script	Ա(ʮ־)#cru	105,{
	if(Upper==0) set .@price,3500; //Normal Peco - default price
	if(Upper==1) set .@price,3500; //Armored Peco
	if(Upper==2) set .@price,3500; //Baby Peco

	mes "[Ա]";
	if (BaseJob == Job_Crusader && Class < Job_Rune_Knight) {
		if(Upper != 1 ) mes "ӭ٣ʮ־";
		else mes "ӭ٣ʥʮ־";
		mes "Ϊ׼Ĵ";
		mes "һֻҪ ^FF0000"+.@price+"^000000 ҡ";
		next;
		switch(select("̫ˣһֻ:Ի")) {
		case 1:
			if (zeny < .@price) {
				mes "[Ա]";
				mes "û㹻ĽǮ֧ء";
				mes "ҪһֻɰĴĻ ^FF0000"+.@price+"^000000 ...";
				close;
			}
			else if(getskilllv("KN_RIDING") == 0) {
				mes "[Ա]";
				mes "ѧ^0000FF^000000ȻҲ";
				close;
			}
			else if(checkriding()) {
				mes "[Ա]";
				mes "ѾһֻɰĴӴ";
				mes "һͬʱֻһֻ ^-^";
				close;
			}
			else if(ismounting()) {
				mes "[Ա]";
				mes "Ӵ㻹̳أȴ̳ɣȻ˴Ҳûѽ";
				close;
			}
			set zeny,zeny-.@price;
			setriding;
			mes "[Ա]";
			mes "õΣĴƴӴ";
			close;
		case 2:
			mes "[Ա]";
			mes "ô...ؼ ^-^";
			close;
		}
	} else {
		mes "ΪЩʲôأ";
		mes "Ҫʮϸģ^0000FFʮ־^000000^0000FFʥʮ־^000000Ӵ";
		close;
	}
}

// Falcon Master--------------------------------------------------------------
hu_in01,381,304,5	script	ӥ Ա#hnt	105,{
	if(Upper==0) set .@price,2500; //Normal Falcon - default price
	if(Upper==1) set .@price,2500; //Scarf Falcon
	if(Upper==2) set .@price,2500; //Baby Falcon

	mes "[ӥԱ]";
	if (BaseJob == Job_Hunter) {
		if (checkoption(Option_Wug) || checkoption(Option_Wugrider)) {
			mes "...";
			mes "޷ӥ";
			mes "лҰ!";
			close;
		}
		mes "Ҫһֻӥ?";
		mes "ֻҪһ";
		mes "ֵ";
		mes "Ϊ "+.@price+" zeny~";
		next;
		switch(select("Ҫӥ:ȡ")) {
		case 1:
			if (checkoption(Option_Wug) || checkoption(Option_Wugrider)) {
				mes "[ӥԱ]";
				mes "...";
				mes "޷ӥ";
				mes "лҰ!";
				close;
			}
			if (zeny < .@price) {
				mes "[ӥԱ]";
				mes "ʲô?";
				mes "û㹻";
				mes "Ǯ?!";
				mes "ÿʼ";
				mes "취׬Ǯ";
				mes "ħ~";
				close;
			}
			else if(getskilllv("HT_FALCON") == 0) {
				mes "[ӥԱ]";
				mes "찡~";
				mes "ȥѧϰѵӥ";
				mes "ӥ";
				mes "޷";
				mes "Ŀǰ޷Ԧ";
				mes "ҵ˼.";
				close;
			}
			else if(checkfalcon()) {
				mes "[ӥԱ]";
				mes "...";
				mes "Ѿһֻӥ";
				mes "ͷϿ";
				mes "ӥͷ......";
				close;
			}
			set zeny,zeny-.@price;
			setfalcon;
			close;
		case 2:
			mes "[ӥԱ]";
			mes "һ,";
			mes "ȥ";
			mes "Щһӥ,";
			mes "˸֤! , Ӵ~";
			close;
		}
	} else {
		mes "!";
		mes "ӥֻ";
		mes "ˡ֡";
		mes "ö";
		mes "...ٺ, Ľ?";
		close;
	}
}
