JulinhoPiuPiu

For Each amigosio As Creature In c.BattleList.GetCreatures() If amigosio.Name = TextBox1.Text Then If amigosio.HPBar <= NumericUpDown1.Value.ToString Then c.Inventory.UseItemOnCreature(Constants.Items.Rune.UltimateHealing.Id, 0, amigosio.Id) End If End If Next usar uh no seu amigo

correto

esahueashuehuashueashuesahu AL4sKiM pode deixar

Bom saber que está evoluindo., cara em seus tutoriais e seus codigos use antes de tudo o if client.loggedin then para ver se o char está on, porque se não tiver ele não ira fazer nada..

For Each monster As Creature In c.BattleList.GetCreatures() If monster.IsReachable And CreatureType.Target Then If p.TargetId = 0 Then monster.Attack() End If End If Next

por favor, não diga para mim que você viu este video hj?

você não disse, só expliquei por isso que não tava perfeito.

cara esse eu não peguei de ninguem, fiz sozinho

eu acho o meu codigo perfeito eashuehuasuah

sério cara, perdi a cabeça, desculpa.

Crie um checkbox e um timer: No codigo checkbox ponha: If CheckBox1.Checked Then Timer1.Interval = 30000 Timer1.Start() Else Timer1.Stop() No codigo do timer ponha: If c.LoggedIn Then For Each id As Item In c.Inventory.GetItems If id.Id = Constants.Items.Food.Apple.Id Then id.UseOnSelf() End If If id.Id = Constants.Items.Food.Banana.Id Then id.UseOnSelf() End If If id.Id = Constants.Items.Food.Blueberry.Id Then id.UseOnSelf() End If If id.Id = Constants.Items.Food.Carrot.Id Then id.UseOnSelf() End If If id.Id = Constants.Items.Food.Cheese.Id Then id.UseOnSelf() End If If id.Id = Constants.Items.Food.Cherry.Id Then id.UseOnSelf() End If If id.Id = Constants.Items.Food.BrownMushroom.Id Then id.UseOnSelf() End If If id.Id = Constants.Items.Food.Coconut.Id Then id.UseOnSelf() End If If id.Id = Constants.Items.Food.Corncob.Id Then id.UseOnSelf() End If If id.Id = Constants.Items.Food.DragonHam.Id Then id.UseOnSelf() End If If id.Id = Constants.Items.Food.Egg.Id Then id.UseOnSelf() End If If id.Id = Constants.Items.Food.Fish.Id Then id.UseOnSelf() End If If id.Id = Constants.Items.Food.Grapes.Id Then id.UseOnSelf() End If If id.Id = Constants.Items.Food.GreenMushroom.Id Then id.UseOnSelf() End If If id.Id = Constants.Items.Food.Ham.Id Then id.UseOnSelf() End If If id.Id = Constants.Items.Food.Meat.Id Then id.UseOnSelf() End If If id.Id = Constants.Items.Food.Mellon.Id Then id.UseOnSelf() End If If id.Id = Constants.Items.Food.Orange.Id Then id.UseOnSelf() End If If id.Id = Constants.Items.Food.Roll.Id Then id.UseOnSelf() End If If id.Id = Constants.Items.Food.Salmon.Id Then id.UseOnSelf() End If If id.Id = Constants.Items.Food.WhiteMushroom.Id Then id.UseOnSelf() End If Next End If Créditos: Júlio Espindula (FnTools)

espere 5 min, vo fazer um tuto descente.

cara acho que você tem problema na cabeça ou cindrome de down. remova essa linha :@ c = Form1.ComboBox1.SelectedItem

e só vai comer quando você clicar no checkbox.

cara, eu tento não perder a paciencia, é dificil... cara você botou no load do form o c = clientchooser.showbox?

cara, deve ser porque, vocÊ não "mostrou" à API o client.

creio eu que sim.

Brigado Augusto!

gogo renato, e botei as fotos (:

um legal ! sucesso

puncker está correto, mas também tem funções que você pode ser ban porque editam a memoria do cliente ex: Console.Say e outros...

o FnBot é indetectável porque não injeta dll no client, ele é 100% externo istoé usa somente o teclado e o mouse.

Edson fui rapido pq meu bot ja tava pronto, e outra não uso TibiaAPI não... Dependendo da versão do vb, a 2008 é 3.5, a 2010 é 4.0

eu não me gabei, não sou disso, estava apenas brincando.

Download Versão: 1.0.0 (Support 8.70 Tibia Version) Requerimento: Microsoft .NET Framework 3.5 Tibia Versão: 8.70 Features Cures Cure Health Cure Mana Cure Poison Cure Paralyze Autos Auto Haste Auto Fire Auto Magic Shield Auto Dance Auto Eat Auto Mana Cast Auto Invisible Alerts Health Alerts Mana Alerts Cap Alerts Soul Alerts Hotkeys Hotkey 1 Hotkey 2 Hotkey 3 Hotkey 4 Hotkey 5 Fishing Screenshots