Advertisement
pedropio23

Xylic Herbalismo v8.6-b-a

Jan 24th, 2018
439
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 9.09 KB | None | 0 0
  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