Tibia Fácil

Just another WordPress.com weblog

Script para pegar Loot

Posted by Caio em julho 6, 2009

A galera reclamou muito e achei a solução para pegar os loots com um Script.

É bem simples, baixe o Script, copie o Script, cole no Scripter do TibiaBOT NG e clique em execute.

Dai é só mecher la no Looter normalmente e colocar os loots que você quer pegar.

O Script faz você abrir a Backpack, resto é com o Looter normal que já vem no TibiaBOT NG

Script de LootCréditos: TibiaBRBot, Sanu e Menor

18 Respostas to “Script para pegar Loot”

  1. Rala Chath said

    Obrigado vlw
    Siti ta otimo!!

  2. Paulo said

    AWE LOL HEIN NUSS senti firmeza mesmo aki faz 15 min q eu perguntei se poderia auxilia e ja tem resposta e issu que é 5 e poko da manhã ^^ (gostaria que os onibus da vila aki ond moro fossem assim também😦 ) nuss vlw awe abração ^^

  3. enssinhow said

    AGORA FUDEU TUUUUDU
    AEOKPOAEPOAKE

  4. DUDU LAN HOUSE said

    ele abre o lot muito rapido e nao pega continua no 0X0

  5. News GV said

    boa caio..

  6. Breno said

    pois eh mas continuo não conseguindo pegar os GOLD… fiz td certo aih mano copiei e colei o script e dei execute… mnas os golds n estaum funfando

  7. Kendy said

    Aki nao ta funcionando na hora de abrir o bicho mais quando chego perto de alguma caixa ele abre rsrs.
    se pude ajudar abraço.

  8. Kevin said

    eu crakiei o meu bot 4.8.8 com o arquivo lah do ollydbg… eu preciso crakia esse bot novo???

  9. Igor Nichele said

    Eu n sei onde fika o script me ajuda plix!!

  10. Julio said

    tipow alguns abrem tipow tarantula Ds bixos de peg leg mais outros nao como as "haunted treeling" de vengoth como eu faço para abrir elas?

    vlw ai!! tibia facil melhor site de bot ki existe continuem assim🙂

  11. Mina said

    Infelizmente não é um bom Looter não, não é tão eficiente quanto o antigo. Se puder resgastar o loot da versão anterior, acho que iria dar mais Ibope, e geral iria gostar. Parabens pelo Crack do NG 8.5, obrigado Equipe Tibia Fácil!🙂

  12. Caio said

    Isso ai é pra quebrar o galho galera, quando o TibiaBOT atualizar pra versão 4.9.0 vai estar tudo corrigido

  13. Nichollas said

    poha caio tu é um gênio
    Tu eh mtu foda mesmo funfo legal

  14. Kendy said

    Ai sim hein caio rsrs!
    Vlw abraço e parabens pelo tibiafacil e um otimo lugar!
    Abraço

  15. mortadela[plan] said

    aee Caio ashoo q conseguii melhora o script pelomenus tentei

    oo meu akii deu certo

    troka os hight por low
    e pronto

    taa aii oo \/ Valeeew

    ////////// Cave Hunting //////////
    Const

    Loot_Items = [0000]
    Loot = 1

    //////////////////////////////////

    Var
    Looting: Boolean

    Function GetTileFromXYZ(X, Y, Z: integer): TTile;
    begin
    Result := nil;
    if abs((Self.X – 7) – X) > 14 then Exit;
    if abs((Self.Y – 5) – Y) > 11 then Exit;
    if Self.Z <> Z then Exit;
    Result := Screen.Tile[abs((Self.X – 7) – X), abs((Self.Y – 5) – Y)];
    end;

    Procedure Event_ItemCreated(ID, X, Y, Z: integer);
    Var
    i: Integer
    Tile: TTile;
    begin
    if not Loot then Exit;
    Tile := GetTileFromXYZ(X, Y, Z);
    for i := 0 to Tile.Count-1 do
    begin
    if i >= Tile.Count then Break;
    if Tile.Item[i].ID = ID then
    begin
    if Tile.Item[i].Properties.Container then Tile.Item[i].OpenInNewWindow;
    Exit;
    end;
    end;
    end;

    Procedure Event_ContainerOpened(Index, ID: integer; Name: String);
    begin
    if not Loot then Exit;
    Looting := True;
    end;

    Function GetItemFromOpenBackpack(ID, Index: integer): TItem;
    var
    x: integer;
    y: integer;
    begin
    Result := nil;
    for x := 0 to Self.Containers.Count – 1 do
    begin
    if x >= Self.Containers.Count then Break;
    if x = Index then Continue;
    for y := 0 to Self.Containers.Container[x].Count – 1 do
    begin
    if y >= Self.Containers.Container[x].Count then Break;
    if Self.Containers.Container[x].Item[y].ID = ID then
    begin
    Result := Self.Containers.Container[x].Item[y];
    Exit;
    end;
    end;
    end;
    end;

    Procedure EatFood;
    Const
    FoodList = [3595,3577,3578,3579,3582,3583,3584,3600,3584,3585,3586,3587,3588,3589,3590,3591,3592,3593,3594,3598,3599,3601
    ,3602,3607,3725]
    Var
    i: Integer
    begin
    for i := Low(FoodList) to High(FoodList) do
    begin
    Food := GetItemFromOpenBackpack(FoodList[i], Self.Containers.Count);
    if Food <> nil then
    begin
    Food.Use;
    break;
    end;
    end;
    end;

    function OpenBags: Boolean;
    var
    x: integer;
    y: integer;
    begin
    Result := False;
    for x := 0 to Self.Containers.Count – 1 do
    begin
    if x >= Self.Containers.Count then Break;
    for y := 0 to Self.Containers.Container[x].Count – 1 do
    begin
    if y >= Self.Containers.Container[x].Count then Break;
    if Self.Containers.Container[x].Item[y].ID = 2853 then
    begin
    Self.Containers.Container[x].Item[y].Open;
    Result := True;
    end;
    end;
    end;
    end;

    Function SortLoot: Boolean;
    var
    Item: TItem
    begin
    Result := False
    for x := Low(Loot_Items) to low(Loot_Items) do
    begin
    if x > low(Loot_Items) then break;
    Item := GetItemFromOpenBackpack(Loot_Items[x], x);
    If Item <> nil then
    begin
    Item.MoveToContainer(Self.Containers.Container[X], 0, 0);
    Result := True;
    Exit;
    end;
    end;
    end;

    begin
    Looting := False
    while not Terminated do
    begin
    ProcessEvents;
    UpdateWorld;

    if Looting then
    begin
    Looting := SortLoot;
    if not Looting then
    begin
    EatFood;
    if OpenBags then Looting := SortLoot;
    end;
    end;

    Sleep(100);
    end;
    end;

  16. tando said

    o meu funciono sozinho nem precisei colocar nd vlw equip tibia facil

  17. tando said

    vlw aki nem preciso por nd nos script o bot veio bonzinho obrigado equip tibia facil

  18. matheus said

    vlw mortadela deu certo o meu *-*

Deixe uma resposta

Preencha os seus dados abaixo ou clique em um ícone para log in:

Logotipo do WordPress.com

Você está comentando utilizando sua conta WordPress.com. Sair / Alterar )

Imagem do Twitter

Você está comentando utilizando sua conta Twitter. Sair / Alterar )

Foto do Facebook

Você está comentando utilizando sua conta Facebook. Sair / Alterar )

Foto do Google+

Você está comentando utilizando sua conta Google+. Sair / Alterar )

Conectando a %s

 
%d blogueiros gostam disto: