Crackiando Tibia NG 4.7.7 Para o Tibia 8.21, Atualizado 4.7.7

Noticia Oficial Do NG
This release fixes another Access Violation and the Event_Message bug.

Alguem pode traduzir corretamente para nos?


Crackiando:

1° Parte :

Baixe o Power hex :
Download Aki >> http://superdownloads.uol.com.br/download/92/powerhex/

2° Quando acabar de baixar Instale!

3° Agora Baixe Os Tibiabot Ng!

- 4.3.6 ~> http://www.tibiabot.com/download/setup-4.3.6.exe

- 4.5.5 ~> http://www.tibiabot.com/download/setup-4.5.5.exe

- 4.7.7 ~> http://www.tibiabot.com/download/setup-4.7.7.exe


4° Instale a versão do NG 4.3.6 e abra normalmente, ao abrir aperte “enter key”

(ATENÇÃO: Caso não apareça essa tela e já passe pra a tela “injecting in the game...”
deça o topíco e procure a 2ª ETAPA, continue de lá)

5° Abra o powerhex e bote “Try pro version”

(ATENCÃO: CASO VC NAO POSSA MAIS ABRIR O POWERHEX PQ JA PASSOU O TEMPO TRIAL ATRASE O RELOGIO DO WINDOWS PARA ALGUNS ANOS ATRAIZ Q ELE FUNCIONA, DPOIS DE CRAKEAR VC VOLTA O RELOGIO AO HORÁRIO NORMAL)

6° Vá em file ~> open~> process

7° Vai ter 2 “loader.exe”, selecione o 2° e aperte o botão “Open Process”

Dai vai apareçer uma Monte de numeros…

8° Vá no seu ng q ta aberto, e copie o fingerprint

9° Volte pro powerhex e aperte CONTROL + F, vai apareçer uma janelinha “Search and Replace”,

Na primeira caxinha (ao lado do botão “search”) bote seu fingerprint que vc copiou e aperte search, na segunda caixinha (ao lado do botao “replace) bote “82AD-20CE”, aperte “Replace” e aguarde 10 segundos...

10° Agora aperte CONTROL + F dnovo, mude de “Text” para “Hex”,

Na primeira caxinha vc bota “358AC0E665” e aperte search, na segunda “B8CE20AD82”, aperta “Replace” e aguarde 10 segundos...
Crakeando Tibia Bot Ng! Pelo Power Hex - Part 1
Continuação:

11° Aperte CONTROL + F, selecione “Hex” (provavelmente vai esta selecionado), na primeira caxinha bote “33865C200000” e aperte search, na segunda “B8CE20AD8290”, aperte “Replace” e aguarde 10 segundos...
12° Vá na tela do enter key e digite:

Name:
Slawomir T Kordjalik

Password: 000016-YNCHXM-D99JAW-BFV18Y-PG4XBG-W22TD7-ZQHE6J-97VYZX-42QGQY-KP4TGQ

2ª Parte:
1° Instale o 4.5.5 normalmente

2° dpois instale o 4.7.7 em diretório diferente (dependendo do HD do seu sistema ele troca a letra, no meu caso foi “D:”)

Daí fica D:\Arquivos de programas\TibiaBot NG 477

3° Continue a instalação e na ultima parte desmarque “Run TibiaBot NG” e aperte “Concluir”

4° Agora abra meu computador, e vai no diretório q vc instalou o 4.5.5 (geralmente c:\arquivos de programas\TibiaBot NG)

Aperte botao direito no loader.exe e clique em “copiar”

5° Agora vai no diretório q vc instalou o 4.7.7 (c:\arquivos de programas\TibiaBot NG 477)

6° Aperte botao direito em alguma parte vazia e aperte “colar”

Vai aparecer uma confirmação pra substituir, aperte “sim”

Taah ai, Crackeado.


Scripts:

Potions
Troque o O MinHealth Para quando voce quiser que use a potion...NumberOfVialsToDrink para quantas voce quer que use...IDPotion depende de qual health potion voce usará para ver o id dela...clike com botao direito e coloque show id number...

Const
MinHealth = 310 // min Healh
NumberOfVialsToDrink = 1 // how many health fluids to drink
IDPotion = 266 // ID of Potion
Delay = 0 // in seconds

while not terminated do
begin
UpdateWorld;
if Self.Health <= MinHealth then
begin
for i := 1 to NumberOfVialsToDrink do
begin
if (i >= NumberOfVialsToDrink + 1) or (terminated = true) then break;
Self.Containers.UseItemWithSelf(IDPotion);
Sleep(Delay*1000);
end;
end;
Sleep(500);
end;

Atacar monstro Primero
Coloque os nomes dos monstros que voce quer atacar primeiro...coloque no maximo 2~3 monstros
Substitua Name=['Dwarf Guard', 'Dwarf Soldier', 'Dwarf']; pelos monstros em ordem de mais forte ao mais fraco...

Const
Name=['Dwarf Guard', 'Dwarf Soldier', 'Dwarf'];
SwitchAt=30;// the % of the current attacked monster
//that if the monster has lass % hp than this, we Will NOt change to the stronger monster.
function GetPlace(st:string):integer;
var
x:integer;
begin
Result:=1000;
for x:=Low(Name) To High(Name) do
begin
if Name[x]=st then
Result:=x;
end;
end;

function GetCreatureByID(ID: integer): TCreature;
var
x: integer;
begin
Result := nil;
for x := 0 to Creatures.Count - 1 do
begin
if x >= Creatures.Count then Break;
if Creatures.Creature[x].ID = ID then
begin
Result := Creatures.Creature[x];
Exit;
end;
end;
end;

function IsCreatureBesideYou(c: TCreature): boolean;
begin
UpdateWorld;
Result := False;
if (abs(c.X-self.X) <= 4) and (abs(c.Y-self.Y) <= 4) then begin
if c.Z = self.Z then begin
Result := True;
end;
end;
end;

var
x:integer;
b:boolean;
begin
while not terminated do
begin
b:=false;
updateworld;
If (Self.Attacking<>0) then
begin
Creature:=GetCreatureByID(Self.Attacking);
if Creature<>nil then
if SwitchAt<Creature.Health then
begin
for x := 0 to Creatures.Count - 1 do
begin
updateworld;
if b then break;
if x >= Creatures.Count then Break;
if Creatures.Creature[x].NPC then
if Creatures.Creature[x].z=self.z then
if Creatures.Creature[x].Name<>self.name then
if Creatures.Creature[x].Attacking = false then
if IsCreatureBesideYou(Creatures.Creature[x]) then
if GetPlace(Creature.Name)>GetPlace(Creatures.Creature[x].Name) then
begin
sleep(100);
updateworld;
Creatures.Creature[x].attacking:=true;
B:=true;
end;
end;
end;
end;
Sleep(100);
end;
end;