MMORPG Brasil
Ola, visitante! Agradecemos sua visita, para ter acesso a todo nosso conteúdo recomendamos que faça um cadastro no fórum, com ele você pode participar de tópicos e ter acesso a todas áreas da comunidade!

Participe do fórum, é rápido e fácil

MMORPG Brasil
Ola, visitante! Agradecemos sua visita, para ter acesso a todo nosso conteúdo recomendamos que faça um cadastro no fórum, com ele você pode participar de tópicos e ter acesso a todas áreas da comunidade!
MMORPG Brasil
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

[ALL]Retirando o bug do acento 100%

+4
Lucas Roberto
gabrielsort
Lendário
Gu1lh3rm3
8 participantes

Ir para baixo

[ALL]Retirando o bug do acento 100% Empty [ALL]Retirando o bug do acento 100%

Mensagem por Gu1lh3rm3 Ter 06 Jul 2010, 21:10

vamos lá ^^, o titulo jah dis tudo ...
SERVER~SIDE

proucure 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
agora proucure 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))
continuando ... proucure por ...
Código:
Call HackingAttempt(Index, "Emote Text Modification")
a cima 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 proucure por
Código:
Call HackingAttempt(Index, "Broadcast Text Modification")
na linha a cima 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
proucure por ...
Código:
Call HackingAttempt(Index, "Global Text Modification")
a cima subistitua 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 proucure
Código:
Call HackingAttempt(Index, "Admin Text Modification")
em cima 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
ja esta acabando, proucure por ..
Código:
Call HackingAttempt(Index, "Player Msg Text Modification")
a cima 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

fim
Creditos: Gu1lh3rm3 e MMORPG
Gu1lh3rm3
Gu1lh3rm3
Membro de Honra
Membro de Honra

Mensagens : 1232

http://www.extremedbz.eu5.org

Ir para o topo Ir para baixo

[ALL]Retirando o bug do acento 100% Empty Re: [ALL]Retirando o bug do acento 100%

Mensagem por Lendário Qua 07 Jul 2010, 11:42

Obrigado pela colaboração +1 de CRED Laughing
Lendário
Lendário
Administrador Lendário
Administrador Lendário

Mensagens : 1958

Ir para o topo Ir para baixo

[ALL]Retirando o bug do acento 100% Empty Re: [ALL]Retirando o bug do acento 100%

Mensagem por Gu1lh3rm3 Qua 07 Jul 2010, 11:47

vlw ^^
Gu1lh3rm3
Gu1lh3rm3
Membro de Honra
Membro de Honra

Mensagens : 1232

http://www.extremedbz.eu5.org

Ir para o topo Ir para baixo

[ALL]Retirando o bug do acento 100% Empty Re: [ALL]Retirando o bug do acento 100%

Mensagem por gabrielsort Dom 22 Ago 2010, 13:19

me ajuda como vc vaz as ballz vicar com + 10k de dano
gabrielsort
gabrielsort
Novato
Novato

Mensagens : 21

Ir para o topo Ir para baixo

[ALL]Retirando o bug do acento 100% Empty Re: [ALL]Retirando o bug do acento 100%

Mensagem por gabrielsort Dom 22 Ago 2010, 13:20

ajuda como faz pra ball vica com mais de 10k de dano
gabrielsort
gabrielsort
Novato
Novato

Mensagens : 21

Ir para o topo Ir para baixo

[ALL]Retirando o bug do acento 100% Empty Re: [ALL]Retirando o bug do acento 100%

Mensagem por Lucas Roberto Dom 22 Ago 2010, 13:21

Voce apostou no Lugar erro se voce presisa de ajuda Aposta no Topico de Ajuda

Preste mais Atenção ao apostar

E deu Double Post Neutral
Lucas Roberto
Lucas Roberto
Membro Veterano
Membro Veterano

Mensagens : 1794

http://universogamesmmo.forumeiros.com/forum

Ir para o topo Ir para baixo

[ALL]Retirando o bug do acento 100% Empty Re: [ALL]Retirando o bug do acento 100%

Mensagem por Coyotte Dom 12 Dez 2010, 17:42

Como vou no server side ?[ALL]Retirando o bug do acento 100% 80839

eu sei tipo abrir o vb e ir no forms e modules.

mais ond fica esse client side

sou iniciante mal aew Very Happy
Coyotte
Coyotte
Membro
Membro

Mensagens : 111

Ir para o topo Ir para baixo

[ALL]Retirando o bug do acento 100% Empty Re: [ALL]Retirando o bug do acento 100%

Mensagem por Lucas Lôpo Dom 12 Dez 2010, 17:48

Na pasta Client , e abri pelo VB =D
Lucas Lôpo
Lucas Lôpo
Membro Veterano
Membro Veterano

Mensagens : 833

Ir para o topo Ir para baixo

[ALL]Retirando o bug do acento 100% Empty Re: [ALL]Retirando o bug do acento 100%

Mensagem por Coyotte Dom 12 Dez 2010, 17:49

Vlw ^^ ja tinha conseguido xD
Coyotte
Coyotte
Membro
Membro

Mensagens : 111

Ir para o topo Ir para baixo

[ALL]Retirando o bug do acento 100% Empty Re: [ALL]Retirando o bug do acento 100%

Mensagem por Kalibodi Seg 17 Jan 2011, 14:58

PArabens Funfo Sertin

Vou Dar meu pRimeiro cred a tu parabens +1Cred
Kalibodi
Kalibodi
Novato
Novato

Mensagens : 22

Ir para o topo Ir para baixo

[ALL]Retirando o bug do acento 100% Empty Re: [ALL]Retirando o bug do acento 100%

Mensagem por novinho98 Seg 28 Mar 2011, 13:53

Qual vb devo baixar pq tipo eu ja tentei de tds, se puder me passa o link do que vc tem eu estaria grato!
novinho98
novinho98
Novato
Novato

Mensagens : 16

Ir para o topo Ir para baixo

[ALL]Retirando o bug do acento 100% Empty Re: [ALL]Retirando o bug do acento 100%

Mensagem por Gu1lh3rm3 Seg 28 Mar 2011, 19:39

tem aqui na mmorpgbr ... Mais o Nome eh VB 6.0
Gu1lh3rm3
Gu1lh3rm3
Membro de Honra
Membro de Honra

Mensagens : 1232

http://www.extremedbz.eu5.org

Ir para o topo Ir para baixo

[ALL]Retirando o bug do acento 100% Empty Re: [ALL]Retirando o bug do acento 100%

Mensagem por Conteúdo patrocinado


Conteúdo patrocinado


Ir para o topo Ir para baixo

Ir para o topo

- Tópicos semelhantes

 
Permissões neste sub-fórum
Não podes responder a tópicos