Quick Question..

Posts 1–3 of 3 · Page 1 of 1
Quick Question..
Does GPS work when u make it with vb6??? and if it does how do u do it??does it need a timer?
just change the value to 1, like you would with any other hack

Code:
Private Sub GPS_Click()
    Dim HOn As Long
    
    Call ReadALong("WarRock", GPS_Addy, HOn)
    
    If HOn = 0 Then
        Call WriteALong("WarRock", GPS_Addy, 1)
        gps1.ForeColor = &HFF00&
    Else
        Call WriteALong("WarRock", GPS_Addy, 0)
        gps1.ForeColor = &HFF&
    End If
End Sub
if you dont want the changing colors then just

Code:
Private Sub GPS_Click()
    Dim HOn As Long
    
    Call ReadALong("WarRock", GPS_Addy, HOn)
    
    If HOn = 0 Then Call WriteALong("WarRock", GPS_Addy, 1) Else Call WriteALong("WarRock", GPS_Addy, 0)
End Sub
3 lines ^^
Quote Originally Posted by unseenss View Post
just change the value to 1, like you would with any other hack

Code:
Private Sub GPS_Click()
    Dim HOn As Long
    
    Call ReadALong("WarRock", GPS_Addy, HOn)
    
    If HOn = 0 Then
        Call WriteALong("WarRock", GPS_Addy, 1)
        gps1.ForeColor = &HFF00&
    Else
        Call WriteALong("WarRock", GPS_Addy, 0)
        gps1.ForeColor = &HFF&
    End If
End Sub
if you dont want the changing colors then just

Code:
Private Sub GPS_Click()
    Dim HOn As Long
    
    Call ReadALong("WarRock", GPS_Addy, HOn)
    
    If HOn = 0 Then Call WriteALong("WarRock", GPS_Addy, 1) Else Call WriteALong("WarRock", GPS_Addy, 0)
End Sub
ight ty very much appreciate it
3 lines ^^
ight ty very much appreciate it
Posts 1–3 of 3 · Page 1 of 1
This thread is closed for replies.

Similar Threads

Tags for this Thread

None

Talk with us