er hello well i have made this hack it is my first attempt at making 1 i used the undertected modual maker to genarate a udm i then coded it i had in it

Stamina ((worked))
no spred/recoil ((Did Not Work))
Winchester ((did not work)) (hotkey was f12)
Instant Spawn ((Did Not Work))
Nfd ((Did not work))

i used the address from here (the new 1's)
this is what i got in the end


Code:
Private Sub Command1_Click()
Timer4.Enabled = True
End Sub
Private Sub Command2_Click()
Timer1.Enabled = True
End Sub
Private Sub Command3_Click()
Timer2.Enabled = True
End Sub
Private Sub Command4_Click()
Timer3.Enabled = True
End Sub
Private Sub Command5_Click()
Timer1.Enabled = False
End Sub
Private Sub Command6_Click()
Timer2.Enabled = False
End Sub
Private Sub Command7_Click()
Timer3.Enabled = False
End Sub
Private Sub Command8_Click()
Timer4.Enabled = False
End Sub
Private Sub Timer1_Timer()
Call KJMQEZIWD("WarRock", &HB0F7F8, 0)
Dim recoil1 As Long
Dim recoil2 As Long
Dim recoil3 As Long
Dim recoil4 As Long
Call KJMQIEZWD("WarRock", &H136A0E0, recoil1)
recoil2 = recoil1 + &H2D8
recoil3 = recoil1 + &H2DC
recoil4 = recoil1 + &H2E0
Call KJMQEZIWD("WarRock", recoil2, 0)
Call KJMQEZIWD("WarRock", recoil3, 0)
Call KJMQEZIWD("WarRock", recoil4, 0)
End Sub
Private Sub Timer2_Timer()
Dim STAN As Long
Dim STAN1 As Long
Call KJMQIEZWD("WarRock", &H136A0E0, STAN)
STAN1 = STAN + &H288
Call KJMQEZIWD("WarRock", STAN1, 1120403456)
End Sub
Private Sub Timer3_Timer()
Dim NFD As Long
Dim NFD1 As Long
Call KJMQIEZWD("WarRock", &H136A0E0, NFD)
NFD1 = NFD + &H260
Call JKMQEIZWD("WarRock", NFD1, -2000)
End Sub
Private Sub Timer4_Timer()
Call KJMQEZIWD("WarRock", &H10C3A94, 0)
Call KJMQEZIWD("WarRock", &HD8C1F0, 0)
Call KJMQEZIWD("WarRock", &H10C3A9C, 0)
End Sub
Private Sub Timer5_Timer()
If IZDWKJMQE(vbKeyF12) Then
        Dim gun1 As Long
        Dim gun2 As Long
        Dim gun3 As Long
        Call KJMQIEZWD("WarRock", &H136A0E0, gun1)
        gun2 = gun1 + &H4C
        gun3 = txtGun.Text
        Call KJMQEZIWD("WarRock", gun2, gun3)
        End If
End Sub
Ow and by The Way Can Some Tell Me Y This Is detected I only just made it played for 3 minutes and id was i had a multi hack

i took bits from diffrent tut's from all over the place to make this so it is probly wrong coded but still no explain y i get banned with in 2 minutes or is it just vb.6
allways detected now