1 Mensagem Privada (Funciona perfeitamente) 22/10/2012, 15:30
Warrior
Ajudante
Abra o Cliente
1 - No modInput, procure por:
2 - Na linha abaixo onde tem:
3 - Substitua por:
4 - Procure por:
5 - Apague essa linha ou substitua por:
6 -Procure por:
7 - Substitua por:
8 -No modClientTCP, no Sub PlayerMsg, procure por:
9 - Substitua por:
Abra o Servidor
1 - No modHandleData, procure por:
2 - Substitua por:
Créditos:
Valentine (Por criar o tutorial e disponibilizar)
Terabin (Por ajudar o Valentine)
E a min por trazer aqui para vocês ^^
1 - No modInput, procure por:
- Código:
If left$(chatText, 1) = "!" Then
2 - Na linha abaixo onde tem:
- Código:
Exit Sub
3 - Substitua por:
- Código:
If Mid$(chatText, 1, 2) = "! " Then GoTo continue
4 - Procure por:
- Código:
ChatText = Mid$(ChatText, i, Len(ChatText) - 1)
5 - Apague essa linha ou substitua por:
- Código:
'ChatText = Mid$(ChatText, i, Len(ChatText) - 1)
6 -Procure por:
- Código:
MyText = Mid$(ChatText, i + 1, Len(ChatText) - i)
7 - Substitua por:
- Código:
chatText = Mid$(chatText, i + 1, Len(chatText) - i)
8 -No modClientTCP, no Sub PlayerMsg, procure por:
- Código:
Buffer.WriteLong CSayMsg
9 - Substitua por:
- Código:
Buffer.WriteLong CPlayerMsg
Abra o Servidor
1 - No modHandleData, procure por:
- Código:
Call PlayerMsg(GetPlayerName(index), "Cannot message yourself.", BrightRed)
2 - Substitua por:
- Código:
Call PlayerMsg(index, "Cannot message yourself.", BrightRed)
Créditos:
Valentine (Por criar o tutorial e disponibilizar)
Terabin (Por ajudar o Valentine)
E a min por trazer aqui para vocês ^^