Results 1 to 6 of 6
  1. #1
    cjg333's Avatar
    Join Date
    Apr 2007
    Location
    indianapolis
    Posts
    300
    Reputation
    17
    Thanks
    54

    [TuT] How to write a pointer and a float in vb6

    ok so you have your pointer and offset,now what keep using uce to hack or make a trainer?well if you already know how to make a trainer with theredeyes tut.but now we want to add superjump or swim.or w/e has a pointer.

    things you need in vb6
    how to add a timer(interval of 1)
    how to add a textbox
    theredeyes module,with my addon

    ok so heres my superjump code for example

    'we have to Dim our stuff,first

    Code:
    Dim jump As Long
    Dim jump1 As Long 
    Dim jump3 As Single
    'Ingame Hotkey Numpad 1 Obviously
    Code:
    If GetKeyPress(VbKeyNumPad1) Then
    ' Read a value from memory -the value being read is a pointer
    Code:
    Call ReadALong("WarRock", &H896E28, jump)
    ' Add (&H180) to the pointer,so now jump1 would be are pointer with are offset
    Code:
    jump1 = jump + &H180
    ' Assign the value to be written,well use 2000 for how high we want togo,
    Code:
    jump3 = 2000
    'and instead of 2000 u can put in a textbox, now any number you put in your textbox is how high you want to go
    Code:
    jump3 = text1

    'heres were we writeafloat,notice weve already assigend jump1 and jump3
    Code:
    Call WriteAFloat("WarRock", jump1, jump3) 
    End if
    end sub

    so heres the code alltogether
    Code:
    Dim jump As Long
    Dim jump1 As Long 
    Dim jump3 As Single 
    
     
    If GetKeyPress(VbKeyNumPad1) Then 
    Call ReadALong("WarRock", &H896E28, jump) 
    jump1 = jump + &H180
    jump3 = 2000 'or text1 for a textbox
    Call WriteAFloat("WarRock", jump1, jump3) 
    End if
    End Sub

    this is how i do a pointer,and a float
    swim is not a float so you dont need to callwriteafloat


    Code:
    Dim swim as long
    Dim swim1 as long
    Dim swim3 as Single
    If GetKeyPress(VbKeyNumPad8)Then
    Call ReadALong("WarRock",&H896E28,swim)
    swim1 = swim + &H54   'adds the offset
    swim3 = 4                   'is the value we want
    Call WriteALong("WarRock",swim1,swim3)
    End If
    End Sub
    heres the red eyes module with my addon
    Last edited by cjg333; 06-27-2007 at 08:15 PM.

  2. The Following 2 Users Say Thank You to cjg333 For This Useful Post:

    akampro (08-01-2012),olli-pekka (01-11-2008)

  3. #2
    jokuvaan11's Avatar
    Join Date
    May 2007
    Posts
    192
    Reputation
    11
    Thanks
    0
    Nice Dude , I Am First Who Saw This Hehe!!

  4. #3
    smartie's Avatar
    Join Date
    Mar 2007
    Location
    Holland
    Posts
    434
    Reputation
    15
    Thanks
    30
    + rep

    tyvm

  5. #4
    erwin0003's Avatar
    Join Date
    Sep 2007
    Gender
    male
    Location
    Leiderdorp
    Posts
    60
    Reputation
    10
    Thanks
    3
    nice that helps me
    Sorry For My English I am Dutch



  6. #5
    galaxy22's Avatar
    Join Date
    Apr 2008
    Posts
    1
    Reputation
    10
    Thanks
    0
    Wait, with the swim hack, what is the on code and what is the off code? do you need a timer????

  7. #6
    longri's Avatar
    Join Date
    Jun 2010
    Gender
    female
    Posts
    1
    Reputation
    10
    Thanks
    0
    suppose you have an address is 015C2A28
    now I want to see the content at that address, What is the value contained? (use VB6)
    THANKS

Similar Threads

  1. [TuT] How to make PW and value box for Guns/Superjump/SkyStormer(VB6)
    By jokuvaan11 in forum WarRock - International Hacks
    Replies: 14
    Last Post: 06-30-2007, 01:09 PM
  2. [Tut]How to REALLY be Invisible
    By EndRiT in forum WarRock - International Hacks
    Replies: 8
    Last Post: 04-24-2007, 09:13 AM
  3. [tut]how to have lots of nades
    By damanis1 in forum WarRock - International Hacks
    Replies: 20
    Last Post: 04-22-2007, 07:51 AM
  4. [Tut]How to become invisible
    By EndRiT in forum WarRock - International Hacks
    Replies: 24
    Last Post: 04-21-2007, 05:02 PM
  5. Tut: how to make cheese
    By ace76543 in forum General
    Replies: 14
    Last Post: 01-14-2007, 09:39 AM