Need new addresses for VB6 !!! HELP

Need new addresses for vb6 , can someone send or give some undetected warrock hack codes for vb6. HELP ?

Stamina: Call WriteALong("WarRock", &H7F2B34, 1120403456)
CrossHair: Call WriteALong("WarRock", &H943A3C, 1)
Glass Wall: Call WriteALong("WarRock", &H95EA70, 0)
ESP,
On: Call WriteALong("Warrock", &H41DB7E, 8820)
Off: Call WriteALong("Warrock", &H41DB7E, 8821)
FOG,
On: Call WriteALong("WarRock", &H928C78, 1160503296)
Off: Call WriteALong("WarRock", &H95EA70, 1176256512)

No Spread + Recoil:


Call WriteALong("WarRock", &H943A50, 0)
Call WriteALong("WarRock", &H943A51, 0)
Call WriteALong("WarRock", &H943A52, 0)
Call WriteALong("WarRock", &H943A53, 0)
Call WriteALong("WarRock", &H943A54, 0)
Call WriteALong("WarRock", &H943A55, 0)
Call WriteALong("WarRock", &H943A56, 0)
Call WriteALong("WarRock", &H943A57, 0)
Call WriteALong("WarRock", &H943A58, 0)
Call WriteALong("WarRock", &H943A59, 0)






Stamina : 007F2B34 - Freeze at 1120403456

Crosshair : 00943A3C - Freeze at 1

Scope : 00943A16 - Change value to 1

Instant Spawn : 00B56F60 and 00E1FEC8 - Freeze both at 0 (updated)

Fifth Slot : 00B4C7D0 - Freeze at 4
Sixth Slot : 00B4C7D0 - Freeze At 5

No Spread - Freeze all at 0

00943A50
00943A52
00943A51
00943A53

No recoil - Freeze all at 0

00943A54
00943A55
00943A56
00943A57
00943A58
00943A59


Superjump : 008B5288 + 180 ( Same as "Z Value" below )

No Fall Damage : 008B5288 + 26C (-2000 value works)

Swim : 008B5288 + 54 ( swim value 4 walk value 0)

Weapons : 008B5288 + 4C
Usable weapons are :
Smoke nade ID:45
Flash Bang1 ID:46
Flash Bang2 ID:47
Winchester ID:34

teleportX : 008B5288 + 17C
teleportY : 008B5288 + 184
teleportZ : 008B5288 + 180

Detected Addresses (use a bypass)

If GetAsyncKeyState(112) <> 0 Then
Msgbox "Hotkey - F1"
End If
Player Boxes : 00943A3E - Freeze Value to 1 (Yes detected)

thats public shit i wont give u any good shit neither will anyone else more then likely