[Request] New weapon Pointer

[foxhound]

when I go in WarRock my code dont work at all so can you please tell me why? here is the code i use p.s LOL100 is ReadAlong and LOL200 is WriteAfloat
Code is here
Private Sub Command1_Click()
If Text1.Text < 72 Then
Text1.Text = 34
End If
Dim Shotgun1 As Long
Dim Shotgun2 As Long
Call LOL100("Warrock", &H129EF90, Shotgun1)
Shotgun2 = Shotgun1 + &H4C
Call LOL200("Warrock", Shotgun1, Text1.Text)
End Sub

Private Sub Test1_Click()
Dim Shotgun1 As Long
Dim Shotgun2 As Long
Call LOL100("Warrock", &H129EF90, Shotgun1)
Shotgun2 = Shotgun1 + &H4C
Call LOL200("Warrock", Shotgun1, 34)
End Sub

[dig1003]

Thats because you're using WriteAfloat instead of WriteALong, change LOL200 for WriteALong and it will work

BTW Can someone pm me tha AntiKick value plz? thx