1 | //===== eAthena Script ======================================= |
---|
2 | //= Official Skill Resetter Event in Yuno (kRO & idRO) |
---|
3 | //===== By: ================================================== |
---|
4 | //= $ephiroth |
---|
5 | //===== Current Version: ===================================== |
---|
6 | //= 1.02 |
---|
7 | //===== Compatible With: ===================================== |
---|
8 | //= eAthena 1.0 |
---|
9 | //===== Description: ========================================= |
---|
10 | //= 2006 - Edition Skill Reset NPC |
---|
11 | //= 2006/11/16: 1.0 Release and fully working. [$ephiroth] |
---|
12 | //= 1.01 Checked, fixed typos, now uses MISC_QUEST var [Lupus] |
---|
13 | //= 1.02 Added missing message,comment,etc. [$ephiroth] |
---|
14 | //===== Additional Comments: ================================= |
---|
15 | //= Skill Reset with payment, minimum BaseLv.60 to reset skill. |
---|
16 | //= Each 1 BaseLv need 20.000 Zeny, so be careful to use skill. |
---|
17 | //============================================================ |
---|
18 | yuno,138,187,4 script Hypnotist Teacher 124,{ |
---|
19 | set @npcname$,"[^D5A500Hypnotist^000000]"; |
---|
20 | mes @npcname$; |
---|
21 | |
---|
22 | if(MISC_QUEST & 1024){ |
---|
23 | mes "I already told you that you may only complete this event once."; |
---|
24 | close; |
---|
25 | } |
---|
26 | if(BaseLevel < 60) { |
---|
27 | mes "Please return when you reach BaseLv 60 or higher."; |
---|
28 | close; |
---|
29 | } |
---|
30 | if(SkillPoint != 0) { |
---|
31 | mes "You will need to use up all of your skill points if you want me to continue."; |
---|
32 | mes "Please come again soon!"; |
---|
33 | close; |
---|
34 | } |
---|
35 | if(Weight || checkfalcon() || checkcart() || checkriding()) { |
---|
36 | mes "Would you like to reset skills?"; |
---|
37 | mes "I'm sorry, but..."; |
---|
38 | next; |
---|
39 | mes @npcname$; |
---|
40 | if(Weight) { |
---|
41 | mes "You cannot reset skills"; |
---|
42 | mes "when you keep"; |
---|
43 | mes "any items."; |
---|
44 | } else if(checkcart()) |
---|
45 | mes "Please, drop your cart and we'll continue."; |
---|
46 | else if(checkfalcon()) |
---|
47 | mes "Please, free your Falcon and we'll continue."; |
---|
48 | else if(checkriding()) |
---|
49 | mes "Please, free your PecoPeco and we'll continue."; |
---|
50 | next; |
---|
51 | mes @npcname$; |
---|
52 | mes "Come back soon!"; |
---|
53 | close; |
---|
54 | } |
---|
55 | mes "Hello, I am the Skill Resetter."; |
---|
56 | mes "Your name is ^0080FF"+strcharinfo(0)+"^000000."; |
---|
57 | mes "How can I help you?"; |
---|
58 | next; |
---|
59 | menu "^009500Information about Reset skills.^000000",L_Info,"^00B6FFReset skills.^000000",L_Reset,"^000088Nevermind^000000",-; |
---|
60 | |
---|
61 | mes @npcname$; |
---|
62 | mes "You know where to find me,"; |
---|
63 | mes "if you ever want a reset!!"; |
---|
64 | close; |
---|
65 | |
---|
66 | L_Info: |
---|
67 | mes @npcname$; |
---|
68 | mes "This skill reset is not FREE OF CHARGE!!"; |
---|
69 | mes "Expense for the reset of skill is ^D5A50020000 Zeny x BaseLv^000000."; |
---|
70 | mes "Yeah ...each One BaseLv costs 20000 Zeny to reset skill."; |
---|
71 | next; |
---|
72 | mes @npcname$; |
---|
73 | mes "Oh yeah, one more thing!"; |
---|
74 | mes "Any carts, falcons or pecos you have equiped"; |
---|
75 | mes "will be removed if you reset your skills."; |
---|
76 | next; |
---|
77 | mes @npcname$; |
---|
78 | mes "Just one time does again to shake the skill point"; |
---|
79 | mes "Careful with your skills from here on."; |
---|
80 | close; |
---|
81 | |
---|
82 | L_Reset: |
---|
83 | mes @npcname$; |
---|
84 | mes "Before skill reset in starting."; |
---|
85 | mes "You shall have to first tell me your Base Level."; |
---|
86 | next; |
---|
87 | mes "^D5A500[" + strcharinfo(0) + "]^000000"; |
---|
88 | mes "My Base level is ^AA00AALevel " + BaseLevel + "BaseLv.^000000"; |
---|
89 | next; |
---|
90 | set @zeny,BaseLevel*20000; |
---|
91 | mes @npcname$; |
---|
92 | mes "Total zeny to the reset of skill amount ^529DFF" + @zeny + "Zeny^000000 for the skill reset service."; |
---|
93 | next; |
---|
94 | if(Zeny < @zeny) { |
---|
95 | mes @npcname$; |
---|
96 | mes "It seems that you don't have enough money."; |
---|
97 | mes "In addition we wait for the opportunity."; |
---|
98 | emotion e_hmm; |
---|
99 | close; |
---|
100 | } |
---|
101 | set Zeny, Zeny-@zeny; |
---|
102 | set MISC_QUEST,MISC_QUEST | 1024; |
---|
103 | resetskill; |
---|
104 | mes @npcname$; |
---|
105 | mes "Thank you."; |
---|
106 | emotion e_thx; |
---|
107 | logmes "SKILL RESET EVENT"; |
---|
108 | close; |
---|
109 | } |
---|