iasbik

Os endereços ficam nesta parta das sources
http://code.google.com/p/tibiaapi/source/browse/branches/tibiaapi-current/trunk/tibiaapi/Addresses/Versions/Version9_7_1_0.cs

mais é necessário modificar aqui também para a versão mais nova
http://code.google.com/p/tibiaapi/source/browse/branches/tibiaapi-current/trunk/tibiaapi/Addresses/Versions/Version.cs

E para baixar as sources, utilize este tutorial
http://code.google.com/p/tibiaapi/wiki/SVNSetup

mais no item 4, utilize este link
http://tibiaapi.googlecode.com/svn/branches/tibiaapi-current/trunk/

Já lançaro os code, eu to tentano a estrutura do vip...

http://www.blackdtools.com/forum/showthread.php?59794-9-8-Blackd-Tibia-addresses-9-8

Vocês estão fazendo errado pessoal
Aqui está um exemplo:

ListBox1 é onde fica o nomes das criatuas.


Private Sub timerAttack_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles timerAttack.Tick For Each monsterName As String In ListBox1.Items For Each cr As Creature In c.BattleList.GetCreatures If (p.TargetId = 0 And cr.Name.ToLower() = monsterName.ToString().ToLower()) Then cr.Attack() End If Next Next End Sub

Bote um .ToLower() nas strings, que você podera digitar de qualquer maneira.

Salvando/Carregando um Listbox




Créditos a FnTools, se for copiar apenas coloque os devidos créditos.

Looter: http://www.tpforums.org/forum/thread-11644.html

Dim n = "Rotworm" For Each monster As Creature In c.BattleList.GetCreatures If (monster.IsVisible And (monster.Name.ToLower = n.ToLower) And p.TargetId = 0) Then monster.Attack() End If Next

@iasbik
Cara, esse meu código funcionou normal, ta certo que esta em C#, mais esta normal
segue o video que fiz mostrando

valeu Kimoszin

vou quebrar a cabeça com isso na próxima semana.
ae devo lançar o bot pro pessoal ae

Parece ser legal,mas vou testar qnd tiver novas coisas,como cave -bot e talz.E tenta fazer pra 8.54 tambem ;x

Mas as função dele tá funcionando ou você quer ajudar pra fazer funcionar?

Falta apenas o auto-loot?