ENTREGUE Macro de vender itens - Série Propano

Discussão em 'Macro Entregue' iniciado por JohnnyWinner, 24 Janeiro 2016.

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

    JohnnyWinner Craftlandiano
    VIP

    Afiliado:
    1 Setembro 2012
    Mensagens:
    1,547
    Curtidas Recebidas:
    938
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    São Paulo
    Cubos:
    3,010.21
    Nick:
    JohnnyWin
    Clan:
    WIN
    [​IMG][​IMG]
    Olá pessoal, Se você chegou aqui, provavelmente estava assistindo um de nossos vídeos.
    Se você ainda não é inscrito no canal, só clicar aqui que você não vai se arrepender!
    Se o tópico e a macro te ajudaram, não se esqueça de deixar seu Like ! :thanks:
    https://www.youtube.com/watch?v=iVd1WI2cXV0​
    [​IMG]
    Vídeo: #57 - Série Propano - Macro de vender itens
    Macro de vender itens na Warp Vip!
    (Vende: Blaze, Osso, Carne, Cacto, Melancia e Fungo)

    1° - Escolha uma tecla de sua preferência.
    2° - coloque na tecla: "$$<vender-itens.txt>".
    3° - Clique em "Arquivos".
    4° - Crie um arquivo com o nome "vender-itens".
    5° - Escolha uma das macros abaixo.
    6° - Cole o código abaixo dentro do arquivo.

    Macro de vender Blaze:
    Código:
    $${
    if(esvazia);
    unset(esvazia);
    log(&9[Macro] &fVender &cblaze &6[VIP] &fdo &5Casal Win &cdesligado); 
    stop;
    else;
    log(&9[Macro] &fVender &cblaze &6[VIP] &fdo &5Casal Win &aligado); 
    #bau=1;
    set(esvazia);
    prompt(&chesti,$$?,"Qual a home desejada?");
    prompt(#chests,$$?,"Quantos baus?");
    INC(#chests);
    
    do;
    do;
    gui(chat);wait(500ms);type(/home %&chesti%%#bau%);press(return);
    wait(3);
    key(use);
    wait(2);
    for(#i,0,53);
    getslotitem(%#i%,&id,#stack);
    ifmatches(%&id%,blaze_rod);
    slotclick(%#i%,l,true);
    wait(100ms);
    endif;
    next;
    gui();
    
    gui(inventory);getslotitem(9,#idi,#stacki);gui();
    
    if(%#stacki%=0);
    INC(#bau);
    
    if(%#bau%=%#chests%);
    stop;
    endif;
    
    endif;
    wait(1);
    until(%#stacki%!=0);
    
    }$$
    /warp vip
    $${
    wait(10);
    
    do;
    look(SOUTH);
    keydown(forward);
    getidrel(+0,+0,+1,&block);
    until(%ZPOS%=657);
    keyup(forward);
    do;
    look(WEST);
    keydown(forward);
    getidrel(+1,+1,+1,&block);
    until(%XPOS%=685);
    keyup(forward);
    do;
    look(NORTH);
    getidrel(+1,+0,+0,&block);
    keydown(forward);
    until(%ZPOS%=640);
    keyup(forward);
    wait(1000ms);
    do;
    look(WEST);
    getidrel(+1,+0,+0,&block);
    keydown(forward);
    until(%XPOS%=678);
    keyup(right);
    do;
    look(NORTH);
    keydown(forward);
    getidrel(+0,+0,+1,&block);
    until(%YPOS%=10);
    keyup(forward);
    do;
    look(SOUTH);
    keydown(forward);
    until(%ZPOS%=641);
    keyup(forward);
    look(WEST);
    
    do;
    look(WEST);
    keydown(forward);
    until(%ZPOS%=641);
    keyup(forward);
    key(attack);
    wait(500ms);
    
    
    }$$/money$${
    next;
    loop;
    
    endif;
    }$$
    
    


    Macro de vender Osso:
    Código:
    $${
    if(esvazia);
    unset(esvazia);
    log(&9[Macro] &fVender &bosso &6[VIP] &fdo &5Casal Win &cdesligado); 
    stop;
    else;
    log(&9[Macro] &fVender &bosso &6[VIP] &fdo &5Casal Win &aligado); 
    #bau=1;
    set(esvazia);
    prompt(&chesti,$$?,"Qual a home desejada?");
    prompt(#chests,$$?,"Quantos baus?");
    INC(#chests);
    
    do;
    do;
    gui(chat);wait(500ms);type(/home %&chesti%%#bau%);press(return);
    wait(3);
    key(use);
    wait(2);
    for(#i,0,53);
    getslotitem(%#i%,&id,#stack);
    ifmatches(%&id%,bone);
    slotclick(%#i%,l,true);
    wait(100ms);
    endif;
    next;
    gui();
    
    gui(inventory);getslotitem(9,#idi,#stacki);gui();
    
    if(%#stacki%=0);
    INC(#bau);
    
    if(%#bau%=%#chests%);
    stop;
    endif;
    
    endif;
    wait(1);
    until(%#stacki%!=0);
    
    }$$
    /warp vip
    $${
    wait(10);
    
    do;
        look(SOUTH);
        keydown(forward);
        getidrel(+0,+0,+1);
    until(%ZPOS%=667);
        keyup(forward);
    do;
        look(EAST);
        keydown(forward);
        getidrel(+1,+1,+1);
    until(%XPOS%=722);
        keyup(forward);
        wait(500ms);
    
    do;
        look(SOUTH);
        getidrel(+1,+0,+0);
        keydown(jump);
        keydown(forward);
    until(%ZPOS%=673);
        keyup(forward);
        keyup(jump);
        wait(500ms);
        look(South);
        look(150,10);
    
    key(attack);
    wait(1);
    }$$/money$${
    next;
    loop;
    
    endif;
    }$$
    
    


    Macro de vender Carne:
    Código:
    $${
    if(esvazia);
    unset(esvazia);
    log(&9[Macro] &fVender &bcarne &6[VIP] &fdo &5Casal Win &cdesligado); 
    stop;
    else;
    log(&9[Macro] &fVender &bcarne &6[VIP] &fdo &5Casal Win &aligado); 
    #bau=1;
    set(esvazia);
    prompt(&chesti,$$?,"Qual a home desejada?");
    prompt(#chests,$$?,"Quantos baus?");
    INC(#chests);
    
    do;
    do;
    gui(chat);wait(500ms);type(/home %&chesti%%#bau%);press(return);
    wait(3);
    key(use);
    wait(2);
    for(#i,0,53);
    getslotitem(%#i%,&id,#stack);
    ifmatches(%&id%,rotten_flesh);
    slotclick(%#i%,l,true);
    wait(100ms);
    endif;
    next;
    gui();
    
    gui(inventory);getslotitem(9,#idi,#stacki);gui();
    
    if(%#stacki%=0);
    INC(#bau);
    
    if(%#bau%=%#chests%);
    stop;
    endif;
    
    endif;
    wait(1);
    until(%#stacki%!=0);
    
    }$$
    /warp vip
    $${
    wait(10);
    
    do;
        look(SOUTH);
        keydown(forward);
        getidrel(+0,+0,+1);
    until(%ZPOS%=667);
        keyup(forward);
    do;
        look(EAST);
        keydown(forward);
        getidrel(+1,+1,+1);
    until(%XPOS%=722);
        keyup(forward);
        wait(500ms);
    
    do;
        look(SOUTH);
        getidrel(+1,+0,+0);
        keydown(jump);
        keydown(forward);
    until(%ZPOS%=673);
        keyup(forward);
        keyup(jump);
        wait(500ms);
        look(South);
        look(140,10);
    
    key(attack);
    wait(1);
    }$$/money$${
    next;
    loop;
    
    endif;
    }$$
    
    


    Macro de vender Cacto:
    Código:
    $${
    if(esvazia);
    unset(esvazia);
    log(&9[Macro] &fVender &bcacto &6[VIP] &fdo &5Casal Win &cdesligado); 
    stop;
    else;
    log(&9[Macro] &fVender &bcacto &6[VIP] &fdo &5Casal Win &aligado); 
    #bau=1;
    set(esvazia);
    prompt(&chesti,$$?,"Qual a home desejada?");
    prompt(#chests,$$?,"Quantos baus?");
    INC(#chests);
    
    do;
    do;
    gui(chat);wait(500ms);type(/home %&chesti%%#bau%);press(return);
    wait(3);
    key(use);
    wait(2);
    for(#i,0,53);
    getslotitem(%#i%,&id,#stack);
    ifmatches(%&id%,cactus);
    slotclick(%#i%,l,true);
    wait(100ms);
    endif;
    next;
    gui();
    
    gui(inventory);getslotitem(9,#idi,#stacki);gui();
    
    if(%#stacki%=0);
    INC(#bau);
    
    if(%#bau%=%#chests%);
    stop;
    endif;
    
    endif;
    wait(1);
    until(%#stacki%!=0);
    
    }$$
    /warp vip
    $${
    wait(10);
    
    do;
        look(SOUTH);
        keydown(forward);
        getidrel(+0,+0,+1);
    until(%ZPOS%=667);
        keyup(forward);
    do;
        look(EAST);
        keydown(forward);
        getidrel(+1,+1,+1);
    until(%XPOS%=726);
        keyup(forward);
        wait(500ms);
    
    do;
        look(SOUTH);
        getidrel(+1,+0,+0);
        keydown(jump);
        keydown(forward);
    until(%ZPOS%=673);
        keyup(forward);
        keyup(jump);
        wait(500ms);
        look(South);
        look(180,10);
    
    key(attack);
    wait(500ms);
    }$$/money$${
    next;
    loop;
    
    endif;
    }$$
    
    


    Macro de vender Melancia:
    Código:
    $${
    if(esvazia);
    unset(esvazia);
    log(&9[Macro] &fVender &bmelancia &6[VIP] &fdo &5Casal Win &cdesligado); 
    stop;
    else;
    log(&9[Macro] &fVender &bmelancia &6[VIP] &fdo &5Casal Win &aligado); 
    #bau=1;
    set(esvazia);
    prompt(&chesti,$$?,"Qual a home desejada?");
    prompt(#chests,$$?,"Quantos baus?");
    INC(#chests);
    
    do;
    do;
    gui(chat);wait(500ms);type(/home %&chesti%%#bau%);press(return);
    wait(3);
    key(use);
    wait(2);
    for(#i,0,53);
    getslotitem(%#i%,&id,#stack);
    ifmatches(%&id%,melon);
    slotclick(%#i%,l,true);
    wait(100ms);
    endif;
    next;
    gui();
    
    gui(inventory);getslotitem(9,#idi,#stacki);gui();
    
    if(%#stacki%=0);
    INC(#bau);
    
    if(%#bau%=%#chests%);
    stop;
    endif;
    
    endif;
    wait(1);
    until(%#stacki%!=0);
    
    }$$
    /warp vip
    $${
    wait(10);
    
    do;
        look(SOUTH);
        keydown(forward);
        getidrel(+0,+0,+1);
    until(%ZPOS%=667);
        keyup(forward);
    do;
        look(EAST);
        keydown(forward);
        getidrel(+1,+1,+1);
    until(%XPOS%=719);
        keyup(forward);
        wait(500ms);
    
    do;
        look(SOUTH);
        getidrel(+1,+0,+0);
        keydown(jump);
        keydown(forward);
    until(%ZPOS%=673);
        keyup(forward);
        keyup(jump);
        wait(500ms);
        look(South);
        look(180,10);
    
    key(attack);
    wait(500ms);
    }$$/money$${
    next;
    loop;
    
    endif;
    }$$
    
    


    Macro de vender Fungo:
    Código:
    $${
    if(esvazia);
    unset(esvazia);
    log(&9[Macro] &fVender &bfungo &6[VIP] &fdo &5Casal Win &cdesligado); 
    stop;
    else;
    log(&9[Macro] &fVender &bfungo &6[VIP] &fdo &5Casal Win &aligado); 
    #bau=1;
    set(esvazia);
    prompt(&chesti,$$?,"Qual a home desejada?");
    prompt(#chests,$$?,"Quantos baus?");
    INC(#chests);
    
    do;
    do;
    gui(chat);wait(500ms);type(/home %&chesti%%#bau%);press(return);
    wait(3);
    key(use);
    wait(2);
    for(#i,0,53);
    getslotitem(%#i%,&id,#stack);
    ifmatches(%&id%,nether_wart);
    slotclick(%#i%,l,true);
    wait(100ms);
    endif;
    next;
    gui();
    
    gui(inventory);getslotitem(9,#idi,#stacki);gui();
    
    if(%#stacki%=0);
    INC(#bau);
    
    if(%#bau%=%#chests%);
    stop;
    endif;
    
    endif;
    wait(1);
    until(%#stacki%!=0);
    
    }$$
    /warp vip
    $${
    wait(10);
    
    do;
        look(SOUTH);
        keydown(forward);
        getidrel(+0,+0,+1);
    until(%ZPOS%=667);
        keyup(forward);
    do;
        look(EAST);
        keydown(forward);
        getidrel(+1,+1,+1);
    until(%XPOS%=722);
        keyup(forward);
        wait(500ms);
    
    do;
        look(SOUTH);
        getidrel(+1,+0,+0);
        keydown(jump);
        keydown(forward);
    until(%ZPOS%=673);
        keyup(forward);
        keyup(jump);
        wait(500ms);
        look(South);
        look(180,10);
    
    key(attack);
    wait(500ms);
    }$$/money$${
    next;
    loop;
    
    endif;
    }$$
    
    
     
    SirMaximusJr e Javy Kanai curtiram isso.
  2. Pequena20

    Pequena20 Bom
    VIP

    Afiliado:
    30 Março 2013
    Mensagens:
    225
    Curtidas Recebidas:
    138
    Curtiu:
    0
    Sexo:
    Feminino
    Localização:
    Rio de Janeiro
    Cubos:
    341.00
    Nick:
    Pequena20
    Qualquer dúvida entrem em contato conosco!!!
    Se quiserem outras macros desse tipo, só comentar aqui :3 :wub:
     
    SirMaximusJr curtiu isso.
  3. AntonioGamer

    AntonioGamer Excelente

    Afiliado:
    9 Abril 2014
    Mensagens:
    1,606
    Curtidas Recebidas:
    357
    Curtiu:
    521
    Sexo:
    Masculino
    Localização:
    Taipu-RN
    Cubos:
    2,030.00
    Nick:
    crater4000
    Clan:
    ♔Líder-LDC ♔
    Skype:
    Antônio Campos Neto
    Vou usar, suas macros são ótimas !
     
  4. Y9T1N

    Y9T1N Bom
    Banido

    Afiliado:
    1 Agosto 2014
    Mensagens:
    3,694
    Curtidas Recebidas:
    112
    Curtiu:
    102
    Cubos:
    498.00
    Nick:
    FinaTTi
    Clan:
    NwF
    Boa macro.

    Enviado de meu MotoE2(4G-LTE) usando Tapatalk
     
  5. yeti30

    yeti30 Neutro

    Afiliado:
    19 Dezembro 2015
    Mensagens:
    184
    Curtidas Recebidas:
    11
    Curtiu:
    0
    Sexo:
    Masculino
    Cubos:
    176.00
    Nick:
    yeti30
    legal ,boa macro
     
  6. l Tiago l

    l Tiago l Craftlandiano
    VIP

    Afiliado:
    10 Outubro 2013
    Mensagens:
    9,284
    Curtidas Recebidas:
    1,865
    Curtiu:
    458
    Sexo:
    Masculino
    Localização:
    Florianópoli...
    Cubos:
    125.00
    Nick:
    Tiago_Player
    Boaa ;) ;)

    Enviado de meu SM-G313H usando Tapatalk
     
  7. OmanoFaelar

    OmanoFaelar Excelente
    VIP

    Afiliado:
    15 Fevereiro 2014
    Mensagens:
    4,625
    Curtidas Recebidas:
    480
    Curtiu:
    0
    Sexo:
    Masculino
    Cubos:
    2,369.00
    Nick:
    kyz
    Clan:
    td2
    Única série atualmente que estou acompanhando de minecraft.​
     
  8. Javy Kanai

    Afiliado:
    12 Abril 2015
    Mensagens:
    2,577
    Curtidas Recebidas:
    176
    Curtiu:
    841
    Sexo:
    Masculino
    Ocupação:
    Estudante
    Localização:
    Flórida
    Cubos:
    520.00
    Nick:
    JavyKvK
  9. FR4PS

    FR4PS Guerreiro
    VIP

    Afiliado:
    21 Agosto 2014
    Mensagens:
    30,141
    Curtidas Recebidas:
    8,584
    Curtiu:
    3,304
    Sexo:
    Feminino
    Localização:
    São Paulo
    Cubos:
    1,861.00
    Nick:
    FR4PS
    Discord:
    FR4PS#0001
    a macro deve ser boa mais parei de joga .-.
     
  10. JohnnyWinner

    JohnnyWinner Craftlandiano
    VIP

    Afiliado:
    1 Setembro 2012
    Mensagens:
    1,547
    Curtidas Recebidas:
    938
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    São Paulo
    Cubos:
    3,010.21
    Nick:
    JohnnyWin
    Clan:
    WIN
    <3

    Agradecemos! :3

    \o/

    :)

    \o/

    Agradecemos muito! :3

    \o/

    ;-;
     
  11. Alce

    Alce Craftlandiano
    VIP

    Afiliado:
    6 Outubro 2014
    Mensagens:
    2,644
    Curtidas Recebidas:
    706
    Curtiu:
    886
    Sexo:
    Masculino
    Ocupação:
    Designer
    Cubos:
    1,557.00
    Nick:
    Maaaaatteeus
    Bom macro ^^
     
  12. TenNoAsuka

    TenNoAsuka Razoavel
    VIP

    Afiliado:
    16 Julho 2013
    Mensagens:
    448
    Curtidas Recebidas:
    82
    Curtiu:
    0
    Cubos:
    517.00
    Nick:
    TenNoAsuka
    Quero algo pra vender as fuckings pólvoras, obg vlw flw kkkkk
     
  13. SylvioLocO

    Banido

    Afiliado:
    9 Maio 2013
    Mensagens:
    1,726
    Curtidas Recebidas:
    177
    Curtiu:
    283
    Sexo:
    Masculino
    Localização:
    LogoAli
    Cubos:
    1,843.00
    Nick:
    iNkhr/Yeti_BR
    Clan:
    To sem
    Skype:
    n tem
    Faz macro de ARCO propano !
     
Status do Tópico:
Não esta aberto para novas mensagens.