Bruno

Bot que votou: alien

Qual função mais utilizada no bot: food. dance. heal e manacaste

O que falta no bot: cavebot, warbot.

Opinião sobre o bot: eu uso pke é levinho e nem precisa instala e como eu só jogo ot, eu uso pa treina e pra caça na mao, eu acho que essa primeira versao ta muito crua mas pelo que eu vi nas fotos dakele 'platinum' vai ser bem bom

usei: 1 timer , 1 checkbox , 1 numericupdown , 1 textbox , e um label

coloque um label em qlker lugar e ponha visible false com o texto " (aspas)

pra pode pega o exura sio vc tem q por nu valor do hp a porcentagem e n o hitpoints entao eu usei o numericupdown com max value 100, fica mais fácil

Textbox é aonde se poe o nome do cara

código no timer:

For Each amigosio As Creature In c.BattleList.GetCreatures() If amigosio.Name = TextBox1.Text Then If amigosio.HPBar <= NumericUpDown1.Value.ToString Then c.Console.Say("Exura Sio " & Label1.Text & amigosio.Name) End If End If Next código do checkbox: If CheckBoxUsado.Checked Then TimerUsado.Start() Else TimerUsado.Stop() End If

eu testei aqui e funciono certinho e eu que fiz entao creditos a min se for colocar em outro forum seila

eu usei o label porque o VB ve as aspas do exura sio "player como se tivesse fechando o texto, ai assim funciona xDDDD

tÃO simples qnto parece!!

fui

Criando seu tibia bot com TibiaAPI - Parte 3
{Desenvolvendo com TibiaAPI}



Depois de ter injetado a DLL como referência começaremos a desenvolver nosso Bot!

O Design:

Primeiro de tudo vamos criar o Loader, para que possamos carregar nosso char e o bot funcione.
No form1, ponha um combobox e um botão escrito Start, ou OK, ou Entrar, ou Abrir Bot, enfim, o que você achar melhor.
Se preferir também ponha uma frase para que o player saiba o que fazer. (eu puis: Escolha seu personagem...) segue a foto:





Códigos vbnet!

Agora vamos partir para os códigos. Os códigos do loader não são complicados. Basta usar a lógica para intender.
Na parte á direitas vá em Solution Explorer, clique com botão direito em cima do Form1 e depois em View Code. Ai estará todos os códigos do Form1.

Se você não modificou nada, vai estar assim:


Public Class Form1

End Class
[/code] [b][color=#800080][size=4]Importanto do TibiaAPI[/size][/color][/b] Então terá as duas abas no seu programa, a Form1.vb que é o codigo e a Form1.vb [Designer] que é o design obviamente. No code antes de Public Class Form1, ponha isto: [code]Imports Tibia
Imports Tibia.Util
Imports Tibia.Objects
Imports Tibia.Constants Isto é para importar do DLL, para o resto funcionar. Declarando as Variáveis client e player Então logo depois, vamo definir as variáveis, para nos ajudar a longo do programa Após Public Class Form1, ponha: Public c as client
Public p as player[/code] Aqui você declarou que c é Client e p é Player. Em tutoriais pela net você pode encontrar funções com client.Map.. etc, pois eles declararam "Dim client as client" então mude para c.Map... etc O código ficará: [code]Imports Tibia
Imports Tibia.Util
Imports Tibia.Objects
Imports Tibia.Constants

Public Class Form1

Public c As Client
Public p As Player

End Class
Form1_Load - Seu char no combobox. Volte no design e clique duas vezes no seu programa (em qualquer parte, menos no botão e no combobox). Verá que foi acrescentado um "Private Sub" no code (o que é isso? R: não te interessa agora).
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub
[/code] Você abriu um evento para o Form1 que é o Load, ou seja, tudo que estará ai será executado quando o programa for carregado (quando abrir). Então ponha este código no Form1_Load: [code] For Each cl In Client.GetClients
ComboBox1.Items.Add(cl)
Next
Só entender inglês e usar a lógica para entender o código. Para cara cl em client.GetClients Adiciona o item cl no ComboBox1, Next é o que fecha o For Each. Carregando seu Bot Volte para o designer e clique duas vezes no botão. Aparecerá este code: Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

End Sub
[/code] Reparem que não é mais _Load e sim _Click. Pois o evento será executado quando o botão for clicado e não carregado. Então ponha dentro do Private Sub: [code]
Form2.Show()
Mas pera ai, "mostrar form2"? Mas nem criamos o form2! Sim, isto é o que veremos no próximo tutorial O código final ficou assim:
Imports Tibia
Imports Tibia.Util
Imports Tibia.Objects
Imports Tibia.Constants

Public Class Form1

Public c As Client
Public p As Player

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
For Each cl In Client.GetClients
ComboBox1.Items.Add(cl)
Next
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Form2.Show()
End Sub
End Class

[/code]

Seu form2 ficara sublinhado com erro pois ainda não existe. Aguarde.

Até mais guys!

Level Spy - Técnica Correta
Aplique a ferramente level spy em seu bot corretamente.


Aloha colequinhas!

Aqui vai mais um tutorial/code de um tool que tem em praticamente todos os bots. Level Spy.
Sim, esse mesmo que você está pensando, este que voce ve o andar de cima e o andar de baixo.

Teoria:
Usaremos sistema de botões, ao apertar o botão up, ele mostrará andar de cima, ao apertar down ele mostrará o andar de baixo e ao apertar desativar ele irá voltar ao normal.

Prática:
Lembrete:
Public c As Client

Muitos iniciantes usam:

c.LevelSpyOn(+1)
[/code] [code]c.LevelSpyOn(-1)
c.LevelSpyOff()
[/code] Não, não! Não está errado. Porém ele só vai mostrar o andar de cima e o andar de baixo. Porque? O +1 simboliza seu local somado á um. Ou seja, sempre será o andar de cima, sómente. Ele não vai somar +1 ao andar que você está vendo, mas sim ao seu local. Então bolei esta técninca. [b]Primeiro, lá em cima onde você declara as variáveis, declare[/b] [code]Dim levelspy As Integer = p.Location.Z Depois no botão up em evento _Click ponha: If levelspy = 14 Then
Else
c.Map.LevelSpyOn(levelspy + 1)
levelspy = levelspy + 1
End If
[/code] [b]No botão down em evento _Click ponha:[/b] [code] If levelspy = 0 or levelspy = 7 Then
Else
c.Map.LevelSpyOn(levelspy - 1)
levelspy = levelspy - 1
End If
No botão desativar em evento _Click ponha: c.Map.LevelSpyOff()
levelspy = levelspy
[/code]

[color=#ff0000][b]Caso não entender algo sobre os códigos ou caso der algum erro, poste aqui.[/b][/color][/color]
[b]Bye babies.[/b]

usei: 1 timer , 1 checkbox , 1 numericupdown , 1 textbox , e um label

coloque um label em qlker lugar e ponha visible false com o texto " (aspas)

pra pode pega o exura sio vc tem q por nu valor do hp a porcentagem e n o hitpoints entao eu usei o numericupdown com max value 100, fica mais fácil

Textbox é aonde se poe o nome do cara

código no timer:

For Each amigosio As Creature In c.BattleList.GetCreatures() If amigosio.Name = TextBox1.Text Then If amigosio.HPBar <= NumericUpDown1.Value.ToString Then c.Console.Say("Exura Sio " & Label1.Text & amigosio.Name) End If End If Next código do checkbox: If CheckBoxUsado.Checked Then TimerUsado.Start() Else TimerUsado.Stop() End If

eu testei aqui e funciono certinho e eu que fiz entao creditos a min se for colocar em outro forum seila

eu usei o label porque o VB ve as aspas do exura sio "player como se tivesse fechando o texto, ai assim funciona xDDDD

tÃO simples qnto parece!!

fui

Anti Kick [Dance]



{usando TibiaAPI}

Opa galera, mais um tuto com tibiaApi ai :]

1 - Crie um timer, renomeie para TimerDance. Agora ponha um NumericUpDown no form e do lado um checkbox para ativar/desativar.
No timer você coloca:



Dim min As Integer = NumericUpDown1.Value
TimerDance.Interval = min*60000

p.Turn(Direction.Up)
p.Turn(Direction.Up)
p.Turn(Direction.Down)
p.Turn(Direction.Down)
p.Turn(Direction.Left)
p.Turn(Direction.Left)
p.Turn(Direction.Right)
p.Turn(Direction.Right)
[/code] [b]Observações¹: [/b]em[i]min*60000 [/i]ele vai multiplicar o valor do numeric por 60 segundos que é um minuto, pois a cada 1000 é 1 segundo. Dando o valor exato em minutos do numeric. [b]Observações²:[/b] na hora de 'dançar' eu dupliquei cada direção porque o VisualBasic vai ler muito rápido e vai acabar rodando em duas direções somente porque até chegar a informação de 1 direção no client do tibia, já passou mais duas direções no Bot. Então fiz por garantia. (Aqui funciona) [size=4][color=#FF0000][b]2 -[/b][/color][/size] Agora de dois clicks no checkbox para entrar no evento "CheckBox1_CheckedChanged". E ponha: [code]
If CheckBox1.Checked Then
TimerDance.Start()
NumericUpDown1.Enabled = False
Else
TimerDance.Stop()
NumericUpDown1.Enabled = True
End If


E pronto, o cara que for usar o bot, seleciona quantos de quanto em quanto tempo (MINUTOS) o char vai rodar e ativar =D





Fiz de cabeça, então se aparecer algum erro, avise para min arrumar! Thanks!
Abraços.

Criando seu tibia bot com TibiaAPI
Aprenda do 0, com nada de experiência e saia programando seu Bot!

Criando seu tibia bot com TibiaAPI - Parte 1
"Conhecendo o Visual Basic e o TibiaAPI"
Aprenda o princípio do Visual Basic e do TibiaAPI, como funcionam e para que servem.
É a intro do Tutorial.
Parte 1
[*]Criando seu tibia bot com TibiaAPI - Parte 2

"Visual Basic Interface"
Conheça um pouco mais da Interface do Visual Basic, e aprenda a adicionar a referencia da DLL TibiaAPI no seu programa.
Parte 2
[*]Criando seu tibia bot com TibiaAPI - Parte 3

"Desenvolvendo com TibiaAPI.dll"
Aprenda o básico dos códigos do VBnet.
Importar o TibiaAPI aos códigos, declarar variávies e criar o Loader.
Parte 3
[*]Criando seu tibia bot com TibiaAPI - Parte 4

"Form2 e Funções Básicas"
Aprenda a criar outras forms e criar funções básicas de um bot.
Como por exemplo, Outfits e Light Hack.
Parte 4
[*]Criando seu tibia bot com TibiaAPI - Parte 5

"Configurando e Compilando"
Aprenda a configurar a Assembly e a Compilar seu bot pronto.
Parte 5