[EEB]Retirando Bug do acento
Página 1 de 1 • Compartilhe •
[EEB]Retirando Bug do acento
vamos lá
Abra o SERVER~SIDE
procura por
a cima disso avera uma linha ... troque essa linha por essa ...
Procure por:
Tem 3 codigos desse mude todos para
Procure por:
Acima mude o codigo para:
Novamente Procure Por:
Na Linha Acima Mude o Código Para:
Procure Por:
A Cima Substitua Por
Novamente Procure Por:
Em Cima Mude o Código Por:
Procure por:
Acima Mude Para:
Cabo agora e so compilar
Testado e aprovado !!!
Crédito: Gu1lh3rm3 Pelo Tutorial.
Crédito: Thalesbliss Por Postar.
[Você precisa estar registrado e conectado para ver esta imagem.]
[Você precisa estar registrado e conectado para ver esta imagem.]
Abra o SERVER~SIDE
procura por
- Código:
Call HackingAttempt(Index, "Say Text Modification")
a cima disso avera uma linha ... troque essa linha por essa ...
- Código:
If Not ((Asc(Mid$(Msg, i, 1)) > 31 And Asc(Mid$(Msg, i, 1)) < 127) Or (Asc(Mid$(Msg, i, 1)) = 128) Or (Asc(Mid$(Msg, i, 1)) > 159 And Asc(Mid$(Msg, i, 1)) < 256)) And (Mid$(Msg, i, 1) <> SEP_CHAR And Mid$(Msg, i, 1) <> END_CHAR) Then
Procure por:
- Código:
(N >= 48 And N <= 57)
Tem 3 codigos desse mude todos para
- Código:
(N >= 48 And N <= 57) Or (N >= 192 And N <= 255) And (N <> Asc(SEP_CHAR) And N <> Asc(END_CHAR))
Procure por:
- Código:
Call HackingAttempt(Index, "Emote Text Modification")
Acima mude o codigo para:
- Código:
If Not ((Asc(Mid$(Msg, i, 1)) > 31 And Asc(Mid$(Msg, i, 1)) < 127) Or (Asc(Mid$(Msg, i, 1)) = 128) Or (Asc(Mid$(Msg, i, 1)) > 159 And Asc(Mid$(Msg, i, 1)) < 256)) And (Mid$(Msg, i, 1) <> SEP_CHAR And Mid$(Msg, i, 1) <> END_CHAR) Then
Novamente Procure Por:
- Código:
Call HackingAttempt(Index, "Broadcast Text Modification")
Na Linha Acima Mude o Código Para:
- Código:
If Not ((Asc(Mid$(Msg, i, 1)) > 31 And Asc(Mid$(Msg, i, 1)) < 127) Or (Asc(Mid$(Msg, i, 1)) = 128) Or (Asc(Mid$(Msg, i, 1)) > 159 And Asc(Mid$(Msg, i, 1)) < 256)) And (Mid$(Msg, i, 1) <> SEP_CHAR And Mid$(Msg, i, 1) <> END_CHAR) Then
Procure Por:
- Código:
Call HackingAttempt(Index, "Global Text Modification")
A Cima Substitua Por
- Código:
If Not ((Asc(Mid$(Msg, i, 1)) > 31 And Asc(Mid$(Msg, i, 1)) < 127) Or (Asc(Mid$(Msg, i, 1)) = 128) Or (Asc(Mid$(Msg, i, 1)) > 159 And Asc(Mid$(Msg, i, 1)) < 256)) And (Mid$(Msg, i, 1) <> SEP_CHAR And Mid$(Msg, i, 1) <> END_CHAR) Then
Novamente Procure Por:
- Código:
Call HackingAttempt(Index, "Admin Text Modification")
Em Cima Mude o Código Por:
- Código:
If Not ((Asc(Mid$(Msg, i, 1)) > 31 And Asc(Mid$(Msg, i, 1)) < 127) Or (Asc(Mid$(Msg, i, 1)) = 128) Or (Asc(Mid$(Msg, i, 1)) > 159 And Asc(Mid$(Msg, i, 1)) < 256)) And (Mid$(Msg, i, 1) <> SEP_CHAR And Mid$(Msg, i, 1) <> END_CHAR) Then
Procure por:
- Código:
Call HackingAttempt(Index, "Player Msg Text Modification")
Acima Mude Para:
- Código:
If Not ((Asc(Mid$(Msg, i, 1)) > 31 And Asc(Mid$(Msg, i, 1)) < 127) Or (Asc(Mid$(Msg, i, 1)) = 128) Or (Asc(Mid$(Msg, i, 1)) > 159 And Asc(Mid$(Msg, i, 1)) < 256)) And (Mid$(Msg, i, 1) <> SEP_CHAR And Mid$(Msg, i, 1) <> END_CHAR) Then
Cabo agora e so compilar
Testado e aprovado !!!
Crédito: Gu1lh3rm3 Pelo Tutorial.
Crédito: Thalesbliss Por Postar.
[Você precisa estar registrado e conectado para ver esta imagem.]
[Você precisa estar registrado e conectado para ver esta imagem.]
Thales12- Mensagens : 182
Página 1 de 1
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum