Help with script !

[gblxd91]

PT
ola galera me da um ajuda, nao tenho ideia de como eu posso fazer um fisher, e abrir os corpos para pxg usando pokemonapi
;/
ja fiz varias coisas mais n consigo fazer
nao consigo pescar, nem abrir os corpo
=/
eu precisava sabe como fazer pra usar xitem em x pos (x,y,z) com isso acho q ja consigo fazer quase todos.. to usando vb

se você puder fazer as funções para abrir corpo , pescar , usar revive no poke eu estou disposto a pagar por isso.

EN
hello guys give me a help, not have any idea how I can make a fisher, and open bodies for PXG using pokemonapi
;/
I have done many things I can do no more
I can not fish, or open body
= /
I needed to know how to use xitem in x pos (x, y, z) with q so I think I can already do almost all .. to using vb

if you can make the body functions to open, fish, use revive on poke I'm willing to pay for it.

if you can help, here's what I've ever done
http://youtu.be/06AMXHWoiSI

[Ash Katchup]

Acho que assim funcionaria:

    Public _client As Pokemon.Objects.Client

    Sub Main()
        '
        Pescar(100, 200, 300)
        '
    End Sub

    Public Sub Pescar(ByVal x As Integer, ByVal y As Integer, ByVal z As Integer)
        Dim _tile As Pokemon.Objects.Tile
        Dim _map = New Pokemon.Objects.Map(_client)
        Dim _location = New Pokemon.Objects.Location
        '
        _tile = _map.GetTile(_location)
        _client.Inventory.GetItemInSlot(Constants.SlotNumber.FishingRod).Use(_tile)
    End Sub