[DUVIDA] Cavebot - Ladder

Postado Agosto 15, 2011 13 anos

Eu queria saber se esse code eu ponho no timer :


Dim LadderTile As Tibia.Objects.Tile = client.Map.GetTileWithPlayer

For Each TileObject As Tibia.Objects.TileObject In LadderTile.Objects

	Dim i As Tibia.Objects.TileObject = TileObject

	If Tibia.Constants.TileLists.UpUse.FirstOrDefault(Function(l) l = i.Id) Then

    	Tibia.Packets.Outgoing.ItemUsePacket.Send(client, player.Location, i.Id, i.StackOrder, 0)

    	Exit For

	End If

Next

ou esse


Dim myArray() As String = loc2(0).Split(", ")

 		if myArray(0) = 'Walk' then

   MyPlayer.GoTo = New Location(CInt(myArray(1)), CInt(myArray(2)), CInt(myArray(3)))

   		end if

if myArray(0) = 'Say' then

'say

end if

if myArray(0) = 'ladder' then

'use ladder

end if

            If MyPlayer.Location = New Location(CInt(myArray(0)), CInt(myArray(1)), CInt(myArray(2))) Then

                If ListBox1.SelectedIndex >= (ListBox1.Items.Count - 1) Then

                    ListBox1.SelectedIndex = 0

                Else

                    ListBox1.SelectedIndex = ListBox1.SelectedIndex + 1

                End If

            End If

se for , eu queria saber oque devo ponhar no button de rope , pra adicionar a coodernada no listbox1 como rope, se tiver algo errado nesse code /\ , me avisa

Obs : axei na net , nao intendo mt de cavebot