PDA

View Full Version : Glass Walls Help



Herbal
12-30-2007, 02:17 AM
What i did for glass walls was make 2 timers with interval of 0.

Timer1

Call WriteALong("Warrock", &Hglasswall, 0)

Timer2

Call WriteALong("Warrock", &HNofog, nofogfreeze)


Command 1

Timer1.interval = 1
Timer2.interval = 0

Command 2

Timer1.interval = 0
Timer2.interval = 1

Can someone tell me what i did wrong please? Thank yous!!!:D

wr194t
12-30-2007, 02:55 AM
Glass Walls ON button:

Timer1.Enabled = True

Glass Walls OFF button:

Timer1.Enabled = False

Glass Walls Timer (Timer1, if it isn't 1, change it in your buttons):

Call WriteALong("WarRock", &HADFB04, 0)

No Fog ON button:

Timer2.Enabled = True

No Fog OFF button:

Timer2.Enabled = False

No Fog Timer (Timer2, if it isn't 1, change it in your buttons):

Call WriteALong("WarRock", &ADFB08, 1176256512)

Make sure both timers have Interval 1, Enabled False.

Herbal
12-30-2007, 03:26 AM
Is that the wrong glass walls address? Cause thats what I am using and it is not working.:mad:

wr194t
12-30-2007, 03:28 AM
Is that the wrong glass walls address? Cause thats what I am using and it is not working.:mad:I used the address from the 12/19 addresses thread. Make sure your coding is like I've posted.

Herbal
12-30-2007, 03:37 AM
I did that exactly

wr194t
12-30-2007, 03:41 AM
I did that exactlyDo both timers have Interval 1, Enabled False?

Herbal
12-30-2007, 03:46 AM
yea heres my exact code

Private Sub Timer4_Timer()
Call WAL("Warrock", &HADFB04, 0)
End Sub

Private Sub Timer5_Timer()
Call WAL("Warrock", &HADFB08, 1176256512)
End Sub


glass walls part :

Private Sub Command7_Click()
Timer4.Enabled = True
End Sub

Private Sub Command8_Click()
Timer4.Enabled = False
End Sub

No Fog Part :
Private Sub Command17_Click()
Timer5.Enabled = True
End Sub

Private Sub Command18_Click()
Timer5.Enabled = False
End Sub

Glass walls still not workin:(

wr194t
12-30-2007, 04:29 AM
The coding looks fine, but do both timers have Interval 1, Enabled False? Moved to VB6 section.

Herbal
12-30-2007, 04:36 AM
yes they do. Maybe its just the address

ZeaS
12-30-2007, 05:36 AM
glass walls on = float freeze it to 0
glass walls off = long

Herbal
12-30-2007, 02:22 PM
I dont think the address works anymore because that didnt work either. Did you guys get it to work?

SteeL
12-30-2007, 09:41 PM
OK do this Step - by step

1st Make 2 timers
Settings : Enabled = true ; interval = 1

Add this code on 1st time [Wallhack on]:

Private Sub Timer1_Timer()
If GetKeyPress(vbKeyNumpad1) Then
Call WriteALong("warrock", &HADFB08, 0)
End If
End Sub


add this on 2nd Timer [Wallhack OFF] :

Private Sub Timer2_Timer()
If GetKeyPress(vbKeyNumpad2) Then
Call WriteALong("warrock", &HADFB08, 1176256512)
End If
End Sub


http://img265.imageshack.us/img265/9887/glasswallsjz4.jpg

now when u press Numpad 1 it will ON Glasswalls & when u press Numpad 2 it will OFF glass walls. :D

enjoy ;)