API tools faq
paste
Advertisement
Guest User

Mobrep vip

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