I already told you how to get NFD to work.
Timer:
On button
OFF button:
Make sure your timer interval is 1 and enabled false.
Timer:
Code:
Dim NFD As Long
Dim NFD1 As Long
Call ReadALong("WarRock", &H01279280, NFD)
NFD1 = NFD + &H264
Call WriteAFloat("Warrock", NFD1, -999)
Code:
Timer1.Enabled = True
Code:
Timer1.Enabled = False
Dim NFD As Long
Dim NFD1 As Long
Call ReadALong("WarRock", &H01279280, NFD)
NFD1 = NFD + &H264
Call WriteAFloat("Warrock", NFD1, 0)


