Full npc folder reorganization. (I hope I didn't break anything D:)

-Now common scripts goes to the main npc folder, and pre-re-only/re-only ones goes to their respective folders.
-NPCs with practically the same script but little differences have been left in the main folder and uses the command checkre() for the differences.
-For those NPCs with different coordinates but same script, the script has been left in the main folder but the NPCs splitted as duplicates.
-All pre-renewal files has been reverted back to their pre-renewal behavior.

TODO:
-Correct pre-re quest rewards.
-Check for pre-re/re differences in mapflags.

git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@16545 54d463be-8e91-2dee-dedb-b68131a5f0ec

1 files changed, 109 insertions, 0 deletions

diff --git a/npc/events/event_skill_reset.txt b/npc/events/event_skill_reset.txt
new file mode 100644
index 000000000..d5f7fbfe4
--- /dev/null
+++ b/npc/events/event_skill_reset.txt
@@ -0,0 +1,109 @@
+//===== rAthena Script ======================================= 
+//= Official Skill Resetter Event in Yuno (kRO & idRO)
+//===== By: ================================================== 
+//= $ephiroth
+//===== Current Version: ===================================== 
+//= 1.02
+//===== Compatible With: ===================================== 
+//= rAthena 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.
+//============================================================
+yuno,138,187,4	script	Hypnotist Teacher	124,{
+	set @npcname$,"[^D5A500Hypnotist^000000]";
+	mes @npcname$;
+
+	if(MISC_QUEST & 1024){
+		mes "I already told you that you may only complete this event once.";
+		close;
+	}
+	if(BaseLevel < 60) {
+		mes "Please return when you reach BaseLv 60 or higher.";
+		close;
+	}
+	if(SkillPoint != 0) {
+		mes "You will need to use up all of your skill points if you want me to continue.";
+		mes "Please come again soon!";
+		close;
+	}
+	if(Weight || checkfalcon() || checkcart() || checkriding()) {
+		mes "Would you like to reset skills?";
+		mes "I'm sorry, but...";
+		next;
+		mes @npcname$;
+		if(Weight) {
+			mes "You cannot reset skills";
+			mes "when you keep";
+			mes "any items.";
+		} else if(checkcart())
+			mes "Please, drop your cart and we'll continue.";
+		else if(checkfalcon())
+			mes "Please, free your Falcon and we'll continue.";
+		else if(checkriding())
+			mes "Please, free your PecoPeco and we'll continue.";
+		next;
+		mes @npcname$;
+		mes "Come back soon!";
+		close;
+	}
+	mes "Hello, I am the Skill Resetter.";
+	mes "Your name is ^0080FF"+strcharinfo(0)+"^000000.";
+	mes "How can I help you?";
+	next;
+	menu "^009500Information about Reset skills.^000000",L_Info,"^00B6FFReset skills.^000000",L_Reset,"^000088Nevermind^000000",-;
+
+	mes @npcname$;
+	mes "You know where to find me,";
+	mes "if you ever want a reset!!"; 
+	close;
+
+L_Info:
+	mes @npcname$;
+	mes "This skill reset is not FREE OF CHARGE!!";
+	mes "Expense for the reset of skill is ^D5A50020000 Zeny x BaseLv^000000.";
+	mes "Yeah ...each One BaseLv costs 20000 Zeny to reset skill.";
+	next;
+	mes @npcname$;
+	mes "Oh yeah, one more thing!";
+	mes "Any carts, falcons or pecos you have equiped";
+	mes "will be removed if you reset your skills.";
+	next;
+	mes @npcname$;
+	mes "Just one time does again to shake the skill point";
+	mes "Careful with your skills from here on.";
+	close;
+	
+L_Reset:
+	mes @npcname$;
+	mes "Before skill reset in starting.";
+	mes "You shall have to first tell me your Base Level."; 
+	next;
+	mes "^D5A500[" + strcharinfo(0) + "]^000000";
+	mes "My Base level is ^AA00AALevel " + BaseLevel + "BaseLv.^000000"; 
+	next;
+	set @zeny,BaseLevel*20000;
+	mes @npcname$;
+	mes "Total zeny to the reset of skill amount ^529DFF" + @zeny + "Zeny^000000  for the skill reset service.";
+	next;
+	if(Zeny < @zeny) {
+		mes @npcname$;
+		mes "It seems that you don't have enough money.";
+		mes "In addition we wait for the opportunity.";
+		emotion e_hmm;
+		close;
+	}
+	set Zeny, Zeny-@zeny;
+	set MISC_QUEST,MISC_QUEST | 1024;
+	resetskill;
+	mes @npcname$;
+	mes "Thank you.";
+	emotion e_thx;
+	logmes "SKILL RESET EVENT";
+	close;
+}