//===== eAthena Script ======================================= 
//= Official Skill Resetter Event in Yuno (kRO & idRO)
//===== By: ================================================== 
//= $ephiroth
//===== Current Version: ===================================== 
//= 1.02
//===== Compatible With: ===================================== 
//= eAthena 1.0
//===== Description: ========================================= 
//= 2006 - Edition Skill Reset NPC
//= 2006/11/16: 1.0 Release and fully working. [$ephiroth]
//= 1.01 Checked, fixed typos, now uses MISC_QUEST var [Lupus]
//= 1.02 Added missing message,comment,etc. [$ephiroth]
//===== Additional Comments: =================================
//= Skill Reset with payment, minimum BaseLv.60 to reset skill.
//= Each 1 BaseLv need 20.000 Zeny, so be careful to use skill.
//= Translated By  45XVWɱ
//============================================================
yuno,138,187,4	script	ʯvNv	124,{
	set @npcname$,"[^D5A500ʯvNv^000000]";
	mes @npcname$;

	if(MISC_QUEST & 1024){
		mes "ڤwgiDLA, Au৹oʤ@.";
		close;
	}
	if(BaseLevel < 60) {
		mes "A򥻵Ũ 60 ũΥHWA^ӧa.";
		close;
	}
	if(SkillPoint != 0) {
		mes "pGAQ~򪺸, AݭnϥΧAޯI.";
		mes "Ф@|Aӧa!";
		close;
	}
	if(Weight || checkfalcon() || checkcart() || checkriding()) {
		mes "AQnmޯ?";
		mes "ګܩp, L...";
		next;
		mes @npcname$;
		if(Weight) {
			mes "A୫mޯ";
			mes "AWF";
			mes "ɭ.";
		} else if(checkcart())
			mes ", Aڭ̦A~.";
		else if(checkfalcon())
			mes ", ͧAyNڭ̦A~.";
		else if(checkriding())
			mes ", 񱼧AMڭ̦A~.";
		next;
		mes @npcname$;
		mes "@|Aӧa!";
		close;
	}
	mes "An, ڬOʯvNv.";
	mes "AWrO ^0080FF"+strcharinfo(0)+"^000000.";
	mes "گରAI?";
	next;
	menu "-^009500󭫸mޯ઺H.^000000",L_Info,"-^00B6FFmޯ.^000000",L_Reset,"-^000088SƩ^000000",-;

	mes @npcname$;
	mes "AḐ,";
	mes "pGAQnmޯ!!"; 
	close;

L_Info:	
	mes @npcname$;
	mes "oӧޯ୫mAȤOKO!!";
	mes "ޯ୫mOά ^D5A50020000 Zeny x A򥻵^000000.";
	mes "O ...Cųݭn 20000 Zeny ӭmޯ.";
	next;
	mes @npcname$;
	mes "@, ٦@!";
	mes "A, yNΪ̤jL,";
	mes "YAQmޯХ⥦̲.";
	next;
	mes @npcname$;
	mes "ޯ઺ǲߥuᮬo@";
	mes "ԷVϥΧAޯI.";
	close;
	
L_Reset:
	mes @npcname$;
	mes "bޯ୫me.";
	mes "AniDڧAh֯."; 
	next;
	mes "^D5A500[" + strcharinfo(0) + "]^000000";
	mes "ڪ򥻵Ŭ ^AA00AALevel " + BaseLevel + " .^000000"; 
	next;
	set @zeny,BaseLevel*20000;
	mes @npcname$;
	mes "ޯ୫mAȪO`@ ^529DFF" + @zeny + "Zeny^000000.";
	next;
	if(Zeny < @zeny) {
		mes @npcname$;
		mes "ݰ_ӧAGS.";
		mes "ڷ|A.";
		emotion e_hmm;
		close;
	}
	set Zeny, Zeny-@zeny;
	set MISC_QUEST,MISC_QUEST | 1024;
	resetskill;
	mes @npcname$;
	mes "§A.";
	emotion e_thx;
	logmes "ޯ୫m";
	close;
}