Ir para conteúdo
Faça parte da equipe! (2024) ×
Conheça nossa Beta Zone! Novas áreas a caminho! ×
  • Quem está por aqui   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.
  • 0

Alguem poderia me ajudar com codigos


Sr Mw3
 Compartilhar

Pergunta

Ola eu estou aqui para pedir ajuda, pois alguns codigos meus estão infuncionais, e se alguem sabe um metodo de pegar codigos, ou site, ou tenha codigos de warpon hack ou editor pesso que me ajude... me adicione no msn: marcoantonio.b.m@hotmail.com!

se quizer mais contatos olhe na minha assinatura ok.. ficarei muito grato pela ajuda (:

LMkbu.png

Link para o comentário
Compartilhar em outros sites

4 respostass a esta questão

Posts Recomendados

  • 0

Vou colocar alguns do Visual Basic

 

REPEAT HACKE

Dim Re As Integer

Re = ReadPointerInteger("PointBlank", &HA72CA8, &H45DCC)

Dim R As Integer

R = Re - 5

WritePointerInteger("PointBlank", &HA72CA8, R, &H45DCC)

 

DESEQUIPAR ARMA PRIMARIA

 

WritePointerInteger("PointBlank", &HA72CA8, 0, &H460, &H0)

 

 

PROTEÇÃO UNIVERSAL

 

Dim i As Integer

Dim h As String

Dim G As String

For i = 412 To 667 Step 1

G = Hex(i)

h = "&H" & G

WritePointerByte("PointBlank", &HA72C8C, 255, h)

Next

 

 

No-RECUOL

 

Dim i As Integer

Dim h As String

Dim G As String

For i = 132 To 1076 Step 4

G = Hex(i)

h = "&H" & G

WritePointerByte("PointBlank", &HA72C8C, 0, &H174, h, &HF43)

WritePointerByte("PointBlank", &HA72C8C, 0, &H174, h, &HF4B)

Next

 

 

PRECISAO

 

 

Dim i As Integer

Dim h As String

Dim G As String

For i = 132 To 1076 Step 4

G = Hex(i)

h = "&H" & G

WritePointerByte("PointBlank", &HA72C8C, 0, &H174, h, &HF5B)

Next

 

 

 

 

ESSE AKI NAO SEI SE AINDA FUNFA MAIS OS DE CIMA TA OK

 

 

 

-Não Testados- -

 

 

Reload Hack: CheckBox

 

Dim i As Integer

Dim h As String

Dim G As String

For i = 132 To 1140 Step 4

G = Hex(i)

h = "&H" & G

WritePointerInteger("PointBlank", &HA70C8C, 16777215, &H174, h, &HEE3)

Next

 

 

Alcance: CheckBox

 

Dim i As Integer

Dim h As String

Dim G As String

For i = 132 To 1076 Step 4

G = Hex(i)

h = "&H" & G

WritePointerByte("PointBlank", &HA70C8C, 77, &H174, h, &H50F)

Next

 

 

Munição Infinita: CheckBox

 

Dim i As Integer

Dim h As String

Dim G As String

For i = 132 To 1140 Step 4

G = Hex(i)

h = "&H" & G

WritePointerByte("PointBlank", &HA70C8C, 0, &H174, h, &HEF1)

Next

 

 

Taxa de Disparo: CheckBox

 

Dim i As Integer

Dim h As String

Dim G As String

For i = 132 To 1140 Step 4

G = Hex(i)

h = "&H" & G

WritePointerByte("PointBlank", &HA70C8C, 0, &H174, h, &H507)

Next

Link para o comentário
Compartilhar em outros sites

Este tópico está impedido de receber novos posts.
 Compartilhar

×
×
  • Criar Novo...

Informação Importante

Nós fazemos uso de cookies no seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies , caso contrário, vamos supor que você está bem para continuar.