flute.txt 5.2 KB

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