PDA

View Full Version : Need help with a VB6 Problem



daniel3466
04-06-2008, 06:50 PM
am A Noob At Making Hacks.....But i am doing ok so far. i make a trainer For Scope And Shit Like That...but with the new addies i do not know how to put the code in.....SOcan you Post a pick Of what a simple Stamina Code Looks Like When Its In VB6

Like

Private Sub Command1_Click()
(THIS HERE)
End Sub


Thanks


VIDEO REMOVED DUE TO ADVERTISING

clipster15
04-06-2008, 08:19 PM
Do you have a module?

If you do:


Dim Address As Long
Dim Address1 As Long
Address = ReadALong("WarRock", &H1376340)
Address1 = Address + &H288
WriteAFloat("WarRock", Address1, 100)


OR



Dim Address As Long
Dim Address1 As Long
Address = ReadALong("WarRock", &H1376340)
Address1 = Address + &H288
WriteALong("WarRock", Address1, 1120403456)

frostbitekid
04-06-2008, 08:22 PM
isnt writeafloat easier cuz u freeze to 100, not like 1120403456 watever it is

daniel3466
04-07-2008, 12:49 PM
No

I mean like This

Private Sub Command1_Click()
Call WriteALong ("Warrock", &Hb0fd2a, 1)
End Sub

But I need Some Thing Else Too Like Stamina


Private Sub Command1_Click()
Call WriteALong ("Warrock", &Hb0fd2a, 1)
End Sub This Works

Private Sub Command1_Click()
Call WriteALong ("Warrock", &H288, 1)
End Sub this dose Not


What am i doin Wrong

frostbitekid
04-07-2008, 06:30 PM
No

I mean like This

Private Sub Command1_Click()
Call WriteALong ("Warrock", &Hb0fd2a, 1)
End Sub

But I need Some Thing Else Too Like Stamina


Private Sub Command1_Click()
Call WriteALong ("Warrock", &Hb0fd2a, 1)
End Sub This Works

Private Sub Command1_Click()
Call WriteALong ("Warrock", &H288, 1)
End Sub this dose Not


What am i doin Wrong
where did u get b0fd2a from? u need player pointer and stamina offset.

CptM0rg@n
04-08-2008, 05:54 AM
No

I mean like This

Private Sub Command1_Click()
Call WriteALong ("Warrock", &Hb0fd2a, 1)
End Sub

But I need Some Thing Else Too Like Stamina


Private Sub Command1_Click()
Call WriteALong ("Warrock", &Hb0fd2a, 1)
End Sub This Works

Private Sub Command1_Click()
Call WriteALong ("Warrock", &H288, 1)
End Sub this dose Not


What am i doin Wrong

what i do for stamina is

Private Sub Command1_Click()
Timer1.Interval = 1
End Sub

daniel3466
04-08-2008, 02:12 PM
c guys i do not know what offset or any thing like that means


I am still a little noobie
:****fag

daniel3466
04-08-2008, 05:46 PM
LOOK UP


VIDEO REMOVED DUE TO ADVERTISING

phire1989
04-09-2008, 02:56 AM
if you dont know what anything means i dont know how im supposed to help you...talk to me on msn [phire1989@live.com]