SHARE
TWEET

Mobrep vip

a guest Nov 8th, 2019 75 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  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. }$$
RAW Paste Data
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
 
Top