Login

giassamarkos · (Dieser Beitrag wurde zuletzt bearbeitet: 08.02.2016, 23:07 von DNA.)

Well Dna i suppose you remember this codesnippet

Visual Basic Code

Public Sub JmpToCave(ByVal DestinationAddi As Int32, ByVal sourceaddi As Int32, Optional ByVal NumberOfNops As Int32 = 0)
        Dim JmpBytes As Int32 = DestinationAddi - sourceaddi - 5
        Write_Byte(sourceaddi, &HE9)
        Write_Long(sourceaddi + 1, JmpBytes)
        For i = 0 To NumberOfNops - 1
            Write_Byte(sourceaddi + 5 + i, &H90)
        Next
    End Sub

    Public Function GetJmpBytes(ByVal DestinationAddi As Int32, ByVal SourceAddi As Int32)
        Dim JmpBytes As Int32 = DestinationAddi - SourceAddi - 5
        Return JmpBytes
    End Function

Ans i suppose you remember the assassin's creed brotherhood trainer that you made for me doing this

Visual Basic Code

 If GetAsyncKeyState(VK_NUMPAD0) Then
            'ACBSP.exe+10571A7
            'ACBSP.exe+1057206
            If health = False Then

                '023BA845 codecave nowot

                modulebase = GetModuleBase(ProcName, "ACBSP.exe")

                Dim caveaddr = allocmemstart
                MsgBox(Hex(caveaddr) & " - " & Hex(modulebase))
                RemoveProtection(ProcName, caveaddr, 67)
                Dim cavebytes() As Byte = {&H83, &HF8, &H56, &HF, &H85, &H19, &H1, &H0, &H0, &H82, &H3D, &HBA, &HB, &H1, &H0, &H1, &HF, &H85, &H1, &H1, &H0, &H0, &HC7, &H46, &H58, &H0, &H5, &H0, &H0, &H89, &H46, &H58, &H56, &HE9, &HF, &H67, &H3F, &H2, &H80, &H7E, &H58, &H1, &H0, &H0, &H0, &HF, &H85, &HFF, &H0, &H0, &H0, &HC7, &H46, &H58, &H0, &H0, &H0, &H0, &H89, &H46, &H58, &H56, &HE9, &HF2, &H66, &H3F, &H2}
                Dim jmpbytes As Byte = GetJmpBytes(modulebase + &H24071FE, caveaddr + &HF)
                Write_Long(caveaddr + &H10, jmpbytes)
                autopatcher(caveaddr, cavebytes)
                JmpToCave(caveaddr, modulebase + &H24071F0)

                Console.Beep()
                health = True
                System.Threading.Thread.Sleep(500)
            ElseIf health = True Then
                modulebase = GetModuleBase(ProcName, "ACBSP.exe")


                Dim origaddr = &H24071F0
                Dim origbytes() As Byte = {&HE9, &HCA, &H98, &HC0, &HFD, &H90}
                autopatcher(origaddr, origbytes)

                Console.Beep()
                health = False
                System.Threading.Thread.Sleep(500)
            End If

First of all i dont remember actually where did you get this one
Dim jmpbytes As Byte = GetJmpBytes(modulebase + &H24071FE, caveaddr + &HF) ...the &H24071FE...

And i did this with the brink game
doing this

Visual Basic Code

If GetAsyncKeyState(Keys.NumPad1) = &HFFFF8001 Then
            If health12 = False Then
                Dim cave As Integer = AllocMem(ProcName)
                modulebase = GetModuleBase(ProcName, "gamex86.dll")
                
                Dim caveaddr = cave
                Dim cavebytes() As Byte = {&HC7, &H87, &H98, &H1B, &H0, &H0, &HF4, &H0, &H0, &H0, &H8B, &H9F, &H98, &H1B, &H0, &H0, &HE9, &H49, &H7F, &H8D, &H58}
                Dim jmpbytes As Byte = GetJmpBytes(modulebase + &H188A23, cave + &HF)
                WriteInt32(cave + &H10, jmpbytes)
                autopatcher(caveaddr, cavebytes)
                AllocJump(caveaddr, modulebase + &H188A1D, 1)


                Console.Beep()
                Health = True
                System.Threading.Thread.Sleep(500)
            ElseIf Health = True Then
                modulebase = GetModuleBase(ProcName, "gamex86.dll")

                Dim origaddr = modulebase + &H188A1D
                Dim origbytes() As Byte = {&HE8, &H4, &H4, &H11, &H4, &H90}
                autopatcher(origaddr, origbytes)
                Console.Beep()
                Health = False
                System.Threading.Thread.Sleep(500)
            End If
        End If
    End Sub

i took that Dim jmpbytes As Byte = GetJmpBytes(modulebase + &H188A23, cave + &HF)... the &H188A23 from the second opcode of the first intruction that holdes the health address

But i get and error
Called

OverflowException was unhandled
Arithmetic operation resulted in an overflow

Troubleshooting Tips:
Make sure you not dividing by zero

Any ideas?

Login
Benutzername:
Passwort:	Passwort vergessen?
	Merken