'Since most people don't know how to use the address for a server control tool, and how to apply a certain function to all 18 players, I'll tell you how and also give you some knowledge on the basics of VB.Net. Please do not leech these addresses and find them yourself!
*The code is used as an example and you should not copy and paste it or you wont learn anything.
*I personally recommend VB.Net than other programing languages, it's way easier.
*No link to cheat engine? I can't post external links.
'What you will need:
'-Visual Basic (Version 6 or above)
'-Basic knowledge.
'-Cheat Engine to find address for player 1 for for each function.
'-Read/write memory class or module (by Master131 or Jorndel)
'How do I find the address?
'-Go in a private match.
'-Decide what you want to look for, for instance, primary clip.
'-Check your current amount, lets say it's 96, we search 96 in cheat engine (first scan)
'-Shoot once and reload, by doing this we are changing the value making it easier to find the right address(es)
'-Search for the changed value, 95, search for 95 (next scan)
'-Repeat the above until you end up the the fewest addresses as possible, search for the writable one. All other addresses
are read only, meaning uselss in this case.
'Primary clip (for example).
Code:
Dim Address0 As Integer = &H38EC 'Value to get address for next player.
Dim Address1 As Integer = &H01D05BE8 'Address for 1.9.453
Dim Address2 As Integer = Address1 + Address0
Dim Address3 As Integer = Address2 + Address0
Dim Address4 As Integer = Address3 + Address0
Dim Address5 As Integer = Address4 + Address0
Dim Address6 As Integer = Address5 + Address0
Dim Address7 As Integer = Address6 + Address0
Dim Address8 As Integer = Address7 + Address0
Dim Address9 As Integer = Address8 + Address0
Dim Address10 As Integer = Address9 + Address0
Dim Address11 As Integer = Address10 + Address0
Dim Address12 As Integer = Address11 + Address0
Dim Address13 As Integer = Address12 + Address0
Dim Address14 As Integer = Address13 + Address0
Dim Address15 As Integer = Address14 + Address0
Dim Address16 As Integer = Address15 + Address0
Dim Address17 As Integer = Address16 + Address0
Dim Address18 As Integer = Address17 + Address0
Dim Value As Integer = &H99999 'Value to apply to address
'Add x18 checkboxes to your form.
'Usage.
Code:
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
'Player 1
If Checkbox1.Checked Then
WriteMemory(Address1, Value)
Else
'Do nothing.
End If
'Repeat the above with Address 2-18.
End Sub
'Set the timers interval to 1 and enable it, the lower the interval the more constant the value will be written.
'The same thing can be with all the address, for example player health, equipment and ammo.
'It isn't necessary to use a checkbox to apply a value to an address, you can use anything, such as buttons and so on.
'To read the names of players do this, I'm using listview1 as an example. Just do the what I did in the start but read the values.
Code:
Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
'Player names.
ListViw1.Item1 = ReadMemory(Address0)
'Repeat the above with Address 2-18.
End Sub
'Some definitions:
'-Intiger = Numeric input/output.
'-String = Text input/output.
'-Dim = Declares and allocates storage space for one or more variables.
'-If, then, else = Conditionally executes a group of statements, depending on the value of an expression.
'-Interval = An intervening time or space.
'-Hexadecimal = Relating to or using a system of numerical notation that has 16 rather than 10 as its base.
Dim Address0 As Integer = &H274
Dim Address1 As Integer = &H1B3F3C4
Dim Address2 As Integer = Address1 + Address0
Dim Address3 As Integer = Address2 + Address0
Dim Address4 As Integer = Address3 + Address0
Dim Address5 As Integer = Address4 + Address0
Dim Address6 As Integer = Address5 + Address0
Dim Address7 As Integer = Address6 + Address0
Dim Address8 As Integer = Address7 + Address0
Dim Address9 As Integer = Address8 + Address0
Dim Address10 As Integer = Address9 + Address0
Dim Address11 As Integer = Address10 + Address0
Dim Address12 As Integer = Address11 + Address0
Dim Address13 As Integer = Address12 + Address0
Dim Address14 As Integer = Address13 + Address0
Dim Address15 As Integer = Address14 + Address0
Dim Address16 As Integer = Address15 + Address0
Dim Address17 As Integer = Address16 + Address0
Dim Address18 As Integer = Address17 + Address0
Dim Value As Integer = &H100
'For health just do the same thing as you did with ammo.
'If this helped, thank me or add rep and be sure to add me in credits.
End Class
Note that what you do here.
Will take much memory and will require some CPU power
+ It will cause the Form to lag
---------- Post added at 12:35 AM ---------- Previous post was at 12:25 AM ----------
You have like your long: DIM ***' Shit shit shit.
You can spear your hands
Code:
Function MyThingy(ByRef Player As Integer, ByRef UpdateValue As Integer) As Integer
Return ( &H01D05BE8 * Player ) + UpdateValue
End Function
Now you can do like this:
Code:
Dim ValueToWrite As Integer = 10
WriteInteger(MyThingy(0, &HH38EC), ValueToWrite)
Hope that will help some, and this is way easier.
Then spending your time writing the same over and over.
You should make a loop for the players, less memory will be needed and your code gets more understandable.
Plus the 'definitions' are extremely nooby since the first thing you do when you dont understand a piece of soft-/hardware is read the damn manual
Originally Posted by Anonymouss
You should make a loop for the players, less memory will be needed and your code gets more understandable.
Plus the 'definitions' are extremely nooby since the first thing you do when you dont understand a piece of soft-/hardware is read the damn manual
Making a loop run every milisec will cause the application to be horrible.
I do rather suggest you to use it in a thread then
To avoid problems on your program :P
Originally Posted by Jorndel
Making a loop run every milisec will cause the application to be horrible.
I do rather suggest you to use it in a thread then
To avoid problems on your program :P
Sorry, forgot this is VB
Nice contribution
Thread prefix changed to Tutorial.
Originally Posted by Geomatrical the 7th
Code:
Dim Address0 As Integer = &H38EC 'Value to get address for next player.
Dim Address1 As Integer = &H01D05BE8 'Address for 1.9.453
Dim Address2 As Integer = Address1 + Address0
Dim Address3 As Integer = Address2 + Address0
Dim Address4 As Integer = Address3 + Address0
Dim Address5 As Integer = Address4 + Address0
Dim Address6 As Integer = Address5 + Address0
Dim Address7 As Integer = Address6 + Address0
Dim Address8 As Integer = Address7 + Address0
Dim Address9 As Integer = Address8 + Address0
Dim Address10 As Integer = Address9 + Address0
Dim Address11 As Integer = Address10 + Address0
Dim Address12 As Integer = Address11 + Address0
Dim Address13 As Integer = Address12 + Address0
Dim Address14 As Integer = Address13 + Address0
Dim Address15 As Integer = Address14 + Address0
Dim Address16 As Integer = Address15 + Address0
Dim Address17 As Integer = Address16 + Address0
Dim Address18 As Integer = Address17 + Address0
Dim Value As Integer = &H99999 'Value to apply to address
Holy crap.. This reminds me of a colleague that to solve a small program (a table of sin values from 0 to 90) created 90 variables, one for each result
That's why God has created arrays, you should use them.
Originally Posted by -InSaNe-
Thread prefix changed to Tutorial.
Holy crap.. This reminds me of a colleague that to solve a small program (a table of sin values from 0 to 90) created 90 variables, one for each result
That's why God has created arrays, you should use them.