API tools faq
paste
brendorox

Untitled

brendorox
Aug 15th, 2012
101
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 9.10 KB | None | 0 0
raw download clone embed print report
  1. //===== Cronus Script =======================================
  2. //= Fabricante De Tinturas
  3. //===== Por: ==================================================
  4. //= eAthena Dev Team
  5. //===== Versão Atual: =====================================
  6. //= 1.4c
  7. //===== Descrição: =========================================
  8. //= Faz as tinturas
  9. //===== Comentarios Adicionais: =================================
  10. //= 1.0 Fully working [kobra_k88]
  11. //= 1.1 Spell Checked [Nexon]
  12. //= 1.2 Rescripted to Aegis 10.3 standard. [L0ne_W0lf]
  13. //= 1.2b Fixed typos in variable names [ultramage]
  14. //= 1.3 Made the checks more dynamic [ultramage]
  15. //= 1.3b Fixed incorrect checking loop structure [ultramage]
  16. //= 1.4 Added a checkweight. [L0ne_W0lf]
  17. //= 1.4a Traduzido [old7 e Mehah]
  18. //= 1.4b Revisado. [RoM]
  19. //= 1.4c Removido show [Yum]
  20. //============================================================
  21.  
  22. morocc_in,146,99,3 script Java Dullihan 58,{
  23. if ((MaxWeight-Weight) < 200 || checkweight(1201,1) == 0) {
  24. mes "- Espere um minuto! -";
  25. mes "- Você está carregando -";
  26. mes "- muitos itens com você. -";
  27. mes "- Por favor, volte mais tarde -";
  28. mes "- depois de se livrar de alguns itens. -";
  29. close;
  30. }
  31. mes "[Java Dullihan]";
  32. mes "Uau...";
  33. mes "Que lindo dia... Dias como estes são perfeitos para fazer Tinturas!";
  34. next;
  35. switch(select("Conversar:Fazer Tinturas:Cancelar")) {
  36. case 1:
  37. mes "[Java Dullihan]";
  38. mes "Eu não tenho muito a dizer. Mas se você quiser saber sobre meu passado, eu estou certo que tenho algumas histórias para contar. Gostaria de ouvir alguma?";
  39. next;
  40. if (select("Claro, porque não?:Quem sabe outra hora") == 1) {
  41. mes "[Java Dullihan]";
  42. mes "Meu pai tem feito tinturas desde que eu era criança...";
  43. mes "Eu posso ainda lembrar dele fazendo tinturas o dia inteiro.";
  44. next;
  45. mes "[Java Dullihan]";
  46. mes "Mesmo depois que minha se foi, meu pai manteve-se fazendo tinturas sem descanso.";
  47. mes "Isto me fez ter raiva dele. Como poderia continuar a fazer tinturas em um momento como aquele?";
  48. next;
  49. mes "[Java Dullihan]";
  50. mes "Eu apenas não compreendia o que meu pai pensava. E me desapontei muito com ele.";
  51. mes "As ações do meu pai fizeram-me desprezar a fabricação tintura, assim eu fugi para longe de minha casa. E sobrevivi fazendo vários trabalhos diferentes.";
  52. next;
  53. mes "[Java Dullihan]";
  54. mes "Entretanto, como você pode ver, eu acabei me transformando em um Fabricante De Tinturas como meu pai.";
  55. mes "E faz 15 anos desde que eu comecei a fazer este tipo de coisa...";
  56. next;
  57. mes "[Java Dullihan]";
  58. mes "Agora que tenho feito isto por tanto tempo... Eu posso finalmente compreender porque meu pai amava tanto seu trabalho.";
  59. next;
  60. mes "[Java Dullihan]";
  61. mes "E porque ele sacrificou tudo que teve por este trabalho...";
  62. next;
  63. mes "[Java Dullihan]";
  64. mes "Talvez por causa de como as cores tornam-se cada vez mais e mais lindas...";
  65. mes "Talvez quisesse encontrar sua própria cor perfeita...";
  66. next;
  67. mes "[Java Dullihan]";
  68. mes "Agora eu tenho queda para as cores... porque... Eu estou trabalhando com a mesma paixão que ele tinha quando vivia.";
  69. mes "Eu posso sentir as cores dentro de minha alma. Eu sei que é duro compreender, mas você verá que há um significado.";
  70. next;
  71. mes "[Java Dullihan]";
  72. mes "Pai, eu faço estas tinturas para você....";
  73. close;
  74. }
  75. mes "[Java Dullihan]";
  76. mes "Hahahaha... Eu não tenho culpa de não poder adivinhar, o que quer aqui, com um velho Fabricante De um Tinturas.... Hahahaha...";
  77. close;
  78.  
  79. case 2:
  80. mes "[Java Dullihan]";
  81. mes "Tudo Bem! Eu farei a cor exatamente como você quer. O custo da tintura dependerá de sua qualidade.";
  82. next;
  83. mes "[Java Dullihan]";
  84. mes "Não seja intimidado pelos preços, elas são todas minhas obras-primas.";
  85. next;
  86. mes "[Java Dullihan]";
  87. mes "Então que cor você quer?";
  88. next;
  89. switch(select("Tintura Vermelha:Tintura Amarela:Tintura Azul:Tintura Verde:Tintura Laranja:Tintura Violeta:Tintura Branca:Tintura Preta:Cancelar")) {
  90. case 1: callsub S_MakeDye,1,1; break;
  91. case 2: callsub S_MakeDye,2,1; break;
  92. case 3: callsub S_MakeDye,3,2; break;
  93. case 4: callsub S_MakeDye,4,3; break;
  94. case 5: callsub S_MakeDye,5,4; break;
  95. case 6: callsub S_MakeDye,6,4; break;
  96. case 7: callsub S_MakeDye,7,4; break;
  97. case 8: callsub S_MakeDye,8,4; break;
  98. case 9:
  99. mes "[Java Dullihan]";
  100. mes "Aaaahhhh!! Mudou de idéia!? Então tudo bem...";
  101. close;
  102. }
  103.  
  104. case 3:
  105. mes "[Java Dullihan]";
  106. mes "Eu tenho ótimas habilidades para fazer tinturas. Quando precisar de tinturas, por favor, venha até mim. Eu vou criá-las para você por um preço bastante razoável.";
  107. close;
  108. }
  109.  
  110. S_MakeDye:
  111. mes "[Java Dullihan]";
  112. switch(getarg(0)) {
  113. case 1:
  114. mes "Hmm... Para fazer uma Tintura Vermelha, eu preciso de ^0000ff30 Ervas Vermelhas, 1 Antígeno e 1 Garrafa Vazia^000000.";
  115. mes "O custo de minha mão-de-obra será de 3000 Zeny.";
  116. setarray .@item[0], 507, 973, 713;
  117. setarray .@count[0], 30, 1, 1;
  118. set .@cost,3000;
  119. set .@dyestuff,975;
  120. break;
  121. case 2:
  122. mes "Hmm... Para fazer uma Tintura Amarela, eu preciso de ^0000ff30 Ervas Amarelas, 1 Antígeno, e 1 Garrafa Vazia^000000.";
  123. mes "O custo de minha mão de obra será de 3000 Zeny.";
  124. setarray .@item[0], 508, 973, 713;
  125. setarray .@count[0], 30, 1, 1;
  126. set .@cost,3000;
  127. set .@dyestuff,976;
  128. break;
  129. case 3:
  130. mes "Hmm... Para fazer uma Tintura Azul, eu preciso de ^0000ff20 Ervas Azuis, 1 Antígeno, e 1 Garrafa Vazia^000000.";
  131. mes "Trabalhar com ervas azuis é mais difícil, então o custo de minha mão-de-obra será de 3500 Zeny";
  132. setarray .@item[0], 510, 973, 713;
  133. setarray .@count[0], 20, 1, 1;
  134. set .@cost,3500;
  135. set .@dyestuff,978;
  136. break;
  137. case 4:
  138. mes "Hmm... Para fazer uma Tintura Verde, eu preciso de ^0000ff5 Ervas Azuis, 20 Ervas Verdes, 20 Ervas Amarelas, 1 Antígeno, 1 Mistura, e 1 Garrafa Vazia^000000.";
  139. mes "O custo de minha mão-de-obra será de 5000 Zeny.";
  140. setarray .@item[0], 510, 511, 508, 974, 973, 713;
  141. setarray .@count[0], 5, 20, 20, 1, 1, 1;
  142. set .@cost,5000;
  143. set .@dyestuff,979;
  144. break;
  145. case 5:
  146. mes "Hmm... Para fazer uma Tintura Laranja, eu preciso de ^0000ff20 Ervas Vermelha, 20 Ervas Amarelas, 1 Antígeno, 1 Mistura, e 1 Garrafa Vazia^000000.";
  147. mes "O custo de minha mão-de-obra será de 5000 Zeny.";
  148. setarray .@item[0], 507, 508, 974, 973, 713;
  149. setarray .@count[0], 20, 20, 1, 1, 1;
  150. set .@cost,5000;
  151. set .@dyestuff,980;
  152. break;
  153. case 6:
  154. mes "Hmm... Para fazer uma Tintura Violeta , eu preciso de ^0000ff10 Ervas Azuis, 30 Ervas Vermelhas, 1 Antígeno, 1 Mistura, e 1 Garrafa Vazia^000000.";
  155. mes "O custo de minha mão-de-obra será de 5000 Zeny.";
  156. setarray .@item[0], 510, 507, 974, 973, 713;
  157. setarray .@count[0], 10, 30, 1, 1, 1;
  158. set .@cost,5000;
  159. set .@dyestuff,981;
  160. break;
  161. case 7:
  162. mes "Hmm... Para fazer uma Tintura Branca , eu preciso de ^0000ff30 Ervas Brancas, 1 Antígeno, e 1 Garrafa Vazia^000000.";
  163. mes "O custo de minha mão-de-obra será de 3000 Zeny.";
  164. setarray .@item[0], 509, 973, 713;
  165. setarray .@count[0], 30, 1, 1;
  166. set .@cost,3000;
  167. set .@dyestuff,982;
  168. break;
  169. case 8:
  170. mes "Hmm... Para fazer uma Tintura Preta , eu preciso de ^0000ff30 Ervas Vermelhas, Amarelas, e Verdes, 5 Ervas Azuis, 1 Antígeno, 1 Mistura, e 1 Garrafa Vazia^000000.";
  171. mes "Esta é a que tintura consome mais tempo e a mais difícil de se fazer, assim eu terei que cobrar uma taxa-de-mão de obra de 7000 Zeny.";
  172. setarray .@item[0], 507, 508, 511, 510, 974, 973, 713;
  173. setarray .@count[0], 30, 30, 30, 5, 1, 1, 1;
  174. set .@cost,7000;
  175. set .@dyestuff,983;
  176. break;
  177. }
  178. next;
  179. mes "[Java Dullihan]";
  180. switch(getarg(1)) {
  181. case 1: mes "Ah! Eu acho que você tem tudo pronto. Gostaria de iniciar o processo?"; break;
  182. case 2: mes "Ok! Eu acho que você tem tudo pronto. Gostaria de iniciar o processo?"; break;
  183. case 3: mes "Ok! Eu acho que você tem tudo pronto. Podemos começar o processo?"; break;
  184. case 4: mes "Ok! Eu acho que você tem tudo pronto. Gostaria de iniciar o processo?"; break;
  185. }
  186. next;
  187. if (select("Fazer Tinturas:Cancelar") == 1) {
  188. set .@size, getarraysize(.@item);
  189. // check requirements
  190. for( set .@i,0 ; .@i < .@size ; set .@i,.@i+1 )
  191. if( countitem(.@item[.@i]) < .@count[.@i] )
  192. break;
  193. if( .@i < .@size || Zeny < .@cost ) {
  194. mes "[Java Dullihan]";
  195. mes "Hmm...";
  196. mes "Eu não posso fazer o que você quer sem os materiais necessários... Porque você não traz tudo certo da próxima vez?";
  197. close;
  198. }
  199. // delete items
  200. for (set .@i, 0; .@i < .@size ; set .@i, .@i+1)
  201. delitem .@item[.@i], .@count[.@i];
  202. set zeny,zeny-.@cost;
  203. // get dyestuff
  204. getitem .@dyestuff,1;
  205.  
  206. mes "[Java Dullihan]";
  207. mes "Hmm... Me saí melhor do que esperava. Uma cor muito rica. Claro que eu vou continuar tentando para melhorar sempre!";
  208. next;
  209. mes "[Java Dullihan]";
  210. mes "Ok, então. Fale comigo quando precisa de mais Tinturas!";
  211. close;
  212. }
  213. mes "[Java Dullihan]";
  214. mes "Aaaahhhh!! Mudou de idéia!? Então tudo bem...";
  215. return;
  216. }
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!