[TibiaAPI] Auto Eat Food

[JulinhoPiuPiu 99]

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)

[Renato 659]

Esse ai ele verifica um por um, é ruim :S

Mas se funciona, não podemos descartar né

Edit: "UseOnSelf()"

Cara, é só colocar UseItem, porque ele come quando clica...

Não da pra usar food em você ou em alguém e.e

[JulinhoPiuPiu 99]

eu acho o meu codigo perfeito eashuehuasuah

[Renato 659]

Existe foods que não estão no seu código.

O método do meu bot verifica se há food em todo inventory e come.

Funciona 100%...

É que muita gente não sabe usar. Sacomé .-.

[JulinhoPiuPiu 99]

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

[Renato 659]

Ué, aonde eu disse que você pegou isso pronto?

[JulinhoPiuPiu 99]

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

[Bruno 3]

skentou aqui aoskaoskaos

[Felipe Sartori 5]

Sei que renasci, mas quero ajudar quem vai precisar (Noobs)

If CheckBox1.Checked Then

Timer1.Interval = 30000

Timer1.Start()

Else

Timer1.Stop()

Se der erro é porque está sem o END IF O código é:

If CheckBox1.Checked Then

Timer1.Interval = 30000

Timer1.Start()

Else

Timer1.Stop()

End If

[Beatriz Oliveira 20]

Desculpa ter revivido novamente, mais quem é felipe sartori para falar que o pessoal é nb em programação ? Segundo, Felipe não explicou nada sobre oque ele postou, aquilo que ele postou serve para checar, se o box estiver checked ele vai iniciar, o timer caso contrario ele vai desligar o timer.