//===== rAthena Script ======================================= 
//= 3rd Item Seller
//===== By: ================================================== 
//= Masao, Mercurial
//===== Current Version: ===================================== 
//= 1.5
//===== Compatible With: ===================================== 
//= rAthena SVN
//===== Description: ========================================= 
//= [Official Conversion]
//= Sells some 3rd Job related items:
//= - Poison Herbs, Rune Stones, Rare Herbs, Points
//===== Additional Comments: ================================= 
//= 1.0 First Version.
//= 1.1 Optimized Poison Herb Salesman NPC
//= 1.2 Optimized and standardized. [Euphy]
//= 1.3 Added Malangdo/Mora Points NPC. [Euphy]
//= 1.4 Updated to match the official scripts. [Euphy]
//= 1.5 Added Izlude duplicates. [Euphy]
//============================================================ 

// Poison Herb Merchants (Guillotine Cross)
//============================================================
-	script	::phs	-1,{
	if (checkweight(1201,1) == 0 || MaxWeight - Weight < 2000) {
		mes "- Ե !! -";
		mes "- ǰЯƷ -";
		mes "- ڷ߳. -";
		mes "-  -";
		mes "- ٽн. -";
		close;
	}
	mes "[ҩҩ]";
	mes "רҵ";
	mes "ҩҩ.";
	mes "ÿҩݵۼ 4,000 zeny.";
	mes "Ҫĸ?";
	next;
	set .@i, select("- :- ӧ:- Ҷ:- :- ݹ:- ͸ǲ:- ƶ:- ȡ")-1;
	mes "[ҩҩ]";
	if (.@i < 6) {
		set .@item,7932+.@i;
		set .@price,4000;
		set .@max,2000;
		set .@max$,"2,000";
	} else if (.@i == 6) {
		set .@item,7931;
		set .@price,5000;
		set .@max,500;
		set .@max$,"500";
		mes "ÿƶ 5,000 zeny.";
	} else {
		mes "ð, . ʱݹ~!";
		close;
	}
	mes "Ҫٸ?";
	mes "Թ '"+.@max+"' .";
	mes "ȡ, 밴  '0'.";
	next;
	input .@amount;
	if (.@amount == 0) {
		mes "[ҩҩ]";
		mes "Ѿȡ.";
		close;
	}
	if (.@amount > .@max) {
		mes "[ҩҩ]";
		mes "С "+.@max$+"!";
		close;
	}
	set .@total, .@amount * .@price;
	if (Zeny < .@total) {
		mes "[ҩҩ]";
		mes "Ǯ.";
		mes "ȼЯZeny.";
		close;
	}
	set Zeny, Zeny - .@total;
	getitem .@item, .@amount;
	mes "[ҩҩ]";
	mes "лл. ӭ´~!";
	close;
}
job3_guil01,79,96,3	duplicate(phs)	ҩҩ	877
morocc,191,94,4	duplicate(phs)	ҩҩ#moc	877	//Official: (190,96) -> in a wall
lhz_in02,16,205,4	duplicate(phs)	ҩҩ#lhz	877

// Rune Stone Merchants (Rune Knight)
//============================================================
-	script	::runesale	-1,{
	if (checkweight(1201,1) == 0 || MaxWeight - Weight < 2000) {
		mes "- Ե !! -";
		mes "- ǰЯƷ -";
		mes "- ڷ߳. -";
		mes "-  -";
		mes "- ٽн. -";
		close;
	}
	mes "[]";
	mes ", Ҫ?!";
	mes "ҳ۸ַʯ!";
	mes "ϲĸ?";
	next;
	set .@i, select("- ߼ԭʯ.:- ͨԭʯ.");
	mes "[]";
	if (.@i == 1) {
		mes "߼ԭʯ!";
		mes "Ҫ 2,500 zeny ÿ!";
		set .@item,12734; //Runstone_Quality
		set .@price,2500;
	} else {
		mes "ͨԭʯ?";
		mes "Ҫ 1,000 zeny ÿ!";
		set .@item,12737; //Runstone_Ordinary
		set .@price,1000;
		setarray .@rune[0],12737,1000;
	}
	mes "Ҫٸ,";
	mes "ס, ";
	mes "ֻܹ '2000' .";
	next;
	input .@amount;
	if (.@amount == 0) {
		mes "[]";
		mes "? ߿!";
		close;
	}
	if (.@amount > 2000) {
		mes "[]";
		mes "С 2,000!";
		close;
	}
	set .@total, .@amount * .@price;
	if (Zeny < .@total) {
		mes "[]";
		mes "Zeny! Zeny!";
		mes "Ǯ.";
		mes "ȼжǮ.";
		close;
	}
	if (!checkweight(.@item,.@amount)) {
		mes "[]";
		mes "ȥӦòô, ٴγһ?!";
		close;
	}
	set Zeny, Zeny - .@total;
	getitem .@item, .@amount;
	mes "[]";
	mes "лл.";
	mes "´~!";
	close;
}
job3_rune01,90,62,3	duplicate(runesale)	#job3	853
prontera,168,228,3	duplicate(runesale)	#prt	853

// Rare Herb Merchants (Guillotine Cross)
//============================================================
job3_guil01,91,93,3	script	ϡвҩռ	49,{
	if (checkweight(1201,1) == 0 || MaxWeight - Weight < 2000) {
		mes "- Ե !! -";
		mes "- ǰЯƷ -";
		mes "- ڷ߳. -";
		mes "-  -";
		mes "- ٽн. -";
		close;
	}
	if (Class == Job_Guillotine_Cross || Class == Job_Guillotine_Cross_T || Class == Job_Baby_Cross) {
		mes "[ϡвҩռ]";
		mes "ǻռĶҩҩ. , ҿʼҩݳΪIzidor. Ȥ, Թ.";
		next;
		set .@i, select("- Ӧι?:- üѪ:- ÿζ:- ۶:- ñõ:- ҩ:- ׻")-2;
		if (.@i == -1) {
			mes "[ϡвҩռ]";
			mes "Ի 10,000 zeny , ͬʱҪ, Ѫ, ζ, ۶, õ, ҩ, ׻֮һ.";
			next;
			mes "[ϡвҩռ]";
			mes "ΪʲôǮ? ֻǸһһղؼ. ...";
			close;
		} else {
			setarray .@exchange[0],702,621,631,749,605,703;
			set .@item, .@exchange[.@i];
			set .@price, 10000;

			mes "[ϡвҩռ]";
			mes "Ҫ?";
			mes "ֻܹ '2000' .";
			mes "ȡ, 밴  '0'.";
			next;
			input .@amount;
			if (.@amount == 0) {
				mes "[ϡвҩռ]";
				mes "Ѿȡ.";
				close;
			}
			if (.@amount > 2000) {
				mes "[ϡвҩռ]";
				mes "С 2,000!";
				close;
			}
			set .@total, .@amount * .@price;
			if (countitem(.@item) < .@amount || Zeny < .@total) {
				mes "[ϡвҩռ]";
				mes "װеĶٽнװ.";
				close;
			}
			mes "[ϡвҩռ]";
			mes "ǮƷ.";
			delitem .@item, .@amount;
			set Zeny, Zeny - .@total;
			getitem 709, .@amount; //Izidor
			close;
		}
	}
	mes "[ϡвҩռ]";
	mes "ǻռĶҩҩ. ......";
	close;
}

// Point Merchants (Sorcerer)
//============================================================
-	script	::pss	-1,{
	if (checkweight(1201,1) == 0 || MaxWeight - Weight < 2000) {
		mes "- Ե !! -";
		mes "- ǰЯƷ -";
		mes "- ڷ߳. -";
		mes "-  -";
		mes "- ٽн. -";
		close;
	}
	mes "[]";
	mes ". ԪʹĴ߻Ϊ ^FF0000^000000. Ҫʲô?";
	next;
	set .@i, select("- Ƭ - 200z:- 龫 - 200z:- ˮƬ - 200z:- 龫 - 200z:- ȡ")-1;
	mes "[Point Merchant]";
	if (.@i == 4) {
		mes "ûҪĶ?";
		close;
	}
	setarray .@itemid[0],6360,6363,6361,6362;
	setarray .@color$[0],"","","ˮ","";
	mes "ѡ "+.@color$[.@i]+" .";
	mes "Ҫٸ?";
	mes "ȡ, 밴 '0'.";
	next;
	input .@amount;
	mes "[]";
	if (.@amount == 0) {
		mes "Ѿȡ.";
		close;
	}
	if (Zeny < .@amount*200) {
		mes "Ǯ.";
		close;
	}
	if (!checkweight(.@itemid[.@i],.@amount)) {
		mes "û㹻Ŀռĸྫ.";
		close;
	}
	set Zeny, Zeny-(.@amount*200);
	getitem .@itemid[.@i],.@amount;
	mes "ǳл, ټ~!";
	close;
}
gef_tower,105,172,5	duplicate(pss)	#Sorcerer	700
prt_in,131,66,0	duplicate(pss)	#Prontera	700
alberta,105,52,7	duplicate(pss)	#Alberta	700
aldebaran,133,114,5	duplicate(pss)	#Aldebaran	700
comodo,193,159,5	duplicate(pss)	#Comodo	700
geffen,129,49,5	duplicate(pss)	#Geffen	700
izlude,138,163,5	duplicate(pss)	#Izlude	700	// Old coordinates: izlude (135,121)
izlude_a,138,163,5	duplicate(pss)	#Izlude_a	700
izlude_b,138,163,5	duplicate(pss)	#Izlude_b	700
izlude_c,138,163,5	duplicate(pss)	#Izlude_c	700
izlude_d,138,163,5	duplicate(pss)	#Izlude_d	700
malangdo,214,163,5	duplicate(pss)	#Malangdo	700
mora,115,118,3	duplicate(pss)	#Mora	700
ra_in01,256,273,3	duplicate(pss)	#Rachel	700
veins,202,128,5	duplicate(pss)	#Veins	700
dicastes01,207,200,5	duplicate(pss)	#Dicastes	700
manuk,261,206,3	duplicate(pss)	#Manuk	700
splendide,207,160,5	duplicate(pss)	#Splendide	700
mid_camp,224,237,3	duplicate(pss)	#Midgard	700
