Player Free não pode falar global

Convidado

Client~Side

Procure por:

Código:

' Broadcast message
If Mid(MyText, 1, 1) = "," Then
ChatText = Mid(MyText, 2, Len(MyText) - 1)
If Len(Trim(ChatText)) > 0 Then
Call BroadcastMsg(ChatText)
End If
MyText = vbNullString
Exit Sub
End If

Mude para:

Código:

' Broadcast message
If Mid(MyText, 1, 1) = "," Then
If GetPlayerAccess(MyIndex) >= 1 Then
ChatText = Mid(MyText, 2, Len(MyText) - 1)
If Len(Trim(ChatText)) > 0 Then
Call BroadcastMsg(ChatText)
End If
MyText = vbNullString
Exit Sub
End If
End If

Creditos

Ricardo XD

» ADM pode atacar o player e o player pode atacar o ADM.
» Player de Musica
» Player Atravessando NPC
» Player Kick por ausencia
» Mudando a cor do nome do player (Do acesso)