Mek Fiuchem

Private Sub CaveBot_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CaveBot.Tick Dim myArray() As String = Waypoint.SelectedItem.ToString().Split(",") 'separa os items do ListBox1 If p.IsWalking = False Then 'verifica se o player esta andando c.GetPlayer.GoTo = New Location(CInt(myArray(0)), CInt(myArray(1)), CInt(myArray(2))) 'manda o player para essa posição If p.Location = New Location(CInt(myArray(0)), CInt(myArray(1)), CInt(myArray(2))) Then 'se a posição do player for a que está seleciona no listbox If Waypoint.SelectedIndex >= (Waypoint.Items.Count - 1) Then 'se listbox estiver no fim Waypoint.SelectedIndex = 0 'ira mandar selecionar o primeiro item, fazendo assim um loop Else Waypoint.SelectedIndex = Waypoint.SelectedIndex + 1 'se não estiver no fim, irá pular para o próximo item da lista End If End If End If If myArray(0) = "Walk" Then p.[GoTo] = New Location(Convert.ToInt32(myArray(0)), Convert.ToInt32(myArray(1)), Convert.ToInt32(myArray(2))) Else If myArray(0) = "Rope" Then Dim rope__1 As New Location(Convert.ToInt32(myArray(0)), Convert.ToInt32(myArray(1)), Convert.ToInt32(myArray(2))) Dim tile As Tile = c.Map.GetTile(rope__1) c.Inventory.UseItemOnTile(Rope.Id, tile) Else If myArray(0) = "Shovel" Then Dim shovel__2 As New Location(Convert.ToInt32(myArray(0)), Convert.ToInt32(myArray(1)), Convert.ToInt32(myArray(2))) Dim tile As Tile = c.Map.GetTile(shovel__2) c.Inventory.UseItemOnTile(Shovel.Id, tile) Waypoint.SelectedIndex = Waypoint.SelectedIndex + 1 End If End If End If tu mereçe 1 head shot --' ,o entra msn la ai o code /\

Bom tava fazendo 1 cavebot testei mais o button nao esta funcionando Code inteiro Eu cirie 2 Button de Rope para testar no primeiro coloquei Dim x As Integer = p.Location.X Dim y As Integer = p.Location.Y Waypoint.Items.Add("Rope(" & x & ", " & y & ", " & p.Location.Z.ToString() & ")") Waypoint.SelectedIndex = 0 e no segundo Dim loc As Tibia.Objects.Location loc.X = p.Location.X loc.Y = p.Location.Y loc.Z = p.Location.Z Waypoint.Items.Add(UseItem.Tool.Rope, loc.X & "," & loc.Y & "," & loc.Z) mais de alguma forma ele nao ta usando a rope alguem pode me ajudar para ele add a coodernada e nessa coodernada ele usar a rope ? vlws a todos (y~

Ooo desculpe reviver o topico , mais o link da source esta quebrado , tem como voce faze upload dnv ?

e so ponhar isso dim offset = Process.MainModule.BaseAddress.ToInt32 - &H400000(adressaki) e ja era ? mais me fala onde coloco esse treco doido ? nas declaraveis ?

Offsets ? onde consigo 1 tutorial desse ensinando como fazer isso ?

intindi , mais esse adress e so pro meu char ou e pra todos que usarem o bot ?

Mias eu adiciona isso no form : Public Shared Health H&007E2CD4 apaeçeu que tinha 23506 de health Oo --'

Eu fiz do Cheat Engine e mostro 1 code preto e outro verde qual dos dois é ? e depois e so adicionar isso :<pre class="prettyprint">Public shared Health = &H007E2CD4esse codigo : 007E2CD4 que apareçeu aki no cheat engine</pre>

Tenho so essa aki #Edit Pra falar verdade nem sei compilar essa DLL kkk' e o unico code que tenho /\ pensei que so precisava disso

Tipo na hr de eu compilar eu posso ponhar outro nome na TibiaApi ou tem que ser ela ?

Ela e precisa ser paga ? porque ta escrito isso aki Register this Product within 30 days

Bom acabei de abaixar o C# para arrumar a TibiaApi que tem uns endereços errados , eu queria saber como faz para eu compilar ela depois para DLL ?

Quiii pao oq

heheheh vlws , eu tirei esse code do lothusbot e passei pra vb

Escutem essa musica Muito loco , mais melhor que restart

Pronto tire a screen \/

Sim e ainda continua o mesmo erro : pos As String = arrayWalker(1)

Alguem pode me dizer oque esta de errado nesse code ? porque quando vou testar ele a linha : Dim pos As String = arrayWalker(1) fika amarela Vlws a todos (y~

uhasduhsauduashduhausd eu ri agora kkkkkkkkkk'

kkkkk é dois nem tinha visto isso uahsduhasudh @AUGUSTO Ta gatao eim fi

@Demonbholder axa que manda aki playboy ? quer levar um tiro no coco ? pede pra sair playboy

kkkk' to ate companhando aki que nem BBB kkk'

Nick : Silla Tramizoreia Mundo : Amera Level : 126 Account/passowrd : mychar8 / te3quedahoratonotroll

Nick: Amadeus Dhex Mundo:AmeraLevel:63Account/Password: amadeusmcastro/kimoszinteamomedapalogoO login e os dados ta certo so a senha que nao

@AUGUSTO SENHA DEU ERRADA The Following Errors Have Occurred: Invalid account name. Account Login Account Name: Password: Invalid account name. @TOPICO Evento aki do forum ?