So i'am now <expert of visual basic 6 hacks but i need addresses (have some).
i Release a my tutorial. if u want better and pretty hack. So Lets Start.
1.If u Want Undetected Module Change the Commands (WLong to example a yogilek01) This Look it :
Code:
Public Function WLong(gamewindowtext As String, address As Long, value As Byte) later Public Function yogilek01(gamewindowtext As String, address As Long, value As Byte)
2.A Password WithOut Adding a a)add a text box called b)add a second text box called c)and add a command called d)and copy and paste this
Code:
If txtUserName = "mpgh" And txtPassword = "yogilek" Then
Unlock1.Enabled = False
txtUserName.Enabled = False
txtPassword.Enabled = False
3.Adding CheckBoxes
a)add a CheckBox From Options and Open It.
b)when u see this:
Code:
Private Sub Check1_Click()
End Sub
write this:
Code:
Private Sub Check1_Click()
If Check1 = Checked Then
Timer1.Interval = 1
End Sub
and for Turn Off it Write This :
Code:
Private Sub Check2_Click()
If Check2 = Checked Then
Timer1.Interval = 0
End Sub
3.Adding a Hotkeys and Weapons in SLots!
1)adding hotkeys for weapons in slots
a)if u want winchester in slot copy this and paste:
Code:
If GetKeyPress(vbKey5) Then
Dim Winchester As Long
Dim winchester1 As Long
Call RLong("Warrock", &H8B5288, Winchester)
winchester1 = Winchester + &H4C
Call WLong("Warrock", winchester1, 34)
End If
and for anothers :
a)add timer called and open it and add example a
Code:
If GetKeyPress(vbKeyControl) And GetKeyPress(vbKey1) Then
Stamina.Interval = 1
End If
b)Then Add a New Timer Called Stamina and add this:
Code:
Private Sub Stamina_Timer()
Call WLong("WarRock", &H7F2B34, 1120403456)
End Sub
4.Adding a Changing Labels
a)make a new label called example Stamina Off
b)make a new button and open it and paste it:
Code:
Private Sub Command1_Click()
Label1 = Stamina On
Call WLong("WarRock", &H7F2B34, 1120403456)
End Sub
ok, and it End Of My Tutorial Don't Lech If U Can add Me a Reputation Thank You [TUTORIAL FOR NEWBIES] bye