OSDN Git Service

First version
[st-ro/stro.git] / npc / re / merchants / flute.txt
1 //===== rAthena Script ======================================= 
2 //= Falcon & Wolf Flute Trader
3 //===== By: ================================================== 
4 //= Masao, Muad_Dib, Ziu
5 //===== Current Version: ===================================== 
6 //= 1.2a
7 //===== Compatible With: ===================================== 
8 //= rAthena Project
9 //===== Description: ========================================= 
10 //= [Official Conversion]
11 //= Sells Falcon Flute and Wolf Flute.
12 //===== Additional Comments: ================================= 
13 //= 1.0 First Version. [Masao]
14 //= 1.1 Added Baby Hunter and Baby Ranger check. bugreport:5728 [Masao]
15 //= 1.2 Added Wolf Flute trader, optimized. [Euphy]
16 //= 1.2a Fixed some conditions. [Euphy]
17 //============================================================ 
18
19 // Falcon Flute :: falcon_flute
20 //============================================================
21 -       script  Falcon Flute Trader::fflute     -1,{
22         mes "[Falcon Flute Trader]";
23         if (BaseJob == Job_Hunter) {
24                 mes "Do you need a Falcon?";
25                 mes "With a magical Flute, you can call your Falcon from anywhere!";
26                 next;
27                 mes "[Falcon Flute Trader]";
28                 mes "It's marvelous, isn't it? Ha ha ha!";
29                 next;
30                 mes "[Falcon Flute Trader]";
31                 mes "Why I'm selling these Falcon Flutes?";
32                 mes "It's because I have no clue how they work.";
33                 mes "Ha ha ha!";
34                 next;
35                 mes "[Falcon Flute Trader]";
36                 mes "Of course, you'll need the Skill ^ff0000Falcon Mastery^000000.";
37                 mes "I don't have the Skill, so I don't know how to handle Falcons.";
38                 mes "As it's for now, I may never have a Falcon.";
39                 next;
40                 mes "[Falcon Flute Trader]";
41                 mes "But I can't give you one for free!";
42                 mes "I have to make money since i also need to eat!";
43                 next;
44                 mes "[Falcon Flute Trader]";
45                 mes "If you need a Falcon Flute I will sell them for 12,500 zeny. Or is that too expensive?";
46                 next;
47                 if (eaclass()&EAJL_THIRD) {
48                         mes "[Falcon Flute Trader]";
49                         mes "For Rangers, however, I have a special price of 10,000 zeny!";
50                         set .@price,10000;
51                         next;
52                 } else
53                         set .@price,12500;
54                 if(select("Don't buy one:Buy a Falcon Flute") == 1) {
55                         mes "[Falcon Flute Trader]";
56                         mes "That's too bad. If you need one, come back!";
57                         close;
58                 }
59                 if (Zeny >= .@price) {
60                         if (countitem(12848) >= 1) {
61                                 mes "[Falcon Flute Trader]";
62                                 mes "As I can see you already have a Falcon Flute!";
63                                 mes "Don't worry, my young friend, once you've purchased the Falcon Flute you won't need to do so again";
64                                 mes "since the Falcon Flute won't disappear upon usage, isn't that great?";
65                                 close;
66                         }
67                         mes "[Falcon Flute Trader]";
68                         mes "Here, take this flute.";
69                         mes "With it you can whistle for your Falcon from anywhere.";
70                         set Zeny, Zeny - .@price;
71                         getitem 12848,1; //Falcon_Flute
72                         next;
73                         mes "[Falcon Flute Trader]";
74                         mes "Just a reminder.";
75                         mes "You need the Skill ^ff0000Falcon Mastery^000000 in order to use it!";
76                         close;
77                 }
78                 mes "[Falcon Flute Trader]";
79                 mes "I'm sorry but you don't have enough money to buy a Falcon Flute, please come back when you have more money!";
80                 close;
81         }
82         if (BaseJob == Job_Archer) {
83                 mes "Hello, young one!";
84                 mes "Currently I can't help you,";
85                 mes "but why don't you return to me when you've become a great Hunter and learned how to handle Falcons properly?";
86                 close;
87         }
88         mes "Isn't it a beautiful day today?";
89         close;
90 }
91 hu_in01,386,306,3       duplicate(fflute)       Falcon Flute Trader#fft 51
92 pay_arche,91,134,3      duplicate(fflute)       Falcon Flute Trader#fft2        51
93
94 // Wolf Flute :: job_ranger
95 //============================================================
96 tur_dun01,89,170,5      script  Expert Flute Crafter    59,{
97         if (Class == Job_Ranger || Class == Job_Ranger_T || Class == Job_Baby_Ranger) {
98                 if (countitem(6124)) {
99                         mes "[Expert Flute Crafter]";
100                         mes "The Wolf Flute you have is crafted by myself, with wood.";
101                         mes "You can come back here and find me if you lose your Wolf flute!";
102                         next;
103                         mes "[Expert Flute Crafter]";
104                         mes "The flute can only be crafted by me.";
105                         mes "It is just a little matter for me to craft another flute!!";
106                         close;
107                 }
108                 mes "[Expert Flute Crafter]";
109                 mes "Do you need anything?";
110                 mes "A new Wolf Flute?";
111                 next;
112                 switch(select("Please give me a new Wolf Flute.:No.")) {
113                 case 1:
114                         if (countitem(7150) && Zeny >= 100000) {
115                                 mes "[Expert Flute Crafter]";
116                                 mes "Have you brought all the materials?";
117                                 mes "Wow! All your materials are not bad!";
118                                 mes "That's good enough.";
119                                 next;
120                                 mes "[Expert Flute Crafter]";
121                                 mes "Here's the new Wolf Flute.";
122                                 mes "Hope you are ready to use it.";
123                                 delitem 7150,1; //Bamboo_Cut
124                                 set Zeny, Zeny-100000;
125                                 getitem 6124,1; //Wolf's_Flute
126                                 close;
127                         }
128                         mes "[Expert Flute Crafter]";
129                         mes "If you want to craft a new Wolf Flute, I need you to bring me ^4d4dff1 Bamboo Cut and 100,000 zeny.^000000";
130                         next;
131                         mes "[Expert Flute Crafter]";
132                         mes "^4d4dffBamboo Cut can be obtained from Kapha or Karakasa.^000000";
133                         close;
134                 case 2:
135                         mes "[Expert Flute Crafter]";
136                         mes "If you do not summon a wolf, then you don't need the Wolf Flute.";
137                         mes "You can come back here and find me if you change your mind.";
138                         mes "Isn't that right?";
139                         close;
140                 }
141         }
142         mes "[Expert Flute Crafter]";
143         mes "Eeehh? You are not a Ranger?";
144         mes "Then this flute is totally useless for you!";
145         close;
146 }