Results 1 to 12 of 12
  1. #1
    MujiXx's Avatar
    Join Date
    Dec 2009
    Gender
    female
    Location
    canada lol
    Posts
    47
    Reputation
    10
    Thanks
    1
    My Mood
    Bitchy

    Just Cause 2 30 min demo/how to get rid of timer

    hey this is game is offline, but its pretty cool and fun. there is a 30 minute limit on to it, but there is an exploit to it that will make so you can play it as much as you want xD

    heres a vid i found on youtube:

    now on to the exploit.

    1: Press tnx
    2: Download autoit from: https://www.autoitscript.com/cgi-bin/...t-v3-setup.exe
    3: Install autoit
    4: download the attached text file
    5: Copy everything within the text file
    6: Paste it into Autoit
    7: Open up Just Cause 2
    8: open up autoit and save the file somewhere
    9: After saving it press f5 and you can play it as much as you want xD

    Now what the code does is i believe its a memory changing thingy, not sure, i'm not a programmer, but that is what my brother told me when he saw the code.

    Don't forget to press the tnx button xD

  2. #2
    Ghost's Avatar
    Join Date
    Jun 2009
    Gender
    male
    Location
    Under your bed, watching you sleep.
    Posts
    24,674
    Reputation
    3481
    Thanks
    3,602
    niiiiiceeeee



    My games;

    x

  3. #3
    epicfailure/'s Avatar
    Join Date
    Aug 2009
    Gender
    male
    Location
    All i hear is a plaintive, high-pitched, protracted sound, as in pain, fear, supplication
    Posts
    2,851
    Reputation
    145
    Thanks
    114
    Copy everything from the text file, and post it.
    FUUUUUUUUUUUUUUU

  4. #4
    Taylor Swift's Avatar
    Join Date
    Aug 2008
    Gender
    male
    Location
    Spangdahlem, Germany
    Posts
    6,384
    Reputation
    357
    Thanks
    637
    My Mood
    Buzzed
    exactly as the dude above m,e said
    If you need somebody to talk to... click here. This is not a scam, or a joke.
    Help me afford my next tattoo!


    Scammers List:
    1. patti123 - $50.00

  5. #5
    Zendikar's Avatar
    Join Date
    Dec 2009
    Gender
    male
    Posts
    30
    Reputation
    10
    Thanks
    1
    My Mood
    Tired
    games r for losers

  6. #6
    xroxrorx's Avatar
    Join Date
    Apr 2010
    Gender
    male
    Posts
    1
    Reputation
    10
    Thanks
    0
    Quote Originally Posted by ghost View Post
    niiiiiceeeee
    like this ?


    ;;================================================ ================================
    ;; Includes
    ;;================================================ ================================
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #RequireAdmin
    #NoTrayIcon
    ;;================================================ ================================
    ;; Main
    ;;================================================ ================================
    Opt("WinTitleMatchMode", 4)
    SetPrivilege("SeDebugPrivilege", 1)
    Global $ProcessID = WinGetProcess("Just Cause 2 Demo", "")
    Dim $ProcessFound = 0
    While $ProcessFound = 0
    If $ProcessID = -1 Then
    MsgBox(4096, "Error", "No process found.")
    Exit(1)
    EndIf
    $ProcessFound = 1
    WEnd

    WinActivate("Just Cause 2 Demo")
    $wc = WinGetPos("Just Cause 2 Demo")
    $x = $wc[0] + ($wc[2] / 2) - 149/2
    $y = $wc[1] + ($wc[3] / 2) - 42/2

    GUICreate("BOLOPatch", 149, 42, $x, $y, BitOR($WS_SYSMENU,$WS_CAPTION,$WS_POPUP,$WS_POPUPW INDOW,$WS_BORDER))
    GUICtrlCreateLabel("Status:", 0, 0, 37, 17, $SS_CENTER)
    $status = GUICtrlCreateLabel("", 40, 0, 107, 17, $SS_CENTER, $WS_EX_CLIENTEDGE)
    GUICtrlCreateLabel("Coding by G&H Productions", 0, 24, 148, 17, BitOR($SS_CENTER,$SS_NOPREFIX), $WS_EX_CLIENTEDGE)
    GUISetState()

    Patch()

    While 1
    $msg = GUIGetMsg()
    Switch $msg
    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    WEnd
    ;;================================================ ================================
    ;; Patch
    ;;================================================ ================================
    Func Patch()
    $DLL = _MemoryOpen($ProcessID)

    If @Error Then
    GUICtrlSetData($status, "Patching failure.")
    EndIf

    _MemoryWrite(0x004FE17D, $DLL, 0x90, "byte");;;
    _MemoryWrite(0x004FE17E, $DLL, 0x90, "byte");;; TIME LIMIT DISABLE
    _MemoryWrite(0x004FE17F, $DLL, 0x90, "byte");;;

    _MemoryWrite(0x007F2C95, $DLL, 0x90, "byte");;;
    _MemoryWrite(0x007F2C96, $DLL, 0x90, "byte");;;
    _MemoryWrite(0x007F2C97, $DLL, 0x90, "byte");;; MAP LIMIT DISABLE
    _MemoryWrite(0x007F2C98, $DLL, 0x90, "byte");;;
    _MemoryWrite(0x007F2C99, $DLL, 0x90, "byte");;;

    _MemoryClose($DLL)

    GUICtrlSetData($status, "Patching success!")
    EndFunc

    ;;;
    ;; NOMADMEMORY EXTRACT
    ;;;

    Func _MemoryOpen($iv_Pid, $iv_DesiredAccess = 0x1F0FFF, $iv_InheritHandle = 1)

    If Not ProcessExists($iv_Pid) Then
    SetError(1)
    Return 0
    EndIf

    Local $ah_Handle[2] = [DllOpen('kernel32.dll')]

    If @Error Then
    SetError(2)
    Return 0
    EndIf

    Local $av_OpenProcess = DllCall($ah_Handle[0], 'int', 'OpenProcess', 'int', $iv_DesiredAccess, 'int', $iv_InheritHandle, 'int', $iv_Pid)

    If @Error Then
    DllClose($ah_Handle[0])
    SetError(3)
    Return 0
    EndIf

    $ah_Handle[1] = $av_OpenProcess[0]

    Return $ah_Handle

    EndFunc

    Func _MemoryWrite($iv_Address, $ah_Handle, $v_Data, $sv_Type = 'dword')

    If Not IsArray($ah_Handle) Then
    SetError(1)
    Return 0
    EndIf

    Local $v_Buffer = DllStructCreate($sv_Type)

    If @Error Then
    SetError(@Error + 1)
    Return 0
    Else
    DllStructSetData($v_Buffer, 1, $v_Data)
    If @Error Then
    SetError(6)
    Return 0
    EndIf
    EndIf

    DllCall($ah_Handle[0], 'int', 'WriteProcessMemory', 'int', $ah_Handle[1], 'int', $iv_Address, 'ptr', DllStructGetPtr($v_Buffer), 'int', DllStructGetSize($v_Buffer), 'int', '')

    If Not @Error Then
    Return 1
    Else
    SetError(7)
    Return 0
    EndIf

    EndFunc

    Func _MemoryClose($ah_Handle)

    If Not IsArray($ah_Handle) Then
    SetError(1)
    Return 0
    EndIf

    DllCall($ah_Handle[0], 'int', 'CloseHandle', 'int', $ah_Handle[1])
    If Not @Error Then
    DllClose($ah_Handle[0])
    Return 1
    Else
    DllClose($ah_Handle[0])
    SetError(2)
    Return 0
    EndIf

    EndFunc

    Func SetPrivilege( $privilege, $bEnable )
    Const $MY_TOKEN_ADJUST_PRIVILEGES = 0x0020
    Const $MY_TOKEN_QUERY = 0x0008
    Const $MY_SE_PRIVILEGE_ENABLED = 0x0002
    Local $hToken, $SP_auxret, $SP_ret, $hCurrProcess, $nTokens, $nTokenIndex, $priv
    $nTokens = 1
    $LUID = DLLStructCreate("dword;int")
    If IsArray($privilege) Then $nTokens = UBound($privilege)
    $TOKEN_PRIVILEGES = DLLStructCreate("dword;dword[" & (3 * $nTokens) & "]")
    $NEWTOKEN_PRIVILEGES = DLLStructCreate("dword;dword[" & (3 * $nTokens) & "]")
    $hCurrProcess = DLLCall("kernel32.dll","hwnd","GetCurrentProcess")
    $SP_auxret = DLLCall("advapi32.dll","int","OpenProcessToken","h wnd",$hCurrProcess[0], _
    "int",BitOR($MY_TOKEN_ADJUST_PRIVILEGES,$MY_TOKEN_ QUERY),"int*",0)
    If $SP_auxret[0] Then
    $hToken = $SP_auxret[3]
    DLLStructSetData($TOKEN_PRIVILEGES,1,1)
    $nTokenIndex = 1
    While $nTokenIndex <= $nTokens
    If IsArray($privilege) Then
    $priv = $privilege[$nTokenIndex-1]
    Else
    $priv = $privilege
    EndIf
    $ret = DLLCall("advapi32.dll","int","LookupPrivilegeValue ","str","","str",$priv, _
    "ptr",DLLStructGetPtr($LUID))
    If $ret[0] Then
    If $bEnable Then
    DLLStructSetData($TOKEN_PRIVILEGES,2,$MY_SE_PRIVIL EGE_ENABLED,(3 * $nTokenIndex))
    Else
    DLLStructSetData($TOKEN_PRIVILEGES,2,0,(3 * $nTokenIndex))
    EndIf
    DLLStructSetData($TOKEN_PRIVILEGES,2,DllStructGetD ata($LUID,1),(3 * ($nTokenIndex-1)) + 1)
    DLLStructSetData($TOKEN_PRIVILEGES,2,DllStructGetD ata($LUID,2),(3 * ($nTokenIndex-1)) + 2)
    DLLStructSetData($LUID,1,0)
    DLLStructSetData($LUID,2,0)
    EndIf
    $nTokenIndex += 1
    WEnd
    $ret = DLLCall("advapi32.dll","int","AdjustTokenPrivilege s","hwnd",$hToken,"int",0, _
    "ptr",DllStructGetPtr($TOKEN_PRIVILEGES),"int",Dll StructGetSize($NEWTOKEN_PRIVILEGES), _
    "ptr",DllStructGetPtr($NEWTOKEN_PRIVILEGES),"int*" ,0)
    $f = DLLCall("kernel32.dll","int","GetLastError")
    EndIf
    $NEWTOKEN_PRIVILEGES=0
    $TOKEN_PRIVILEGES=0
    $LUID=0
    If $SP_auxret[0] = 0 Then Return 0
    $SP_auxret = DLLCall("kernel32.dll","int","CloseHandle","hwnd", $hToken)
    If Not $ret[0] And Not $SP_auxret[0] Then Return 0
    return $ret[0]
    EndFunc

  7. #7
    Dead Bones Brook's Avatar
    Join Date
    Sep 2008
    Gender
    female
    Location
    On that seat right over there.
    Posts
    8,328
    Reputation
    858
    Thanks
    1,533
    My Mood
    Daring
    Quote Originally Posted by xroxrorx View Post
    like this ?

    [SPAM]
    50 lines
    [/SPAM]
    Nah.. More like this..

    ;;================================================ ================================
    ;; Includes
    ;;================================================ ================================
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #RequireAdmin
    #NoTrayIcon
    ;;================================================ ================================
    ;; Main
    ;;================================================ ================================
    Opt("WinTitleMatchMode", 4)
    SetPrivilege("SeDebugPrivilege", 1)
    Global $ProcessID = WinGetProcess("Just Cause 2 Demo", "")
    Dim $ProcessFound = 0
    While $ProcessFound = 0
    If $ProcessID = -1 Then
    MsgBox(4096, "Error", "No process found.")
    Exit(1)
    EndIf
    $ProcessFound = 1
    WEnd

    WinActivate("Just Cause 2 Demo")
    $wc = WinGetPos("Just Cause 2 Demo")
    $x = $wc[0] + ($wc[2] / 2) - 149/2
    $y = $wc[1] + ($wc[3] / 2) - 42/2

    GUICreate("BOLOPatch", 149, 42, $x, $y, BitOR($WS_SYSMENU,$WS_CAPTION,$WS_POPUP,$WS_POPUPW INDOW,$WS_BORDER))
    GUICtrlCreateLabel("Status:", 0, 0, 37, 17, $SS_CENTER)
    $status = GUICtrlCreateLabel("", 40, 0, 107, 17, $SS_CENTER, $WS_EX_CLIENTEDGE)
    GUICtrlCreateLabel("Coding by G&H Productions", 0, 24, 148, 17, BitOR($SS_CENTER,$SS_NOPREFIX), $WS_EX_CLIENTEDGE)
    GUISetState()

    Patch()

    While 1
    $msg = GUIGetMsg()
    Switch $msg
    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    WEnd
    ;;================================================ ================================
    ;; Patch
    ;;================================================ ================================
    Func Patch()
    $DLL = _MemoryOpen($ProcessID)

    If @Error Then
    GUICtrlSetData($status, "Patching failure.")
    EndIf

    _MemoryWrite(0x004FE17D, $DLL, 0x90, "byte");;;
    _MemoryWrite(0x004FE17E, $DLL, 0x90, "byte");;; TIME LIMIT DISABLE
    _MemoryWrite(0x004FE17F, $DLL, 0x90, "byte");;;

    _MemoryWrite(0x007F2C95, $DLL, 0x90, "byte");;;
    _MemoryWrite(0x007F2C96, $DLL, 0x90, "byte");;;
    _MemoryWrite(0x007F2C97, $DLL, 0x90, "byte");;; MAP LIMIT DISABLE
    _MemoryWrite(0x007F2C98, $DLL, 0x90, "byte");;;
    _MemoryWrite(0x007F2C99, $DLL, 0x90, "byte");;;

    _MemoryClose($DLL)

    GUICtrlSetData($status, "Patching success!")
    EndFunc

    ;;;
    ;; NOMADMEMORY EXTRACT
    ;;;

    Func _MemoryOpen($iv_Pid, $iv_DesiredAccess = 0x1F0FFF, $iv_InheritHandle = 1)

    If Not ProcessExists($iv_Pid) Then
    SetError(1)
    Return 0
    EndIf

    Local $ah_Handle[2] = [DllOpen('kernel32.dll')]

    If @Error Then
    SetError(2)
    Return 0
    EndIf

    Local $av_OpenProcess = DllCall($ah_Handle[0], 'int', 'OpenProcess', 'int', $iv_DesiredAccess, 'int', $iv_InheritHandle, 'int', $iv_Pid)

    If @Error Then
    DllClose($ah_Handle[0])
    SetError(3)
    Return 0
    EndIf

    $ah_Handle[1] = $av_OpenProcess[0]

    Return $ah_Handle

    EndFunc

    Func _MemoryWrite($iv_Address, $ah_Handle, $v_Data, $sv_Type = 'dword')

    If Not IsArray($ah_Handle) Then
    SetError(1)
    Return 0
    EndIf

    Local $v_Buffer = DllStructCreate($sv_Type)

    If @Error Then
    SetError(@Error + 1)
    Return 0
    Else
    DllStructSetData($v_Buffer, 1, $v_Data)
    If @Error Then
    SetError(6)
    Return 0
    EndIf
    EndIf

    DllCall($ah_Handle[0], 'int', 'WriteProcessMemory', 'int', $ah_Handle[1], 'int', $iv_Address, 'ptr', DllStructGetPtr($v_Buffer), 'int', DllStructGetSize($v_Buffer), 'int', '')

    If Not @Error Then
    Return 1
    Else
    SetError(7)
    Return 0
    EndIf

    EndFunc

    Func _MemoryClose($ah_Handle)

    If Not IsArray($ah_Handle) Then
    SetError(1)
    Return 0
    EndIf

    DllCall($ah_Handle[0], 'int', 'CloseHandle', 'int', $ah_Handle[1])
    If Not @Error Then
    DllClose($ah_Handle[0])
    Return 1
    Else
    DllClose($ah_Handle[0])
    SetError(2)
    Return 0
    EndIf

    EndFunc

    Func SetPrivilege( $privilege, $bEnable )
    Const $MY_TOKEN_ADJUST_PRIVILEGES = 0x0020
    Const $MY_TOKEN_QUERY = 0x0008
    Const $MY_SE_PRIVILEGE_ENABLED = 0x0002
    Local $hToken, $SP_auxret, $SP_ret, $hCurrProcess, $nTokens, $nTokenIndex, $priv
    $nTokens = 1
    $LUID = DLLStructCreate("dword;int")
    If IsArray($privilege) Then $nTokens = UBound($privilege)
    $TOKEN_PRIVILEGES = DLLStructCreate("dword;dword[" & (3 * $nTokens) & "]")
    $NEWTOKEN_PRIVILEGES = DLLStructCreate("dword;dword[" & (3 * $nTokens) & "]")
    $hCurrProcess = DLLCall("kernel32.dll","hwnd","GetCurrentProcess")
    $SP_auxret = DLLCall("advapi32.dll","int","OpenProcessToken","h wnd",$hCurrProcess[0], _
    "int",BitOR($MY_TOKEN_ADJUST_PRIVILEGES,$MY_TO KEN_ QUERY),"int*",0)
    If $SP_auxret[0] Then
    $hToken = $SP_auxret[3]
    DLLStructSetData($TOKEN_PRIVILEGES,1,1)
    $nTokenIndex = 1
    While $nTokenIndex <= $nTokens
    If IsArray($privilege) Then
    $priv = $privilege[$nTokenIndex-1]
    Else
    $priv = $privilege
    EndIf
    $ret = DLLCall("advapi32.dll","int","LookupPrivilegeValue ","str","","str",$priv, _
    "ptr",DLLStructGetPtr($LUID))
    If $ret[0] Then
    If $bEnable Then
    DLLStructSetData($TOKEN_PRIVILEGES,2,$MY_SE_PRIVIL EGE_ENABLED,(3 * $nTokenIndex))
    Else
    DLLStructSetData($TOKEN_PRIVILEGES,2,0,(3 * $nTokenIndex))
    EndIf
    DLLStructSetData($TOKEN_PRIVILEGES,2,DllStructGetD ata($LUID,1),(3 * ($nTokenIndex-1)) + 1)
    DLLStructSetData($TOKEN_PRIVILEGES,2,DllStructGetD ata($LUID,2),(3 * ($nTokenIndex-1)) + 2)
    DLLStructSetData($LUID,1,0)
    DLLStructSetData($LUID,2,0)
    EndIf
    $nTokenIndex += 1
    WEnd
    $ret = DLLCall("advapi32.dll","int","AdjustTokenPrivilege s","hwnd",$hToken,"int",0, _
    "ptr",DllStructGetPtr($TOKEN_PRIVILEGES),"int" ,Dll StructGetSize($NEWTOKEN_PRIVILEGES), _
    "ptr",DllStructGetPtr($NEWTOKEN_PRIVILEGES),"i nt*" ,0)
    $f = DLLCall("kernel32.dll","int","GetLastError")
    EndIf
    $NEWTOKEN_PRIVILEGES=0
    $TOKEN_PRIVILEGES=0
    $LUID=0
    If $SP_auxret[0] = 0 Then Return 0
    $SP_auxret = DLLCall("kernel32.dll","int","CloseHandle","hwnd", $hToken)
    If Not $ret[0] And Not $SP_auxret[0] Then Return 0
    return $ret[0]
    EndFunc

  8. #8
    Synchromanica's Avatar
    Join Date
    Mar 2010
    Gender
    male
    Location
    The internet.
    Posts
    5,125
    Reputation
    152
    Thanks
    615
    My Mood
    Grumpy
    Cool game is cool.

  9. #9
    Expert at leaving women disappointed physically and emotionally.
    Premium Seller
    Premium Member
    Minionforce
    Wyo's Avatar
    Join Date
    Feb 2010
    Gender
    female
    Location
    Tijuana
    Posts
    23,288
    Reputation
    3511
    Thanks
    3,641
    My Mood
    Lurking
    will buy this game
     
    I smoke dix daily.
    I am Dix, and Arun is my master.
    I'M #1 NIGXMAS SCAMMER

  10. #10
    Ghost's Avatar
    Join Date
    Jun 2009
    Gender
    male
    Location
    Under your bed, watching you sleep.
    Posts
    24,674
    Reputation
    3481
    Thanks
    3,602
    no one saw the epic bump?



    My games;

    x

  11. #11
    Expert at leaving women disappointed physically and emotionally.
    Premium Seller
    Premium Member
    Minionforce
    Wyo's Avatar
    Join Date
    Feb 2010
    Gender
    female
    Location
    Tijuana
    Posts
    23,288
    Reputation
    3511
    Thanks
    3,641
    My Mood
    Lurking
    Quote Originally Posted by xroxrorx View Post
    like this ?


    ;;================================================ ================================
    ;; Includes
    ;;================================================ ================================
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #RequireAdmin
    #NoTrayIcon
    ;;================================================ ================================
    ;; Main
    ;;================================================ ================================
    Opt("WinTitleMatchMode", 4)
    SetPrivilege("SeDebugPrivilege", 1)
    Global $ProcessID = WinGetProcess("Just Cause 2 Demo", "")
    Dim $ProcessFound = 0
    While $ProcessFound = 0
    If $ProcessID = -1 Then
    MsgBox(4096, "Error", "No process found.")
    Exit(1)
    EndIf
    $ProcessFound = 1
    WEnd

    WinActivate("Just Cause 2 Demo")
    $wc = WinGetPos("Just Cause 2 Demo")
    $x = $wc[0] + ($wc[2] / 2) - 149/2
    $y = $wc[1] + ($wc[3] / 2) - 42/2

    GUICreate("BOLOPatch", 149, 42, $x, $y, BitOR($WS_SYSMENU,$WS_CAPTION,$WS_POPUP,$WS_POPUPW INDOW,$WS_BORDER))
    GUICtrlCreateLabel("Status:", 0, 0, 37, 17, $SS_CENTER)
    $status = GUICtrlCreateLabel("", 40, 0, 107, 17, $SS_CENTER, $WS_EX_CLIENTEDGE)
    GUICtrlCreateLabel("Coding by G&H Productions", 0, 24, 148, 17, BitOR($SS_CENTER,$SS_NOPREFIX), $WS_EX_CLIENTEDGE)
    GUISetState()

    Patch()

    While 1
    $msg = GUIGetMsg()
    Switch $msg
    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    WEnd
    ;;================================================ ================================
    ;; Patch
    ;;================================================ ================================
    Func Patch()
    $DLL = _MemoryOpen($ProcessID)

    If @Error Then
    GUICtrlSetData($status, "Patching failure.")
    EndIf

    _MemoryWrite(0x004FE17D, $DLL, 0x90, "byte");;;
    _MemoryWrite(0x004FE17E, $DLL, 0x90, "byte");;; TIME LIMIT DISABLE
    _MemoryWrite(0x004FE17F, $DLL, 0x90, "byte");;;

    _MemoryWrite(0x007F2C95, $DLL, 0x90, "byte");;;
    _MemoryWrite(0x007F2C96, $DLL, 0x90, "byte");;;
    _MemoryWrite(0x007F2C97, $DLL, 0x90, "byte");;; MAP LIMIT DISABLE
    _MemoryWrite(0x007F2C98, $DLL, 0x90, "byte");;;
    _MemoryWrite(0x007F2C99, $DLL, 0x90, "byte");;;

    _MemoryClose($DLL)

    GUICtrlSetData($status, "Patching success!")
    EndFunc

    ;;;
    ;; NOMADMEMORY EXTRACT
    ;;;

    Func _MemoryOpen($iv_Pid, $iv_DesiredAccess = 0x1F0FFF, $iv_InheritHandle = 1)

    If Not ProcessExists($iv_Pid) Then
    SetError(1)
    Return 0
    EndIf

    Local $ah_Handle[2] = [DllOpen('kernel32.dll')]

    If @Error Then
    SetError(2)
    Return 0
    EndIf

    Local $av_OpenProcess = DllCall($ah_Handle[0], 'int', 'OpenProcess', 'int', $iv_DesiredAccess, 'int', $iv_InheritHandle, 'int', $iv_Pid)

    If @Error Then
    DllClose($ah_Handle[0])
    SetError(3)
    Return 0
    EndIf

    $ah_Handle[1] = $av_OpenProcess[0]

    Return $ah_Handle

    EndFunc

    Func _MemoryWrite($iv_Address, $ah_Handle, $v_Data, $sv_Type = 'dword')

    If Not IsArray($ah_Handle) Then
    SetError(1)
    Return 0
    EndIf

    Local $v_Buffer = DllStructCreate($sv_Type)

    If @Error Then
    SetError(@Error + 1)
    Return 0
    Else
    DllStructSetData($v_Buffer, 1, $v_Data)
    If @Error Then
    SetError(6)
    Return 0
    EndIf
    EndIf

    DllCall($ah_Handle[0], 'int', 'WriteProcessMemory', 'int', $ah_Handle[1], 'int', $iv_Address, 'ptr', DllStructGetPtr($v_Buffer), 'int', DllStructGetSize($v_Buffer), 'int', '')

    If Not @Error Then
    Return 1
    Else
    SetError(7)
    Return 0
    EndIf

    EndFunc

    Func _MemoryClose($ah_Handle)

    If Not IsArray($ah_Handle) Then
    SetError(1)
    Return 0
    EndIf

    DllCall($ah_Handle[0], 'int', 'CloseHandle', 'int', $ah_Handle[1])
    If Not @Error Then
    DllClose($ah_Handle[0])
    Return 1
    Else
    DllClose($ah_Handle[0])
    SetError(2)
    Return 0
    EndIf

    EndFunc

    Func SetPrivilege( $privilege, $bEnable )
    Const $MY_TOKEN_ADJUST_PRIVILEGES = 0x0020
    Const $MY_TOKEN_QUERY = 0x0008
    Const $MY_SE_PRIVILEGE_ENABLED = 0x0002
    Local $hToken, $SP_auxret, $SP_ret, $hCurrProcess, $nTokens, $nTokenIndex, $priv
    $nTokens = 1
    $LUID = DLLStructCreate("dword;int")
    If IsArray($privilege) Then $nTokens = UBound($privilege)
    $TOKEN_PRIVILEGES = DLLStructCreate("dword;dword[" & (3 * $nTokens) & "]")
    $NEWTOKEN_PRIVILEGES = DLLStructCreate("dword;dword[" & (3 * $nTokens) & "]")
    $hCurrProcess = DLLCall("kernel32.dll","hwnd","GetCurrentProcess")
    $SP_auxret = DLLCall("advapi32.dll","int","OpenProcessToken","h wnd",$hCurrProcess[0], _
    "int",BitOR($MY_TOKEN_ADJUST_PRIVILEGES,$MY_TOKEN_ QUERY),"int*",0)
    If $SP_auxret[0] Then
    $hToken = $SP_auxret[3]
    DLLStructSetData($TOKEN_PRIVILEGES,1,1)
    $nTokenIndex = 1
    While $nTokenIndex <= $nTokens
    If IsArray($privilege) Then
    $priv = $privilege[$nTokenIndex-1]
    Else
    $priv = $privilege
    EndIf
    $ret = DLLCall("advapi32.dll","int","LookupPrivilegeValue ","str","","str",$priv, _
    "ptr",DLLStructGetPtr($LUID))
    If $ret[0] Then
    If $bEnable Then
    DLLStructSetData($TOKEN_PRIVILEGES,2,$MY_SE_PRIVIL EGE_ENABLED,(3 * $nTokenIndex))
    Else
    DLLStructSetData($TOKEN_PRIVILEGES,2,0,(3 * $nTokenIndex))
    EndIf
    DLLStructSetData($TOKEN_PRIVILEGES,2,DllStructGetD ata($LUID,1),(3 * ($nTokenIndex-1)) + 1)
    DLLStructSetData($TOKEN_PRIVILEGES,2,DllStructGetD ata($LUID,2),(3 * ($nTokenIndex-1)) + 2)
    DLLStructSetData($LUID,1,0)
    DLLStructSetData($LUID,2,0)
    EndIf
    $nTokenIndex += 1
    WEnd
    $ret = DLLCall("advapi32.dll","int","AdjustTokenPrivilege s","hwnd",$hToken,"int",0, _
    "ptr",DllStructGetPtr($TOKEN_PRIVILEGES),"int",Dll StructGetSize($NEWTOKEN_PRIVILEGES), _
    "ptr",DllStructGetPtr($NEWTOKEN_PRIVILEGES),"int*" ,0)
    $f = DLLCall("kernel32.dll","int","GetLastError")
    EndIf
    $NEWTOKEN_PRIVILEGES=0
    $TOKEN_PRIVILEGES=0
    $LUID=0
    If $SP_auxret[0] = 0 Then Return 0
    $SP_auxret = DLLCall("kernel32.dll","int","CloseHandle","hwnd", $hToken)
    If Not $ret[0] And Not $SP_auxret[0] Then Return 0
    return $ret[0]
    EndFunc
    Don't bump old threads
     
    I smoke dix daily.
    I am Dix, and Arun is my master.
    I'M #1 NIGXMAS SCAMMER

  12. #12
    EndRiT's Avatar
    Join Date
    Dec 2005
    Gender
    male
    Location
    USSR
    Posts
    12,751
    Reputation
    170
    Thanks
    4,294,967,295
    Bumping faggot.

Similar Threads

  1. How to get rid of viruses disguised as hacks
    By BARON in forum Combat Arms Hacks & Cheats
    Replies: 17
    Last Post: 04-17-2009, 11:26 PM
  2. How to get rid of Directx 9.0c error!
    By Redneck89 in forum Combat Arms Hacks & Cheats
    Replies: 5
    Last Post: 03-25-2009, 04:16 PM
  3. how to get rid of the advertisment?
    By X-Frozenized in forum Suggestions, Requests & Help
    Replies: 2
    Last Post: 12-28-2008, 02:30 PM
  4. How to get rid of I.P band
    By hatepb4life in forum WarRock - International Hacks
    Replies: 10
    Last Post: 08-13-2007, 05:36 PM
  5. How to get rid of the Bush
    By arunforce in forum General
    Replies: 0
    Last Post: 07-05-2007, 02:21 AM