Public Class Form1
'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.
'Addresses: (primary clip, player 1-18)
Code:
1. 1d05be8
2. 1d094d4
3. 1d0cdc0
4. 1d106ac
5. 1d13f98
6. 1d17884
7. 1d1b170
8. 1d1ea5c
9. 1d22348
10. 1d25c34
11. 1d29520
12. 1d2ce0c
13. 1d306f8
14. 1d33fe4
15. 1d378d0
16. 1d3b1bc
17. 1d3eaa8
18. 1d42394
'How to organize your code:
Code:
#Region "Primary Clip"
'Code
#End Region
'Health
Code:
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