From ed294f9894d041e10de8f66888ebc5f19c6d57f7 Mon Sep 17 00:00:00 2001 From: Lupus Date: Fri, 17 Nov 2006 06:52:11 +0000 Subject: Added official kRO Skill Reset Event git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@9236 54d463be-8e91-2dee-dedb-b68131a5f0ec --- npc/events/event_skill_reset.txt | 103 +++++++++++++++++++++++++++++++++++++++ 1 file changed, 103 insertions(+) create mode 100644 npc/events/event_skill_reset.txt (limited to 'npc/events') 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 -- cgit v1.2.3-70-g09d2