Fawcus

[TibiaAPI] Walker


Hoje vou ensinar a fazer um Walker bem simples, que apenas vai de um lado para o outro, de uma coordenada para outra.

O que iremos precisar?
De um botão, um checkbox, um timer e um listbox.

Código do botão:

lbWalker.Items.Add(p.Location.ToString()); lbWalker.SelectedIndex = 0; Código do timer: string pos = lbWalker.SelectedItem.ToString(); string output = pos.Substring(pos.IndexOf("(") + 1, pos.IndexOf(")") - pos.IndexOf("(") - 1); string[] arrayWalker = output.Split(','); if (p.Location == new Location(Convert.ToInt32(arrayWalker[0]), Convert.ToInt32(arrayWalker[1]), Convert.ToInt32(arrayWalker[2])) | p.Location.Z != Convert.ToInt32(arrayWalker[2])) { if (lbWalker.SelectedIndex >= (lbWalker.Items.Count - 1)) { lbWalker.SelectedIndex = 0; } else { lbWalker.SelectedIndex = lbWalker.SelectedIndex + 1; } } p.GoTo = new Location(Convert.ToInt32(arrayWalker[0]), Convert.ToInt32(arrayWalker[1]), Convert.ToInt32(arrayWalker[2])); Código do chekbox: if (chk_Bot.Checked) { timer_walker.Start(); } else { timer_walker.Stop(); }

O código esta bem simples e objetivo. Qualquer duvida só perguntar!

PS: Para converter para VB.Net, utilize este site: Link.

Formula utilizada é a seguinte:

((1.5 * Magic Level) + Level) * A

Onde 'A' é nossa incógnita que tem significados diferentes.

Para o cálculo, substitua 'A' para obter os danos das runas.
LMM: 0.4
HMM: 0.8
GFB: 1.28
EXP: 0.2 ( não tenho certeza )
SD: 3.4
UH: 5
UE: 6

Para fazer isso no VB, é simples:

Dim lmm Dim hmm Dim gfb Dim exp Dim sd Dim uh Dim ue lmm = ((1.5 * txtmlevel.Text) + txtlevel.Text) * 0.4 'cálculo da lmm hmm = ((1.5 * txtmlevel.Text) + txtlevel.Text) * 0.8 'cálculo da hmm gfb = ((1.5 * txtmlevel.Text) + txtlevel.Text) * 1.28 'cálculo da gfb exp = ((1.5 * txtmlevel.Text) + txtlevel.Text) * 0.2 'cálculo da exp sd = ((1.5 * txtmlevel.Text) + txtlevel.Text) * 3.4 'cálculo da sd uh = ((1.5 * txtmlevel.Text) + txtlevel.Text) * 5 'cálculo da uh ue = ((1.5 * txtmlevel.Text) + txtlevel.Text) * 6 'cálculo da ue lbllmm.Text = "LMM: " & lmm lblhmm.Text = "HMM: " & hmm lblgfb.Text = "GFB: " & gfb lblexp.Text = "EXP: " & exp lblsd.Text = "SD: " & sd lbluh.Text = "UH: " & uh lblue.Text = "UE: " & ue

O que é:

Como funciona:

Características:


Health Heal ( Low, Medium, High Priorities ) Cure Poison Cure Paralyze ManaTools Mana Heal Mana Cast Automatic Tools
Auto Haste Auto Fire Auto Magic Shield Auto Dance Auto Eat Auto Invisible Alarms Health Alarms Mana Alarms Cap Alarms Soul Alarms Disconnected Alarms Fish
Fish

Fotos:
http://tibiafnbot.co...e&id=3&Itemid=3
Download:
1.0.1 (8.71 Tibia Versão)
Requerimento: Microsoft .NET Framework 3.5

Tibia Versão: 8.71