//===== rAthena Script ======================================= 
//= Magic Book Seller
//===== By: ================================================== 
//= Masao
//= Credits to Muad_Dib for the translation.
//===== Current Version: ===================================== 
//= 1.1
//===== Compatible With: ===================================== 
//= rAthena
//===== Description: ========================================= 
//= [Official Conversion]
//= An NPC which sells you different kinds of Magic Books.
//===== Additional Comments: ================================= 
//= 1.0 First Version. [Masao]
//= 1.1 Optimized. [Euphy]
//============================================================ 

geffen_in,176,105,4	script	ħά	64,{

	if (checkweight(1201,1) == 0) {
		mes "ϴ̫ණˣȥһɡ";
		close;
	}
	if ((MaxWeight - Weight) < 1000) {
		mes "㳬Ŷһ¼ɡ";
		close;
	}
	if ((Upper == 2) && (Class != Job_Baby_Warlock)) {
		mes "[ά]";
		mes "С˭ѽ";
		mes "ǲ·˰ҿɲչСѵıķ";
		close;
	}
	if ((Class != Job_Warlock) && (Class != Job_Warlock_T) && (Class != Job_Baby_Warlock)) {
		mes "[ά]";
		mes "ҲѰµ֪ʶô";
		next;
		mes "[ά]";
		mes "ҺܱǸҵ֪ʶ²̫ʺѽ";
		close;
	}
	if (getskilllv(2230) < 1) {
		mes "[ά]";
		mes "ðɣ...㻹Ҫѧϰͷš~";
		next;
		mes "[ά]";
		mes "ѧͷɣкܶԽ㡣";
		close;
	}
	if ((getskilllv(2230) > 0) && (Class == Job_Warlock) || (Class == Job_Warlock_T) || (Class == Job_Baby_Warlock)) {
		mes "[ά]";
		mes "ף㣬ҵѣ";
		mes "ӭȫµħ磡";
		next;
		mes "[ά]";
		mes "ħʦµ֪ʶ";
		next;
		mes "[ά]";
		mes "Ըǧȥʵ";
		mes "ǴԸ֮ʱֳɾ͸һ";
		mes "ҲҶѡħ֮·ԭ";
		next;
		mes "[ά]";
		mes "ʲô鰡";
		next;
		switch (select("ûʲô...:֪Ķħô:֪ħô:ҿԿһħô:Ҳħ棬ʹħô:йռħ")) {
		case 1:
			mes "[ά]";
			mes "Ǹɵӡ";
			close;
		case 2:
			mes "[ά]";
			mes "Ķħ˼ǡһħ顱֪ôʹħô";
			next;
			switch (select("֪:ȫ֪")) {
			case 1:
				mes "[ά]";
				mes "ðɣҪٷѴ";
				close;
			case 2:
				mes "[ά]";
				mes "ħħĸ߶ʽħϵùһξͻʧЧħԷʹöΡ";
				next;
				mes "[ά]";
				mes "ǰħһͨߣȥŻʲôʱ򣬵߱ǻٻʧȥԭе״ħͺñ״书ܵĺϽ";
				next;
				mes "[ά]";
				mes "㲻֪ʲôӵм书ܵĺϽѽ~Ͻ߿Էı״ʹãסͿ~";
				next;
				mes "[ά]";
				mes "Ͻһħϵʹùһ֮ȻڣٴʹҲҪһЩʱ䡣";
				next;
				mes "[ά]";
				mes "...,Ҳ뵢̫ʱЩʹħȥ䣬ͨǲһġ";
				next;
				select("ʲôͬأ");
				mes "[ά]";
				mes "ΪʲôҪѾедħأ";
				next;
				mes "[ά]";
				mes "ܺã漰ħ档";
				next;
				mes "[ά]";
				mes "Ѿѧˡͷšħô뿴ħͷ֮ǰʲôֲͬȻԪص";
				next;
				mes "[ά]";
				mes "ħͷŹ̵ӣҸϸ˵˵";
				next;
				mes "[ά]";
				mes "֪ģںʵʱħ";
				mes "ĴȻԪصͷųЩǻħĻ";
				next;
				mes "[ά]";
				mes "ĴԪָˮ͵ءħľ֧ЩȻԪص";
				next;
				mes "[ά]";
				mes "ûΪ壬磬ʢˮճ";
				next;
				mes "[ά]";
				mes "ЩΪȻħͬͬȻԪصķ";
				next;
				mes "[ά]";
				mes "øӸӵħȥ绽꣬ҰⶼҪĺܶྫʲ";
				next;
				mes "[ά]";
				mes "䲻ɹûЩôĶܵش";
				next;
				mes "[ά]";
				mes "ΪʲôҪħı湦˺ħ԰ԤʹרעħͷŵĹ̡";
				next;
				mes "[ά]";
				mes "ȻħҲһȱ㣬޷Ԥûѧ";
				next;
				mes "[ά]";
				mes "֮ǰ˵ħȻﱾ";
				next;
				mes "[ά]";
				mes "Ϊһħʦûıħеķħдµķ";
				next;
				mes "[ά]";
				mes "ǿһǿħҲúѿơ";
				next;
				mes "[ά]";
				mes "סΪѧϰĶħ飬ѧħ档";
				close;
			}
		case 3:
			mes "[ά]";
			mes "ħΪħӵͷţħи˳䡣";
			next;
			mes "[ά]";
			mes "㽫ħħУ㲻ѡͷţħǲԶͷųġ";
			next;
			mes "[ά]";
			mes "ȻħҲħǱͳҪٵöࡣ";
			next;
			mes "[ά]";
			mes "ʹøӸ߼ǿħʱħѶȻ";
			next;
			mes "[ά]";
			mes "Щ̫˵һħУԱǶڱȽǿ˵һѾǱļˡ";
			next;
			mes "[ά]";
			mes "ⶼȫȡѧ֮뾭εϰܽħĹЧӳ";
			close;
		case 4:
			mes "[ά]";
			mes "ҺܱǸֻһЩѧ߿ħ飬ȻЩ̫ʺ㣬㻹Ҫô";
			next;
			switch (select("Ȼһ뿴:ҿԿӸ߽׵ħ飿")) {
			case 1:
				mes "[ά]";
				mes "ȥԱߵ []ĶҴħ顣";
				next;
				mes "[ά]";
				mes "رһ£ƽ޹ʵľ͸㿴ģܸʲô";
				if (wm_book < 1) set wm_book, 1;
				close;
			case 2:
				mes "[ά]";
				mes "ҺܱǸħЭĹ䲼һһЩ֮ͽħȥЩ飬ЭħĵȨޡ";
				next;
				mes "[ά]";
				mes "Ŭȥҿ϶ҵһ뱾ģûС";
				next;
				mes "[ά]";
				mes "ħЭĹȡƣһһģİ";
				close;
			}
		case 5:
			mes "[ά]";
			mes "뱣ħȴʹħĻʲôҲᷢΪûȥħ";
			next;
			mes "[ά]";
			mes "Ҫȥʢˮһ";
			next;
			mes "[ά]";
			mes "ڣһзҪһûѧʱ߻ħġ";
			next;
			mes "[ά]";
			mes "Ȼν߻ħҲأ˯˻ѣ״̬ˡԭʹһûѧʱħħ֮Ĵ⡣";
			next;
			mes "[ά]";
			mes "ǧúȥԣ ʱ˯ˣ ħʦ˵Ƕôķ̺ͳ谡";
			close;
		case 6:
			if ((BaseLevel > 139) && (getskilllv(2217) > 0) || (getskilllv(2213) > 0)) {
				if(mac_book < 1){
					mes "[ά]";
					mes "Ǹôеæ";
					close;
				}
				if (mac_book == 1) {
					mes "[ά]";
					mes "ռħ鰡˭ҵģ";
					next;
					select("Ůʿ");
					mes "[ά]";
					mes "Ǹռħ飬Ҳû̫Ϣ";
					next;
					mes "[ά]";
					mes "һЩѧͼȥԶħ飬...";
					next;
					select("ʲô");
					mes "[ά]";
					mes "ˣҸҲ֪ʲô";
					next;
					select("Ҿ֪׼û");
					mes "[ά]";
					mes "ҸռħҲмȤ";
					next;
					mes "[ά]";
					mes "ǼӶ˹";
					mes "µоŹŴħ";
					next;
					mes "[ά]";
					mes "ԭܿгɹģûиκΰ";
					next;
					mes "[ά]";
					mes "ܷȤĶҲа";
					next;
					select("ڼӶ˹");
					mes "[ά]";
					mes "˵ԶӪҲʱշ϶ѰԶħټ";
					next;
					mes "[ά]";
					mes "ȥҪóе׼";
					set mac_book,2;
					close;
				}
				if (mac_book > 1) {
					mes "[ά]";
					mes "Ӷ˹ԶӪǱߣҲʱշ϶";
					next;
					mes "[ά]";
					mes "ȥҪóе׼";
					close;
				}
			}
			mes "[ά]";
			mes "Ҳרעǿ壬Ŵħ顣";
			close;
		}
	}
	mes "[ά]";
	mes "ҲѰ֪ʶô?";
	next;
	mes "[ά]";
	mes "ҺܱǸҵ֪ʶʺ㡣";
	close;
}

geffen_in,175,112,4	script		123,{

	if (checkweight(1201,1) == 0) {
		mes "ϴ̫ණˣ";
		mes "ȥһɡ";
		close;
	}
	if ((MaxWeight - Weight) < 1000) {
		mes "ĸѾŶ";
		mes "һ¼ɡ";
		close;
	}
	if ((wm_book > 0) && (Class == Job_Warlock) || (Class == Job_Warlock_T) || (Class == Job_Baby_Warlock)) {
		mes "[]";
		mes "ֻĶħ飬ĵĻħЭߺ͸߼ħʦɡ";
		next;
		mes "[]";
		mes "ʲô԰㣿";
		next;
		select("άĶ");
		mes "[]";
		mes "ô˵";
		next;
		switch (select("ҿһ...:Ҫħ:Ҫмħ:Ҫ߼ħ:Ҫռħ")) {
		case 1:
			mes "[]";
			mes "õģǡ";
			close;
		case 2:
			mes "[]";
			mes "˵鷳ܶ˶ħ顣";
			next;
			mes "[]";
			mes "ǣöħ鶼ûаʱ黹ǾȡһĵѺ";
			next;
			select("ȡѺ");
			mes "[]";
			mes "ǵģ10000ңҲ2^0000FFħ^00000050^0000FFƾҳ^000000";
			mes "֧ѺҲŻ顣";
			next;
			set .@Payment, select("ҵħƾҳ:һǸֽ:ùħ:ƾҳ")-1;
			mes "[]";
			if (!.@Payment) {
				mes "˵ħ顢ħ顢ŵȹħƾҳǧΪЩȥ";
				next;
				mes "[]";
				mes "ԶҪģô";
				close;
			}
			if ((.@Payment == 1 && Zeny > 10000) || (.@Payment == 2 && countitem(1006) > 1) || (.@Payment == 3 && countitem(1097) > 49)) {
				mes "Ҫ飿";
				next;
				set .@i, select("ҿһ...:ħ():ħ():ħ(׻)")-1;
				mes "[]";
				if (!.@i) {
					mes "û⣬ǡ";
					close;
				}
				if (countitem(6188+.@i)) {
					mes "ѾǱħˣ㲻ظͬһ";
					next;
					mes "[]";
					mes "֪뿴ڽȥⱾô㲻黹ҪٽһǾ̫˽ˡ";
					close;
				}
				if ((.@Payment == 1 && Zeny > 10000) || (.@Payment == 2 && countitem(1006) > 1) || (.@Payment == 3 && countitem(1097) > 49)) {
					mes "ħ鱳ƤĽ鿨ϣд˹黹ڡ";
					next;
					mes "[]";
					mes "벻ҪŪ𻵣ᷣġ";
					if (.@Payment == 1) set Zeny, Zeny - 10000;
					else if (.@Payment == 2) delitem 1006,2; //Old_Magic_Book
					else delitem 1097,50; //Worn_Out_Page
					getitem 6188+.@i,1; //Magic_Book_FB, Magic_Book_CB, Magic_Book_LB
					close;
				}
			}
			mes "Ǹ׼ĵѺߵѺƷò";
			close;
		case 3:
			mes "[]";
			mes "Ҫмħ鰡֧5ң2ӣ9";
			next;
			set .@Payment, select("οҵӺ:Ҹ5Һ::")-1;
			mes "[]";
			if (!.@Payment) {
				mes "Ӳ̫,ϺܶﶼаСаʳ㡢а䡢ʡŵβħƯˡ";
				mes "ʽĻҲ·ӡ";
				next;
				mes "[]";
				mes "ħʬսżܡҫʯħŮԿҳԭʯֱռ΢Щ";
				close;
			}
			if ((.@Payment == 1 && Zeny > 50000) || (.@Payment == 2 && countitem(603) > 1) || (.@Payment == 3 && countitem(985) > 8)) {
				mes "Ҫʲôħ飿";
				next;
				set .@i, select("ҿһ...:ħ(ѩ):ħ(ŭǿ):ħ(ʯ):ħ(ױ):ħ():ħ(ˮ):ħ():ħ()")-1;
				setarray .@Books[0],6192,6193,6194,6197,6198,6199,6200,6201;
				mes "[]";
				if (!.@i) {
					mes "û⣬ǡ";
					close;
				}
				if (countitem(.@Books[.@i-1])) {
					mes "ѾǱħˣ㲻ظͬһ";
					next;
					mes "[]";
					mes "֪뿴ڽȥⱾô㲻黹ҪٽһǾ̫˽ˡ";
					close;
				}
				if ((.@Payment == 1 && Zeny > 50000) || (.@Payment == 2 && countitem(603) > 1) || (.@Payment == 3 && countitem(985) > 8)) {
					mes "лл֧Ѻħ鱳ƤĽ鿨ϣд˹黹ڡ벻ҪŪ𻵣ᷣġ";
					next;
					mes "[]";
					mes "һ£黹м͸߼ħ֮ܽռħ顣ҪסЩֻǽģҪúðϧ";
					if (.@Payment == 1) set Zeny, Zeny - 50000;
					else if (.@Payment == 2) delitem 603,2; //Old_Blue_Box
					else delitem 985,9; //Elunium
					getitem .@Books[.@i-1],1; //Magic_Book_SG, Magic_Book_LOV, Magic_Book_MS, Magic_Book_TS, Magic_Book_JT, Magic_Book_WB, Magic_Book_HD, Magic_Book_ES
					close;
				}
			}
			mes "Ǹ׼ĵѺߵѺƷò";
			close;
		case 4:
			mes "[]";
			mes "߼ħ鰡һ£ĸ߼ħкܶƣȷҪô";
			next;
			select("ǵģҼҪ");
			mes "[]";
			mes "ðɣȻôᶨҪģѡһ֧Ѻķʽɡ";
			next;
			mes "[]";
			mes "[12δ֪Ƭ100,000]";
			mes "[7֮100,000]";
			mes "[1100,000]";
			mes "ô֧أ";
			next;
			set .@Payment, select("ҵЩ:ҿһ...:ѡ12δ֪Ƭ100,000:ѡ7֮100,000:ѡ1100,000")-1;
			mes "[]";
			if (!.@Payment) {
				mes "δ֪Ƭ˵Դ˹һֻеϻãƬǹŴԴȪ..........˼";
				next;
				mes "[]";
				mes "֮ԴߡʨޡÿԨʿϻãͬҲռ֮ԭʯһЩ";
				next;
				mes "[]";
				mes "ռ֮ԭʯڳľ";
				next;
				mes "[]";
				mes "˵Դа䡢аĦʿ˹ϻá";
				next;
				mes "[]";
				mes "ԴЩѦ̵èǾͳֵоĶ";
				close;
			}
			if (.@Payment == 1) {
				mes "޷ѼЩƷ֧ѺôҸһ·ߡ";
				next;
				mes "[]";
				mes "֧200,000ô";
				next;
				if(select("ǸûôǮ:") == 1) {
					mes "[]";
					mes "õģô´";
					close;
				}
				mes "[]";
			}
			if ((.@Payment == 1 && Zeny > 199999) || (Zeny > 99999 && ((.@Payment == 2 && countitem(7094) > 11) || (.@Payment == 3 && countitem(984) > 6) || (.@Payment == 4 && countitem(617))))) {
				mes "Ҫʲôħ飿";
				next;
				set .@i, select("ҿһ.:ħ(ţ):ħ():ħ(Ѫʯ):ħ(Ǵ)")-1;
				mes "[]";
				if (!.@i) {
					mes "õģǡ";
					close;
				}
				if (countitem(6201+.@i)) {
					mes "ѾǱħˣ㲻ظͬһ";
					next;
					mes "[]";
					mes "֪뿴ڽȥⱾô㲻黹ҪٽһǾ̫˽ˡ";
					close;
				}
				if ((.@Payment == 1 && Zeny > 199999) || (Zeny > 99999 && ((.@Payment == 2 && countitem(7094) > 11) || (.@Payment == 3 && countitem(984) > 6) || (.@Payment == 4 && countitem(617))))) {
					mes "лл֧Ѻħ鱳ƤĽ鿨ϣд˹黹ڡ벻ҪŪ𻵣ᷣġ";
					next;
					mes "[]";
					mes "һ£黹м͸߼ħ֮ܽռħ顣ҪסЩֻǽģҪúðϧ";
					if (.@Payment == 1) set Zeny, Zeny - 200000;
					else if (.@Payment == 2) delitem 7094,12; //Mystery_Piece
					else if (.@Payment == 3) delitem 984,7; //Oridecon
					else delitem 617,1; //Old_Violet_Box
					if (.@Payment > 1) set Zeny, Zeny - 100000;
					getitem 6201+.@i,1; //Magic_Book_ES_, Magic_Book_CL, Magic_Book_CR, Magic_Book_DL
					close;
				}
			}
			mes "Ǹ׼ĵѺߵѺƷò";
			close;
		case 5:
			if ((BaseLevel > 139) && (mac_book < 1) && ((getskilllv(2217) > 0) || (getskilllv(2213) > 0))) {
				mes "[]";
				mes "...˵ռħô";
				next;
				mes "[]";
				mes "ޣҵ찡...";
				mes "ҼֱҪ...";
				next;
				select("˵ﲻܽ");
				mes "[]";
				mes "˵ʵҴûռħ顣";
				next;
				mes "[]";
				mes "֪ϢӦȥά";
				next;
				mes "[]";
				mes "ǸΪ";
				set mac_book,1;
				close;
			}
			if ((BaseLevel > 139) && (mac_book > 0) && ((getskilllv(2217) > 0) || (getskilllv(2213) > 0))) {
				mes "[]";
				mes "֪ϢӦȥά";
				close;
			}
			mes "[]";
			mes "ҪҪھϰأ";
			next;
			mes "[]";
			mes "ռħ飬ﵽ140ѧ^0000FFԪ^000000^0000FF^000000ܡ";
			next;
			mes "[]";
			mes "ǲ֮ģô";
			close;
		}
	}
	mes "[]";
	mes "ӭħңṩħķ";
	close;
}

mid_camp,255,244,4	script	Ӷ˹	735,{

	if (checkweight(1201,1) == 0) {
		mes "ϴ̫ණˣ";
		mes "ȥһɡ";
		close;
	}
	if ((MaxWeight - Weight) < 1000) {
		mes "ĸѾŶ";
		mes "һ¼ɡ";
		close;
	}
	if (Upper == 2) {
		mes "[Ӷ˹]";
		mes "С˭ѽ";
		mes "ǲ·˰ҿɲչСѵıķ";
		close;
	}
	if ((Class != Job_Warlock) && (Class != Job_Warlock_T) && (Class != Job_Baby_Warlock)) {
		mes "[Ӷ˹]";
		mes "۾ȵòұ־òУܲ";
		close;
	}
	if (getskilllv(2230) < 1) {
		mes "[Ӷ˹]";
		mes "ҼĻֱ鷳Ѿ鷳...";
		close;
	}
	if ((BaseLevel < 140) || (getskilllv(2217) < 1) && (getskilllv(2213) < 1)) {
		mes "[Ӷ˹]";
		mes "˼Ҳû׼õ˵Щ";
		close;
	}
	if (mac_book < 2) {
		mes "[Ӷ˹]";
		mes "㿴ǿƺûɶϵ";
		close;
	}
	if (mac_book == 2) {
		mes "[Ӷ˹]";
		mes "Ҹɶ";
		next;
		select("˵оռħ");
		mes "[Ӷ˹]";
		mes "ҲȤô";
		mes "ҲĻ˶Ȥ~";
		mes "ʵɣȷʵоô֪İ";
		next;
		select("άĸɣ");
		mes "[Ӷ˹]";
		mes "ǵģҽмӶ˹άҵܵܡ";
		next;
		mes "[Ӷ˹]";
		mes "ȵȣѵά";
		mes "ǸϼһƼҵģ";
		next;
		select("");
		mes "[Ӷ˹]";
		mes "Ŷ!";
		mes "Ⱑ";
		mes "˾о";
		mes "Ҳиıһ찡";
		next;
		mes "[Ӷ˹]";
		mes "ʱ׼Ҹպԣ";
		next;
		select("ԣ");
		mes "[Ӷ˹]";
		mes "ʵ˵ֻǶԴռħȤ";
		next;
		mes "[Ӷ˹]";
		mes "ʵҵħˮƽߣսˡνҴħҵ˾Ȥ顣";
		next;
		mes "[Ӷ˹]";
		mes "ڣʹһħ飬ûð~ҪҲħ顣";
		next;
		mes "[Ӷ˹]";
		mes "ҲһֱȴǿԵԭ";
		next;
		select("(Ѿ˵ɶأ)");
		mes "[Ӷ˹]";
		mes "ҵогɹˣ";
		mes "һһû";
		next;
		mes "[Ӷ˹]";
		mes "ҪԶռħ飬ҪиýշЩ";
		next;
		mes "[Ӷ˹]";
		mes "ԶŵϣѾɹİдħˣһҪ֪ҪħýϢ";
		next;
		mes "[Ӷ˹]";
		mes "һ!";
		next;
		select("֣Զ˰...");
		mes "[Ӷ˹]";
		mes "...";
		mes "а˵׶˹˹кܶ൵ȫħ֪ʶ";
		next;
		mes "[Ӷ˹]";
		mes "Ҳҵйռħ鴥ýϢ";
		next;
		mes "[Ӷ˹]";
		mes "֪ɶ˰?ȥ˹˹йħ鴥ýĵȫȥң";
		next;
		mes "[Ӷ˹]";
		mes "Ǹý֮Ҳռħ";
		set mac_book,3;
		close;
	}
	if (mac_book == 3) {
		mes "[Ӷ˹]";
		mes "֪ɶ˰ɣȥ˹˹йħ鴥ýĵȫȥң";
		next;
		mes "[Ӷ˹]";
		mes "Ǹý֮Ҳռħ";
		close;
	}
	if (mac_book == 4) {
		mes "[Ӷ˹]";
		mes "~ʲôô";
		next;
		set .@i, select("ҷ˹ڻǵһ:ȫԪеļҪ");
		mes "[Ӷ˹]";
		if ((.@i == 1 && countitem(6195)) || (.@i == 2 && countitem(6196))) {
			mes "ˣҰɣѾǱѽ";
			close;
		}
		if ((.@i == 1 && checkquest(12218) == 2) || (.@i == 2 && checkquest(12219) == 2 && checkquest(12220) == 2 && checkquest(12221) == 2 && checkquest(12222) == 2)) {
			mes "Ŷ~Ҵϸо˲˼ħ̫ǿʼռħɣ";
			next;
			mes "[Ӷ˹]";
			mes "û⣬...̫ˣħҪĲTT";
			next;
			mes "[Ӷ˹]";
			mes "Ҫ^0000aa1,000,000^000000ŹħĲϡôǮô";
			next;
			if(select("壬ûôǮ:ȻұûУǮ") == 1) {
				mes "[Ӷ˹]";
				mes "ûа̫ʧˣҾΪ...";
				mes "ǮҰɡ";
				close;
			}
			mes "[Ӷ˹]";
			if (Zeny >= 1000000) {
				mes "̫ǿʼɣ";
				next;
				specialeffect2 EF_DISPELL;
				progressbar "ffff00",4;
				specialeffect2 EF_LORD;
				set Zeny, Zeny - 1000000;
				getitem 6194+.@i,1; //Magic_Book_CM, Magic_Book_TV
				mes "[Ӷ˹]";
				mes "㾡ȫħ飡㣡";
				next;
				mes "[Ӷ˹]";
				mes "ллʵ룬㻹Ҫ飬ʱҡ";
				close;
			}
			mes "ҲǸ߹ôûǮҾû׼ħĲϡ";
			close;
		}
		mes "ȷ㷢ʲôƺûҵҪϢѽ";
		close;
	}
	mes "[Ӷ˹]";
	mes "㻹Ҫʲô";
	close;
}

dic_in01,25,190,0	script	صļ	844,{

	if (isequipped(2782) < 1) {
		mes "ñװһҵǻ֮䡣";
		close;
	}
	if (ep13_3_invite < 5) {
		mes "ҪЩļϵʱиòĵԱɳҪȥӶٹûǾ뿪";
		close;
	}
	if (checkquest(12165,PLAYTIME) == 1) {
		mes "Щļöģǵƽٻɡ";
		close;
	}
	if (checkquest(12165,PLAYTIME) == 2) {
		mes "㲻پöˣԼˡ";
		erasequest 12165;
		close;
	}
	if ((BaseLevel < 140) || (getskilllv(2217) < 1) && (getskilllv(2213) < 1)) {
		mes "ЩļƺѶҲûɶҪȥ";
		close;
	}
	specialeffect2 EF_DISPELL;
	progressbar "ffff00",4;
	if (mac_book < 3) {
		mes "㷢˹ħ٣Ӳļ¼";
		close;
	}
	if (mac_book == 3) {
		mes "㷢˹ħ٣Ӳļ¼ҲЩǼӶ˹Ҫҵġ";
		set mac_book, 4;
		close;
	}
	if (mac_book == 4) {
		if (rand(1,10) == 1) {
			if (getskilllv(2213) > 0) {
				if (checkquest(12218) == 1) {
					mes "ѾӵЩˡ";
					close;
				}
				mes "^660066ΪҾͼɽȵĵطȥ40ȼյࡣ^000000";
				mes "^660066㾡ȫɹԹַоħӵļ^000000";
				next;
				mes "㷢^990099Ҿ^000000";
				specialeffect2 EF_STEAL;
				close2;
				setquest 12218;
				end;
			}
			mes "Щûɶõݡ";
			close;
		}
		if (rand(1,10) == 2) {
			if (getskilllv(2217) > 0) {
				if (checkquest(12219) == 1) {
					mes "ѾӵЩˡ";
					close;
				}
				mes "^660066澫ȡͼɽһƽȵϽС10澫ԭϡ^000000";
				mes "^660066ļأĴȻԪ֮һ^000000";
				next;
				mes "㷢^990099澫^000000";
				specialeffect2 EF_STEAL;
				close2;
				setquest 12219;
				end;
			}
			mes "Щûɶõݡ";
			close;
		}
		if (rand(1,10) == 3) {
			if (getskilllv(2217) > 0) {
				if (checkquest(12220) == 1) {
					mes "ѾӵЩˡ";
					close;
				}
				mes "^660066ڱɹӾ볢ԣʹ10ȥǸط^000000";
				next;
				mes "㷢^990099^000000";
				specialeffect2 EF_STEAL;
				close2;
				setquest 12220;
				end;
			}
			mes "Щûɶõġ";
			close;
		}
		if (rand(1,10) == 4) {
			if (getskilllv(2217) > 0) {
				if (checkquest(12221) == 1) {
					mes "ѾӵЩˡ";
					close;
				}
				mes "^660066ڰտɽѾӹϵʯʯĿǰΪֹǸطвԹĵطȶҲʺġ";
				mes "ԣ׼10ȥǱ߰ɣףˣ^000000";
				next;
				mes "㷢^990099ʯ^000000";
				specialeffect2 EF_STEAL;
				close2;
				setquest 12221;
				end;
			}
			mes "Щûɶõġ";
			close;
		}
		if (rand(1,10) == 5) {
			if (getskilllv(2217) > 0) {
				if (checkquest(12222) == 1) {
					mes "ѾӵЩˡ";
					close;
				}
				mes "^660066Ϊ羫ȥص̿죬Ƿ羫Ϣء";
				mes "Ĺ̺ףҷ˺ô󾢲ҵ˴߻-ʨļ^000000";
				next;
				mes "㷢^990099羫^000000";
				specialeffect2 EF_STEAL;
				close2;
				setquest 12222;
				end;
			}
			mes "Щûɶõġ";
			close;
		}
		if (rand(1,10) == 10) {
			mes "ͻȻúܶģָоƺûôˣҪõϡ";
			setquest 12165;
			close;
		}
		mes "ûʲôرġ";
		close;
	}
	mes "㲻ҪѲطˡ";
	close;
}

function	script	Magic_Book_Essence	{
	if (MaxWeight - Weight < 1000) {
		mes "ȥʰЩء";
		close;
	}
	if (checkquest(getarg(0)) == 1 && countitem(getarg(1)) >= getarg(2)) {
		specialeffect2 EF_BLIND;
		specialeffect2 EF_BEGINSPELL;
		progressbar "ffff00",4;
		delitem getarg(1),getarg(2);
		if (rand(2)) {
			mes "ʹ"+getarg(2)+""+getitemname(getarg(1))+" ^999900"+getarg(3)+"^000000";
			next;
			mes getarg(3)+"Եģ ɶⷢ^000000";
			completequest getarg(0);
			specialeffect2 EF_LORD;
			close;
		}
		mes "^008888ʹ"+getarg(2)+""+getitemname(getarg(1))+" ϧʧˡ^000000";
		close;
	}
	if (checkquest(getarg(0)) == 2) {
		mes "Ѿ "+getarg(3)+" ";
		close;
	}
	mes "Ѿʹùˡ";
	close;
}

thor_v02,163,104,0	script	ĵط#33	844,{ callfunc "Magic_Book_Essence",12218,7097,40,""; end; }
thor_v01,185,91,0	script	ĵط#33	844,{ callfunc "Magic_Book_Essence",12219,7098,10,""; end; }
ice_dun03,137,148,0	script	ĵط	844,{ callfunc "Magic_Book_Essence",12220,7561,10,""; end; }
ein_dun02,181,124,0	script	ʯĵط	844,{ callfunc "Magic_Book_Essence",12221,7312,10,"ʯ"; end; }
gon_dun02,252,198,0	script	ĵط#33	844,{ callfunc "Magic_Book_Essence",12222,7266,10,""; end; }
