Dim p = Player

Dim c = Client

Dim BL = Batlelist

Declare isso embaixo do

Public Class

Essa declaraveis sao para iniciantes

Agora, pegue e leia seu próprio tutorial.

Ps: ja tem essas coisas declaradas no tópico do Renato, no meu ponto de vista esse tópico é simplesmente INUTIL

Iniciantes nao sabem disso,

Lembrando que para classe vc precisa declarar utilizando DIM

Imports Tibia, Tibia.Constants, Tibia.Objects, Tibia.Util

Esqueceu disto

E essas variavis ai não são exatas poispodem ser ditadas

Dim player As Player

Dim client As Client

Dim BL As BattleList