ENTREGUE [Tutorial] Macro Super pesca 48baús Não VIP ou VIP

Discussão em 'Macro Entregue' iniciado por gabrielgarciamarini, 8 Fevereiro 2014.

Status do Tópico:
Não esta aberto para novas mensagens.
  1. gabrielgarciamarini

    VIP

    Afiliado:
    3 Fevereiro 2013
    Mensagens:
    80
    Curtidas Recebidas:
    275
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    São Paulo
    Cubos:
    361.00
    Nick:
    Marini
    Clan:
    LDC
    Bom galera como foi pedido no Macro Hiper pesca, estou aqui hoje para postar mais um macro de pesca. Mas só que agora um pouco menor, mas com as mesma funcionalidades.

    Informações:
    Você tem que ter mais de 100 de reparação.
    Macro feito especialmente para não VIPs.
    <><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><>
    Materiais para construção da trap:
    4 Blocos de ferro
    48 Baús normais
    48 Baús com Armadilha
    12 placas

    <><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><>

    Vídeo explicativo:
    http://www.youtube.com/watch?v=WbTaLl_AYyQ


    Macro: Para você saber se esta no lugar certo tem o código que testa a sua posição. O local correto para ficar e exatamente no meio dos quatro blocos de ferro no chão.
    [​IMG]
    Código:
    $${

    if(test);
    log(&2[MACRO] &3Desligado);
    unset(test);
    stop();
    else;
    log(&2[MACRO] &4Ligado);
    set(test);
    &dir=%DIRECTION%;
    ifmatches(%&dir%,N);&dir=NORTH;endif;
    ifmatches(%&dir%,S);&dir=SOUTH;endif;
    ifmatches(%&dir%,E);&dir=EAST;endif;
    ifmatches(%&dir%,W);&dir=WEST;endif;

    //1
    wait(100ms);look(NORTH);
    wait(100ms);look(-65,38);

    wait(1);
    //2
    wait(100ms);look(NORTH);
    wait(100ms);look(-65,25);

    wait(1);
    //3
    wait(100ms);look(NORTH);
    wait(100ms);look(-65,10);

    wait(1);
    //4
    wait(100ms);look(NORTH);
    wait(100ms);look(-55,45);

    wait(1);
    //5
    wait(100ms);look(NORTH);
    wait(100ms);look(-55,25);

    wait(1);
    //6
    wait(100ms);look(NORTH);
    wait(100ms);look(-55,15);

    wait(1);
    //7
    wait(100ms);look(NORTH);
    wait(100ms);look(-15,45);

    wait(1);
    //8
    wait(100ms);look(NORTH);
    wait(100ms);look(-15,25);

    wait(1);
    //9
    wait(100ms);look(NORTH);
    wait(100ms);look(15,45);

    wait(1);
    //10
    wait(100ms);look(NORTH);
    wait(100ms);look(15,25);

    wait(1);
    //11
    wait(100ms);look(NORTH);
    wait(100ms);look(55,45);

    wait(1);
    //12
    wait(100ms);look(NORTH);
    wait(100ms);look(55,25);

    wait(1);
    //13
    wait(100ms);look(NORTH);
    wait(100ms);look(55,15);

    wait(1);
    //14
    wait(100ms);look(NORTH);
    wait(100ms);look(65,38);

    wait(1);
    //15
    wait(100ms);look(NORTH);
    wait(100ms);look(65,25);

    wait(1);
    //16
    wait(100ms);look(NORTH);
    wait(100ms);look(65,10);

    wait(1);
    //17
    wait(100ms);look(EAST);
    wait(100ms);look(-15,55);

    wait(1);
    //18
    wait(100ms);look(EAST);
    wait(100ms);look(-15,35);

    wait(1);
    //19
    wait(100ms);look(EAST);
    wait(100ms);look(-15,20);

    wait(1);
    //20
    wait(100ms);look(EAST);
    wait(100ms);look(-15,0);

    wait(1);
    //21
    wait(100ms);look(EAST);
    wait(100ms);look(100,55);

    wait(1);
    //22
    wait(100ms);look(EAST);
    wait(100ms);look(100,35);

    wait(1);
    //23
    wait(100ms);look(EAST);
    wait(100ms);look(100,20);

    wait(1);
    //24
    wait(100ms);look(EAST);
    wait(100ms);look(100,0);

    wait(1);
    //25
    wait(100ms);look(SOUTH);
    wait(100ms);look(-65,38);

    wait(1);
    //26
    wait(100ms);look(SOUTH);
    wait(100ms);look(-65,25);

    wait(1);
    //27
    wait(100ms);look(SOUTH);
    wait(100ms);look(-65,10);

    wait(1);
    //28
    wait(100ms);look(SOUTH);
    wait(100ms);look(-55,45);

    wait(1);
    //29
    wait(100ms);look(SOUTH);
    wait(100ms);look(-55,25);

    wait(1);
    //30
    wait(100ms);look(SOUTH);
    wait(100ms);look(-55,15);

    wait(1);
    //31
    wait(100ms);look(SOUTH);
    wait(100ms);look(-15,45);

    wait(1);
    //32
    wait(100ms);look(SOUTH);
    wait(100ms);look(-15,25);

    wait(1);
    //33
    wait(100ms);look(SOUTH);
    wait(100ms);look(195,45);

    wait(1);
    //34
    wait(100ms);look(SOUTH);
    wait(100ms);look(195,25);

    wait(1);
    //35
    wait(100ms);look(SOUTH);
    wait(100ms);look(235,45);

    wait(1);
    //36
    wait(100ms);look(SOUTH);
    wait(100ms);look(235,25);

    wait(1);
    //37
    wait(100ms);look(SOUTH);
    wait(100ms);look(235,15);

    wait(1);
    //38
    wait(100ms);look(SOUTH);
    wait(100ms);look(245,38);

    wait(1);
    //39
    wait(100ms);look(SOUTH);
    wait(100ms);look(245,25);

    wait(1);
    //40
    wait(100ms);look(SOUTH);
    wait(100ms);look(245,10);

    wait(1);
    //41
    wait(100ms);look(WEST);
    wait(100ms);look(255,55);

    wait(1);
    //42
    wait(100ms);look(WEST);
    wait(100ms);look(255,35);

    wait(1);
    //43
    wait(100ms);look(WEST);
    wait(100ms);look(255,20);

    wait(1);
    //44
    wait(100ms);look(WEST);
    wait(100ms);look(255,0);

    wait(1);
    //45
    wait(100ms);look(WEST);
    wait(100ms);look(100,55);

    wait(1);
    //46
    wait(100ms);look(WEST);
    wait(100ms);look(280,35);

    wait(1);
    //47
    wait(100ms);look(WEST);
    wait(100ms);look(280,20);

    wait(1);
    //48
    wait(100ms);look(WEST);
    wait(100ms);look(280,0);

    endif;
    log( );
    log(&2[MACRO] &3Baus &cVerificados!!);

    }$$


    Algumas prints da trap:

    [​IMG]

    [​IMG]

    [​IMG]

    [​IMG]

    Como instalar:
    1º - Dentro do jogo aperte ESC
    2º - Click em opções (options em inglês)
    3º - Click em controles (controls em inglês)
    4º - Click em macro settings
    5º - Escolha um letra que não esteja em vermelho
    6º - Digite $$<superpesca.txt>
    7º - Click em EDIT FILES
    8º - Digite superpesca e click em CREATE
    9º - Click em SAVE e depois em SAVE novamente
    Pronto!!!! Agora é só se posicionar e apertar a letra que você escolheu.


    Macro
    $${
    if(x);
    log(&d[MACRO] &fSuper pesca &4Desligado!! [OFF]);
    unset(x);
    stop();
    else;
    log(&d[MACRO] &fSuper pesca &2Ligado!! [ON]);
    set(x);
    set(bau);
    #bau=1;
    &dir=%DIRECTION%;
    ifmatches(%&dir%,N);&dir=NORTH;endif;
    ifmatches(%&dir%,S);&dir=SOUTH;endif;
    ifmatches(%&dir%,E);&dir=EAST;endif;
    ifmatches(%&dir%,W);&dir=WEST;endif;
    log( );
    log(&d[MACRO] &6Matenha o inventario &bABERTO!!!);
    log( );
    wait(1);
    gui(inventory);

    do;
    gui(inventory);
    pick(346);

    if(%DURABILITY%<9);
    look(NORTH);
    look(,90);
    wait(5ms);
    key(use);wait(1ms);
    key(use);
    endif;

    do(70);
    look(%&dir%);
    look(,-90);
    key(use);wait(100ms);
    key(use);
    loop;

    if(bau);
    getslotitem(35,#id,#stack);
    wait(20ms);
    if(%#stack%=0);
    else;
    do;


    if(%#bau%=1);
    wait(100ms);look(NORTH);
    wait(100ms);look(-65,38);
    endif;

    if(%#bau%=2);
    wait(100ms);look(NORTH);
    wait(100ms);look(-65,25);
    endif;

    if(%#bau%=3);
    wait(100ms);look(NORTH);
    wait(100ms);look(-65,10);
    endif;

    if(%#bau%=4);
    wait(100ms);look(NORTH);
    wait(100ms);look(-55,45);
    endif;

    if(%#bau%=5);
    wait(100ms);look(NORTH);
    wait(100ms);look(-55,25);
    endif;

    if(%#bau%=6);
    wait(100ms);look(NORTH);
    wait(100ms);look(-55,15);
    endif;

    if(%#bau%=7);
    wait(100ms);look(NORTH);
    wait(100ms);look(-15,45);
    endif;

    if(%#bau%=8);
    wait(100ms);look(NORTH);
    wait(100ms);look(-15,25);
    endif;

    if(%#bau%=9);
    wait(100ms);look(NORTH);
    wait(100ms);look(15,45);
    endif;

    if(%#bau%=10);
    wait(100ms);look(NORTH);
    wait(100ms);look(15,25);
    endif;

    if(%#bau%=11);
    wait(100ms);look(NORTH);
    wait(100ms);look(55,45);
    endif;

    if(%#bau%=12);
    wait(100ms);look(NORTH);
    wait(100ms);look(55,25);
    endif;

    if(%#bau%=13);
    wait(100ms);look(NORTH);
    wait(100ms);look(55,15);
    endif;

    if(%#bau%=14);
    wait(100ms);look(NORTH);
    wait(100ms);look(65,38);
    endif;

    if(%#bau%=15);
    wait(100ms);look(NORTH);
    wait(100ms);look(65,25);
    endif;

    if(%#bau%=16);
    wait(100ms);look(NORTH);
    wait(100ms);look(65,10);
    endif;

    if(%#bau%=17);
    wait(100ms);look(EAST);
    wait(100ms);look(-15,55);
    endif;

    if(%#bau%=18);
    wait(100ms);look(EAST);
    wait(100ms);look(-15,35);
    endif;

    if(%#bau%=19);
    wait(100ms);look(EAST);
    wait(100ms);look(-15,20);
    endif;

    if(%#bau%=20);
    wait(100ms);look(EAST);
    wait(100ms);look(-15,0);
    endif;

    if(%#bau%=21);
    wait(100ms);look(EAST);
    wait(100ms);look(100,55);

    endif;

    if(%#bau%=22);
    wait(100ms);look(EAST);
    wait(100ms);look(100,35);
    endif;

    if(%#bau%=23);
    wait(100ms);look(EAST);
    wait(100ms);look(100,20);
    endif;

    if(%#bau%=24);
    wait(100ms);look(EAST);
    wait(100ms);look(100,0);
    endif;

    if(%#bau%=25);
    wait(100ms);look(SOUTH);
    wait(100ms);look(-65,38);
    endif;

    if(%#bau%=26);
    wait(100ms);look(SOUTH);
    wait(100ms);look(-65,25);
    endif;

    if(%#bau%=27);
    wait(100ms);look(SOUTH);
    wait(100ms);look(-65,10);
    endif;

    if(%#bau%=28);
    wait(100ms);look(SOUTH);
    wait(100ms);look(-55,45);
    endif;

    if(%#bau%=29);
    wait(100ms);look(SOUTH);
    wait(100ms);look(-55,25);
    endif;

    if(%#bau%=30);
    wait(100ms);look(SOUTH);
    wait(100ms);look(-55,15);
    endif;

    if(%#bau%=31);
    wait(100ms);look(SOUTH);
    wait(100ms);look(-15,45);
    endif;

    if(%#bau%=32);
    wait(100ms);look(SOUTH);
    wait(100ms);look(-15,25);
    endif;

    if(%#bau%=33);
    wait(100ms);look(SOUTH);
    wait(100ms);look(195,45);
    endif;

    if(%#bau%=34);
    wait(100ms);look(SOUTH);
    wait(100ms);look(195,25);
    endif;

    if(%#bau%=35);
    wait(100ms);look(SOUTH);
    wait(100ms);look(235,45);
    endif;

    if(%#bau%=36);
    wait(100ms);look(SOUTH);
    wait(100ms);look(235,25);
    endif;

    if(%#bau%=37);
    wait(100ms);look(SOUTH);
    wait(100ms);look(235,15);
    endif;

    if(%#bau%=38);
    wait(100ms);look(SOUTH);
    wait(100ms);look(245,38);
    endif;

    if(%#bau%=39);
    wait(100ms);look(SOUTH);
    wait(100ms);look(245,25);
    endif;

    if(%#bau%=40);
    wait(100ms);look(SOUTH);
    wait(100ms);look(245,10);
    endif;

    if(%#bau%=41);
    wait(100ms);look(WEST);
    wait(100ms);look(255,55);
    endif;

    if(%#bau%=42);
    wait(100ms);look(WEST);
    wait(100ms);look(255,35);
    endif;

    if(%#bau%=43);
    wait(100ms);look(WEST);
    wait(100ms);look(255,20);
    endif;

    if(%#bau%=44);
    wait(100ms);look(WEST);
    wait(100ms);look(255,0);
    endif;

    if(%#bau%=45;
    wait(100ms);look(WEST);
    wait(100ms);look(100,55);
    endif;

    if(%#bau%=46);
    wait(100ms);look(WEST);
    wait(100ms);look(280,35);
    endif;

    if(%#bau%=47);
    wait(100ms);look(WEST);
    wait(100ms);look(280,20);
    endif;

    if(%#bau%=48);
    wait(100ms);look(WEST);
    wait(100ms);look(280,0);
    endif;



    wait(1);
    key(use);
    wait(1);
    for(#marini,54,80);
    wait(35ms);
    slotclick(%#marini%,l,true);
    next;
    wait(300ms);
    getslotitem(53,#id,#stack);
    wait(55ms);
    if(%#stack%!=0);
    inc(#bau);
    endif;
    gui();
    if(%#bau%=50);
    unset(bau);log(&d[MACRO]&c[%PLAYER%] &fparece que todos os 48 baus foram cheios &6=O);
    gui();
    else;
    gui();
    endif;
    until(%#stack%=0);
    gui(inventory);
    endif;endif;endif;
    loop;

    }$$
     
  2. overlocked

    overlocked Lendário
    VIP

    Afiliado:
    15 Fevereiro 2013
    Mensagens:
    5,174
    Curtidas Recebidas:
    4,110
    Curtiu:
    1,736
    Sexo:
    Masculino
    Cubos:
    1,070.00
    Nick:
    ~
    Clan:
    THS
    Depois testo parece ser bom rsrs.
     
    matheuzao, MonsterKiLL e danix99 curtiram isso.
  3. felipeschumann1

    VIP

    Afiliado:
    16 Fevereiro 2013
    Mensagens:
    938
    Curtidas Recebidas:
    120
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    São Paulo
    Cubos:
    1,085.00
    Nick:
    FelipeSchumann1
    Clan:
    [App] Apple
    Skype:
    fsbkm.fsbkm
    Esse macro é do Phodelão !
     
    danix99 e LordWar curtiram isso.
  4. gabrielgarciamarini

    VIP

    Afiliado:
    3 Fevereiro 2013
    Mensagens:
    80
    Curtidas Recebidas:
    275
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    São Paulo
    Cubos:
    361.00
    Nick:
    Marini
    Clan:
    LDC
    Não cara. Esse é o meu macro, Macro Hiper Pesca reduzido, Pois foi pedido que eu fizesse um macro com menos menos baús
     
    allyson12, Doonsz e TheJack curtiram isso.
  5. WhxPedro

    WhxPedro Excelente
    VIP

    Afiliado:
    11 Setembro 2013
    Mensagens:
    3,195
    Curtidas Recebidas:
    244
    Curtiu:
    293
    Sexo:
    Masculino
    Cubos:
    2,187.31
    Nick:
    -
    Clan:
    -
    Muito massa cara, o problema é que tem muito bau em todos, rs'
    Tipo esse tem 48 e o outro 96.
     
  6. gabrielgarciamarini

    VIP

    Afiliado:
    3 Fevereiro 2013
    Mensagens:
    80
    Curtidas Recebidas:
    275
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    São Paulo
    Cubos:
    361.00
    Nick:
    Marini
    Clan:
    LDC
    Então cara é que como já existes muitos macro com poucos baús, ví a necessidade de criar macro maiores, com mais baús.
     
    allyson12 e TheJack curtiram isso.
  7. Henrique2107

    VIP

    Afiliado:
    7 Novembro 2012
    Mensagens:
    1,264
    Curtidas Recebidas:
    167
    Curtiu:
    0
    Sexo:
    Masculino
    Cubos:
    1,356.00
    Nick:
    Henrique2107
  8. WhxPedro

    WhxPedro Excelente
    VIP

    Afiliado:
    11 Setembro 2013
    Mensagens:
    3,195
    Curtidas Recebidas:
    244
    Curtiu:
    293
    Sexo:
    Masculino
    Cubos:
    2,187.31
    Nick:
    -
    Clan:
    -
    Sim, isso é bom. Que aí o pessoal não vip, não fica reclamando que os " vips " tem mais direito e tals, que eles fica mais difícil upa pesca, etc... '-'
     
  9. The Mask

    The Mask Excelente
    VIP

    Afiliado:
    17 Dezembro 2013
    Mensagens:
    3,567
    Curtidas Recebidas:
    499
    Curtiu:
    2,573
    Sexo:
    Masculino
    Localização:
    Na frente do pc
    Cubos:
    2.00
    Nick:
    the_mask
    Clan:
    ---
    lol vei muito top, mó zika mesmo..
    vou usar quando eu pegar mais lvl de pesca pq agora n estou upando mto e como quase n pesco nada o meu de 36 esta bom, mas achei epico esse macro hehe
     
  10. zjoaoPASA

    zjoaoPASA Excelente
    VIP

    Afiliado:
    24 Janeiro 2014
    Mensagens:
    2,713
    Curtidas Recebidas:
    269
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    .:Na Rede:.
    Cubos:
    15.00
    Nick:
    joaoPASA
    Clan:
    ECT
    Parabéns pelo macro.
     
  11. DiiamondBR

    DiiamondBR Razoavel

    Afiliado:
    5 Julho 2013
    Mensagens:
    700
    Curtidas Recebidas:
    82
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Frente do...
    Cubos:
    853.00
    Nick:
    DiiamondBR
    Clan:
    QuB / BLS
    Skype:
    Smokee_shadoow
    legal, parece ser mais eficiente que o do phodalao, vou testar, parabens msm!
     
  12. Jacek

    Jacek Excelente
    VIP

    Afiliado:
    19 Julho 2013
    Mensagens:
    848
    Curtidas Recebidas:
    343
    Curtiu:
    416
    Sexo:
    Masculino
    Ocupação:
    Estudante(En...
    Localização:
    Samuel's Rift
    Cubos:
    1,333.00
    Nick:
    JokerrZ/jacek231
    Facebook:
    donatto.pieve
    Bom macro mais ja tenho o meu
     
    TheGakX, HitlerHeadShot e lucascheres curtiram isso.
  13. Mavinier

    Mavinier Neutro
    VIP

    Afiliado:
    20 Janeiro 2012
    Mensagens:
    323
    Curtidas Recebidas:
    30
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Belém, PA -...
    Cubos:
    187.00
    Nick:
    Mavinier
    Skype:
    marlon.mavinier
    vou ficar com o meu de 12 baus mesmo uehuehe, mas quem sabe, eu vou favoritar aqui e usar esse macro ai
     
  14. zFull

    zFull Bom
    VIP

    Afiliado:
    15 Dezembro 2012
    Mensagens:
    688
    Curtidas Recebidas:
    168
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Fazendo...
    Cubos:
    804.00
    Nick:
    zFull
    Clan:
    {THS} T0ШЄŁHЄΛĐSŁ4ЧЄRS
    Skype:
    GuilhermeJunior7
    Maneiro ja tou usando
     
  15. felipeta123

    VIP

    Afiliado:
    12 Janeiro 2013
    Mensagens:
    787
    Curtidas Recebidas:
    135
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Minha Casa
    Cubos:
    917.00
    Nick:
    PCROXO
    Clan:
    HES
    Ja to usando, valeu msmo
     
  16. felipeta123

    VIP

    Afiliado:
    12 Janeiro 2013
    Mensagens:
    787
    Curtidas Recebidas:
    135
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Minha Casa
    Cubos:
    917.00
    Nick:
    PCROXO
    Clan:
    HES
  17. zurg

    zurg Craftlandiano
    VIP

    Afiliado:
    13 Agosto 2012
    Mensagens:
    4,098
    Curtidas Recebidas:
    1,093
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    João Pessoa...
    Cubos:
    1,516.00
    Nick:
    mestredoolho
    Valeu, vou usar ;)
     
  18. Leaodejuda

    Leaodejuda Neutro
    VIP

    Afiliado:
    30 Junho 2013
    Mensagens:
    142
    Curtidas Recebidas:
    34
    Curtiu:
    0
    Cubos:
    162.00
    Nick:
    KaliVeN
    me tira 1 Dúvida é porque tinha lotado 1 bau ai quando eu fui olhar ele ficava cickando no bau varias vezes e NAO voltava a pescar eu so nao estou pescando com ele por causa deste problema , por favor me mande uma reposta neste tópico msm e me fale o ocorrido



    Efeito Colateral owna!
     
    TrypTek e BakPix curtiram isso.
  19. zurg

    zurg Craftlandiano
    VIP

    Afiliado:
    13 Agosto 2012
    Mensagens:
    4,098
    Curtidas Recebidas:
    1,093
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    João Pessoa...
    Cubos:
    1,516.00
    Nick:
    mestredoolho
    Que macro bugado -.-
    namoral que demorei pra crl pra fazer a trap, dai qnd eu faço, o macro é bugado, e só abre o 1° bau, não abre o resto -.-, tenta resolver ae..
     
    ArticMonkey, BelugaSensei e TrypTek curtiram isso.
  20. Weihts

    Weihts Excelente
    VIP

    Afiliado:
    5 Fevereiro 2014
    Mensagens:
    3,071
    Curtidas Recebidas:
    416
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Porto...
    Cubos:
    860.00
    Nick:
    OberynKing
    achei meio bugado ;-;
     
    jose luiz curtiu isso.
Status do Tópico:
Não esta aberto para novas mensagens.