Declare tibia como processo:

Public Tibia As Process

Depois a função do click:

Public Sub Click(ByVal Location As Point)

        Dim lnglParam As String = (Location.Y * &H10000) + Location.X

        SendMessage(Tibia.MainWindowHandle, WM_LBUTTONDOWN, 1&, lnglParam)

        SendMessage(Tibia.MainWindowHandle, WM_LBUTTONUP, 1&, lnglParam)

    End Sub

down = 201

up = 202

Opa ótimo tutoriail, vai me ajudar muito a terminar meu bot.

Pensei que tinha encontrado um bug, mas eu tinha visto errado.

Eu nao entendi , oque ele exatamente faz ?

Ele envia um click de mouse a determinada "área" no Tibia.