![[S]hin](/data/avatars/l/488/488880.jpg?1486987217){kind=avatar}
InGame by Shin Sekai 1.0 (beta)
[Présentation]
Je vous présente un InGame codé en VisualBasic, il ne contient que 4 fonctions car c'est une beta, j'aimerais vous demander si à part l'ajout des fonctions que je compte bien faire sur la vraie version, je voudrais juste avoir 2,3 conseils de votre par pas beaucoup car sa reste mon programme et ce n'est pas le bonne section pour demander cela, donc je veux juste vous présenter ce programme.
[Code source]
Comme promis voici le code source obligatoire, c'est un in-game en visual basic donc un peut normal que c'est répétitif:
Il contient 4 fonctions, donc elles sont dans l'ordre comme dans le code indiqué ci-dessous
-1hitkill
-GodMode
-200HP
-SpeedHack
Il a bien sûr été fait par moi, on je ne m'en vente pas parce que tout le monde le sais IG VB = Facile, de plus je n'ai pas mi beaucoup de fonctions mais j'éspère que sa va vous plaire
Vous devez etre connecte pour voir les liens.
[Présentation]
Je vous présente un InGame codé en VisualBasic, il ne contient que 4 fonctions car c'est une beta, j'aimerais vous demander si à part l'ajout des fonctions que je compte bien faire sur la vraie version, je voudrais juste avoir 2,3 conseils de votre par pas beaucoup car sa reste mon programme et ce n'est pas le bonne section pour demander cela, donc je veux juste vous présenter ce programme.
[Code source]
Comme promis voici le code source obligatoire, c'est un in-game en visual basic donc un peut normal que c'est répétitif:
PHP:
Public Class Form1
Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged
If CheckBox1.Checked Then
WriteLong("S4Client.exe", &H527985, 1592365200)
Else
WriteLong("S4Client.exe", &H527985, 1592329594)
End If
End Sub
Private Sub CheckBox2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox2.CheckedChanged
If CheckBox2.Checked Then
WriteLong("S4Client.exe", &H528679, 1593591259)
Else
WriteLong("S4Client.exe", &H528679, 1593591257)
End If
End Sub
Private Sub CheckBox3_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox3.CheckedChanged
If CheckBox3.Checked Then
WriteLong("S4Client.exe", &H527924, 2348565979)
Else
WriteLong("S4Client.exe", &H527924, 2348565979)
End If
End Sub
Private Sub CheckBox4_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox4.CheckedChanged
If CheckBox4.Checked Then
WriteLong("S4Client.exe", &H526D04, 2348565979)
Else
WriteLong("S4Client.exe", &H526D04, 2348565977)
End If
End Sub
End ClassIl contient 4 fonctions, donc elles sont dans l'ordre comme dans le code indiqué ci-dessous
-1hitkill
-GodMode
-200HP
-SpeedHack
Il a bien sûr été fait par moi, on je ne m'en vente pas parce que tout le monde le sais IG VB = Facile, de plus je n'ai pas mi beaucoup de fonctions mais j'éspère que sa va vous plaire
Dernière édition:
![[F]lameche](/data/avatars/l/350/350956.jpg?1486986765){kind=avatar}
