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.

pbbr (point blank brasil) Cogido de hack de patente atualizado.


 Compartilhar

Posts Recomendados

Ko8rzts.pngi0zC7xh.png

V28LX.png

 

 

Patente hack

 

If ComboBox1.SelectedItem = "Novato" Then

WritePointerInteger("PointBlank", &HA99408, 1, &H461D)

End If

If ComboBox1.SelectedItem = "Recruta" Then

WritePointerInteger("PointBlank", &HA99408, 2, &H461D)

End If

If ComboBox1.SelectedItem = "Soldado" Then

WritePointerInteger("PointBlank", &HA99408, 3, &H461D)

End If

If ComboBox1.SelectedItem = "Cabo" Then

WritePointerInteger("PointBlank", &HA99408, 4, &H461D)

End If

If ComboBox1.SelectedItem = "Sargento" Then

WritePointerInteger("PointBlank", &HA99408, 5, &H461D)

End If

If ComboBox1.SelectedItem = "Terceiro-Sargento 1" Then

WritePointerInteger("PointBlank", &HA99408, 6, &H461D)

End If

If ComboBox1.SelectedItem = "Terceiro-Sargento 2" Then

WritePointerInteger("PointBlank", &HA99408, 7, &H461D)

End If

If ComboBox1.SelectedItem = "Terceiro-Sargento 3" Then

WritePointerInteger("PointBlank", &HA99408, 8, &H461D)

End If

If ComboBox1.SelectedItem = "Segundo-Sargento 1" Then

WritePointerInteger("PointBlank", &HA99408, 9, &H461D)

End If

If ComboBox1.SelectedItem = "Segundo-Sargento 2" Then

WritePointerInteger("PointBlank", &HA99408, 10, &H461D)

End If

If ComboBox1.SelectedItem = "Segundo-Sargento 3" Then

WritePointerInteger("PointBlank", &HA99408, 11, &H461D)

End If

If ComboBox1.SelectedItem = "Primeiro-Sargento 1" Then

WritePointerInteger("PointBlank", &HA99408, 12, &H461D)

End If

If ComboBox1.SelectedItem = "Primeiro-Sargento 2" Then

WritePointerInteger("PointBlank", &HA99408, 13, &H461D)

End If

If ComboBox1.SelectedItem = "Primeiro-Sargento 3" Then

WritePointerInteger("PointBlank", &HA99408, 14, &H461D)

If ComboBox1.SelectedItem = "Primeiro-Sargento 4" Then

WritePointerInteger("PointBlank", &HA99408, 15, &H461D)

End If

If ComboBox1.SelectedItem = "Primeiro-Sargento 5" Then

WritePointerInteger("PointBlank", &HA99408, 16, &H461D)

End If

If ComboBox1.SelectedItem = "Segundo-Tenente 1" Then

WritePointerInteger("PointBlank", &HA99408, 17, &H461D)

End If

If ComboBox1.SelectedItem = "Segundo-Tenente 2" Then

WritePointerInteger("PointBlank", &HA99408, 18, &H461D)

End If

If ComboBox1.SelectedItem = "Segundo-Tenente 3" Then

WritePointerInteger("PointBlank", &HA99408, 19, &H461D)

End If

If ComboBox1.SelectedItem = "Segundo-Tenente 4" Then

WritePointerInteger("PointBlank", &HA99408, 20, &H461D)

End If

If ComboBox1.SelectedItem = "Primeiro-Tenente 1" Then

WritePointerInteger("PointBlank", &HA99408, 21, &H461D)

End If

If ComboBox1.SelectedItem = "Primeiro-Tenente 2" Then

WritePointerInteger("PointBlank", &HA99408, 22, &H461D)

End If

If ComboBox1.SelectedItem = "Primeiro-Tenente 3" Then

WritePointerInteger("PointBlank", &HA99408, 23, &H461D)

End If

If ComboBox1.SelectedItem = "Primeiro-Tenente 4" Then

WritePointerInteger("PointBlank", &HA99408, 24, &H461D)

End If

If ComboBox1.SelectedItem = "Primeiro-Tenente 5" Then

WritePointerInteger("PointBlank", &HA99408, 25, &H461D)

End If

If ComboBox1.SelectedItem = "Capitão 1" Then

WritePointerInteger("PointBlank", &HA99408, 26, &H461D)

End If

If ComboBox1.SelectedItem = "Capitão 2" Then

WritePointerInteger("PointBlank", &HA99408, 27, &H461D)

End If

If ComboBox1.SelectedItem = "Capitão 3" Then

WritePointerInteger("PointBlank", &HA99408, 28, &H461D)

End If

If ComboBox1.SelectedItem = "Capitão 4" Then

WritePointerInteger("PointBlank", &HA99408, 29, &H461D)

End If

If ComboBox1.SelectedItem = "Capitão 5" Then

WritePointerInteger("PointBlank", &HA99408, 30, &H461D)

End If

If ComboBox1.SelectedItem = "Major 1" Then

WritePointerInteger("PointBlank", &HA99408, 31, &H461D)

End If

If ComboBox1.SelectedItem = "Major 2" Then

WritePointerInteger("PointBlank", &HA99408, 32, &H461D)

End If

If ComboBox1.SelectedItem = "Major 3" Then

WritePointerInteger("PointBlank", &HA99408, 33, &H461D)

End If

If ComboBox1.SelectedItem = "Major 4" Then

WritePointerInteger("PointBlank", &HA99408, 34, &H461D)

End If

If ComboBox1.SelectedItem = "Major 5" Then

WritePointerInteger("PointBlank", &HA99408, 35, &H461D)

End If

If ComboBox1.SelectedItem = "Tenente Coronel 1" Then

WritePointerInteger("PointBlank", &HA99408, 36, &H461D)

End If

If ComboBox1.SelectedItem = "Tenente Coronel 2" Then

WritePointerInteger("PointBlank", &HA99408, 37, &H461D)

End If

If ComboBox1.SelectedItem = "Tenente Coronel 3" Then

WritePointerInteger("PointBlank", &HA99408, 38, &H461D)

End If

If ComboBox1.SelectedItem = "Tenente Coronel 4" Then

WritePointerInteger("PointBlank", &HA99408, 39, &H461D)

End If

If ComboBox1.SelectedItem = "Tenente Coronel 5" Then

WritePointerInteger("PointBlank", &HA99408, 40, &H461D)

End If

If ComboBox1.SelectedItem = "Coronel 1" Then

WritePointerInteger("PointBlank", &HA99408, 41, &H461D)

End If

If ComboBox1.SelectedItem = "Coronel 2" Then

WritePointerInteger("PointBlank", &HA99408, 42, &H461D)

End If

If ComboBox1.SelectedItem = "Coronel 3" Then

WritePointerInteger("PointBlank", &HA99408, 43, &H461D)

End If

If ComboBox1.SelectedItem = "Coronel 4" Then

WritePointerInteger("PointBlank", &HA99408, 44, &H461D)

End If

If ComboBox1.SelectedItem = "Coronel 5" Then

WritePointerInteger("PointBlank", &HA99408, 45, &H461D)

End If

If ComboBox1.SelectedItem = "General de Brigada" Then

WritePointerInteger("PointBlank", &HA99408, 46, &H461D)

End If

If ComboBox1.SelectedItem = "General de Divisão" Then

WritePointerInteger("PointBlank", &HA99408, 47, &H461D)

End If

If ComboBox1.SelectedItem = "General de Exército" Then

WritePointerInteger("PointBlank", &HA99408, 48, &H461D)

End If

If ComboBox1.SelectedItem = "Marechal" Then

WritePointerInteger("PointBlank", &HA99408, 49, &H461D)

End If

If ComboBox1.SelectedItem = "Herói de Guerra" Then

WritePointerInteger("PointBlank", &HA99408, 50, &H461D)

End If

If ComboBox1.SelectedItem = "Patente Bomba" Then

WritePointerInteger("PointBlank", &HA99408, 52, &H461D)

End If

If ComboBox1.SelectedItem = "Patente GM" Then

WritePointerInteger("PointBlank", &HA99408, 53, &H461D)

End If

End If

 

Creditos

:[E]xPsyZIKA:

 

GOSTOU ? DA THANKS! E SE FOR USAR NOS SEUS TRAINERS, NÃO ESQUECA DOS CREDITOS!

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.