summaryrefslogtreecommitdiff
path: root/npc/events/event_skill_reset.txt
diff options
context:
space:
mode:
authorLupus <Lupus@54d463be-8e91-2dee-dedb-b68131a5f0ec>2006-11-17 06:52:11 +0000
committerLupus <Lupus@54d463be-8e91-2dee-dedb-b68131a5f0ec>2006-11-17 06:52:11 +0000
commited294f9894d041e10de8f66888ebc5f19c6d57f7 (patch)
tree8eb4c876dcd6dcedc7a83d55dda98ecbae581ee5 /npc/events/event_skill_reset.txt
parent36b0b52d1327b61b7184d67a08effdba5fb4bd61 (diff)
downloadhercules-ed294f9894d041e10de8f66888ebc5f19c6d57f7.tar.gz
hercules-ed294f9894d041e10de8f66888ebc5f19c6d57f7.tar.bz2
hercules-ed294f9894d041e10de8f66888ebc5f19c6d57f7.tar.xz
hercules-ed294f9894d041e10de8f66888ebc5f19c6d57f7.zip
Added official kRO Skill Reset Event
git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@9236 54d463be-8e91-2dee-dedb-b68131a5f0ec
Diffstat (limited to 'npc/events/event_skill_reset.txt')
-rw-r--r--npc/events/event_skill_reset.txt103
1 files changed, 103 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..6c5f4b4c6
--- /dev/null
+++ b/npc/events/event_skill_reset.txt
@@ -0,0 +1,103 @@
+//===== eAthena Script =======================================
+//= Official Skill Resetter Event in Yuno (kRO & idRO)
+//===== By: ==================================================
+//= $ephiroth
+//===== Current Version: =====================================
+//= 1.01
+//===== 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]
+//============================================================
+yuno.gat,138,187,4 script Hypnotist Teacher 124,{
+ set @npcname$,"[Hypnotist]";
+ 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(0) || checkcart(0) || checkriding(0)) {
+ 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(0))
+ mes "Please, drop your cart and we'll continue.";
+ else if(checkfalcon(0))
+ mes "Please, free your Falcon and we'll continue.";
+ else if(checkriding(0))
+ 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.";
+ next;
+ mes @npcname$;
+ mes "Oh yeah, one more thing!";
+ mes "Any carts, falcon or peco's you have equiped,";
+ mes "will be removed if you will 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;
+ close;
+} \ No newline at end of file