How do i add hotkeys to my hack (VB6) ??

[floris12345!]

Can somebody help me with adding hotkeys to my hack
I have winchester hack but how do i put a hotkey to it
like when i pres "5" i see a winchester ??

[Th3 0wnzman]

you make one button and one timer
set this in the button:

Timer?.enabled=true

Set this in the timer:

If GetKeyPress(vbKey5) Then
Dim Shotgun1 As Long
Dim Shotgun2 As Long
Call ReadALong("Warrock", &H12A8560, Shotgun1)
Shotgun2 = Shotgun1 + &H4C
Call WriteALong("Warrock", Shotgun2, 42)

Set interval 1

And you have shotgunhotkey