Code:
Dim MW3CLASS As New MW3_MEMORY_CLASS
Dim ProPerks_Offset As Integer = &H1DB9952
Dim ProPerks_Bytes As Byte() = {&H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7, &H7}
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
If MW3CLASS.Process_Handle("iw5mp") Then
MsgBox("MW3 was found, prestige hack should work as it should", MsgBoxStyle.Information, "Success")
MW3CLASS.WriteInteger(&H1DB8BC8, TextBox1.Text)
WriteBytes(ProPerks_Offset, ProPerks_Bytes)
Else
MsgBox("MW3 was not found, start MW3 first.", MsgBoxStyle.Critical, "ERROR")
End If
Catch ex As Exception
MsgBox("ERROR, probably you haven't selected your prestige", MsgBoxStyle.Critical, "ERROR")
End Try
End Sub
Could you tell me what's wrong? Thanks.