API tools faq
paste
Advertisement
pedropio23

Xylic Herbalismo v8.6-b-a

pedropio23
Jan 24th, 2018
439
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 9.09 KB | None | 0 0
raw download clone embed print report
  1. $${
  2.  
  3. &version="v8.6-b-a";
  4.  
  5.  
  6. #####################################
  7. #####################################
  8. ##############**Xylic**##############
  9. #############Herbalismo##############
  10. #################v8##################
  11. #####################################
  12. #####################################
  13. # ssssssy:
  14. # +++++hhhhdddy++
  15. # -----ddddmhhhyyhhddd--`
  16. # mmmmmyyyyyddhyyyyyyydd+
  17. # mmmmmyyyyyyyyyyhhhhhyyysssshdd
  18. #yyyyyhhhhhyyyyyyyyyyyyyyyhyyyysssssss:
  19. #dddhhyyyyyyysssssssssssssyyyssooosshhsss
  20. #ddhyyssssssssssssssssssssyysoosssssooyhh
  21. #ddhyyyyssssssyyooooosssoooosssyyyyy..:++
  22. #hhyss../sssssooyysssoooooyyyyy--.``--/oo
  23. #hhyss``.--sssoosssooyyyys--:::...--ssyhh
  24. #//oyy::-``/+sssssss /+++.----+++++hhddd
  25. # :ssyy/..``:++ooooo..--- /:::hyyyysssss
  26. # ddyss `.......--..`yyyyyhhhhh
  27. # +ddss: -----yyyyyhhhhh
  28. # `--hhs++ooooohhhhh-----
  29. # //oyyyyyyyyyyy
  30. # :sssssso
  31.  
  32.  
  33. match(%&version%,"v(.+).(.+)-(.+)-(.+)",{#herbuild,#herminor,&heralbest,&abefec});
  34. @#herbuild=%#herbuild%;
  35. @#herminor=%#herminor%;
  36. @&heralbest=%&heralbest%;
  37. ifmatches(%&heralbest%,"-");&stability="Bleeding Edge";endif;
  38. ifmatches(%&heralbest%,"a");&stability="Fase Alpha";endif;
  39. ifmatches(%&heralbest%,"b");&stability="Fase Beta";endif;
  40. ifmatches(%&heralbest%,"s");&stability="Estável";endif;
  41. ifmatches(%&abefec%,"a");&liber="&3Publica";endif;
  42. ifmatches(%&abefec%,"f");&liber="&4Fechada";endif;
  43. @&stability=%&stability%;
  44. @&liber=%&liber%;
  45. &hertecla=%KEYNAME%;
  46. @&hertecla=%&hertecla%;
  47.  
  48. if(@herbax);
  49. unset(@herbax);
  50. unset(@guardalivro);
  51. log(" ");
  52. log("&6%PLAYER% &cDesligou a &4[Xylic] &6Herbalismo &4OFF");
  53. log(" ");
  54. log(&d[&aMACRO&d] &3Exp = %#exp%);
  55. log(" ");
  56. stop();
  57. else;
  58. set(@herbax);
  59. log(" ");
  60. log("&6%PLAYER% &2Ligou a &4[Xylic] &6Herbalismo");
  61. log(" ");
  62. log("&4[Xylic] &6Herbalismo na Tecla &5&l%&hertecla%");
  63. log(" ");
  64. log("&9&lVersão: &5%#herbuild%.%#herminor% - &6&l%&stability% %&liber%");
  65. log(" ");
  66. echo("/g &b gg&5 #xylic &bherbalismo &5v%#herbuild%.%#herminor%");
  67.  
  68. //Vars
  69. #exp=0;
  70. #bau=1;
  71. #mao=0;
  72. &baucana="sem";
  73. @&baucana=%&baucana%;
  74. &bau="chest";
  75. &home="herbalismo";
  76.  
  77. wait(200ms);
  78. look(west);
  79. keydown(jump);
  80. wait(100ms);
  81. keyup(jump);
  82.  
  83. //Verificar se tenho livros pra guardar
  84. gui(inventory);
  85. #livg=0;
  86. wait(500ms);
  87. for(#slt,9,26);
  88. getslotitem(%#slt%,&ta);
  89. ifmatches(%&ta%,air);
  90. else;
  91. inc(#livg,1);
  92. endif;
  93. wait(100ms);
  94. next;
  95.  
  96. if(%#livg%>0);
  97. set(@guardalivro);
  98. log("&2%#livg% &9livros para guardar &f- &cQueued");
  99. else;
  100. unset(@guardalivro);
  101. log("&4%#livg% &9livros para guardar &f- &bComeçando Up");
  102. endif;
  103.  
  104. wait(100ms);
  105. gui();
  106.  
  107. //Upando
  108. do;
  109. do(10);
  110. look(west);
  111. look(,90);
  112. do(100);
  113. pick(red_mushroom,reeds);
  114. key(use);
  115. wait(1t);
  116. key(attack);
  117. inc(#exp,1);
  118.  
  119. //Bug sem cana na mão
  120. ifmatches(%ITEM%,"air");
  121. if(@morri);
  122. if(@pegacana);
  123. else;
  124. if(%#mao%>40);
  125. set(@pegacana);
  126. #mao=0;
  127. else;
  128. inc(#mao,1);
  129. //log("%#mao%");
  130. endif;
  131. endif;
  132. endif;
  133. endif;
  134. //log(100);
  135. loop;
  136.  
  137. //Se Morrer
  138. if(%HEALTH%<1);
  139. set(@morri);
  140. set(@pegacana);
  141. do(1);
  142. ifmatches(%GUI%,"GUIGAMEOVER");
  143. respawn();
  144. endif;
  145. do();
  146. wait(100ms);
  147. until((%HEALTH%>1)&&(%GUI%="NONE"));
  148. wait(1);
  149.  
  150. //home
  151. echo("/home %&home%");
  152. wait(6);
  153. keydown(jump);
  154. wait(150ms);
  155. keyup(jump);
  156. loop;
  157. endif;
  158.  
  159. if(@pegacana);
  160. //Procurar bau para pegar Cana
  161. wait(600ms);
  162. do();
  163. ifmatches(%&baucana%,"sem");
  164. look(south);
  165. wait(600ms);
  166. ifmatches(%HITID%,%&bau%);
  167. &baucana=south;
  168. @&baucana=%&baucana%;
  169. //log(%&baucana%);
  170. else;
  171. endif;
  172. endif;
  173.  
  174. ifmatches(%&baucana%,"sem");
  175. look(north);
  176. wait(600ms);
  177. ifmatches(%HITID%,%&bau%);
  178. &baucana=north;
  179. @&baucana=%&baucana%;
  180. //log(%&baucana%);
  181. else;
  182. endif;
  183. endif;
  184. until(%&baucana%!="sem");
  185.  
  186. //Abrindo Bau de cana
  187. wait(500ms);
  188. look(%@&baucana%);
  189. do();
  190. wait(20ms);
  191. until(%HITID%="chest");
  192.  
  193. key(use);
  194.  
  195. do();
  196. wait(20ms);
  197. until(%GUI%="GUICHEST");
  198. wait(600ms);
  199.  
  200. //Pegando Canas
  201. #slot=0;
  202. do();
  203. getslotitem(53,&id,#quant);
  204. slotclick(%#slot%,l,true);
  205. wait(80ms);
  206. if(%#slot%>53);
  207. #slot=0;
  208. else;
  209. #slot=%#slot%+1;
  210. endif;
  211. getslotitem(81,&id,#quant);
  212. until(%&id%!="air");
  213. unset(@pegacana);
  214. gui();
  215. do();
  216. wait(10ms);
  217. until(%GUI%="NONE");
  218. endif;
  219.  
  220. loop;
  221.  
  222. //Guardar se pegou livro (Adicionar a outra na onchat para guardar)
  223. if(@guardalivro);
  224. wait(200ms);
  225. keydown(jump);
  226. wait(150ms);
  227. keyup(jump);
  228. wait(200ms);
  229.  
  230. if(#bau<2);
  231. look(east);
  232. endif;
  233. if(#bau=2);
  234. look(east);
  235. look(,60);
  236. endif;
  237. if(#bau>2);
  238. look(east);
  239. endif;
  240. do();
  241. wait(20ms);
  242. until(%HITID%="chest");
  243. wait(200ms);
  244. key(use);
  245. #baucount=0;
  246. do();
  247. if(%#baucount%>200);
  248. keydown(jump);
  249. wait(150ms);
  250. keyup(jump);
  251. do();
  252. wait(20ms);
  253. until(%HITID%="chest");
  254. wait(80ms);
  255. key(use);
  256. wait(250ms);
  257. //#baucount=0;
  258. else;
  259. wait(20ms);
  260. inc(#baucount,1);
  261. //log(%#baucount%);
  262. endif;
  263. until(%GUI%="GUICHEST");
  264.  
  265. //Zerar o contador pós-aberto para não bugar com soma de 'mini-esperas'
  266. if(%GUI%="GUICHEST");
  267. #baucount=0;
  268. //log(%#baucount%);
  269. endif;
  270. wait(200ms);
  271.  
  272. //Guardando
  273. for(#slt,54,71);
  274. slotclick(%#slt%,l,true);
  275. wait(50ms);
  276. next;
  277. getslotitem(53,&idli);
  278. ifmatches(%&idli%,"air");
  279. else;
  280. if(%#bau%>2);
  281. log("&5&l%Fim dos Baus");
  282. #bau=1;
  283. else;
  284. inc(#bau,1);
  285. log("&5&l%Novo Bau - &4%#bau%");
  286. endif;
  287. endif;
  288.  
  289. wait(100ms);
  290. gui();
  291. wait(100ms);
  292.  
  293. keydown(jump);
  294. wait(150ms);
  295. keyup(jump);
  296. wait(200ms);
  297. look(west);
  298.  
  299. unset(@guardalivro);
  300. endif;
  301.  
  302. keydown(sneak);
  303. wait(150ms);
  304. keyup(sneak);
  305. wait(50ms);
  306. loop;
  307. endif;
  308.  
  309. ##################################
  310. ##################################
  311. ####End **Xylic's** Herbalismo####
  312. ##################################
  313. ##################################
  314. ##########Level 11 Mato##########
  315.  
  316. }$$
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
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!