//----------------------------------------------------------------------------------------
// Reset Girl 
// Script by Kizashi
// 改定 PsY
//----------------------------------------------------------------------------------------
// major fixes by Ramiel
// Small addition by L0ne_W0lf
//
// Vidar - http://www.vidaronline.com
//----------------------------------------------------------------------------------------
//邪魔なので、プロンテラ精錬場下側の部屋に移動させました。
prt_in.vhm,28,72,4      script       "リセット職員"       0,0,0,0	727,{
//NPCの名前
setstr $@RES_NPC_NAME = "[メリッサ]";
//料金
set @stat_price = 5000000;
set @skill_price = 3500000;
//条件レベル＃１（この条件下であるとコメントが変わります）
set @stat_levelU = 70;
set @skill_levelU = 35;
//条件レベル＃２（この条件がリセット可能な条件になります）
set @stat_levelO = 90;
set @skill_levelO = 45;
//開始
	mes "$[$@RES_NPC_NAME]";
	mes "いらっしゃいませ";
	mes "こちらではステータス、及び、スキルのリセットを行う事が出来ます。";
	next;
	mes "$[$@RES_NPC_NAME]";
	mes "^FF0000※リセット条件は下記の通り※^000000";
	mes "ステータスをリセット出来るレベルは";
	mes "Base Lv.^FF0000$[@stat_levelO] ^000000以上です";
	mes "スキルをリセットできるジョブレベルは";
	mes "Job Lv.^FF0000$[@skill_levelO] ^000000以上です";
	next;
	mes "$[$@RES_NPC_NAME]";
	mes "ご利用には手数料も必要です。";
	mes "ステータスリセット ^FF0000$[@stat_price] zeny^000000 ";
	mes "スキルリセット ^FF0000$[@skill_price] zeny^000000 ";
	mes "となっております。";
	mes "尚スキルリセットはノービスや１次職の";
	mes "方はお受け出来ませんのでご注意下さい";
	next;
	menu "ステータスリセット",L_Stat,"スキルリセット",L_Skill,"やめる",L_Cancel;
L_Stat:
//Base Levelチェック
check BaseLevel >= @stat_levelU,-,L_ERR_85;
check BaseLevel >= @stat_levelO,-,L_ERR_81;
		check zeny >= @stat_price,-,No_Fund;
		set zeny - @stat_price;
		mes "$[$@RES_NPC_NAME]";
		mes "ステータスをリセットするのですね";
		mes "それでは、開始します";
		mes "　"
		mes "　　　ÅΘΦΨυδΠΛÅ。。。";
		next;
		resetstat;
		mes "$[$@RES_NPC_NAME]";
		mes "ステータスリセットが終了しました";
		mes "あなたには新たな道が開ける事でしょう";
		mes "ですが、ステータスリセットの利用は控え目にして下さいね";
		close;
L_Skill:
//利用条件
//この条件ではノービス及び１次職は利用不可
check Job >= 7,-,L_ERR_91;
//Job Levelチェック
check JobLevel >= @skill_levelU,-,L_ERR_86;
check JobLevel >= @skill_levelO,-,L_ERR_82;
		check zeny >= @skill_price,-,No_Fund;
		set zeny - @skill_price;
		mes "$[$@RES_NPC_NAME]";
		mes "スキルをリセットするのですね";
		mes "それでは、開始します";
		mes "　"
		mes "　　　ÅΘΦΨυδΠΛÅ。。。";
		next;
		//Platinum skill check
			getskilllevel 0x93,@chk1;
			getskilllevel 0x92,@chk2;
			getskilllevel 0x99,@chk3;
			getskilllevel 0x9A,@chk4;
			getskilllevel 0x94,@chk5;
			getskilllevel 0x9B,@chk6;
			getskilllevel 0x9D,@chk7;
			getskilllevel 0x91,@chk8;
			getskilllevel 0x9C,@chk9;
			getskilllevel 0x90,@chk10;
			getskilllevel 0x98,@chk11;
			getskilllevel 0x96,@chk12;
			getskilllevel 0x97,@chk13;
			getskilllevel 0x95,@chk14;
			getskilllevel 0x8E,@chk15;
			getskilllevel 0x8F,@chk16;
			option 0,0;
			option 1,0;
			option 2,0;
			resetskill;
			//Re-adding lost platinum skills
			check @chk1 = 1,-,ADD1;
				setskilllevel 0x93,1;
			ADD1:
			check @chk2 = 1,-,ADD2;
				setskilllevel 0x92,1;
			ADD2:
			check @chk3 = 1,-,ADD3;
				setskilllevel 0x99,1;
			ADD3:
			check @chk4 = 1,-,ADD4;
				setskilllevel 0x9A,1;
			ADD4:
			check @chk5 = 1,-,ADD5;
				setskilllevel 0x94,1;
			ADD5:
			check @chk6 = 1,-,ADD6;
				setskilllevel 0x9B,1;
			ADD6:
			check @chk7 = 1,-,ADD7;
				setskilllevel 0x9D,1;
			ADD7:
			check @chk8 = 1,-,ADD8;
				setskilllevel 0x91,1;
			ADD8:
			check @chk9 = 1,-,ADD9;
				setskilllevel 0x9C,1;
			ADD9:
			check @chk10 = 1,-,ADD10;
				setskilllevel 0x90,1;
			ADD10:
			check @chk11 = 1,-,ADD11;
				setskilllevel 0x98,1;
			ADD11:
			check @chk12 = 1,-,ADD12;
				setskilllevel 0x96,1;
			ADD12:
			check @chk13 = 1,-,ADD13;
				setskilllevel 0x97,1;
			ADD13:
			check @chk14 = 1,-,ADD14;
				setskilllevel 0x95,1;
			ADD14:
			check @chk15 = 1,-,ADD15;
				setskilllevel 0x8E,1;
			ADD15:
			check @chk16 = 1,-,ADD16;
				setskilllevel 0x8F,1;
			ADD16:
		mes "$[$@RES_NPC_NAME]";
		mes "スキルのリセットが終了しました";
		mes "あなたには新たな道が開ける事でしょう";
		mes "ですが、スキルリセットのご利用は控え目にして下さいね";
		close;
	L_Cancel:
		mes "$[$@RES_NPC_NAME]";
		mes "そうですか。それが正しい判断でしょう";
		close;
	No_Fund:
		mes "$[$@RES_NPC_NAME]";
		mes "リセットをする為の料金が不足しているようですね";
		mes "ステータスリセット ^FF0000$[@stat_price] ^000000Zeny ";
		mes "スキルリセット ^FF0000$[@skill_price] ^000000Zeny ";
		mes "が必要ですので、Zenyを貯めてからまた声を掛けて下さい。";
		close;
	L_ERR_81:
		mes "$[$@RES_NPC_NAME]";
		mes "ステータスをリセット出来るレベルは";
		mes "Base Lv.^FF0000$[@stat_levelO] ^000000以上です";
		mes "もう少しレベルを上げてからまた声をお掛け下さい。";
		close;
	L_ERR_82:
		mes "$[$@RES_NPC_NAME]";
		mes "スキルをリセットできるジョブレベルは";
		mes "Job Lv.^FF0000$[@skill_levelO] ^000000以上です";
		mes "もう少しレベルを上げてからまた声をお掛け下さい。";
		close;
	L_ERR_85:
		mes "$[$@RES_NPC_NAME]";
		mes "あなたはまだ若すぎますね";
		mes "残念ながら私、若い子は苦手でして...";
		mes "もう少し成長してから声を掛けて下さい";
		close;
	L_ERR_86:
		mes "$[$@RES_NPC_NAME]";
		mes "あらあら　困りましたね";
		mes "あなたのような未熟な方には全く興味がありませんの";
		mes "私を魅了する職業レベルになってからまた来て下さいね";
		close;
	L_ERR_91:
		mes "$[$@RES_NPC_NAME]";
		mes "あら？あなたは！？";
		mes "大変申し上げ難いのですが、ノービスや１次職の方はこのサービスをご利用出来ません";
		mes "転職してからまた話し掛け下さい";
		close;
}