Scope.. Whats wrong?

[kingkicker8]

Private Sub Timer2_Timer()
If GetAsyncKeyState(2) <> 0 Then
Call WriteALong("WarRock", &H9493558, 1)
End If
End Sub

Private Sub Timer3_Timer()
If GetAsyncKeyState(2) <> 0 Then
Call WriteALong("WarRock", &H9493558, 0)
End If
End Sub


whats wrong?.....

i like rightclick - than zoom.. next rightclick - back to normal ^^

pls help me... wont work :P

[wessel93]

The Address , maybe try this one

Private Sub Timer2_Timer()
If GetAsyncKeyState(97) <> 0 Then Call WriteALong("Warrock", &H90DC36, &H0)
End Sub

[kingkicker8]

need on and off .. and it dont seems right...

1 is on.. not &H0 ^^

[wessel93]

I't works for me, i got it right out of my hack:P

[kingkicker8]

could u send code for On and OFF?

(vb6)

[xtrylanx]

hey wessel are you a fan of mythbusters? i'm a huge fan i have nearly seen all their epiosodes on Discovery!

[wessel93]

&h0 = off &h1 = On

[123456789987654321]

what do you have in the 2 command buttons??

[wessel93]

command buttons? i work whit timers like this:
1. put in a timer interval 100
2. put this @ the source code:

Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

3. put this @ the timer code:

If GetAsyncKeyState(96) <> 0 Then Call WriteALong("Warrock", &H90DC36, &H1)

(96) is the numeric 0, thats the key you must press for activating it

[juppeli]

have u tried with other hotkeys (does it even work at all)?

[123456789987654321]

what am i doing wrong?

Private Sub Command1_Click()
Call WriteALong("WarRock", &H9493558, 1)
End Sub

Private Sub Command2_Click()
Call WriteALong("WarRock", &H9493558, 0)
End Sub

Private Sub Timer1_Timer()
If GetAsyncKeyState(97) <> 0 Then Call WriteALong("Warrock", &H90DC36, &H1)
Call WriteALong("WarRock", &H9493558, 1)
End If
End Sub


Private Sub Timer2_Timer()
If GetAsyncKeyState(97) <> 0 Then Call WriteALong("Warrock", &H90DC36, &H0)
Call WriteALong("WarRock", &H9493558, 0)
End If
End Sub

[123456789987654321]

can you give everytihing you put into you buttons

[wessel93]

why is Shouldn't is have this straigt from my own source:P

[wessel93]

just made a small tut?

[123456789987654321]

it would be nice