[Pedido] Macro de escavação

Bem-vindo!

Ao se registrar conosco, você poderá discutir, compartilhar e enviar mensagens privadas com outros membros da nossa comunidade.

Registrar agora!


Status
Não está aberto para novas respostas.
Ta ai,ve se não ta bugado.

Código:
$${
if(cav1);
 
    log( );
    log("&6&l[MACRO] &d&lCava-Cava 2.0&4&l (OFF)");
    log( );
    unset(mrb);
    unset(cav1);
    unset(cav2);
    unset(@cav);
    unset(nperg);
    stop();
 
else;
 
    log( );
    log("&6&l[MACRO] &d&lCava-Cava 2.0&2&l (ON)");
    log( );
    ACHIEVEMENTGET("by MrBlueees",351:4);
    set(cav1);
    set(cav2);
 
endif;
 
#bau=1;
 
IFMATCHES(%DIRECTION%,N);&near=NORTH;ENDIF;
IFMATCHES(%DIRECTION%,S);&near=SOUTH;ENDIF;
IFMATCHES(%DIRECTION%,W);&near=WEST;ENDIF;
IFMATCHES(%DIRECTION%,E);&near=EAST;ENDIF;
 
if(%#bloco%=nothing);set(nperg);&cont=n;endif;
if(%#pa%=nothing);set(nperg);&cont=n;endif;
if(%#dur%=nothing);set(nperg);&cont=n;endif;
if(%#del%=nothing);set(nperg);&cont=n;endif;
if(%#hit%=nothing);set(nperg);&cont=n;endif;
 
if(nperg);
else;
PROMPT(&cont,$$?,"Deseja continuar com a última configuraçao? (s/n)");
endif;
 
IFBEGINSWITH(%&cont%,n);
IFENDSWITH(%&cont%,n);
 
PROMPT(#bloco,$$i,Que bloco usará para cavar?);
 
PROMPT(#pa,$$i,Que tipo de pá irá ser usada?);
 
if(%#pa%=277);#rep=264;endif;
if(%#pa%=256);#rep=265;endif;
if(%#pa%=284);#rep=266;endif;
if(%#pa%=269);#rep=125;endif;
if(%#pa%=273);#rep=4;endif;
 
PROMPT(#dur,$$?,Em qual durabilidade você quer reparar sua pá?);
#dur=%#dur%;
PROMPT(#del,$$?,Qual delay para verificar o inventário? Recomendado: 300 - 400);
 
PROMPT(#hit,$$?,"Quantos hits para quebrar o bloco? Exemplos: 1 = pá eficiência 5 || 10 ou mais = pá de pedra");
 
if(%#bloco%=nothing);log("&cResposta inválida, configure novamente.");
    unset(mrb);
    unset(cav1);
    unset(cav2);
    unset(@cav);
    unset(nperg);
    stop();
endif;
if(%#pa%=nothing);log("&cResposta inválida, configure novamente.");
    unset(mrb);
    unset(cav1);
    unset(cav2);
    unset(@cav);
    unset(nperg);
    stop();
endif;
if(%#dur%=nothing);log("&cResposta inválida, configure novamente.");
    unset(mrb);
    unset(cav1);
    unset(cav2);
    unset(@cav);
    unset(nperg);
    stop();
endif;
if(%#del%=nothing);log("&cResposta inválida, configure novamente.");
    unset(mrb);
    unset(cav1);
    unset(cav2);
    unset(@cav);
    unset(nperg);
    stop();
endif;
if(%#hit%=nothing);log("&cResposta inválida, configure novamente.");
    unset(mrb);
    unset(cav1);
    unset(cav2);
    unset(@cav);
    unset(nperg);
    stop();
endif;
 
ENDIF;
ENDIF;
 
 
set(mrb);
set(@cav);
if(mrb);
look(%&near%);
look(,30);
 
do;
 
    do(%#del%);
 
        pick(%#bloco%);
        key(use);
        wait(1ms);   
        pick(%#pa%);
 
            if(%DURABILITY%<%#dur%);
 
                look(%&near%);
                look(,90);
                key(use);
                wait(2);
 
            endif;
 
        look(%&near%);
        look(,30);
        do(%#hit%);
        key(attack);
        loop;
 
    loop;
 
 
    if(cav2);
 
        gui(inventory);
        wait(10ms);
        getslotitem(35,#id,#stack);
 
        if(%#stack%=0);
            gui();
        else;
        wait(1);
        do;
//=================BAUS=================//
}$$
 
$${if(%#bau%=1);}$$
/home esc1
$${endif;}$$
 
$${if(%#bau%=2);}$$
/home esc2
$${endif;}$$
 
$${if(%#bau%=3);}$$
/home esc3
$${endif;}$$
 
$${if(%#bau%=4);}$$
/home esc4
$${endif;}$$
 
$${if(%#bau%=5);}$$
/home esc5
$${endif;}$$
 
$${if(%#bau%=6);}$$
/home esc6
$${endif;}$$
 
$${if(%#bau%=7);}$$
/home esc7
$${endif;}$$
 
$${if(%#bau%=8);}$$
/home esc8
$${endif;}$$
 
$${if(%#bau%=9);}$$
/home esc9
$${endif;}$$
 
$${if(%#bau%=10);}$$
/home esc10
$${endif;}$$
 
$${if(%#bau%=11);}$$
/home esc11
$${endif;}$$
 
$${if(%#bau%=12);}$$
/home esc12
$${endif;}$$
 
$${if(%#bau%=13);}$$
/home esc13
$${endif;}$$
 
$${if(%#bau%=14);}$$
/home esc14
$${endif;}$$
 
$${if(%#bau%=15);}$$
/home esc15
$${endif;}$$
 
$${if(%#bau%=16);}$$
/home esc16
$${endif;}$$
 
$${if(%#bau%=17);}$$
/home esc17
$${endif;}$$
 
$${if(%#bau%=18);}$$
/home esc18
$${endif;}$$
 
$${if(%#bau%=19);}$$
/home esc19
$${endif;}$$
 
$${if(%#bau%=20);}$$
/home esc20
$${endif;}$$
 
$${if(%#bau%=21);}$$
/home esc21
$${endif;}$$
 
$${if(%#bau%=22);}$$
/home esc22
$${endif;}$$
 
$${if(%#bau%=23);}$$
/home esc23
$${endif;}$$
 
$${if(%#bau%=24);}$$
/home esc24
$${endif;}$$
 
$${if(%#bau%=25);}$$
/home esc25
$${endif;}$$
 
$${if(%#bau%=26);}$$
/home esc26
$${endif;}$$
 
$${if(%#bau%=27);}$$
/home esc27
$${endif;}$$
 
$${if(%#bau%=28);}$$
/home esc28
$${endif;}$$
 
$${if(%#bau%=29);}$$
/home esc29
$${endif;}$$
 
$${if(%#bau%=30);}$$
/home esc30
$${endif;}$$
 
$${if(%#bau%=31);}$$
/home esc31
$${endif;}$$
 
$${if(%#bau%=32);}$$
/home esc32
$${endif;}$$
 
$${if(%#bau%=33);}$$
/home esc33
$${endif;}$$
 
$${if(%#bau%=34);}$$
/home esc34
$${endif;}$$
 
$${if(%#bau%=35);}$$
/home esc35
$${endif;}$$
 
$${if(%#bau%=36);}$$
/home esc36
$${endif;}$$
 
$${if(%#bau%=37);}$$
/home esc37
$${endif;}$$
 
$${if(%#bau%=38);}$$
/home esc38
$${endif;}$$
 
$${if(%#bau%=39);}$$
/home esc39
$${endif;}$$
 
$${if(%#bau%=40);}$$
/home esc40
$${endif;}$$
 
$${if(%#bau%=41);}$$
/home esc41
$${endif;}$$
 
$${if(%#bau%=42);}$$
/home esc42
$${endif;}$$
 
$${if(%#bau%=43);}$$
/home esc43
$${endif;}$$
 
$${if(%#bau%=44);}$$
/home esc44
$${endif;}$$
 
$${if(%#bau%=45);}$$
/home esc45
$${endif;}$$
 
$${if(%#bau%=46);}$$
/home esc46
$${endif;}$$
 
$${if(%#bau%=47);}$$
/home esc47
$${endif;}$$
 
$${if(%#bau%=48);}$$
/home esc48
$${endif;}$$
 
$${if(%#bau%=49);}$$
/home esc49
$${endif;}$$
 
$${if(%#bau%=50);}$$
/home esc50
$${endif;}$$
 
$${if(%#bau%=51);}$$
/home esc51
$${endif;}$$
 
$${if(%#bau%=52);}$$
/home esc52
$${endif;}$$
 
$${if(%#bau%=53);}$$
/home esc53
$${endif;}$$
 
$${if(%#bau%=54);}$$
/home esc54
$${endif;}$$
 
$${if(%#bau%=55);}$$
/home esc55
$${endif;}$$
 
$${if(%#bau%=56);}$$
/home esc56
$${endif;}$$
 
$${if(%#bau%=57);}$$
/home esc57
$${endif;}$$
 
$${if(%#bau%=58);}$$
/home esc58
$${endif;}$$
 
$${if(%#bau%=59);}$$
/home esc59
$${endif;}$$
 
$${if(%#bau%=60);}$$
/home esc60
$${endif;}$$
 
$${if(%#bau%=61);}$$
/home esc61
$${endif;}$$
 
$${if(%#bau%=62);}$$
/home esc62
$${endif;}$$
 
$${if(%#bau%=63);}$$
/home esc63
$${endif;}$$
 
$${if(%#bau%=64);}$$
/home esc64
$${endif;}$$
 
$${if(%#bau%=65);}$$
/home esc65
$${endif;}$$
 
$${if(%#bau%=66);}$$
/home esc66
$${endif;}$$
 
$${if(%#bau%=67);}$$
/home esc67
$${endif;}$$
 
$${if(%#bau%=68);}$$
/home esc68
$${endif;}$$
 
$${if(%#bau%=69);}$$
/home esc69
$${endif;}$$
 
$${if(%#bau%=70);}$$
/home esc70
$${endif;}$$
 
 
 
$${
//======================================//
    wait(5);
    key(use);
    wait(1);
 
    for(#slotn,54,89);
 
        getslotitem(%#slotn%,#id,#stack);
 
        if((%#id%=%#pa%) || (%#id%=%#bloco%) || (%#id%=%#rep%));
        else;
            slotclick(%#slotn%,l,true);
            wait(30ms);
        endif;
 
    next;
 
    wait(500ms);
    getslotitem(53,#id,#stack);
    wait(500ms);
 
    if(%#stack%!=0);
 
        inc(#bau);
    
    else;
 
    endif;
 
    if(%#bau%=71);
 
        unset(cav2);
        log("&cBaús cheios! Voltando a escavar somente.");
        gui();
 
    else;
 
        gui();
 
    endif;
 
    until(%#stack%=0);
 
    endif;
 
        }$$/home macroesc$${
        wait(4);
 
    gui(inventory);
    wait(600ms);
    
 
    for(#slot,9,35);
 
        GETSLOTITEM(%#slot%,#id,#stack);
 
        if((%#id%=%#pa%) || (%#id%=%#bloco%) || (%#id%=%#rep%));
 
            slotclick(%#slot%,l,true);wait(30ms);
        else;
        endif;
    next;
 
    gui();
    
endif;
loop;
endif;
 
}$$
 
Status
Não está aberto para novas respostas.

Usuários que estão visualizando este tópico

Voltar
Topo