Results 1 to 4 of 4
  1. #1
    iOwnage's Avatar
    Join Date
    Aug 2009
    Gender
    male
    Location
    Aussie Aussie Aussie OI OI OI
    Posts
    118
    Reputation
    12
    Thanks
    58

    [TuT] Making a trainer with VB..

    First of all. This is completely leeched off PGH. (Check my siggy, dun care if I gets banned) Enjoy.


    Quote Originally Posted by iOwnage View Post
    This is a spoonfed tutorial. It will have everything you'll need to make a trainer using VB 2008. You will need pointers from CE or MHS first. This is not recommended for you if you are not advanced in any of those.

    First of all, you need to start a project.
    File > New Project > Name your project > Ok

    Now you should see "Form1". If you wanna rename it, right click > propertys. At the bottom rgiht corner, it should show "Text" which is it's name. Rename that.

    For the next part, you'll need to add 2 new modules.
    Here's a DL for a module maker - https://www.********e.com/?4s3t9veb8o2
    Now open it up, and press on "Generate Fast Module"
    After that, go to Project > Add new module - Under Module Module1, copy and paste the module there. And change WarRock to the process name.

    Once again, go to Project > Add new Module. And copy and paaste this (change WarRock to process name):
    Code:
    'readdll
    Public Function readdll(ByVal modulename As String)
    Dim procmodule As ProcessModule
    Dim constant1 As Integer
    Dim constant2 As Long
    Dim constant3 As Process() = Process.GetProcessesByName("WarRock")
    If constant3.Length = 0 Then
    Return 0
    End If
    For Each procmodule In constant3(0).Modules
    If modulename = procmodule.ModuleName Then
    constant1 = procmodule.BaseAddress
    End If
    Next
    constant2 = constant1
    Return constant2
    End Function
    Save both modules, and we'll continue on.
    Go to View > Toolbox > All windows forms
    So, select timer. And double click on it.
    Then add this code if you have a pointer with a HEX.:
    Code:
    dim string1 as long
    dim string2 as integer
    string1 = readdll("cshell.dll")
    string2 = "&H" + Hex(string1 + &H451014)
    Call WriteLongPointer(string2, &H2C,1,2)
    Code:
    Add this code if you have a simple pointer without HEX:
    
    dim string1 as long dim string2 as integer string1 = readdll("cshell.dll") 'module of your address string2 = "&H" + Hex(string1 + &H451014) Call WriteMemory(string2,1,2)

    WriteLongPointer = Replace this with the WriteLongPointer code in your module (should be on left side of module maker)
    WriteMemory = Replace this with the WriteMemory code in your module (should be on left side of module maker)
    cshell.dll = Module address
    &H451014 = &H + address/pointer
    &H2C = &H + your Offset
    1 = value you want
    2 = type of byte

    Now that the timer part is done. You need buttons to enable then, go back to your toolbox and add a button.
    If you want timer1 to be enabled then add this code to the button:
    Code:
    Timer1.Enabled = True
    If you want timer1 to be disabled then add this code to the button:
    Code:
    Timer1.Enabled = False
    To finish off building your trainer:
    Go to File > Save All.
    Go to Build > Build <APPLICATION NAME>

    Building it will fail IF you have any errors in the error window (ignore warnings). There will always be an error popping up because of the module maker, feel free to use a different one.

  2. #2
    Pixie's Avatar
    Join Date
    Apr 2009
    Gender
    male
    Location
    Pixie wird wieder steigen.
    Posts
    1,884
    Reputation
    22
    Thanks
    229
    My Mood
    Fine
    SHIT DAS ALOT!

    And what does this do??

  3. #3
    iOwnage's Avatar
    Join Date
    Aug 2009
    Gender
    male
    Location
    Aussie Aussie Aussie OI OI OI
    Posts
    118
    Reputation
    12
    Thanks
    58
    Quote Originally Posted by PixieCorp View Post
    SHIT DAS ALOT!

    And what does this do??
    Make a trainer..
    And btw, in your app you said you can code VB..
    You don't know how to though o.O You just remember the codes that you see xD

  4. #4
    Pixie's Avatar
    Join Date
    Apr 2009
    Gender
    male
    Location
    Pixie wird wieder steigen.
    Posts
    1,884
    Reputation
    22
    Thanks
    229
    My Mood
    Fine
    Read ur PM omg, and go to ur site, im about to post my spammer

Similar Threads

  1. How to make a trainer with VB.NET?
    By gott4 in forum Visual Basic Programming
    Replies: 6
    Last Post: 01-17-2010, 05:56 PM
  2. Making trainer with UCE...problem
    By h4x0r m3mb3r in forum WarRock - International Hacks
    Replies: 2
    Last Post: 07-26-2007, 04:48 PM
  3. Someone Wants To Make A Trainer With Me?
    By ltkort213 in forum WarRock - International Hacks
    Replies: 8
    Last Post: 06-11-2007, 08:24 AM
  4. [ReQuest] Some one Wants to make a Trainer with me..?
    By sidnietje in forum WarRock - International Hacks
    Replies: 7
    Last Post: 06-11-2007, 07:27 AM
  5. [TUT] Making trainer in UCE
    By nabbos in forum WarRock - International Hacks
    Replies: 2
    Last Post: 05-27-2007, 03:18 AM

Tags for this Thread