counteragent_mixture.txt 11 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267
  1. //===== eAthena Script =======================================
  2. //= Counteragent and Mixture Quest(Morgenstein)
  3. //===== By: ==================================================
  4. //= kobra_k88
  5. //= added some dialogs for Morgenstein by Komurka
  6. //===== Current Version: =====================================
  7. //= 1.7
  8. //===== Compatible With: =====================================
  9. //= eAthena 7.15 +
  10. //===== Description: =========================================
  11. //= Counteragent and Mixtures for making dyes & Alchemist Job Quest
  12. //===== Additional Comments: =================================
  13. //= Fully working
  14. //= Update for Alchemist Quest.
  15. //= 1.2 added check for Empty Bottle [Lupus]
  16. //= Fixed some lil thingys [Darkchild]
  17. //= More li'l thing, added comments for items IDs [Lupus]
  18. //= 1.5 Fixed Spelling mistakes. [Nexon]
  19. //= 1.6 Fixed some bugs, also related to Alch Job quest [Lupus]
  20. //= 1,7 Fixed exploit [Lupus]
  21. //============================================================
  22. // Merchant Louitz -----------------------------------------------------------
  23. alberta_in.gat,130,54,2 script Merchant Louitz 84,{
  24. mes "[Louitz]";
  25. mes "What's going on?";
  26. if(countitem(970) && countitem(971) && countitem(972)) goto M_Menu2;//Items: Alcohol, Detrimindexta, Karvodailnirol,
  27. M_Menu:
  28. next;
  29. menu "Talk",M_Talk,"Cancel",M_Cancel;
  30. M_Menu2:
  31. next;
  32. menu "Talk",M_Talk,"More about solutions",M_Solut,"Cancel",M_Cancel;
  33. M_Talk:
  34. mes "[Merchant Louitz]";
  35. mes "I was in Geffen for a while trying to find magic tools when I heard some rumors about a Mad Scientist.";
  36. mes "I became very interested in the man and tried to meet with him on several occasions.";
  37. next;
  38. mes "[Merchant Louitz]";
  39. mes "After many attempts, I finally got to meet him. Unfortunately he was too immersed in his work and didn't even take notice of me.";
  40. next;
  41. mes "[Merchant Louitz]";
  42. mes "He kept on mumbling to himself ^0000FF'Karvodainirol... Detrimindexta... Alcohol^000000...'";
  43. next;
  44. mes "[Merchant Louitz]";
  45. mes "I had know idea what he was talking about at first, but I later learned that those were names for some unique and rare solutions.";
  46. if(countitem(970) && countitem(971) && countitem(972)) goto M_Menu2;//Items: Alcohol, Detrimindexta, Karvodailnirol,
  47. mes "I wish ^0000FFI could see them^000000 with my own eyes...";
  48. emotion e_slur;
  49. goto M_Menu;
  50. M_Solut:
  51. if(MORGEN==0)set MORGEN,1;
  52. mes "[Merchant Louitz]";
  53. mes "Apparently that scientist uses those solutions to make other agents and mixtures.";
  54. mes "You should speak with ^0000ddAure Dupon^000000 in Geffen to find out more about it. ";
  55. next;
  56. mes "[Merchant Louitz]";
  57. mes "You can find him near the ^0000ddEast end^000000 of town. Ask him about ^0000ddMorgenstein^000000. That's the mad scientists' name.";
  58. goto M_Menu2;
  59. M_Cancel:
  60. mes "[Louitz]";
  61. mes "Um... Now I've seen everything.";
  62. close;
  63. }
  64. // Aure Dupon ------------------------------------------------------------------------
  65. geffen.gat,181,114,4 script Aure Dupon 55,{
  66. mes "[Aure Dupon]";
  67. mes "TIME never WAITS for you!! Even MAGIC cannot SLOW it down! I can feel it passing me by even as we speak!!....";
  68. emotion e_gasp;
  69. next;
  70. mes "[Aure Dupon]";
  71. mes "So... why did you stop me??";
  72. emotion e_hmm;
  73. if(MORGEN >= 1) goto M_Menu2;
  74. M_Menu:
  75. next;
  76. menu "Talk",M_Talk,"Cancel",M_Cancel;
  77. M_Menu2:
  78. next;
  79. menu "Talk",M_Talk,"More about Morgenstein",M_Morgen,"Cancel",M_Cancel;
  80. M_Talk:
  81. mes "[Aure Dupon]";
  82. mes "It's true that I'm a little eccentric because of my quest to gain the power of magic, but I assure that there are others out there that are even stranger than myself.";
  83. next;
  84. mes "[Aure Dupon]";
  85. mes "Like that mad scientist ^0000ddMorgenstein^000000. Anyway, if it were up to you, would you be able to devote your ENTIRE life to one single purpose?";
  86. next;
  87. mes "[Aure Dupon]";
  88. mes "Would you be able to give up everything else in your life to achieve that goal? Even if it meant risking insanity??";
  89. if(MORGEN>=1) goto M_Menu2;
  90. goto M_Menu;
  91. M_Morgen:
  92. if(MORGEN==1) set MORGEN,2;
  93. mes "[Aure Dupon]";
  94. mes "Morgenstein? Now that man definatley has a few screws loose. He's always in the ^0000ddBlasksmith Guild Building^000000 making crazy potions.";
  95. mes "He calls them ^ff0000Mixtures^000000 and ^ff0000Counteragents^000000. I'm not sure what there used for though.";
  96. next;
  97. mes "[Aure Dupon]";
  98. mes "You should go speak with him if your that curious about his work.";
  99. goto M_Menu2;
  100. M_Cancel:
  101. mes "[Aure Dupon]";
  102. mes "Human beings are just a small part of Nature.... therefore the human will is that of Natures will.....";
  103. close;
  104. }
  105. // Chemist Morgenstein -----------------------------------------------------------
  106. geffen_in.gat,141,140,2 script Morgenstein 121,{
  107. if(MORGEN == 2) goto L_0;
  108. if(MORGEN == 3) goto L_1;
  109. mes "[Chemist Morgenstein]";
  110. mes "Heheheheheh... Sniff Sniff... I can smell something appetizing here.";
  111. mes "It is a Human Being... living one... umm yummy... Heheheheheh";
  112. emotion e_awsm;
  113. close;
  114. L_0:
  115. mes "[Chemist Morgenstein]";
  116. mes "So you've been asking about me huh? What is it that you want to know?";
  117. M_Menu:
  118. next;
  119. menu "Ask about research",M_Rsrch,"Nothing",M_End;
  120. M_Rsrch:
  121. mes "[Chemist Morgenstein]";
  122. mes "Heheheheheh... You probably already heard about what I do ...";
  123. mes "Okay.. I will tell you everything... there is nothing left for me to hide.... Heheheheheh...";
  124. emotion e_gg;
  125. next;
  126. mes "[Chemist Morgenstein]";
  127. mes "As far as I'm concerned my research has already been completed.....";
  128. mes "I am a genius you know, and I can make anything!! Heheheheh... it's only a matter how long it will take...";
  129. next;
  130. mes "[Chemist Morgenstein]";
  131. mes "You know what I mean..... time?.... Hehehehehehehya....";
  132. emotion e_gg;
  133. next;
  134. mes "[Chemist Morgenstein]";
  135. mes "Um.... did you say you want to know about my Research?... Oh it's all very simple.... I'm just trying to find ways to combine different materials...";
  136. next;
  137. mes "[Chemist Morgenstein]";
  138. mes "Isn't it interesting? I'm perfecting a method that melts materials, such as iron and stone, and then mixes them into a new substance!!!";
  139. mes "Once it is perfected, I will be able to turn anything in the word into a new substance.....";
  140. next;
  141. mes "[Chemist Morgenstein]";
  142. mes "~~~~ !! Hehe!!!...Heheheheheh!!!...squash squash!!!..Kekekekekelll!!!!";
  143. emotion e_slur;
  144. next;
  145. mes "[Chemist Morgenstein]";
  146. mes "Ack!~cough~cough~ Ahem.... Though it is not yet possible, I did figure out something else incredible.";
  147. mes "Through my research I found out how to make different types of liquids. I call them ^5533FF'counteragents and mixtures'^000000.";
  148. next;
  149. mes "[Chemist Morgenstein]";
  150. mes "I can make one for you right now,if you want?? Ahhh... Talking about my experiments and research makes me.... 'excited'.......";
  151. mes "You too can feel my 'excitement' if you wish..... Ahhhhh.... I can make you feel...";
  152. set MORGEN,3;
  153. if(ALCH_Q == 4) set al_morgen,1;
  154. close;
  155. L_1:
  156. mes "[Chemist Morgenstein]";
  157. mes "What do you want now?";
  158. M_Menu2:
  159. next;
  160. menu "Ask about research",M_Rsrch,"Make a new one",-, "Nothing",M_End;
  161. mes "[Chemist Morgenstein]";
  162. mes "Heheheheheheh.... So I see you are interested in my creations?..... Who woudn't.... Kekekekekekeke!!!";
  163. mes "So what do you want me to make for you?? Huh? Heheheheheh.............";
  164. emotion e_gg;
  165. next;
  166. menu "-Counteragent",-, "-Mixture",sM_Mixture, "-Forget it",M_End;
  167. mes "[Chemist Morgenstein]";
  168. mes "Oh... You said Counteragent... Kekekekekekeke... Let's see.... I'll need some items.......";
  169. mes "... Let me check... Oh... Oh...... Ahhhh..... Hmmm.....";
  170. next;
  171. mes "[Chemist Morgenstein]";
  172. mes "Oh.... As I recall I need....:";
  173. mes "^5533FF1 Alcohol";
  174. mes "1 Detrimindexta^000000......";
  175. mes "and ^5533FF1 Empty Bottle^000000....";
  176. next;
  177. mes "[Chemist Morgenstein]";
  178. mes "With these 3 things I'll be able to make you a counter agent. It won't be a big deal to make..... Kekekekekekeke....";
  179. mes "Oh, and there will be a fee of ^5533FF3000 zeny^000000 okay? Heheheheheh..... Oh, surely you don't think it's rip-off?...";
  180. next;
  181. mes "[Chemist Morgenstein]";
  182. mes "Alright?....";
  183. next;
  184. menu "Make",-,"Cancel",M_End;
  185. mes "[Chemist Morgenstein]";
  186. if(countitem(970) && countitem(971) && countitem(713) && Zeny>=3000) goto sl_GetCounter;//Items: Alcohol, Detrimindexta, Empty Bottle,
  187. mes "I'm sorry but you need 1 Empty Bottle, 1 Alcohol, 1 Detrimindexta, and 3000 Zeny for me to make a Counteragent.";
  188. emotion e_sry;
  189. close;
  190. sl_GetCounter:
  191. delitem 970,1;//Items: Alcohol,
  192. delitem 713,1;//Items: Empty Bottle,
  193. delitem 971,1;//Items: Detrimindexta,
  194. set Zeny, Zeny-3000;
  195. mes "OhOhOhOh...... Heheheheheh...... Fine... Like this..... Fine... Keep... More........ Heheheheheh";
  196. mes ".... Ahhhh.... ..... OhOh.... OhOh!..... OhOhOhOhOhOh!!!...!!!!!!";
  197. next;
  198. getitem 973,1;//Items: Counteragent,
  199. mes "[Chemist Morgenstein]";
  200. mes ".... Hmmm......";
  201. emotion e_hmm;
  202. close;
  203. sM_Mixture:
  204. mes "[Chemist Morgenstein]";
  205. mes "Oh... You said Mixture?... Kekekekekekeke... Let's see... I'll need some items.......";
  206. mes "... Let me check... Oh... Oh...... Ahhhh..... Hmmm.....";
  207. next;
  208. mes "[Chemist Morgenstein]";
  209. mes "Oh.... As I recall I need....:";
  210. mes "^5533FF1 Alcohol";
  211. mes "1 Karvodailnirol^000000.....";
  212. mes "and ^5533FF1 Empty Bottle^000000...........";
  213. next;
  214. mes "[Chemist Morgenstein]";
  215. mes "With these 3 things I'll be able to make you a mixture. It won't be a big deal to make..... Kekekekekekeke....";
  216. mes "Oh, and there will be a fee of ^5533FF4000 zeny^000000 okay? Heheheheheh..... Oh, surely you don't think it's rip-off?...";
  217. next;
  218. mes "[Chemist Morgenstein]";
  219. mes "Alright??...";
  220. next;
  221. menu "Make",-,"Cancel",M_End;
  222. mes "[Chemist Morgenstein]";
  223. if(countitem(970) && countitem(972) && countitem(713) && Zeny>=4000) goto sl_GetMix;//Items: Alcohol, Karvodailnirol, Empty Bottle,
  224. mes "I'm sorry but you need 1 Empty Bottle, 1 Alcohol, 1 Karvodainirol, and 4000 Zeny for me to make a Mixture.";
  225. emotion e_sry;
  226. close;
  227. sl_GetMix:
  228. delitem 970,1;//Items: Alcohol,
  229. delitem 713,1;//Items: Empty Bottle,
  230. delitem 972,1;//Items: Karvodailnirol,
  231. set Zeny, Zeny-4000;
  232. mes "OhOhOhOh...... Heheheheheh...... Fine... Like this..... Fine... Keep... More........ Heheheheheh";
  233. mes ".... Ahhhh.... ..... OhOh.... OhOh!..... OhOhOhOhOhOh!!!...!!!!!!";
  234. next;
  235. getitem 974,1;//Items: Mixture,
  236. mes "[Chemist Morgenstein]";
  237. mes ".... Hmmm......";
  238. emotion e_hmm;
  239. close;
  240. M_End:
  241. mes "[Chemist Morgenstein]";
  242. mes "... Kekekekekekeke....";
  243. emotion e_heh;
  244. close;
  245. }