Shotgun,
Put this code in your Command button,
Dim Weapon As Long
Dim Weapon1 As Long
Call ReadALong("Warrock", &H8B5288, Weapon)
Weapon1 = Weapon + &H4C
Call WriteALong("Warrock", Weapon1, 34)
Greetz, SH15TER
Dim Weapon As Long
Dim Weapon1 As Long
Call ReadALong("Warrock", &H8B5288, Weapon)
Weapon1 = Weapon + &H4C
Call WriteALong("Warrock", Weapon1, 34)
Greetz, SH15TER



