API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Dec 9th, 2019
124
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 22.68 KB | None | 0 0
raw download clone embed print report
  1. $${
  2. toggle(mobrep)
  3. if(mobrep)
  4. LOG("&6[&fMob&4REP&6] &6vip &be &7nao-vip &2LIGADO")
  5. /////////////////////////////////////////////////
  6. //////////by zMatheus22 Region1 Owna/////////////
  7. //////////agradecimentos://@lomexicano////////////
  8. //////////me ajudou muito nessa macro////////////////////////////
  9.  
  10. &swords = "diamond_sword|iron_sword|stone_sword|wooden_sword|gold_sword";
  11. #delay_slotclick = 30
  12. SET(#delay,40)
  13. #slott = 1
  14.  
  15. if(!@ligar_mobrep);
  16. unset(&slot36_test);unset(#slot36_test);
  17. Gui(inventory);
  18. getslotitem(36,&slot36_test);
  19. getslotitem(36,#slot36_test);
  20. IF(#slot36_test);
  21. set(@versao15);unset(@versao18);
  22. ElseIF(&slot36_test);
  23. unset(@versao15);set(@versao18);
  24. Endif;
  25. Gui();
  26. Log("");
  27. IF(@versao15);LOG("&fSua versao do minecraft é: &a1.5");ENDIF;
  28. IF(@versao18);LOG("&fSua versao do minecraft é: &a1.8");ENDIF;
  29. Log("");
  30. wait(700ms);
  31. ///////// Sethomes
  32.  
  33.  
  34. do();
  35. clearchat;
  36. log(" ");
  37. log("&6[&fMob&4REP&6] &7Escolha as opçoes");
  38. log(" ");
  39. if(reparar);log("&e[1] [&aReparar&e] &7Trocar ou reparar espada/machado?");endif;
  40. if(trocar);log("&e[1] [&cTrocar&e] &7Trocar ou reparar espada/machado?");endif;
  41. if((!trocar)&&(!reparar));log("&e[1] [&6Escolha&e] &7Trocar ou reparar?");endif;
  42.  
  43. if(vender_osso);log("&e[2] [&aVender&e] &7Vai vender ou jogar fora os ossos?");endif;
  44. if(!vender_osso);log("&e[2] [&cJogar fora&e] &7Vai vender ou jogar fora os ossos?");endif;
  45.  
  46. if(vip);log("&e[3] [&aSim&e] &7Voce é &6VIP&7?");endif;
  47. if(!vip);log("&e[3] [&cNao&e] &7Voce é &6VIP&7?");endif;
  48. log("");
  49. log("&fAperte &aENTER &fpara confirmar.");
  50.  
  51. log("");
  52. IF(KEY_1);
  53. if(trocar);unset(trocar);set(reparar);elseif(!trocar);set(trocar);unset(reparar);endif;
  54. do;wait(100ms);until(!KEY_1);
  55. ENDIF;
  56. IF(KEY_2);
  57. if(vender_osso);unset(vender_osso);elseif(!vender_osso);set(vender_osso);endif;
  58. do;wait(100ms);until(!KEY_2);
  59. ENDIF;
  60. IF(KEY_3);
  61. if(vip);unset(vip);elseif(!vip);set(vip);endif;
  62. do;wait(100ms);until(!KEY_3);
  63. ENDIF;
  64. IF(KEY_RETURN);
  65. do;wait(50ms);until(!KEY_RETURN);
  66. break;
  67. ENDIF;
  68. loop;
  69. if(@versao15);
  70. &saveitens = "^276$|^57$|^42$|^287$|^387$|^310$|^267$|^272$|^1$|^283$|^41$|^268$|^17$|^311$|^312$|^313$|^278$|^279$|^275$|^271$|^286$|^VENDEROSSO$"
  71. elseif(@versao18);
  72. &saveitens = "^diamond_sword$|^diamond_block$|^iron_block$|^string$|^written_book$|^diamond_helmet$|^iron_sword$|^stone_sword$|^stone$|^gold_sword$|^gold_block$|^wooden_sword$|^log$|^diamond_chestplate$|^diamond_leggings$|^diamond_boots$|^diamond_pickaxe$|^diamond_axe$|^stone_axe$|^wooden_axe$|^gold_axe$|^VENDEROSSO$"
  73. endif;
  74. IF(@versao15);
  75. IF(!vender_osso);
  76. replace(&saveitens,"VENDEROSSO","352");
  77. ElseIF(vender_osso);
  78. replace(&saveitens,"352","VENDEROSSO");
  79. Endif;
  80. Elseif(@versao18);
  81. IF(!vender_osso);
  82. replace(&saveitens,"VENDEROSSO","bone");
  83. ElseIF(vender_osso);
  84. replace(&saveitens,"bone","VENDEROSSO");
  85. Endif;
  86. Endif;
  87. SET(&zmob,"mobrep")
  88. IF(vip);
  89. SET(&zmoblinha,"vd_linha");
  90. SET(&zosso,"vd_osso");
  91. ELSEIF(!vip);
  92. SET(&zmoblinha,"vd_linhanv");
  93. SET(&zosso,"vd_ossonv");
  94. ENDIF;
  95. &iron_block = "bloco_ferro";
  96. endif;
  97. unset(@ligar_mobrep);
  98. ////////
  99. Echo("/g &f")
  100. #xcoord = %XPOS%;
  101. #zcoord = %ZPOS%;
  102. echo("/home %&zmob%");
  103. wait(3);
  104. Do(10);
  105. wait(500ms);
  106. Until((%XPOS% != %#xcoord%)|(%XPOS% != %#xcoord%)|(%HITID% = 51));
  107. wait(1);
  108. if(%DIRECTION% = "N");&frente = "north";&atras = "south";&direita = "east";&esquerda = "west";endif;if(%DIRECTION% = "S");&frente = "south";&atras = "north";&direita = "west";&esquerda = "east";endif;if(%DIRECTION% = "E");&frente = "east";&atras = "west";&direita = "south";&esquerda = "north";endif;if(%DIRECTION% = "W");&frente = "west";&atras = "east";&direita = "north";&esquerda = "east";endif;
  109.  
  110. Do
  111. IF(reparar);
  112. Do;
  113. IF(@versao15);
  114. GETIDREL(0,-1,0,#foot_block);
  115. if(#foot_block = 42);
  116. LOG("&6[&fMob&4REP&6]: &7Bloco de ferro localizado.");
  117. Break;
  118. else;
  119. LOG("&6[&fMob&4REP&6] &cNao localizado &fbloco de ferro &ca baixo.!");
  120. stop;
  121. endif;
  122. ElseIF(@versao18);
  123. GETIDREL(0,-1,0,&foot_block);
  124. if(&foot_block = "iron_block");
  125. LOG("&6[&fMob&4REP&6]: &7Bloco de ferro localizado.");
  126. Break;
  127. else;
  128. LOG("&6[&fMob&4REP&6] &cNao localizado &fbloco de ferro &ca baixo.!");
  129. stop;
  130. endif;
  131. Endif;
  132. loop;
  133. ENDIF;
  134. Unsafe(0);
  135. Do();
  136. IF(reparar);
  137. IF(@versao15);
  138. pick(276,267,272,268,283);
  139. Elseif(@versao18);
  140. pick("diamond_sword","iron_sword","stone_sword","wooden_sword","gold_sword");
  141. Endif;
  142. ENDIF;
  143. IF(trocar);
  144. SLOT(%#slott%);
  145. ENDIF;
  146. wait(200ms);
  147. do(%#delay%);
  148. IF(%DURABILITY% < 25);
  149. IF(reparar);
  150. LOG("&6[&fMob&4REP&6] &7Durabilidade baixa, &aReparando...");
  151. gui();
  152. wait(50ms);
  153. look(+0,90);
  154. Do(3);
  155. key(use);
  156. wait(200ms);
  157. loop;
  158. LOG("&6[&fMob&4REP&6] &7Espada/Machado &2Reparado.");
  159. ELSEIF(trocar);
  160. IF(#slott >= 10);
  161. #slott = 0;
  162. playsound(note.harp);
  163. LOG(" ");
  164. LOG("&6[&fMob&4REP&6] &7Todas as suas espadas/Machados Foram usadas.");
  165. LOG(" ");
  166. Stop;
  167. ENDIF;
  168. INC(#slott,1);LOG(INC);
  169. SLOT(%#slott%);
  170. LOG("&6[&fMob&4REP&6] &7Espada/Machado &ccom durabilidade &4Baixa, &cTrocando");
  171. ENDIF;
  172. Endif
  173. //action
  174. IF(@versao15);
  175. IF(reparar);
  176. pick(276,267,272,268,283);
  177. ElseIF(trocar);
  178. Slot(%#slott%);
  179. Endif;
  180. Elseif(@versao18);
  181. IF(reparar);
  182. pick("diamond_sword","iron_sword","stone_sword","wooden_sword","gold_sword");
  183. ElseIF(trocar);
  184. Slot(%#slott%);
  185. Endif;
  186. Endif;
  187. key(attack)
  188. wait(50ms);
  189. look(%&frente%)
  190. IF(%GUI% = "GUICHAT");LOG("&6[&fMob&4REP&6]: &aSeu CHAT foi aberto, Aguardando o fechamento.");Do();wait(500ms);Until(%GUI% = "NONE");ENDIF;
  191. loop
  192. gui(inventory)
  193. if(@versao15)
  194. getslotitem(35,#slot35)
  195. if(#slot35 != 0)
  196. LOG("&6[&fMob&4REP&6] &7Inventario Lotado. &2Iniciando processo.")
  197. break
  198. endif
  199. elseif(@versao18)
  200. getslotitem(35,&slot35)
  201. if(&slot35 != "air")
  202. LOG("&6[&fMob&4REP&6] &7Inventario Lotado. &2Iniciando processo.")
  203. break
  204. endif
  205. endif
  206. Gui();
  207. Loop
  208. Endunsafe;
  209. unsafe(0);
  210. LOG("&6[&fMob&4REP&6] &7Verificando Inventario e &cRemovendo Flechas&7.")
  211. wait(100ms)
  212. looks(%&atras%)
  213. wait(300ms)
  214. do(3)
  215. wait(1ms);
  216. gui(inventory)
  217. if(@versao15)
  218. getslot(262,#flecha)
  219. getslot(352,#osso);
  220. ELSEIF(@versao18)
  221. getslot("arrow",#flecha)
  222. getslot("bone",#osso);
  223. endif
  224. if(vender_osso);
  225. if(#flecha = -1)
  226. break
  227. else
  228. slotclick(%#flecha%,l,false)
  229. wait(20ms)
  230. slotclick(-999)
  231. wait(20ms)
  232. endif
  233. elseif(!vender_osso);
  234. if((#flecha = -1)&&(#osso = -1))
  235. break
  236. else
  237. slotclick(%#flecha%,l,false)
  238. wait(20ms)
  239. slotclick(-999)
  240. wait(20ms)
  241. //
  242. slotclick(%#osso%,l,false)
  243. wait(20ms)
  244. slotclick(-999)
  245. wait(20ms)
  246. endif
  247. endif;
  248. loop
  249. endunsafe
  250. IF(vender_osso);
  251. #xcoord = %XPOS%
  252. #zcoord = %ZPOS%
  253. Echo("/home zmatheus22 %&zosso%")
  254. wait(1)
  255. Do(15)
  256. wait(500ms)
  257. Until((%#xcoord% != %XPOS%)|(%#zcoord% != %ZPOS%))
  258. wait(500ms)
  259. echo("/menuloja off")
  260. echo("/esconder")
  261. Unsafe;
  262. do()
  263. Do(3);key(attack);wait(350ms);loop;
  264. Gui(inventory);
  265. IF(@versao15);
  266. GETSLOT(352,#slot_osso);
  267. Elseif(@versao18);
  268. GETSLOT("bone",#slot_osso);
  269. Endif;
  270. IF(#slot_osso != -1);
  271. LOG("&cAinda ha ossos no inventário.");
  272. Keydown(jump);wait(300ms);keyup(jump);
  273. Else;
  274. LOG("&aTodos os ossos foram vendidos.");
  275. Gui();
  276. BREAK;
  277. ENDIF;
  278. Gui();
  279. loop
  280. Endunsafe;
  281. look(0,90)
  282. wait(450ms)
  283. ENDIF;
  284. Do
  285. LOG("&6[&fMob&4REP&6] &cDesbugando Linhas...")
  286. unsafe
  287. if(%GUI% != "GUIINVENTORY")
  288. gui(inventory)
  289. endif
  290. wait(10ms)
  291. if(@versao15);getslot(287,#stringhx);elseif(@versao18);getslot("string",#stringhx);endif;
  292. #contalinha = 0
  293. for(#slot,9,44)
  294. if(@versao15);
  295. getslotitem(%#slot%,#oq,#stack);
  296. if(#oq = 287)
  297. inc(#contalinha,%#stack%)
  298. endif
  299. elseif(@versao18);
  300. getslotitem(%#slot%,&oq,#stack);
  301. if(&oq = "string")
  302. inc(#contalinha,%#stack%)
  303. endif
  304. endif;
  305. next
  306. endunsafe
  307. if(%GUI% != "GUIINVENTORY");
  308. gui(inventory)
  309. endif
  310.  
  311. if(#contalinha >= 60)
  312. LOG("&6[&fMob&4REP&6] &cLinhas no inventario &asuficientes, &cvoltando para trap")
  313. break
  314. else
  315. LOG("&f&l[MobREP] &cLinhas no inventario insuficientes, comprando linhas")
  316. do
  317. GUI()
  318. until(%GUI% != "GUIINVENTORY")
  319. #xcoord = %XPOS%
  320. #zcoord = %ZPOS%
  321. echo("/home zmatheus22 %&zmoblinha%")
  322. wait(2)
  323. Do(15)
  324. wait(500ms)
  325. Until((%#xcoord% != %XPOS%)|(%#zcoord% != %ZPOS%))
  326.  
  327. wait(%#naovip%ms)
  328. wait(100ms)
  329. echo("/menuloja on")
  330. wait(100ms)
  331. echo("/esconder")
  332. do
  333. key(use)
  334. wait(500ms)
  335. until(%GUI% = "GUICHEST")
  336. wait(1)
  337. slotclick(2,l,false)
  338. wait(1)
  339. endif
  340. Loop
  341. gui()
  342. IF(vip);
  343. #xcoord = %XPOS%;
  344. #zcoord = %ZPOS%;
  345. echo("/home zmatheus22 %&iron_block%");
  346. wait(1);
  347. Do(15);
  348. wait(100ms);
  349. Until((%XPOS% != %#xcoord%)|(%XPOS% != %#xcoord%));
  350. Echo("/esconder");
  351. LOG("&6[&fMob&4REP&6] &7Iniciando processo de reparaçao.")
  352. ELSEIF(!vip);
  353. #xcoord = %XPOS%;
  354. #zcoord = %ZPOS%;
  355. echo("/home %&zmob%");
  356. wait(3);
  357. Do(15);
  358. wait(100ms);
  359. Until((%XPOS% != %#xcoord%)|(%XPOS% != %#xcoord%));
  360. Echo("/esconder");
  361. LOG("&6[&fMob&4REP&6] &7Iniciando processo de reparaçao.")
  362. ENDIF;
  363. Unsafe(0);
  364. do(1)
  365. for(#slot,1,9)
  366. slot(%#slot%)
  367. wait(5ms)
  368. do(1)
  369. if(@versao15);
  370. if((%ITEM% = 261)&&(%DURABILITY% < 320))
  371. look(+0,90)
  372. wait(5ms)
  373. do(30);key(use);wait(1ms);Until(%DURABILITY% > 320);
  374. else
  375. break
  376. endif
  377. elseif(@versao18);
  378. if((%ITEM% = "bow")&&(%DURABILITY% < 320))
  379. look(+0,90)
  380. wait(5ms)
  381. do(30);key(use);wait(1ms);Until(%DURABILITY% > 320);
  382. else
  383. break
  384. endif
  385. Endif;
  386. loop
  387. next
  388. loop
  389.  
  390. wait(100ms)
  391. do()
  392. gui(inventory)
  393. wait(100ms)
  394. until(%GUI% == "GUIINVENTORY")
  395. wait(100ms)
  396.  
  397. for(#var,0,8)
  398. #slot1 = 9 + #var
  399. #slot2 = 36 + #var
  400. slotclick(%#slot1%,l,false)
  401. wait(40ms)
  402. slotclick(%#slot2%,l,false)
  403. wait(40ms)
  404. slotclick(%#slot1%,l,false)
  405. wait(40ms)
  406. next
  407.  
  408. gui()
  409.  
  410. do(1)
  411. for(#slot,1,9)
  412. slot(%#slot%)
  413. wait(25ms)
  414. do(1)
  415. if(@versao15);
  416. if((%ITEM% = 261)&&(%DURABILITY% < 320))
  417. look(+0,90)
  418. wait(5ms)
  419. do(30);key(use);wait(1ms);Until(%DURABILITY% > 320);
  420. else
  421. break
  422. endif
  423. elseif(@versao18);
  424. if((%ITEM% = "bow")&&(%DURABILITY% < 320))
  425. look(+0,90)
  426. wait(5ms)
  427. do(30);key(use);wait(1ms);Until(%DURABILITY% > 320);
  428. else
  429. break
  430. endif
  431. Endif;
  432. loop
  433. next
  434. loop
  435.  
  436. wait(100ms)
  437. do()
  438. gui(inventory)
  439. wait(100ms)
  440. until(%GUI% == "GUIINVENTORY")
  441. wait(100ms)
  442.  
  443. for(#var,0,8)
  444. #slot1 = 18 + #var
  445. #slot2 = 36 + #var
  446. slotclick(%#slot1%,l,false)
  447. wait(40ms)
  448. slotclick(%#slot2%,l,false)
  449. wait(40ms)
  450. slotclick(%#slot1%,l,false)
  451. wait(40ms)
  452. next
  453.  
  454. gui()
  455.  
  456. do(1)
  457. for(#slot,1,9)
  458. slot(%#slot%)
  459. wait(25ms)
  460. do(1)
  461. if(@versao15);
  462. if((%ITEM% = 261)&&(%DURABILITY% < 320))
  463. look(+0,90)
  464. wait(5ms)
  465. do(30);key(use);wait(1ms);Until(%DURABILITY% > 320);
  466. else
  467. break
  468. endif
  469. elseif(@versao18);
  470. if((%ITEM% = "bow")&&(%DURABILITY% < 320))
  471. look(+0,90)
  472. wait(5ms)
  473. do(30);key(use);wait(1ms);Until(%DURABILITY% > 320);
  474. else
  475. break
  476. endif
  477. Endif;
  478. loop
  479. next
  480. loop
  481.  
  482. wait(300ms)
  483. do()
  484. gui(inventory)
  485. wait(100ms)
  486. until(%GUI% == "GUIINVENTORY")
  487. wait(500ms)
  488.  
  489. for(#var,0,8)
  490. #slot1 = 27 + #var
  491. #slot2 = 36 + #var
  492. slotclick(%#slot1%,l,false)
  493. wait(40ms)
  494. slotclick(%#slot2%,l,false)
  495. wait(40ms)
  496. slotclick(%#slot1%,l,false)
  497. wait(40ms)
  498. next
  499.  
  500. gui()
  501.  
  502. do(1)
  503. for(#slot,1,9)
  504. slot(%#slot%)
  505. wait(25ms)
  506. do(1)
  507. if(@versao15);
  508. if((%ITEM% = 261)&&(%DURABILITY% < 320))
  509. look(+0,90)
  510. wait(5ms)
  511. do(30);key(use);wait(1ms);Until(%DURABILITY% > 320);
  512. else
  513. break
  514. endif
  515. elseif(@versao18);
  516. if((%ITEM% = "bow")&&(%DURABILITY% < 320))
  517. look(+0,90)
  518. wait(5ms)
  519. do(30);key(use);wait(1ms);Until(%DURABILITY% > 320);
  520. else
  521. break
  522. endif
  523. Endif;
  524. loop
  525. next
  526. loop
  527. IF(vip);
  528. #xcoord = %XPOS%;
  529. #zcoord = %ZPOS%;
  530. echo("/home %&zmob%");
  531. wait(3);
  532. Do(10);
  533. wait(500ms);
  534. Until((%XPOS% != %#xcoord%)|(%XPOS% != %#xcoord%));
  535. wait(1);
  536. if(%DIRECTION% = "N");&frente = "north";&atras = "south";&direita = "east";&esquerda = "west";endif;if(%DIRECTION% = "S");&frente = "south";&atras = "north";&direita = "west";&esquerda = "east";endif;if(%DIRECTION% = "E");&frente = "east";&atras = "west";&direita = "south";&esquerda = "north";endif;if(%DIRECTION% = "W");&frente = "west";&atras = "east";&direita = "north";&esquerda = "east";endif;
  537. wait(1)
  538. ENDIF;
  539. look(%&atras%)
  540. wait(100ms)
  541. gui(inventory)
  542. for(#slot,9,44)
  543. if(@versao15);
  544. getslotitem(%#slot%,#item)
  545. ifmatches(%#item%,%&saveitens%)
  546. else
  547. slotclick(%#slot%,l,false)
  548. wait(10ms)
  549. slotclick(-999)
  550. endif
  551. elseif(@versao18);
  552. getslotitem(%#slot%,&item)
  553. ifmatches(%&item%,%&saveitens%)
  554. else
  555. slotclick(%#slot%,l,false)
  556. wait(10ms)
  557. slotclick(-999)
  558. endif
  559. endif;
  560. next
  561. IF(trocar);
  562. FOR(#hotbar,36,44)
  563. slotclick(%#hotbar%,l,true)
  564. wait(50ms)
  565. NEXT
  566. wait(200ms)
  567. FOR(#backslot,9,17)
  568. slotclick(%#backslot%,l,true)
  569. wait(100ms)
  570. NEXT
  571. ELSEIF(reparar);
  572. For(#sword_search,9,44);
  573. getslotitem(%#sword_search%,&slot_sword);
  574. IFmatches("%&slot_sword%","%&swords%");
  575. Slotclick(%#sword_search%,l,false);wait(50ms);
  576. Slotclick(36,l,false);wait(50ms);
  577. Slotclick(%#sword_search%,l,false);wait(50ms);
  578. BREAK;
  579. Endif;
  580. Next;
  581. ENDIF;
  582. gui()
  583. Endunsafe;
  584. LOOP
  585.  
  586. else
  587. LOG("&6[&fMob&4REP&6] &7MobREP &cDESLIGADO")
  588. stop
  589. endif
  590.  
  591. }$$
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!