brendorox

Untitled

Aug 22nd, 2012
54
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 9.09 KB | None | 0 0
  1. //===== eAthena Script =======================================
  2. //= Armor Enchanter
  3. //===== By: ==================================================
  4. //= L0ne_W0lf
  5. //===== Current Version: =====================================
  6. //= 1.0a
  7. //===== Compatible With: =====================================
  8. //= Cronus SVN
  9. //===== Description: =========================================
  10. //= [Aegis Conversion]
  11. //= Add a +1, 2, or 3, of a random stat to specified armor.
  12. //===== Additional Comments: =================================
  13. //= 1.0 First version.
  14. //= 1.0a Tradução para o Cronus por Wilk Maia e Squall
  15. //============================================================
  16.  
  17. prontera,165,60,2 script Aprendiz de Artesão 73,{
  18. if (Zeny > 399999) {
  19. mes "[Aprendiz de Artesão]";
  20. mes "Tenho estudado maneiras de aprimorar armaduras e aumentar suas capacidades.";
  21. next;
  22. mes "[Aprendiz de Artesão]";
  23. mes "Encantar é uma habilidade magnífica que atribuí um status de poder misterioso em uma propriedade escondida da armadura.";
  24. next;
  25. mes "[Aprendiz de Artesão]";
  26. mes "Entretanto, você têm que ter em mente que, se voc}e tiver duas armaduras iguais, o Encantamento será aplicado de acordo com a ordem que elas ficam no inventário.";
  27. next;
  28. mes "[Aprendiz de Artesão]";
  29. mes "Sendo assim, o encanto pode ser aplicado a um item que você não queria encantar. Então só traga ^5555ffUMA Armadura^000000 para encantar com segurança..";
  30. next;
  31. mes "[Aprendiz de Artesão]";
  32. mes "Eu não me responsabilizo sobre o que pode acontecer caso você tenha dois equipamentos iguais.";
  33. next;
  34. switch(select("Armadura sem Slot.:Armadura com Slot.:Armaduras de Elite.:Talvez depois.")) {
  35. case 1:
  36. switch(select("Capote:Casaco:Cota de Malha:Armadura Metálica:Manto de Seda:Manto Sagrado:Batina:Armadura de Madeira:Malha:Manto Prateado:Vestimenta Arcana:Traje de Gatuno:Armadura Legionária:Couraça da Fúria Flamejante:Couraça da Submissão Oceânica:Couraça da Liberdade Celestial:Couraça da Perseverança Continental:Indumentária Ninja:Armadura Camaleão:Túnica Gloriosa:Túnica Gloriosa Industrializada:Túnica Gloriosa Barata")) {
  37. case 1:
  38. callsub S_EnchantArmor,2307,50;
  39. case 2:
  40. callsub S_EnchantArmor,2309,50;
  41. case 3:
  42. callsub S_EnchantArmor,2314,50;
  43. case 4:
  44. callsub S_EnchantArmor,2316,50;
  45. case 5:
  46. callsub S_EnchantArmor,2321,50;
  47. case 6:
  48. callsub S_EnchantArmor,2325,50;
  49. case 7:
  50. callsub S_EnchantArmor,2327,50;
  51. case 8:
  52. callsub S_EnchantArmor,2328,50;
  53. case 9:
  54. callsub S_EnchantArmor,2330,50;
  55. case 10:
  56. callsub S_EnchantArmor,2332,50;
  57. case 11:
  58. callsub S_EnchantArmor,2334,50;
  59. case 12:
  60. callsub S_EnchantArmor,2335,50;
  61. case 13:
  62. callsub S_EnchantArmor,2341,50;
  63. case 14:
  64. callsub S_EnchantArmor,2344,50;
  65. case 15:
  66. callsub S_EnchantArmor,2346,50;
  67. case 16:
  68. callsub S_EnchantArmor,2348,50;
  69. case 17:
  70. callsub S_EnchantArmor,2350,50;
  71. case 18:
  72. callsub S_EnchantArmor,2337,50;
  73. case 19:
  74. callsub S_EnchantArmor,2386,50;
  75. case 20:
  76. callsub S_EnchantArmor,2394,50;
  77. case 21:
  78. callsub S_EnchantArmor,2395,50;
  79. case 22:
  80. callsub S_EnchantArmor,2396,50;
  81. }
  82. case 2:
  83. switch(select("Casaco de Pele:Vestimental Nobre:Jaqueta Brilhante:Paletó:Capote(1):Casaco(1):Cota de Malha(1):Armadura metálica(1):Manto de Seda(1):Escapulário(1):Manto Sagrado(1):Malha(1):Manto Prateado(1):Traje de Gatuno(1):Armadura Legionária(1):Couraça da Fúria Flamejante(1):Couraça da Submissão Oceânica(1):Couraça da Liberdade Celestial(1):Couraça da Perserverança Continental(1)")) {
  84. case 1:
  85. callsub S_EnchantArmor,2311,55;
  86. case 2:
  87. callsub S_EnchantArmor,2318,55;
  88. case 3:
  89. callsub S_EnchantArmor,2319,55;
  90. case 4:
  91. callsub S_EnchantArmor,2320,55;
  92. case 5:
  93. callsub S_EnchantArmor,2308,55;
  94. case 6:
  95. callsub S_EnchantArmor,2310,55;
  96. case 7:
  97. callsub S_EnchantArmor,2315,55;
  98. case 8:
  99. callsub S_EnchantArmor,2317,55;
  100. case 9:
  101. callsub S_EnchantArmor,2322,55;
  102. case 10:
  103. callsub S_EnchantArmor,2324,55;
  104. case 11:
  105. callsub S_EnchantArmor,2326,55;
  106. case 12:
  107. callsub S_EnchantArmor,2331,55;
  108. case 13:
  109. callsub S_EnchantArmor,2333,55;
  110. case 14:
  111. callsub S_EnchantArmor,2336,55;
  112. case 15:
  113. callsub S_EnchantArmor,2342,55;
  114. case 16:
  115. callsub S_EnchantArmor,2345,55;
  116. case 17:
  117. callsub S_EnchantArmor,2347,55;
  118. case 18:
  119. callsub S_EnchantArmor,2349,55;
  120. case 19:
  121. callsub S_EnchantArmor,2351,55;
  122. }
  123. case 3:
  124. switch(select("Armadura de Meteo:Bata de Orleans:Armadura Vital:Manto de Diabolus:Armadura de Diabolus:Armadura de Assalto:Armadura de Elite:Manto do Mercenário:Manto de Batalha do Feiticeiro:Manto do Médico:Túnica do Arqueiro de Elite:Túnica do Artilheiro de Elite:Armadura de Corrida:Kandura:Cota de Escamas de Naga:Malha Aprimorada")) {
  125. case 1:
  126. callsub S_EnchantArmor,2364,60;
  127. case 2:
  128. callsub S_EnchantArmor,2365,60;
  129. case 3:
  130. callsub S_EnchantArmor,2391,60;
  131. case 4:
  132. callsub S_EnchantArmor,2374,60;
  133. case 5:
  134. callsub S_EnchantArmor,2375,60;
  135. case 6:
  136. callsub S_EnchantArmor,2376,60;
  137. case 7:
  138. callsub S_EnchantArmor,2377,60;
  139. case 8:
  140. callsub S_EnchantArmor,2378,60;
  141. case 9:
  142. callsub S_EnchantArmor,2379,60;
  143. case 10:
  144. callsub S_EnchantArmor,2380,60;
  145. case 11:
  146. callsub S_EnchantArmor,2381,60;
  147. case 12:
  148. callsub S_EnchantArmor,2382,60;
  149. case 13:
  150. callsub S_EnchantArmor,2387,60;
  151. case 14:
  152. callsub S_EnchantArmor,2388,60;
  153. case 15:
  154. callsub S_EnchantArmor,2389,60;
  155. case 16:
  156. callsub S_EnchantArmor,2390,60;
  157. }
  158. case 4:
  159. mes "[Aprendiz de Artesão]";
  160. mes "Por favor, volte quando tiver interesse em encantar sua armadura.";
  161. close;
  162. }
  163. }
  164. else {
  165. mes "[Aprendiz de Artesão]";
  166. mes "Eu estou a cargo de encantar armaduras. Simplificando, eu estive estudando modos de maximizar o poder de armaduras.";
  167. next;
  168. mes "[Aprendiz de Artesão]";
  169. mes "Se de algum jeito você quiser encantar sua armadura, traga-me 400.000 zeny e a armadura que você quer encantar e então estará pronto.";
  170. close;
  171. }
  172.  
  173. S_EnchantArmor:
  174. set .@itemid,getarg(0);
  175. set .@failrate,getarg(1);
  176. if ((countitem(.@itemid) > 0) && (countitem(.@itemid) < 2)) {
  177. mes "[Aprendiz de Artesão]";
  178. mes "Adicionar um slot vai lhe custar 400.000 zeny. Haverá também uma opção aleatória de encantamento. Claro, haverá a chance de quebrar sua armadura.";
  179. next;
  180. mes "[Aprendiz de Artesão]";
  181. mes "Primeiramente e mais importante:";
  182. mes "^ff5555Todo o refinamento e as cartas";
  183. mes "da armadura serão perdidas.^000000";
  184. mes "Ainda assim quer tentar o encanto?";
  185. next;
  186. switch(select("Hmm... deixe-me pensar um pouco.:Vá em frente.")) {
  187. case 1:
  188. mes "[Aprendiz de Artesão]";
  189. mes "Bem, não posso culpá-lo. Segurança em primeiro lugar, certo?";
  190. mes "Agora tenha um bom dia.";
  191. close;
  192. case 2:
  193. mes "[Aprendiz de Artesão]";
  194. mes "Hm, um aventureiro, ehin? Bem, vamos?";
  195. close2;
  196. specialeffect2 EF_MAPPILLAR;
  197. if (Zeny < 400000) {
  198. mes "[Aprendiz de Artesão]";
  199. mes "Desculpe-me, mas você não tem zeny suficiente.";
  200. close;
  201. }
  202. progressbar "ffff00",7;
  203. set .@enc_ran,rand(1,.@failrate);
  204. set zeny,zeny-400000;
  205. delitem .@itemid,1;
  206. if (.@enc_ran == 1) {
  207. set .@addpart,4702;
  208. }
  209. else if (.@enc_ran == 2) {
  210. set .@addpart,4712;
  211. }
  212. else if (.@enc_ran == 3) {
  213. set .@addpart,4722;
  214. }
  215. else if (.@enc_ran == 4) {
  216. set .@addpart,4732;
  217. }
  218. else if (.@enc_ran == 5) {
  219. set .@addpart,4742;
  220. }
  221. else if (.@enc_ran == 6) {
  222. set .@addpart,4752;
  223. }
  224. else if ((.@enc_ran > 6) && (.@enc_ran < 9)) {
  225. set .@addpart,4701;
  226. }
  227. else if ((.@enc_ran > 8) && (.@enc_ran < 11)) {
  228. set .@addpart,4711;
  229. }
  230. else if ((.@enc_ran > 10) && (.@enc_ran < 13)) {
  231. set .@addpart,4721;
  232. }
  233. else if ((.@enc_ran > 12) && (.@enc_ran < 15)) {
  234. set .@addpart,4731;
  235. }
  236. else if ((.@enc_ran > 14) && (.@enc_ran < 17)) {
  237. set .@addpart,4741;
  238. }
  239. else if ((.@enc_ran > 16) && (.@enc_ran < 19)) {
  240. set .@addpart,4751;
  241. }
  242. else if ((.@enc_ran > 18) && (.@enc_ran < 22)) {
  243. set .@addpart,4700;
  244. }
  245. else if ((.@enc_ran > 21) && (.@enc_ran < 25)) {
  246. set .@addpart,4710;
  247. }
  248. else if ((.@enc_ran > 24) && (.@enc_ran < 28)) {
  249. set .@addpart,4720;
  250. }
  251. else if ((.@enc_ran > 27) && (.@enc_ran < 31)) {
  252. set .@addpart,4730;
  253. }
  254. else if ((.@enc_ran > 30) && (.@enc_ran < 34)) {
  255. set .@addpart,4740;
  256. }
  257. else if ((.@enc_ran > 33) && (.@enc_ran < 37)) {
  258. set .@addpart,4750;
  259. }
  260. else {
  261. specialeffect2 EF_PHARMACY_FAIL;
  262. mes "[Aprendiz de Artesão]";
  263. mes "Ah, que pena.";
  264. mes "O encantamento do equipamento falhou.";
  265. close;
  266. }
  267. getitem2 .@itemid, 1, 1, 0, 0, 0, 0, 0, .@addpart;
  268. }
  269. }
  270. else {
  271. mes "[Aprendiz de Artesão]";
  272. mes "Ehin? Não há nada a ser encantado!";
  273. mes "Por favor, volte com apenas um equipamento para encantar.";
  274. close;
  275. }
  276. }
Advertisement
Add Comment
Please, Sign In to add comment