Global Jogos Net


    Crackeando o TibiaBot NG sem mudar a versão

    Compartilhe

    Haseo
    Administrador
    Administrador

    Mensagens : 207
    Sistema de Pontos : 10605
    Inscrição : 16/07/2010
    Idade : 22
    Localização : Itália

    Crackeando o TibiaBot NG sem mudar a versão

    Mensagem por Haseo em Ter Jan 11, 2011 5:15 pm

    TÓPICO ATUALIZADO PARA A VERSÃO 5.0.2
    KEY ATUALIZADA (20/12)


    Crackeando seu TibiaBot NG sem perder nada da versão (ou seja, sem perder potions, fast hands, outros)




    Downloads Necessários


    TibiaBot NG 5.0.2

    Site oficial (link direto)
    Via MegaUpload


    OllyDbg

    Via MegaUpload



    Scans


    TibiaBot NG 5.0.2
    >>AQUI<<



    OllyDbg
    >>AQUI<<



    OBS: o "vírus" encontrado no
    OllyDbg é inofensivo, é apenas uma função dele que é confundida com
    vírus. Tanto que só 6 antivirus detectaram algo.




    Tutorial


    0- Antes de começar o
    procedimento, desinstale todos os NG's de seu computador (exceto a
    versão que você quer crackear). LEMBRANDO: SÓ FUNCIONA NO WINDOWS XP 32
    BITS!



    1- Baixe o TibiaBot NG e o OllyDbg.

    2- Instale o NG, abra-o, vá em Enter Key e copie seu HardwareFingerprint.



    3- Extraia o OllyDbg em alguma pasta de sua preferência e abra-o.

    4- Clique em File > Open e navegue por seu computador até chegar na pasta do NG. Abra-a e selecione o loader.exe

    Esta imagem foi redimensionada. Clique na barra para ver esta imagem maior. O tamanho da imagem original é 684x378.


    5- A tela ficara dividia em 4 quadrados.
    Clique com o botão direito em qualquer lugar do 1º quadrado (superior
    esquerdo), vá em Scripts(S) > Load e navegue até chegar na pasta onde
    você extraiu o Olly. Entre na pasta, vá em Scripts e carregue o arquivo
    "TibiaBot NG V.XXX By AvalonTM"


    Esta imagem foi redimensionada. Clique na barra para ver esta imagem maior. O tamanho da imagem original é 562x418.


    6- Abrirá uma caixa, clique em OK.

    7- Irá aparecer a tela do NG. Se sua versão
    já estiver expired e aparecer a mensagem com o X vermelho, clique em
    "Yes" (1ª opçao da esquerda). Se estiver nos 3 dias de trial, clique em "Enter Key". Então, cole seu HardwareFingerprint, TIRE O TRAÇO DO MEIO e dê OK. Aparecerá outra janela. Cole um Hardware Fingerprint funcional. No caso, usaremos esse código:


    "078F80F7" (sem aspas)

    Dê OK. SE VOCÊ NÃO TIRAR O TRAÇO DO MEIO, VAI DAR ERRADO E VOCÊ TERÁ QUE RECOMEÇAR!

    Esta imagem foi redimensionada. Clique na barra para ver esta imagem maior. O tamanho da imagem original é 623x384.
    Esta imagem foi redimensionada. Clique na barra para ver esta imagem maior. O tamanho da imagem original é 491x110.


    8- Irá aparecer dois campos. Preencha os campos da seguinte maneira:

    NAME: [Você precisa estar registrado e conectado para ver este link.]
    KEY: 01C23A-7GBDNZ-9JPDX3-BRF0UG-RCTRKA-ZXVR3W-YZBYEP-ZQK2G4-YNGVRA-ZZG8PM
    - Tempo de duração não estimado.


    9- Abra seu NG e confira! Se der algum
    problema, poste aqui que tentarei ajudar. Se der certo, você crackeou
    seu NG sem perder nenhuma função.


    Para quem não conseguiu, aqui está:


    Vídeo Tutorial

    YouTube - Video tutorial crackeando NG





    Gostou? Agradeça! =D


    F.A.Q.


    -> Segui o tutorial e no final apareceu escrito "The name/key you entered does not appear to be valid. Please try again." O que eu faço?

    R: Provavelmente você
    esqueceu de tirar o traço do meio do seu hardware fingerprint ou errou
    na hora da substituição dele pelo outro. É só refazer o procedimento
    prestando atenção nesse detalhe. Se a key realmente estiver expirada,
    poste aqui que atualizarei o mais rápido possível.




    -> Funciona no Windows Vista ou Windows 7?

    R: Infelizmente não. O
    problema é que o script, além de adicionar informações ao registro,
    modifica duas DLL's do windows para poder trocar o Hardware Fingerprint.
    E essas DLL's ficam em locais diferentes em cada windows, e também tem
    algumas pequenas diferenças. Então, teria que ter um script para cada
    tipo de windows.



    -> Funciona em outras versões?

    R: O método para crackear é
    o mesmo para todas. O que muda é as keys. Você pode encontrar as keys a
    partir da versão 4.8.8 logo abaixo.




    -> Aquele OllyDBG é limpo mesmo?

    R:
    Sim. O "vírus";
    encontrado no OllyDbg é inofensivo. O que acontece é que, por ele
    editar os programas, quando mal usado ele pode danificar algum programa.
    Se no caso esse programa for fundamental para o windows, ele causa um
    mau funcionamento do sistema. Mas nesse caso não prejudica o computador,
    o pior que pode acontecer é você danificar o TibiaBot NG e ter que
    instalar de novo.



    -> Não consegui encontrar o script. O que eu faço?

    R: Provavelmente você não baixou o OllyDBG de
    um dos links que eu postei. O do site oficial realmente não tem o
    script, só nesse que eu postei. Então, baixe de novo e faça o
    procedimento normalmente. O script fica em:

    Pasta que você extraiu o olly > RAMODBG > Scripts >"TibiaBot NG V.XXX By AvalonTM"


    -> Depois que terminei de crackear apareceu um
    erro do tipo:"Error while unpacking the program code C. Please contact
    the autor." O que eu faço?


    R: Apenas clique em OK e ignore. No final dá esse erro mesmo, mas o NG é crackeado do mesmo jeito.


    -> Meu NG não abre os corpos. O que eu faço?

    R: Depois de configurar a loot list, execute esse script:
    (Se não souber usar scripts, veja: [Você precisa estar registrado e conectado para ver este link.]<blockquote>
    Código:

    ////////// Cave Hunting //////////
    Const
    Loot_Items = [3378, 3598, 4587, 4846] ///id de los items que quieran poner///
    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.ID = ID then
    begin
    if Tile.Item.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 High(Loot_Items) do
    begin
    if x > High(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;

    Keys para versões antigas


    4.8.8 (8.42)

    [i]HARDWARE FINGEPRINT:
    E4E65F70
    NAME: [Você precisa estar registrado e conectado para ver este link.]

    KEY: 01CHEC-W7XPKM-9XW0GX-JKTVHN-VUVFVF-C3WG14-9BCE9H-1JBPA1-2FQVZW-9F6ADV

    Download: Via 4Shared


    4.9.0 (8.5)
    HARDWARE FINGEPRINT: 7E77CECC

    NAME: [Você precisa estar registrado e conectado para ver este link.]

    KEY: 019UF6-687XFP-Y6R2GY-7EUUDD-V752CQ-9XGVTX-RMCCQ6-NTCFPY-N63F2F-0Y32DH
    Download: Via 4Shared



    4.9.1 (8.52)
    HARDWARE FINGEPRINT: D17EE306
    NAME: [Você precisa estar registrado e conectado para ver este link.]
    KEY: 01FBFU-DDCBHQ-B6MT0M-AKRJV6-34UCWN-NJ7RT0-3745T8-BB6WAB-UZ7MFD-80HQW5
    Download: Via 4Shared


    4.9.2 (8.53)
    HARDWARE FINGEPRINT: 72134048
    NAME: [Você precisa estar registrado e conectado para ver este link.]
    KEY: 01BVB1-GEBY0U-17WQW2-9N3GYA-G1BB0Y-4AXY0J-VD9JZC-TZT9CE-UP6DZ2-RXAZ09
    Download: Via 4Shared


    4.9.3 (8.54)
    HARDWARE FINGEPRINT: B14BD419
    NAME: [Você precisa estar registrado e conectado para ver este link.]
    KEY: 01FBFU-D4JKG2-DUVD8G-ZNKGKD-GZY85B-DWA4N0-RE8587-51K7C2-TJ53WW-TB5YKP

    Download: Via 4Shared

    4.9.4 (8.55)
    HARDWARE FINGEPRINT: 6F57966E
    NAME: [Você precisa estar registrado e conectado para ver este link.]
    KEY: 01C23A-71KQK7-B8UYVB-A1XV42-5UFNCK-U5GHCV-R0JHRV-4FTGA2-5W72NC-90UX7W

    Download: Via 4Shared

    4.9.5 (8.57)
    HARDWARE FINGEPRINT: 367B1265
    NAME: [Você precisa estar registrado e conectado para ver este link.]
    KEY: 01CHEC-KC0279-09PPF1-7JPGYP-GYMM3Z-72Y8UG-G95NN2-NGC1RG-PHGPRT-VF6C2X

    Download: Via 4Shared


    OBS: Essas keys até onde sei não expiram, são permanentes.






    </blockquote>
    Créditos


    - OllyDBG: Criadores do Olly
    - Script do Olly: Avalom TM
    - Script de abrir os corpos: Victorcx
    - Keys: Tiago (dono da key) e os membros dofuslove e bondepc
    - TibiaBot NG: Equipe NG Soft
    - Tutorial: OriGami~
    - Imagens: OriGami~
    - Uploads e scans: OriGami~
    - F.A.Q: OriGami~
    - Vídeo Tutorial: OriGami~


    _________________


    O que faz você subir de cargo não são seus post's, e muito menos seus agradecimentos e sim seu conteúdo.

      Data/hora atual: Seg Dez 05, 2016 12:30 am