API tools faq
paste
Advertisement
Guest User

Pesca

a guest
Apr 15th, 2021
1,000
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 10.06 KB | None | 0 0
raw download clone embed print report
  1. $${
  2. ////////////////////////////////////////////////////////////;
  3. /// MACRO DE PESCA // FEITA POR CHAVEZ // DC: Chavez#8154 //;
  4. ////////////////////////////////////////////////////////////;
  5.  
  6. #placa = 68;
  7. #bloco_ferro = 42;
  8. #peixe = 349;
  9. #agua = 9;
  10. #vara = 346;
  11. #linha = 287;
  12.  
  13. if(!primeira_vez_macro);
  14. &home_pesca = "chavez pesca";
  15. &home_limpar_rep = "limpar_rep";
  16. &home_vara = "chavez vara";
  17. &home_linha = " chavez linha";
  18. #durabilidade_minima = 10;
  19. &delay_slot = "0";
  20. &delay_pesca = "250ms";
  21. set(primeira_vez_macro);
  22. echo("/g &futilizando pela primeira vez a &bmacro de pesca &fdo &6chavinho! &c#sanduiche_de_peixe");
  23. endif;
  24.  
  25. &delay_compra = "500ms";
  26.  
  27. do;
  28. toggle(mp);
  29. if(mp);
  30. log("&e&oFeita por Chavez");
  31. log("&b&o(Macro Pesca VIP) &a&lLigada! &e&l%DATETIME%");
  32. if(KEY_LCONTROL);
  33. unset(config);
  34. endif;
  35. if(!config);
  36. unset(fim);
  37. log("&b&o(Macro Pesca) &a&oIniciando a Configuração...");
  38. wait(1);
  39. do;
  40. gui();
  41. prompt(&prompt_menu,"$$[Resposta[-> Iniciar Pescaria,,Configurações,,- Homes,Pescaria: %&home_pesca%,Limpar Inventário/Reparar: %&home_limpar_rep%,Comprar Vara: %&home_vara%,Comprar Linha: %&home_linha%,,- Delay,Pesca: %&delay_pesca%,Compra: %&delay_compra%,Slot: %&delay_slot%,,- Durabilidade,Minima: %#durabilidade_minima%]]","O que deseja fazer?");
  42. ifmatches("%&prompt_menu%","-> Iniciar Pescaria");
  43. set(fim);
  44. endif;
  45. ifmatches("%&prompt_menu%","Pescaria: %&home_pesca%");
  46. gui();
  47. prompt(&home_pesca,"$$?","Qual o nome da home de Pesca?");
  48. ifmatches("%&home_pesca%","^(\w+)$");
  49. achievementget("%&home_pesca%","%#peixe%");
  50. else;
  51. log("&b&o(Pesca CH) &c&oResposta &4&lInválida!");
  52. set(&home_pesca,"pesca");
  53. endif;
  54. endif;
  55. ifmatches("%&prompt_menu%","Limpar Inventário: %&home_clean%");
  56. gui();
  57. prompt(&home_limpar_rep,"$$?","Qual o nome da home para limpar o Inventário?");
  58. ifmatches("%&home_limpar_rep%","^(\w+)$");
  59. achievementget("%&home_limpar_rep%","%#peixe%");
  60. else;
  61. log("&b&o(Pesca CH) &c&oResposta &4&lInválida!");
  62. set(&home_limpar_rep,"limpar_rep");
  63. endif;
  64. endif;
  65. ifmatches("%&prompt_menu%","Comprar Vara: %&home_vara%");
  66. gui();
  67. prompt(&home_vara,"$$?","Qual o nome da home para que em caso de emergência compre varas?");
  68. ifmatches("%&home_vara%","^(\w+)$");
  69. achievementget("%&home_vara%","%#peixe%");
  70. else;
  71. log("&b&o(Pesca CH) &c&oResposta &4&lInválida!");
  72. set(&home_vara,"vara");
  73. endif;
  74. endif;
  75. ifmatches("%&prompt_menu%","Comprar Linha: %&home_linha%");
  76. gui();
  77. prompt(&home_linha,"$$?","Qual o nome da home para comprar Linhas?");
  78. ifmatches("%&home_linha%","^(\w+)$");
  79. achievementget("%&home_linha%","%#peixe%");
  80. else;
  81. log("&b&o(Pesca CH) &c&oResposta &4&lInválida!");
  82. set(&home_linha,"linha");
  83. endif;
  84. endif;
  85. ifmatches("%&prompt_menu%","Pesca: %&delay_pesca%");
  86. prompt(&delay_pesca,"$$?","Qual será o delay de Pesca? Coloque em ms, Ex: 250ms");
  87. ifmatches("%&delay_pesca%","^(\d+)ms$");
  88. achievementget("%&delay_pesca%","%#peixe%");
  89. else;
  90. log("&b&o(Pesca CH) &c&oResposta &4&lInválida!");
  91. set(&delay_pesca,"250ms");
  92. endif;
  93. endif;
  94. ifmatches("%&prompt_menu%","Minima: %#durabilidade_minima%");
  95. prompt(#durabilidade_minima,"$$?","Qual será a durabilidade minima para acionar a Reparação? Recomendado: 12");
  96. ifmatches("%#durabiliade_minima%","^(\d+)$");
  97. achievementget("%#durabilidade_minima%","%#peixe%");
  98. else;
  99. log("&b&o(Pesca CH) &c&oResposta &4&lInválida!");
  100. set(#durabilidade_minima,12);
  101. endif;
  102. endif;
  103. wait(10t);
  104. until(fim);
  105. log("&b&o(Macro Pesca VIP) &a&oConfiguração conclúida com Sucesso!");
  106. set(config);
  107. else;
  108. log("&b&o(Macro Pesca VIP) &a&oInicie a Macro pressionando &b&lCTRL &a&opara reconfigura-la!");
  109. endif;
  110. match("%DATETIME%","^\d+\-\d+\-(\d+) (\d+)\:(\d+)\:(\d+)$",{#dia,#hora,#min,#seg});
  111. wait(1);
  112. else;
  113. match("%DATETIME%","^\d+\-\d+\-(\d+) (\d+)\:(\d+)\:(\d+)$",{#dia2,#hora2,#min2,#seg2});
  114. #dias = #dia - #dia2;
  115. match("%#dias%","^\-*(\d+)$",{#dias});
  116. #horas = 24 - #hora;
  117. #horas = #horas + #hora2;
  118. match("%#horas%","^\-*(\d+)$",{#horas});
  119. if(#horas >= 24);
  120. #horas = #horas - 24;
  121. endif;
  122. if(#hora > #hora2);
  123. dec(#dias,1);
  124. endif;
  125. #minutos = 60 - #min;
  126. #minutos = #minutos + #min2;
  127. match("%#minutos%","^\-*(\d+)$",{#minutos});
  128. if(#minutos >= 60);
  129. #minutos = #minutos - 60;
  130. endif;
  131. if(#min > #min2);
  132. dec(#horas,1);
  133. endif;
  134. #segundos = 60 - #seg;
  135. #segundos = #segundos + #seg2;
  136. match("%#segundos%","^\-*(\d+)$",{#segundos});
  137. if(#segundos >= 60);
  138. #segundos = #segundos - 60;
  139. endif;
  140. if(#seg > #seg2);
  141. dec(#minutos,1);
  142. endif;
  143. #horas_temp = #dias / 24;
  144. inc(#horas,%#horas_temp%);
  145. log("&b&o(Macro Pesca VIP) &c&oA Macro ficou ligada durante &b&l%#horas% &c&oHoras, &b&l%#minutos% &c&oMinutos, &b&l%#segundos% &c&oSegundos!");
  146. gui();
  147. log("&b&o(Macro Pesca VIP) &c&lDesligada! &e&l%DATETIME%");
  148. stop;
  149. endif;
  150. do;
  151. do;
  152. getidrel(0,0,0,#vf);
  153. if(#vf == #agua);
  154. #yaw = %YAW%;
  155. #pitch = %PITCH%;
  156. if(#yaw >= 180);
  157. dec(#yaw,180);
  158. else;
  159. inc(#yaw,180);
  160. endif;
  161. achievementget("/esconder","%#vf%");
  162. echo("/esconder");
  163. break;
  164. else;
  165. set(&cordenadas,"%XPOS%/%YPOS%/%ZPOS%");
  166. endif;
  167. achievementget("/home %&home_pesca%","%#vf%");
  168. echo("/home %&home_pesca%");
  169. do(80);
  170. set(&cordenadas_teleporte,"%XPOS%/%YPOS%/%ZPOS%");
  171. wait(100ms);
  172. until(&cordenadas_teleporte != &cordenadas);
  173. loop;
  174. unset(reparar);
  175. unset(sem_linha);
  176. unset(sem_vara);
  177. unset(fim);
  178. do;
  179. if(GUI != "GUIINVENTORY");
  180. do;
  181. gui(inventory);
  182. wait(10t);
  183. until(GUI == "GUIINVENTORY");
  184. endif;
  185. getidrel(0,0,0,#vf_pescaria);
  186. pick(%#vara%);
  187. if(#vf_pescaria != #agua);
  188. log("&b&o(Macro Pesca VIP) &c&oAlgo de errado aconteceu com a Pescaria!");
  189. set(fim);
  190. elseif(ITEM != #vara);
  191. getslot(%#vara%,#slot_vara);
  192. if(#slot_vara == -1);
  193. log("&b&o(Macro Pesca VIP) &c&oVara não encontrada!");
  194. set(sem_vara);
  195. set(fim);
  196. elseif(#slot_vara < 36);
  197. slotclick(%#slot_vara%);
  198. wait(%&delay_slot%);
  199. slotclick(44);
  200. wait(%&delay_slot%);
  201. slotclick(%#slot_vara%);
  202. endif;
  203. wait(100ms);
  204. elseif(DURABILITY <= #durabilidade_minima);
  205. if(HEALTH != 20);
  206. set(fim);
  207. set(reparar);
  208. else;
  209. getslot(%#linha%,#slot_linha);
  210. if(#slot_linha == -1);
  211. log("&b&o(Macro Pesca VIP) &c&oLinha não encontrada!");
  212. set(sem_linha);
  213. set(fim);
  214. else;
  215. log("&b&o(Macro Pesca VIP) &a&oReparando...");
  216. echo("/reparar");
  217. endif;
  218. wait(500ms);
  219. endif;
  220. else;
  221. look(%#yaw%,%#pitch%);
  222. key(use);
  223. wait(%&delay_pesca%);
  224. endif;
  225. until(fim);
  226. do;
  227. do;
  228. getidrel(0,-1,0,#vf);
  229. if(#vf == #bloco_ferro);
  230. #yaw = %YAW%;
  231. #pitch = %PITCH%;
  232. if(#yaw >= 180);
  233. dec(#yaw,180);
  234. else;
  235. inc(#yaw,180);
  236. endif;
  237. achievementget("Local OK!","%#vf%");
  238. break;
  239. else;
  240. set(&cordenadas,"%XPOS%/%YPOS%/%ZPOS%");
  241. endif;
  242. achievementget("/home %&home_limpar_rep%","%#vf%");
  243. echo("/home %&home_limpar_rep%");
  244. do(80);
  245. set(&cordenadas_teleporte,"%XPOS%/%YPOS%/%ZPOS%");
  246. wait(100ms);
  247. until(&cordenadas_teleporte != &cordenadas);
  248. loop;
  249. unsafe;
  250. for(#slot,9,44);
  251. if(GUI != "GUIINVENTORY");
  252. do;
  253. set(#slot,9);
  254. gui(inventory);
  255. wait(10t);
  256. until(GUI == "GUIINVENTORY");
  257. endif;
  258. getslotitem(%#slot%,#item);
  259. if((reparar)&&(!sem_linha));
  260. set(#slot,9);
  261. getslot(%#linha%,#slot_linha2);
  262. if(#slot_linha2 == -1);
  263. set(sem_linha);
  264. else;
  265. do(2);
  266. pick(%#vara%);
  267. look(%#yaw%,90);
  268. key(use);
  269. wait(100ms);
  270. loop;
  271. endif;
  272. if(DURABILITY > #durabilidade_minima);
  273. unset(reparar);
  274. endif;
  275. elseif((#item != #vara)&&(#item != #linha)||(sem_vara)&&(#slot_vazio == -1)&&(#slot > 43));
  276. look(%#yaw%,%#pitch%);
  277. slotclick(%#slot%);
  278. wait(%&delay_slot%);
  279. slotclick(-999);
  280. endif;
  281. next;
  282. endunsafe;
  283. until(!reparar);
  284. wait(500ms);
  285. if((sem_vara)||(sem_linha));
  286. unset(home_absolut);
  287. do;
  288. if(sem_vara);
  289. &home_comprar = "%&home_vara%";
  290. log("&b&o(Macro Pesca) &a&oIndo comprar &b&oVara!");
  291. elseif(sem_linha);
  292. &home_comprar = "%&home_linha%";
  293. log("&b&o(Macro Pesca) &a&oIndo comprar &b&oLinha!");
  294. endif;
  295. do;
  296. if(HITID == #placa);
  297. #yaw = %YAW%;
  298. #pitch = %PITCH%;
  299. if(#yaw >= 180);
  300. dec(#yaw,180);
  301. else;
  302. inc(#yaw,180);
  303. endif;
  304. set(home_absolut);
  305. achievementget("/esconder","%#vf%");
  306. echo("/esconder");
  307. wait(100ms);
  308. achievementget("/menuloja on","%#vf%");
  309. echo("/menuloja on");
  310. break;
  311. else;
  312. set(&cordenadas,"%XPOS%/%YPOS%/%ZPOS%");
  313. endif;
  314. echo("/home %&home_comprar%");
  315. do(80);
  316. set(&cordenadas_teleporte,"%XPOS%/%YPOS%/%ZPOS%");
  317. wait(100ms);
  318. until(&cordenadas_teleporte != &cordenadas);
  319. loop;
  320. unset(ok);
  321. do;
  322. if(GUI != "GUICHEST");
  323. do;
  324. look(%#yaw%,%#pitch%);
  325. key(attack);
  326. wait(10t);
  327. until(GUI == "GUICHEST");
  328. endif;
  329. if((sem_vara)&&(&home_comprar == &home_vara));
  330. getslot(%#vara%,#slot_vara2,9);
  331. if(#slot_vara2 != -1);
  332. unset(sem_vara);
  333. else;
  334. slotclick(1);
  335. wait(%&delay_compra%);
  336. endif;
  337. elseif((sem_linha)&&(&home_comprar == &home_linha));
  338. getslot(0,#slot_vazio,9);
  339. if(#slot_vazio == -1);
  340. unset(sem_linha);
  341. else;
  342. slotclick(2);
  343. wait(%&delay_compra%);
  344. endif;
  345. else;
  346. set(ok);
  347. endif;
  348. until(ok);
  349. until((!sem_vara)&&(!sem_linha));
  350. endif;
  351. loop;
  352. loop;
  353. }$$
  354.  
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!