Universo Games
Ola , Convidado



Você ainda não e cadastrado então cadastre-se e veja todas as atualizações no mundo rpg!!!

Player Free não pode falar global

Ir em baixo

Tutorial Player Free não pode falar global

Mensagem por RicardoxD em Sab 25 Jun 2011, 10:48

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
avatar
RicardoxD

Mensagens : 89

Voltar ao Topo Ir em baixo

Voltar ao Topo


 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum