quest_hode.txt 6.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241
  1. //===== rAthena Script =======================================
  2. //= iRO Repeatable EXP Quests.
  3. //===== By: ==================================================
  4. //= L0ne_W0lf
  5. //===== Current Version: =====================================
  6. //= 1.0
  7. //===== Compatible With: =====================================
  8. //= rAthena SVN
  9. //===== Description: =========================================
  10. //= [Aegis Conversion]
  11. //= Added Monster Killing quests.
  12. //= Repeatable EXP Quest (Earthworm Peelings)
  13. //===== Additional Comments: =================================
  14. //= 1.0 First version.
  15. //============================================================
  16. moc_fild17,208,346,5 script Shone#Hode_Hunt 707,{
  17. if (checkquest(60104) != -1) {
  18. if (checkquest(60104,HUNTING) != 2 ) {
  19. mes "[Shone]";
  20. mes "Have you finished hunting the 50 Hodes?";
  21. next;
  22. switch(select("Yes:No:I want to quit")) {
  23. case 1:
  24. mes "[Shone]";
  25. mes "Hmm, I don't think you've hunted 50 yet...";
  26. close;
  27. case 2:
  28. mes "[Shone]";
  29. mes "Remember, I need help hunting Hodes so go and hunt 50 of them.";
  30. close;
  31. case 3:
  32. mes "[Shone]";
  33. mes "Are you sure that you want to stop hunting?";
  34. mes "Any progress that you've made will be erased";
  35. next;
  36. switch(select("Yes:No")) {
  37. case 1:
  38. mes "[Shone]";
  39. mes "Ok then, well come back here if you change your mind.";
  40. erasequest 60104;
  41. close;
  42. case 2:
  43. mes "[Shone]";
  44. mes "Please kill 50 Hodes.";
  45. close;
  46. }
  47. }
  48. }
  49. else {
  50. mes "[Shone]";
  51. mes "Amazing, you did that with speed.";
  52. getexp 15775,1125;
  53. erasequest 60104;
  54. close;
  55. }
  56. }
  57. if (checkquest(60105) != -1) {
  58. if (checkquest(60105,HUNTING) != 2 ) {
  59. mes "[Shone]";
  60. mes "Have you finished hunting the 50 Hodes?";
  61. next;
  62. switch(select("Yes:No:I want to quit")) {
  63. case 1:
  64. mes "[Shone]";
  65. mes "Hmm, I don't think you've hunted 100 yet...";
  66. close;
  67. case 2:
  68. mes "[Shone]";
  69. mes "Remember, I need help hunting Hodes so go and hunt 100 of them.";
  70. close;
  71. case 3:
  72. mes "[Shone]";
  73. mes "Are you sure that you want to stop hunting?";
  74. mes "Any progress that you've made will be erased";
  75. next;
  76. switch(select("Yes:No")) {
  77. case 1:
  78. mes "[Shone]";
  79. mes "Ok then, well come back here if you change your mind.";
  80. erasequest 60105;
  81. close;
  82. case 2:
  83. mes "[Shone]";
  84. mes "Please kill 100 Hodes.";
  85. close;
  86. }
  87. }
  88. }
  89. else {
  90. mes "[Shone]";
  91. mes "Amazing, you did that with speed.";
  92. getexp 15775,1125;
  93. getexp 15775,1125;
  94. erasequest 60105;
  95. close;
  96. }
  97. }
  98. if (checkquest(60106) != -1) {
  99. if (checkquest(60106,HUNTING) != 2 ) {
  100. mes "[Shone]";
  101. mes "Have you finished hunting the 150 Hodes?";
  102. next;
  103. switch(select("Yes:No:I want to quit")) {
  104. case 1:
  105. mes "[Shone]";
  106. mes "Hmm, I don't think you've hunted 150 yet...";
  107. close;
  108. case 2:
  109. mes "[Shone]";
  110. mes "Remember, I need help hunting Hodes so go and hunt 150 of them.";
  111. close;
  112. case 3:
  113. mes "[Shone]";
  114. mes "Are you sure that you want to stop hunting?";
  115. mes "Any progress that you've made will be erased";
  116. next;
  117. switch(select("Yes:No")) {
  118. case 1:
  119. mes "[Shone]";
  120. mes "Ok then, well come back here if you change your mind.";
  121. erasequest 60106;
  122. close;
  123. case 2:
  124. mes "[Shone]";
  125. mes "Please kill 150 Hodes.";
  126. close;
  127. }
  128. }
  129. }
  130. else {
  131. mes "[Shone]";
  132. mes "Amazing, you did that with speed.";
  133. getexp 15775,1125;
  134. getexp 15775,1125;
  135. getexp 15775,1125;
  136. erasequest 60106;
  137. close;
  138. }
  139. }
  140. //for minimum level
  141. if (BaseLevel > 24) {
  142. //for maximum level
  143. if (BaseLevel < 61) {
  144. mes "[Shone]";
  145. mes "Wait! You can see me?";
  146. mes "Oh well, I haven't yet mastered my skills.";
  147. next;
  148. mes "[Shone]";
  149. mes "Hey do you think you can help me?";
  150. next;
  151. switch(select("Sure:No")) {
  152. case 1:
  153. mes "[Shone]";
  154. mes "Thanks a lot, pal!";
  155. next;
  156. switch(select("Gather Items:Hunt Hodes:Cancel")) {
  157. case 1:
  158. // Item turn in
  159. mes "[Shone]";
  160. mes "I am trying to collect ^00CE0025 Earthworm Peelings^000000.";
  161. mes "I will reward you if you help.";
  162. next;
  163. switch(select("I have 25 Earthworm Peelings:What was it again?")) {
  164. case 1:
  165. /*
  166. if (checkweight(502,10) == 0) {
  167. mes "[Shone]";
  168. mes "Hey, it looks like that the weight on";
  169. mes "your back will crush you. Come back";
  170. mes "after you have lost some weight.";
  171. close;
  172. }
  173. */
  174. if (countitem(1055) > 24) {
  175. mes "Thank you for the 25 Earthworm";
  176. mes "Peelings!";
  177. mes "Here is that reward I promised you, I hope take this wisdom I have passed on to you and share it with others.";
  178. delitem 1055,25; //Earthworm_Peeling
  179. getexp 15775,1125;
  180. //getitem 502,10; //Orange_Potion
  181. close;
  182. }
  183. else {
  184. mes "[Shone]";
  185. mes "I don't see any ^00CE00Earthworm Peerlings^000000.";
  186. mes "Are you trying to scam me?";
  187. close;
  188. }
  189. case 2:
  190. mes "[Shone]";
  191. mes "I need ^00CE0025 Earthworm Peelings^000000.";
  192. close;
  193. }
  194. case 2:
  195. // Kill Count Quest
  196. mes "[Shone]";
  197. mes "Ah, ok I think you can help me out by hunting some Hodes.";
  198. mes "How many would you like to hunt?";
  199. next;
  200. switch(select("50 Hodes:100 Hodes:150 Hodes")) {
  201. case 1:
  202. mes "[Shone]";
  203. mes "Come back when you've finished your task and I will give you a small reward.";
  204. setquest 60104;
  205. close;
  206. case 2:
  207. mes "[Shone]";
  208. mes "Come back when you've finished your task and I will give you a small reward.";
  209. setquest 60105;
  210. close;
  211. case 3:
  212. mes "[Shone]";
  213. mes "Come back when you've finished your task and I will give you a small reward.";
  214. setquest 60106;
  215. close;
  216. }
  217. case 3:
  218. mes "[Shone]";
  219. mes "If you change your mind, please come back.";
  220. close;
  221. }
  222. case 2:
  223. mes "[Shone]";
  224. mes "If you change your mind, please come back.";
  225. close;
  226. }
  227. }
  228. else {
  229. mes "[Shone]";
  230. mes "You are much too strong to be fighting these things!";
  231. close;
  232. }
  233. }
  234. else {
  235. mes "[Shone]";
  236. mes "You need some help, but I can't provide that for you.";
  237. mes "Come back when you are stronger and have earned much more wisdom.";
  238. close;
  239. }
  240. }