Results 1 to 3 of 3
  1. #1
    nukifux's Avatar
    Join Date
    Jul 2007
    Posts
    19
    Reputation
    10
    Thanks
    1

    UNDETECTED MODULE

    here enjoy.....if u have a hack thats new but detected and it still works just replace the old module with this one

    Private Declare Function S5334 Lib "user32" Alias "GetWindowThreadProcessId" (ByVal hwnd As Long, lpdwProcessId As Long) As Long
    Private Declare Function O2896 Lib "kernel32" Alias "OpenProcess" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long
    Private Declare Function I7747 Lib "kernel32" Alias "WriteProcessMemory" (ByVal hProcess As Long, ByVal lpBaseAddress As Any, lpBuffer As Any, ByVal nSize As Long, lpNumberOfBytesWritten As Long) As Long
    Private Declare Function A7607 Lib "user32" Alias "FindWindowA" ByVal Classname As String, ByVal WindowName As String) As Long
    Private Declare Function U7090 Lib "kernel32" Alias "ReadProcessMemory" (ByVal hProcess As Long, ByVal lpBaseAddress As Any, ByRef lpBuffer As Any, ByVal nSize As Long, lpNumberOfBytesWritten As Long) As Long
    Private Declare Function B4140 Lib "kernel32" Alias "CloseHandle" (ByVal hObject As Long) As Long

    Public Function pwnage01(Y3640 As Long, N7671 As Long)
    Dim W7905, J9619, W563 As Long
    W7905 = A7607(vbNullString, "WarRock")
    S5334 W7905, J9619
    W563 = O2896(&H1F0FFF, False, J9619)
    I7747 W563, Y3640, N7671, 4, 0&
    B4140 W563
    End Function

    Public Function pwnage02(Y3640 As Long, N7671 As Long)
    Dim W7905, J9619, W563 As Long
    W7905 = A7607(vbNullString, "WarRock")
    S5334 W7905, J9619
    W563 = O2896(&H1F0FFF, False, J9619)
    U7090 W563, Y3640, N7671, 4, 0&
    B4140 W563
    End Function

    Public Function pwnage03(Y3640 As Long, N7671 As Single)
    Dim W7905, J9619, W563 As Long
    W7905 = A7607(vbNullString, "WarRock")
    S5334 W7905, J9619
    W563 = O2896(&H1F0FFF, False, J9619)
    I7747 W563, Y3640, N7671, 4, 0&
    B4140 W563
    End Function

    Public Function pwnage04(Y3640 As Long, N7671 As Long)
    Dim W7905, J9619, W563 As Long
    W7905 = A7607(vbNullString, "WarRock")
    S5334 W7905, J9619
    W563 = O2896(&H1F0FFF, False, J9619)
    U7090 W563, Y3640, N7671, 4, 0&
    B4140 W563
    End Function

  2. #2
    Kung Fu Penguin31's Avatar
    Join Date
    Jun 2007
    Gender
    male
    Location
    how am i supposed to know....
    Posts
    473
    Reputation
    12
    Thanks
    48
    i dont think you should really post modules because it will get detected easily.







    [img]https://www.danasof*****m/sig/ghghhkjklk.jpg[/img]

    drill sargeant: How tall are you boy!?
    soldier: umm....urr about 5' 11''
    drill sargeant: I didn't know they stacked shit that high!!

    Creator of the Annihilation,Freebie and KFP Series.

    <MASTER HACKER>

  3. #3
    nukifux's Avatar
    Join Date
    Jul 2007
    Posts
    19
    Reputation
    10
    Thanks
    1
    lol i dont care go nuts ill just keep makeing more

Similar Threads

  1. [Tutorial] How to make your own undetected module in VB6
    By markfracasso11 in forum Visual Basic Programming
    Replies: 17
    Last Post: 10-15-2007, 09:34 AM
  2. undetected module
    By ledzepfan1 in forum WarRock - International Hacks
    Replies: 14
    Last Post: 10-02-2007, 12:29 PM
  3. [Tutorial] How to make your own undetected module in VB6
    By markfracasso11 in forum WarRock - International Hacks
    Replies: 22
    Last Post: 09-25-2007, 05:35 AM
  4. Undetected Module - Copy And Paste
    By prompbesj in forum WarRock - International Hacks
    Replies: 7
    Last Post: 09-23-2007, 12:48 PM
  5. Undetected module for VB6
    By Nurbek92 in forum Hack Requests
    Replies: 2
    Last Post: 08-22-2007, 06:39 PM