Gellin
08-30-2007, 01:55 PM
This is very similar to my post on the command button hotkeys but here goes,
Open Vb.6, standard exe, add our module, add a check box
Click it 2 times and insert this code for css, insert a addressee and value
Private Sub Check1_Click()
Call WriteALong("Counter-Strike Source", &HAddie, "value")
End Sub
This for Warrock
Private Sub Check1_Click()
Call WriteALong("Warrock", &HAddie, "value")
End Sub
Thats The Code for the check box
Now you need to add Hotkeys.
Add 1 timer, set the variable to 1
Double click it and add this code
Private Sub Timer1_Timer()
If GetKeyPress(Numpad1) Then
Call Check1_Click 'Label it
End If
End Sub
WARROCK RULEZ
All Credz to GELLIN do not leech, or post anywhere else
Open Vb.6, standard exe, add our module, add a check box
Click it 2 times and insert this code for css, insert a addressee and value
Private Sub Check1_Click()
Call WriteALong("Counter-Strike Source", &HAddie, "value")
End Sub
This for Warrock
Private Sub Check1_Click()
Call WriteALong("Warrock", &HAddie, "value")
End Sub
Thats The Code for the check box
Now you need to add Hotkeys.
Add 1 timer, set the variable to 1
Double click it and add this code
Private Sub Timer1_Timer()
If GetKeyPress(Numpad1) Then
Call Check1_Click 'Label it
End If
End Sub
WARROCK RULEZ
All Credz to GELLIN do not leech, or post anywhere else