You are viewing our Forum Archives. To view or take place in current topics click here.
#51. Posted:
Status: Offline
Joined: Nov 13, 201113Year Member
Posts: 50
Reputation Power: 2
Status: Offline
Joined: Nov 13, 201113Year Member
Posts: 50
Reputation Power: 2
Can you upload it somewhere else pleasse? the survey thing dont work
- 0useful
- 0not useful
#52. Posted:
Status: Offline
Joined: Mar 17, 201113Year Member
Posts: 3,910
Reputation Power: 236
Status: Offline
Joined: Mar 17, 201113Year Member
Posts: 3,910
Reputation Power: 236
YoUrMOMSMOM1 wrote wrightty invite me to a mw3 match, I want to see your prestige
GT: TCB Carnage
Btw If you don't its fake and gay
- 1useful
- 0not useful
#53. Posted:
Status: Offline
Joined: May 16, 201113Year Member
Posts: 536
Reputation Power: 19
Status: Offline
Joined: May 16, 201113Year Member
Posts: 536
Reputation Power: 19
Wrightyy94 wroteIR3CLAIM wrote do i put my account onto a usb then put it in there or a save data
pretty sure yes, its all explained on the vid
just sayin' no one can see what you are typing in your video,i ran the program with no problems what file do i open on my account?
- 0useful
- 0not useful
#54. Posted:
Status: Offline
Joined: Jul 08, 201113Year Member
Posts: 1,567
Reputation Power: 75
Status: Offline
Joined: Jul 08, 201113Year Member
Posts: 1,567
Reputation Power: 75
Wrightyy94 wroteIR3CLAIM wrote do i put my account onto a usb then put it in there or a save data
pretty sure yes, its all explained on the vid
If you have used this then whyd you say "Pretty sure yes"
that tells us its fake and not to download, kid you fail.
- 1useful
- 0not useful
#55. Posted:
Status: Offline
Joined: Jul 21, 201113Year Member
Posts: 355
Reputation Power: 14
Status: Offline
Joined: Jul 21, 201113Year Member
Posts: 355
Reputation Power: 14
when i tried it now my xbox connections all fu*k up
- 0useful
- 0not useful
#56. Posted:
Status: Offline
Joined: Jan 30, 201014Year Member
Posts: 340
Reputation Power: 13
Status: Offline
Joined: Jan 30, 201014Year Member
Posts: 340
Reputation Power: 13
DuhTigersBlood wroteWrightyy94 wroteIR3CLAIM wrote do i put my account onto a usb then put it in there or a save data
pretty sure yes, its all explained on the vid
If you have used this then whyd you say "Pretty sure yes"
that tells us its fake and not to download, kid you fail.
because i don't know what the kid's talking about!
Stop it with the effing hate guys, is this what people get for trying to help out? jeez
- 0useful
- 1not useful
#57. Posted:
Status: Offline
Joined: Oct 12, 201113Year Member
Posts: 349
Reputation Power: 20
Status: Offline
Joined: Oct 12, 201113Year Member
Posts: 349
Reputation Power: 20
i just downloaded and decompiled this program -
it is not a virus
it does NOT edit your prestige
here is the entire code for the program:
(assuming that you know VB.NET)
it is not a virus
it does NOT edit your prestige
here is the entire code for the program:
(assuming that you know VB.NET)
Imports Microsoft.VisualBasic.CompilerServices
Imports System
Imports System.Collections.Generic
Imports System.ComponentModel
Imports System.Diagnostics
Imports System.Drawing
Imports System.Runtime.CompilerServices
Imports System.Windows.Forms
Namespace WindowsApplication1
<DesignerGenerated> _
Public Class Form1
Inherits Form
' Methods
<DebuggerNonUserCode> _
Public Sub New()
Form1.__ENCAddToList(Me)
Me.InitializeComponent
End Sub
<DebuggerNonUserCode> _
Private Shared Sub __ENCAddToList(ByVal value As Object)
Dim list As List([Of] WeakReference) = Form1.__ENCList
SyncLock list
If (Form1.__ENCList.Count = Form1.__ENCList.Capacity) Then
Dim index As Integer = 0
Dim num3 As Integer = (Form1.__ENCList.Count - 1)
Dim i As Integer = 0
Do While (i <= num3)
Dim reference As WeakReference = Form1.__ENCList.Item(i)
If reference.IsAlive Then
If (i <> index) Then
Form1.__ENCList.Item(index) = Form1.__ENCList.Item(i)
End If
index += 1
End If
i += 1
Loop
Form1.__ENCList.RemoveRange(index, (Form1.__ENCList.Count - index))
Form1.__ENCList.Capacity = Form1.__ENCList.Count
End If
Form1.__ENCList.Add(New WeakReference(RuntimeHelpers.GetObjectValue(value)))
End SyncLock
End Sub
Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
Me.OpenFileDialog1.ShowDialog
End Sub
Private Sub Button1_MouseClick(ByVal sender As Object, ByVal e As MouseEventArgs)
End Sub
Private Sub Button2_Click(ByVal sender As Object, ByVal e As EventArgs)
If Me.Button1.Enabled Then
Me.Timer1.Enabled = True
End If
End Sub
<DebuggerNonUserCode> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If (disposing AndAlso (Not Me.components Is Nothing)) Then
Me.components.Dispose
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
<DebuggerStepThrough> _
Private Sub InitializeComponent()
Me.components = New Container
Dim manager As New ComponentResourceManager(GetType(Form1))
Me.PictureBox1 = New PictureBox
Me.Button1 = New Button
Me.OpenFileDialog1 = New OpenFileDialog
Me.Label1 = New Label
Me.GroupBox1 = New GroupBox
Me.RadioButton1 = New RadioButton
Me.RadioButton2 = New RadioButton
Me.GroupBox2 = New GroupBox
Me.GroupBox3 = New GroupBox
Me.Label3 = New Label
Me.CheckBox1 = New CheckBox
Me.Label2 = New Label
Me.TextBox2 = New TextBox
Me.TextBox1 = New TextBox
Me.Button2 = New Button
Me.TabControl1 = New TabControl
Me.TabPage1 = New TabPage
Me.Timer1 = New Timer(Me.components)
Me.ProgressBar1 = New ProgressBar
DirectCast(Me.PictureBox1, ISupportInitialize).BeginInit
Me.GroupBox1.SuspendLayout
Me.GroupBox2.SuspendLayout
Me.GroupBox3.SuspendLayout
Me.TabControl1.SuspendLayout
Me.TabPage1.SuspendLayout
Me.SuspendLayout
Me.PictureBox1.Image = DirectCast(manager.GetObject("PictureBox1.Image"), Image)
Dim point2 As New Point(0, 0)
Me.PictureBox1.Location = point2
Me.PictureBox1.Name = "PictureBox1"
Dim size2 As New Size(270, &H6B)
Me.PictureBox1.Size = size2
Me.PictureBox1.TabIndex = 0
Me.PictureBox1.TabStop = False
point2 = New Point(6, &H18)
Me.Button1.Location = point2
Me.Button1.Name = "Button1"
size2 = New Size(&H4B, &H17)
Me.Button1.Size = size2
Me.Button1.TabIndex = 1
Me.Button1.Text = "Browse"
Me.Button1.UseVisualStyleBackColor = True
Me.OpenFileDialog1.FileName = "Select your file"
Me.OpenFileDialog1.InitialDirectory = "C:\"
Me.Label1.AutoSize = True
point2 = New Point(&H59, 30)
Me.Label1.Location = point2
Me.Label1.Name = "Label1"
size2 = New Size(0, 13)
Me.Label1.Size = size2
Me.Label1.TabIndex = 3
Me.GroupBox1.Controls.Add(Me.Label1)
Me.GroupBox1.Controls.Add(Me.Button1)
point2 = New Point(6, 6)
Me.GroupBox1.Location = point2
Me.GroupBox1.Name = "GroupBox1"
size2 = New Size(&HF7, &H3A)
Me.GroupBox1.Size = size2
Me.GroupBox1.TabIndex = 5
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "Load Player File"
Me.RadioButton1.AutoSize = True
point2 = New Point(11, &H19)
Me.RadioButton1.Location = point2
Me.RadioButton1.Name = "RadioButton1"
size2 = New Size(70, &H11)
Me.RadioButton1.Size = size2
Me.RadioButton1.TabIndex = 6
Me.RadioButton1.TabStop = True
Me.RadioButton1.Text = "Xbox 360"
Me.RadioButton1.UseVisualStyleBackColor = True
Me.RadioButton2.AutoSize = True
point2 = New Point(11, &H30)
Me.RadioButton2.Location = point2
Me.RadioButton2.Name = "RadioButton2"
size2 = New Size(&H2D, &H11)
Me.RadioButton2.Size = size2
Me.RadioButton2.TabIndex = 6
Me.RadioButton2.TabStop = True
Me.RadioButton2.Text = "PS3"
Me.RadioButton2.UseVisualStyleBackColor = True
Me.GroupBox2.Controls.Add(Me.RadioButton2)
Me.GroupBox2.Controls.Add(Me.RadioButton1)
point2 = New Point(6, &H43)
Me.GroupBox2.Location = point2
Me.GroupBox2.Name = "GroupBox2"
size2 = New Size(&H5B, &H67)
Me.GroupBox2.Size = size2
Me.GroupBox2.TabIndex = 7
Me.GroupBox2.TabStop = False
Me.GroupBox2.Text = "Select System"
Me.GroupBox3.Controls.Add(Me.Label3)
Me.GroupBox3.Controls.Add(Me.CheckBox1)
Me.GroupBox3.Controls.Add(Me.Label2)
Me.GroupBox3.Controls.Add(Me.TextBox2)
Me.GroupBox3.Controls.Add(Me.TextBox1)
point2 = New Point(&H67, 70)
Me.GroupBox3.Location = point2
Me.GroupBox3.Name = "GroupBox3"
size2 = New Size(&H99, 100)
Me.GroupBox3.Size = size2
Me.GroupBox3.TabIndex = 8
Me.GroupBox3.TabStop = False
Me.GroupBox3.Text = "Edit Account"
Me.Label3.AutoSize = True
point2 = New Point(6, &H31)
Me.Label3.Location = point2
Me.Label3.Name = "Label3"
size2 = New Size(&H6A, 13)
Me.Label3.Size = size2
Me.Label3.TabIndex = 2
Me.Label3.Text = "Add Prestige Tokens"
Me.CheckBox1.AutoSize = True
point2 = New Point(9, &H4C)
Me.CheckBox1.Location = point2
Me.CheckBox1.Name = "CheckBox1"
size2 = New Size(&H71, &H11)
Me.CheckBox1.Size = size2
Me.CheckBox1.TabIndex = 0
Me.CheckBox1.Text = "Unlock Everything"
Me.CheckBox1.UseVisualStyleBackColor = True
Me.Label2.AutoSize = True
point2 = New Point(6, &H18)
Me.Label2.Location = point2
Me.Label2.Name = "Label2"
size2 = New Size(&H5F, 13)
Me.Label2.Size = size2
Me.Label2.TabIndex = 1
Me.Label2.Text = "Edit Prestige Level"
point2 = New Point(&H71, &H2E)
Me.TextBox2.Location = point2
Me.TextBox2.Name = "TextBox2"
size2 = New Size(&H21, 20)
Me.TextBox2.Size = size2
Me.TextBox2.TabIndex = 0
point2 = New Point(&H71, &H13)
Me.TextBox1.Location = point2
Me.TextBox1.Name = "TextBox1"
size2 = New Size(&H20, 20)
Me.TextBox1.Size = size2
Me.TextBox1.TabIndex = 0
point2 = New Point(6, &HB0)
Me.Button2.Location = point2
Me.Button2.Name = "Button2"
size2 = New Size(&HF8, &H17)
Me.Button2.Size = size2
Me.Button2.TabIndex = 9
Me.Button2.Text = "Edit And Save New Player File"
Me.Button2.UseVisualStyleBackColor = True
Me.TabControl1.Controls.Add(Me.TabPage1)
point2 = New Point(-2, &H6B)
Me.TabControl1.Location = point2
Me.TabControl1.Name = "TabControl1"
Me.TabControl1.SelectedIndex = 0
size2 = New Size(&H10B, &HF7)
Me.TabControl1.Size = size2
Me.TabControl1.TabIndex = 10
Me.TabPage1.Controls.Add(Me.ProgressBar1)
Me.TabPage1.Controls.Add(Me.GroupBox1)
Me.TabPage1.Controls.Add(Me.Button2)
Me.TabPage1.Controls.Add(Me.GroupBox2)
Me.TabPage1.Controls.Add(Me.GroupBox3)
point2 = New Point(4, &H16)
Me.TabPage1.Location = point2
Me.TabPage1.Name = "TabPage1"
Dim padding2 As New Padding(3)
Me.TabPage1.Padding = padding2
size2 = New Size(&H103, &HDD)
Me.TabPage1.Size = size2
Me.TabPage1.TabIndex = 0
Me.TabPage1.Text = " Xbox 360 - PS3 "
Me.TabPage1.UseVisualStyleBackColor = True
Me.Timer1.Interval = &H3E8
point2 = New Point(7, &HC9)
Me.ProgressBar1.Location = point2
Me.ProgressBar1.Name = "ProgressBar1"
size2 = New Size(&HF6, 13)
Me.ProgressBar1.Size = size2
Me.ProgressBar1.TabIndex = 10
Dim ef2 As New SizeF(6!, 13!)
Me.AutoScaleDimensions = ef2
Me.AutoScaleMode = AutoScaleMode.Font
size2 = New Size(&H105, &H160)
Me.ClientSize = size2
Me.Controls.Add(Me.TabControl1)
Me.Controls.Add(Me.PictureBox1)
Me.Icon = DirectCast(manager.GetObject("$this.Icon"), Icon)
size2 = New Size(&H115, 390)
Me.MaximumSize = size2
size2 = New Size(&H115, 390)
Me.MinimumSize = size2
Me.Name = "Form1"
Me.StartPosition = FormStartPosition.CenterScreen
Me.Text = "MW3 Prestige Hack"
DirectCast(Me.PictureBox1, ISupportInitialize).EndInit
Me.GroupBox1.ResumeLayout(False)
Me.GroupBox1.PerformLayout
Me.GroupBox2.ResumeLayout(False)
Me.GroupBox2.PerformLayout
Me.GroupBox3.ResumeLayout(False)
Me.GroupBox3.PerformLayout
Me.TabControl1.ResumeLayout(False)
Me.TabPage1.ResumeLayout(False)
Me.ResumeLayout(False)
End Sub
Private Sub OpenFileDialog1_FileOk(ByVal sender As Object, ByVal e As CancelEventArgs)
Me.Label1.Text = Me.OpenFileDialog1.FileName
End Sub
Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As EventArgs)
If Me.Timer1.Enabled Then
Me.ProgressBar1.Enabled = True
End If
Me.ProgressBar1.Increment(1)
Me.ProgressBar1.Maximum = 12
If (Me.ProgressBar1.Value = 12) Then
Me.Timer1.Stop
MessageBox.Show("File edited Successfully!!")
End If
End Sub
' Properties
Friend Overridable Property Button1 As Button
<DebuggerNonUserCode> _
Get
Return Me._Button1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As Button)
Dim handler As MouseEventHandler = New MouseEventHandler(AddressOf Me.Button1_MouseClick)
Dim handler2 As EventHandler = New EventHandler(AddressOf Me.Button1_Click)
If (Not Me._Button1 Is Nothing) Then
RemoveHandler Me._Button1.MouseClick, handler
RemoveHandler Me._Button1.Click, handler2
End If
Me._Button1 = WithEventsValue
If (Not Me._Button1 Is Nothing) Then
AddHandler Me._Button1.MouseClick, handler
AddHandler Me._Button1.Click, handler2
End If
End Set
End Property
Friend Overridable Property Button2 As Button
<DebuggerNonUserCode> _
Get
Return Me._Button2
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As Button)
Dim handler As EventHandler = New EventHandler(AddressOf Me.Button2_Click)
If (Not Me._Button2 Is Nothing) Then
RemoveHandler Me._Button2.Click, handler
End If
Me._Button2 = WithEventsValue
If (Not Me._Button2 Is Nothing) Then
AddHandler Me._Button2.Click, handler
End If
End Set
End Property
Friend Overridable Property CheckBox1 As CheckBox
<DebuggerNonUserCode> _
Get
Return Me._CheckBox1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As CheckBox)
Me._CheckBox1 = WithEventsValue
End Set
End Property
Friend Overridable Property GroupBox1 As GroupBox
<DebuggerNonUserCode> _
Get
Return Me._GroupBox1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As GroupBox)
Me._GroupBox1 = WithEventsValue
End Set
End Property
Friend Overridable Property GroupBox2 As GroupBox
<DebuggerNonUserCode> _
Get
Return Me._GroupBox2
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As GroupBox)
Me._GroupBox2 = WithEventsValue
End Set
End Property
Friend Overridable Property GroupBox3 As GroupBox
<DebuggerNonUserCode> _
Get
Return Me._GroupBox3
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As GroupBox)
Me._GroupBox3 = WithEventsValue
End Set
End Property
Friend Overridable Property Label1 As Label
<DebuggerNonUserCode> _
Get
Return Me._Label1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As Label)
Me._Label1 = WithEventsValue
End Set
End Property
Friend Overridable Property Label2 As Label
<DebuggerNonUserCode> _
Get
Return Me._Label2
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As Label)
Me._Label2 = WithEventsValue
End Set
End Property
Friend Overridable Property Label3 As Label
<DebuggerNonUserCode> _
Get
Return Me._Label3
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As Label)
Me._Label3 = WithEventsValue
End Set
End Property
Friend Overridable Property OpenFileDialog1 As OpenFileDialog
<DebuggerNonUserCode> _
Get
Return Me._OpenFileDialog1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As OpenFileDialog)
Dim handler As CancelEventHandler = New CancelEventHandler(AddressOf Me.OpenFileDialog1_FileOk)
If (Not Me._OpenFileDialog1 Is Nothing) Then
RemoveHandler Me._OpenFileDialog1.FileOk, handler
End If
Me._OpenFileDialog1 = WithEventsValue
If (Not Me._OpenFileDialog1 Is Nothing) Then
AddHandler Me._OpenFileDialog1.FileOk, handler
End If
End Set
End Property
Friend Overridable Property PictureBox1 As PictureBox
<DebuggerNonUserCode> _
Get
Return Me._PictureBox1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As PictureBox)
Me._PictureBox1 = WithEventsValue
End Set
End Property
Friend Overridable Property ProgressBar1 As ProgressBar
<DebuggerNonUserCode> _
Get
Return Me._ProgressBar1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As ProgressBar)
Me._ProgressBar1 = WithEventsValue
End Set
End Property
Friend Overridable Property RadioButton1 As RadioButton
<DebuggerNonUserCode> _
Get
Return Me._RadioButton1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As RadioButton)
Me._RadioButton1 = WithEventsValue
End Set
End Property
Friend Overridable Property RadioButton2 As RadioButton
<DebuggerNonUserCode> _
Get
Return Me._RadioButton2
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As RadioButton)
Me._RadioButton2 = WithEventsValue
End Set
End Property
Friend Overridable Property TabControl1 As TabControl
<DebuggerNonUserCode> _
Get
Return Me._TabControl1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As TabControl)
Me._TabControl1 = WithEventsValue
End Set
End Property
Friend Overridable Property TabPage1 As TabPage
<DebuggerNonUserCode> _
Get
Return Me._TabPage1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As TabPage)
Me._TabPage1 = WithEventsValue
End Set
End Property
Friend Overridable Property TextBox1 As TextBox
<DebuggerNonUserCode> _
Get
Return Me._TextBox1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As TextBox)
Me._TextBox1 = WithEventsValue
End Set
End Property
Friend Overridable Property TextBox2 As TextBox
<DebuggerNonUserCode> _
Get
Return Me._TextBox2
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As TextBox)
Me._TextBox2 = WithEventsValue
End Set
End Property
Friend Overridable Property Timer1 As Timer
<DebuggerNonUserCode> _
Get
Return Me._Timer1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As Timer)
Dim handler As EventHandler = New EventHandler(AddressOf Me.Timer1_Tick)
If (Not Me._Timer1 Is Nothing) Then
RemoveHandler Me._Timer1.Tick, handler
End If
Me._Timer1 = WithEventsValue
If (Not Me._Timer1 Is Nothing) Then
AddHandler Me._Timer1.Tick, handler
End If
End Set
End Property
' Fields
Private Shared __ENCList As List([Of] WeakReference) = New List([Of] WeakReference)
<AccessedThroughProperty("Button1")> _
Private _Button1 As Button
<AccessedThroughProperty("Button2")> _
Private _Button2 As Button
<AccessedThroughProperty("CheckBox1")> _
Private _CheckBox1 As CheckBox
<AccessedThroughProperty("GroupBox1")> _
Private _GroupBox1 As GroupBox
<AccessedThroughProperty("GroupBox2")> _
Private _GroupBox2 As GroupBox
<AccessedThroughProperty("GroupBox3")> _
Private _GroupBox3 As GroupBox
<AccessedThroughProperty("Label1")> _
Private _Label1 As Label
<AccessedThroughProperty("Label2")> _
Private _Label2 As Label
<AccessedThroughProperty("Label3")> _
Private _Label3 As Label
<AccessedThroughProperty("OpenFileDialog1")> _
Private _OpenFileDialog1 As OpenFileDialog
<AccessedThroughProperty("PictureBox1")> _
Private _PictureBox1 As PictureBox
<AccessedThroughProperty("ProgressBar1")> _
Private _ProgressBar1 As ProgressBar
<AccessedThroughProperty("RadioButton1")> _
Private _RadioButton1 As RadioButton
<AccessedThroughProperty("RadioButton2")> _
Private _RadioButton2 As RadioButton
<AccessedThroughProperty("TabControl1")> _
Private _TabControl1 As TabControl
<AccessedThroughProperty("TabPage1")> _
Private _TabPage1 As TabPage
<AccessedThroughProperty("TextBox1")> _
Private _TextBox1 As TextBox
<AccessedThroughProperty("TextBox2")> _
Private _TextBox2 As TextBox
<AccessedThroughProperty("Timer1")> _
Private _Timer1 As Timer
Private components As IContainer
End Class
End Namespace
- 1useful
- 0not useful
#58. Posted:
Status: Offline
Joined: Jan 15, 201212Year Member
Posts: 2,568
Reputation Power: 111
Does anybody knoW if this works?
- 0useful
- 0not useful
#59. Posted:
Status: Offline
Joined: Dec 07, 201013Year Member
Posts: 1,540
Reputation Power: 65
Status: Offline
Joined: Dec 07, 201013Year Member
Posts: 1,540
Reputation Power: 65
Well I took my multiplayer data but im still 2ed 76... So.
- 0useful
- 0not useful
#60. Posted:
Status: Offline
Joined: Jan 30, 201014Year Member
Posts: 340
Reputation Power: 13
Status: Offline
Joined: Jan 30, 201014Year Member
Posts: 340
Reputation Power: 13
PHP_Pro wrote i just downloaded and decompiled this program -
it is not a virus
it does NOT edit your prestige
here is the entire code for the program:
(assuming that you know VB.NET)
Imports Microsoft.VisualBasic.CompilerServices
Imports System
Imports System.Collections.Generic
Imports System.ComponentModel
Imports System.Diagnostics
Imports System.Drawing
Imports System.Runtime.CompilerServices
Imports System.Windows.Forms
Namespace WindowsApplication1
<DesignerGenerated> _
Public Class Form1
Inherits Form
' Methods
<DebuggerNonUserCode> _
Public Sub New()
Form1.__ENCAddToList(Me)
Me.InitializeComponent
End Sub
<DebuggerNonUserCode> _
Private Shared Sub __ENCAddToList(ByVal value As Object)
Dim list As List([Of] WeakReference) = Form1.__ENCList
SyncLock list
If (Form1.__ENCList.Count = Form1.__ENCList.Capacity) Then
Dim index As Integer = 0
Dim num3 As Integer = (Form1.__ENCList.Count - 1)
Dim i As Integer = 0
Do While (i <= num3)
Dim reference As WeakReference = Form1.__ENCList.Item(i)
If reference.IsAlive Then
If (i <> index) Then
Form1.__ENCList.Item(index) = Form1.__ENCList.Item(i)
End If
index += 1
End If
i += 1
Loop
Form1.__ENCList.RemoveRange(index, (Form1.__ENCList.Count - index))
Form1.__ENCList.Capacity = Form1.__ENCList.Count
End If
Form1.__ENCList.Add(New WeakReference(RuntimeHelpers.GetObjectValue(value)))
End SyncLock
End Sub
Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
Me.OpenFileDialog1.ShowDialog
End Sub
Private Sub Button1_MouseClick(ByVal sender As Object, ByVal e As MouseEventArgs)
End Sub
Private Sub Button2_Click(ByVal sender As Object, ByVal e As EventArgs)
If Me.Button1.Enabled Then
Me.Timer1.Enabled = True
End If
End Sub
<DebuggerNonUserCode> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If (disposing AndAlso (Not Me.components Is Nothing)) Then
Me.components.Dispose
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
<DebuggerStepThrough> _
Private Sub InitializeComponent()
Me.components = New Container
Dim manager As New ComponentResourceManager(GetType(Form1))
Me.PictureBox1 = New PictureBox
Me.Button1 = New Button
Me.OpenFileDialog1 = New OpenFileDialog
Me.Label1 = New Label
Me.GroupBox1 = New GroupBox
Me.RadioButton1 = New RadioButton
Me.RadioButton2 = New RadioButton
Me.GroupBox2 = New GroupBox
Me.GroupBox3 = New GroupBox
Me.Label3 = New Label
Me.CheckBox1 = New CheckBox
Me.Label2 = New Label
Me.TextBox2 = New TextBox
Me.TextBox1 = New TextBox
Me.Button2 = New Button
Me.TabControl1 = New TabControl
Me.TabPage1 = New TabPage
Me.Timer1 = New Timer(Me.components)
Me.ProgressBar1 = New ProgressBar
DirectCast(Me.PictureBox1, ISupportInitialize).BeginInit
Me.GroupBox1.SuspendLayout
Me.GroupBox2.SuspendLayout
Me.GroupBox3.SuspendLayout
Me.TabControl1.SuspendLayout
Me.TabPage1.SuspendLayout
Me.SuspendLayout
Me.PictureBox1.Image = DirectCast(manager.GetObject("PictureBox1.Image"), Image)
Dim point2 As New Point(0, 0)
Me.PictureBox1.Location = point2
Me.PictureBox1.Name = "PictureBox1"
Dim size2 As New Size(270, &H6B)
Me.PictureBox1.Size = size2
Me.PictureBox1.TabIndex = 0
Me.PictureBox1.TabStop = False
point2 = New Point(6, &H18)
Me.Button1.Location = point2
Me.Button1.Name = "Button1"
size2 = New Size(&H4B, &H17)
Me.Button1.Size = size2
Me.Button1.TabIndex = 1
Me.Button1.Text = "Browse"
Me.Button1.UseVisualStyleBackColor = True
Me.OpenFileDialog1.FileName = "Select your file"
Me.OpenFileDialog1.InitialDirectory = "C:\"
Me.Label1.AutoSize = True
point2 = New Point(&H59, 30)
Me.Label1.Location = point2
Me.Label1.Name = "Label1"
size2 = New Size(0, 13)
Me.Label1.Size = size2
Me.Label1.TabIndex = 3
Me.GroupBox1.Controls.Add(Me.Label1)
Me.GroupBox1.Controls.Add(Me.Button1)
point2 = New Point(6, 6)
Me.GroupBox1.Location = point2
Me.GroupBox1.Name = "GroupBox1"
size2 = New Size(&HF7, &H3A)
Me.GroupBox1.Size = size2
Me.GroupBox1.TabIndex = 5
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "Load Player File"
Me.RadioButton1.AutoSize = True
point2 = New Point(11, &H19)
Me.RadioButton1.Location = point2
Me.RadioButton1.Name = "RadioButton1"
size2 = New Size(70, &H11)
Me.RadioButton1.Size = size2
Me.RadioButton1.TabIndex = 6
Me.RadioButton1.TabStop = True
Me.RadioButton1.Text = "Xbox 360"
Me.RadioButton1.UseVisualStyleBackColor = True
Me.RadioButton2.AutoSize = True
point2 = New Point(11, &H30)
Me.RadioButton2.Location = point2
Me.RadioButton2.Name = "RadioButton2"
size2 = New Size(&H2D, &H11)
Me.RadioButton2.Size = size2
Me.RadioButton2.TabIndex = 6
Me.RadioButton2.TabStop = True
Me.RadioButton2.Text = "PS3"
Me.RadioButton2.UseVisualStyleBackColor = True
Me.GroupBox2.Controls.Add(Me.RadioButton2)
Me.GroupBox2.Controls.Add(Me.RadioButton1)
point2 = New Point(6, &H43)
Me.GroupBox2.Location = point2
Me.GroupBox2.Name = "GroupBox2"
size2 = New Size(&H5B, &H67)
Me.GroupBox2.Size = size2
Me.GroupBox2.TabIndex = 7
Me.GroupBox2.TabStop = False
Me.GroupBox2.Text = "Select System"
Me.GroupBox3.Controls.Add(Me.Label3)
Me.GroupBox3.Controls.Add(Me.CheckBox1)
Me.GroupBox3.Controls.Add(Me.Label2)
Me.GroupBox3.Controls.Add(Me.TextBox2)
Me.GroupBox3.Controls.Add(Me.TextBox1)
point2 = New Point(&H67, 70)
Me.GroupBox3.Location = point2
Me.GroupBox3.Name = "GroupBox3"
size2 = New Size(&H99, 100)
Me.GroupBox3.Size = size2
Me.GroupBox3.TabIndex = 8
Me.GroupBox3.TabStop = False
Me.GroupBox3.Text = "Edit Account"
Me.Label3.AutoSize = True
point2 = New Point(6, &H31)
Me.Label3.Location = point2
Me.Label3.Name = "Label3"
size2 = New Size(&H6A, 13)
Me.Label3.Size = size2
Me.Label3.TabIndex = 2
Me.Label3.Text = "Add Prestige Tokens"
Me.CheckBox1.AutoSize = True
point2 = New Point(9, &H4C)
Me.CheckBox1.Location = point2
Me.CheckBox1.Name = "CheckBox1"
size2 = New Size(&H71, &H11)
Me.CheckBox1.Size = size2
Me.CheckBox1.TabIndex = 0
Me.CheckBox1.Text = "Unlock Everything"
Me.CheckBox1.UseVisualStyleBackColor = True
Me.Label2.AutoSize = True
point2 = New Point(6, &H18)
Me.Label2.Location = point2
Me.Label2.Name = "Label2"
size2 = New Size(&H5F, 13)
Me.Label2.Size = size2
Me.Label2.TabIndex = 1
Me.Label2.Text = "Edit Prestige Level"
point2 = New Point(&H71, &H2E)
Me.TextBox2.Location = point2
Me.TextBox2.Name = "TextBox2"
size2 = New Size(&H21, 20)
Me.TextBox2.Size = size2
Me.TextBox2.TabIndex = 0
point2 = New Point(&H71, &H13)
Me.TextBox1.Location = point2
Me.TextBox1.Name = "TextBox1"
size2 = New Size(&H20, 20)
Me.TextBox1.Size = size2
Me.TextBox1.TabIndex = 0
point2 = New Point(6, &HB0)
Me.Button2.Location = point2
Me.Button2.Name = "Button2"
size2 = New Size(&HF8, &H17)
Me.Button2.Size = size2
Me.Button2.TabIndex = 9
Me.Button2.Text = "Edit And Save New Player File"
Me.Button2.UseVisualStyleBackColor = True
Me.TabControl1.Controls.Add(Me.TabPage1)
point2 = New Point(-2, &H6B)
Me.TabControl1.Location = point2
Me.TabControl1.Name = "TabControl1"
Me.TabControl1.SelectedIndex = 0
size2 = New Size(&H10B, &HF7)
Me.TabControl1.Size = size2
Me.TabControl1.TabIndex = 10
Me.TabPage1.Controls.Add(Me.ProgressBar1)
Me.TabPage1.Controls.Add(Me.GroupBox1)
Me.TabPage1.Controls.Add(Me.Button2)
Me.TabPage1.Controls.Add(Me.GroupBox2)
Me.TabPage1.Controls.Add(Me.GroupBox3)
point2 = New Point(4, &H16)
Me.TabPage1.Location = point2
Me.TabPage1.Name = "TabPage1"
Dim padding2 As New Padding(3)
Me.TabPage1.Padding = padding2
size2 = New Size(&H103, &HDD)
Me.TabPage1.Size = size2
Me.TabPage1.TabIndex = 0
Me.TabPage1.Text = " Xbox 360 - PS3 "
Me.TabPage1.UseVisualStyleBackColor = True
Me.Timer1.Interval = &H3E8
point2 = New Point(7, &HC9)
Me.ProgressBar1.Location = point2
Me.ProgressBar1.Name = "ProgressBar1"
size2 = New Size(&HF6, 13)
Me.ProgressBar1.Size = size2
Me.ProgressBar1.TabIndex = 10
Dim ef2 As New SizeF(6!, 13!)
Me.AutoScaleDimensions = ef2
Me.AutoScaleMode = AutoScaleMode.Font
size2 = New Size(&H105, &H160)
Me.ClientSize = size2
Me.Controls.Add(Me.TabControl1)
Me.Controls.Add(Me.PictureBox1)
Me.Icon = DirectCast(manager.GetObject("$this.Icon"), Icon)
size2 = New Size(&H115, 390)
Me.MaximumSize = size2
size2 = New Size(&H115, 390)
Me.MinimumSize = size2
Me.Name = "Form1"
Me.StartPosition = FormStartPosition.CenterScreen
Me.Text = "MW3 Prestige Hack"
DirectCast(Me.PictureBox1, ISupportInitialize).EndInit
Me.GroupBox1.ResumeLayout(False)
Me.GroupBox1.PerformLayout
Me.GroupBox2.ResumeLayout(False)
Me.GroupBox2.PerformLayout
Me.GroupBox3.ResumeLayout(False)
Me.GroupBox3.PerformLayout
Me.TabControl1.ResumeLayout(False)
Me.TabPage1.ResumeLayout(False)
Me.ResumeLayout(False)
End Sub
Private Sub OpenFileDialog1_FileOk(ByVal sender As Object, ByVal e As CancelEventArgs)
Me.Label1.Text = Me.OpenFileDialog1.FileName
End Sub
Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As EventArgs)
If Me.Timer1.Enabled Then
Me.ProgressBar1.Enabled = True
End If
Me.ProgressBar1.Increment(1)
Me.ProgressBar1.Maximum = 12
If (Me.ProgressBar1.Value = 12) Then
Me.Timer1.Stop
MessageBox.Show("File edited Successfully!!")
End If
End Sub
' Properties
Friend Overridable Property Button1 As Button
<DebuggerNonUserCode> _
Get
Return Me._Button1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As Button)
Dim handler As MouseEventHandler = New MouseEventHandler(AddressOf Me.Button1_MouseClick)
Dim handler2 As EventHandler = New EventHandler(AddressOf Me.Button1_Click)
If (Not Me._Button1 Is Nothing) Then
RemoveHandler Me._Button1.MouseClick, handler
RemoveHandler Me._Button1.Click, handler2
End If
Me._Button1 = WithEventsValue
If (Not Me._Button1 Is Nothing) Then
AddHandler Me._Button1.MouseClick, handler
AddHandler Me._Button1.Click, handler2
End If
End Set
End Property
Friend Overridable Property Button2 As Button
<DebuggerNonUserCode> _
Get
Return Me._Button2
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As Button)
Dim handler As EventHandler = New EventHandler(AddressOf Me.Button2_Click)
If (Not Me._Button2 Is Nothing) Then
RemoveHandler Me._Button2.Click, handler
End If
Me._Button2 = WithEventsValue
If (Not Me._Button2 Is Nothing) Then
AddHandler Me._Button2.Click, handler
End If
End Set
End Property
Friend Overridable Property CheckBox1 As CheckBox
<DebuggerNonUserCode> _
Get
Return Me._CheckBox1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As CheckBox)
Me._CheckBox1 = WithEventsValue
End Set
End Property
Friend Overridable Property GroupBox1 As GroupBox
<DebuggerNonUserCode> _
Get
Return Me._GroupBox1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As GroupBox)
Me._GroupBox1 = WithEventsValue
End Set
End Property
Friend Overridable Property GroupBox2 As GroupBox
<DebuggerNonUserCode> _
Get
Return Me._GroupBox2
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As GroupBox)
Me._GroupBox2 = WithEventsValue
End Set
End Property
Friend Overridable Property GroupBox3 As GroupBox
<DebuggerNonUserCode> _
Get
Return Me._GroupBox3
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As GroupBox)
Me._GroupBox3 = WithEventsValue
End Set
End Property
Friend Overridable Property Label1 As Label
<DebuggerNonUserCode> _
Get
Return Me._Label1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As Label)
Me._Label1 = WithEventsValue
End Set
End Property
Friend Overridable Property Label2 As Label
<DebuggerNonUserCode> _
Get
Return Me._Label2
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As Label)
Me._Label2 = WithEventsValue
End Set
End Property
Friend Overridable Property Label3 As Label
<DebuggerNonUserCode> _
Get
Return Me._Label3
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As Label)
Me._Label3 = WithEventsValue
End Set
End Property
Friend Overridable Property OpenFileDialog1 As OpenFileDialog
<DebuggerNonUserCode> _
Get
Return Me._OpenFileDialog1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As OpenFileDialog)
Dim handler As CancelEventHandler = New CancelEventHandler(AddressOf Me.OpenFileDialog1_FileOk)
If (Not Me._OpenFileDialog1 Is Nothing) Then
RemoveHandler Me._OpenFileDialog1.FileOk, handler
End If
Me._OpenFileDialog1 = WithEventsValue
If (Not Me._OpenFileDialog1 Is Nothing) Then
AddHandler Me._OpenFileDialog1.FileOk, handler
End If
End Set
End Property
Friend Overridable Property PictureBox1 As PictureBox
<DebuggerNonUserCode> _
Get
Return Me._PictureBox1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As PictureBox)
Me._PictureBox1 = WithEventsValue
End Set
End Property
Friend Overridable Property ProgressBar1 As ProgressBar
<DebuggerNonUserCode> _
Get
Return Me._ProgressBar1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As ProgressBar)
Me._ProgressBar1 = WithEventsValue
End Set
End Property
Friend Overridable Property RadioButton1 As RadioButton
<DebuggerNonUserCode> _
Get
Return Me._RadioButton1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As RadioButton)
Me._RadioButton1 = WithEventsValue
End Set
End Property
Friend Overridable Property RadioButton2 As RadioButton
<DebuggerNonUserCode> _
Get
Return Me._RadioButton2
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As RadioButton)
Me._RadioButton2 = WithEventsValue
End Set
End Property
Friend Overridable Property TabControl1 As TabControl
<DebuggerNonUserCode> _
Get
Return Me._TabControl1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As TabControl)
Me._TabControl1 = WithEventsValue
End Set
End Property
Friend Overridable Property TabPage1 As TabPage
<DebuggerNonUserCode> _
Get
Return Me._TabPage1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As TabPage)
Me._TabPage1 = WithEventsValue
End Set
End Property
Friend Overridable Property TextBox1 As TextBox
<DebuggerNonUserCode> _
Get
Return Me._TextBox1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As TextBox)
Me._TextBox1 = WithEventsValue
End Set
End Property
Friend Overridable Property TextBox2 As TextBox
<DebuggerNonUserCode> _
Get
Return Me._TextBox2
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As TextBox)
Me._TextBox2 = WithEventsValue
End Set
End Property
Friend Overridable Property Timer1 As Timer
<DebuggerNonUserCode> _
Get
Return Me._Timer1
End Get
<MethodImpl(MethodImplOptions.Synchronized), DebuggerNonUserCode> _
Set(ByVal WithEventsValue As Timer)
Dim handler As EventHandler = New EventHandler(AddressOf Me.Timer1_Tick)
If (Not Me._Timer1 Is Nothing) Then
RemoveHandler Me._Timer1.Tick, handler
End If
Me._Timer1 = WithEventsValue
If (Not Me._Timer1 Is Nothing) Then
AddHandler Me._Timer1.Tick, handler
End If
End Set
End Property
' Fields
Private Shared __ENCList As List([Of] WeakReference) = New List([Of] WeakReference)
<AccessedThroughProperty("Button1")> _
Private _Button1 As Button
<AccessedThroughProperty("Button2")> _
Private _Button2 As Button
<AccessedThroughProperty("CheckBox1")> _
Private _CheckBox1 As CheckBox
<AccessedThroughProperty("GroupBox1")> _
Private _GroupBox1 As GroupBox
<AccessedThroughProperty("GroupBox2")> _
Private _GroupBox2 As GroupBox
<AccessedThroughProperty("GroupBox3")> _
Private _GroupBox3 As GroupBox
<AccessedThroughProperty("Label1")> _
Private _Label1 As Label
<AccessedThroughProperty("Label2")> _
Private _Label2 As Label
<AccessedThroughProperty("Label3")> _
Private _Label3 As Label
<AccessedThroughProperty("OpenFileDialog1")> _
Private _OpenFileDialog1 As OpenFileDialog
<AccessedThroughProperty("PictureBox1")> _
Private _PictureBox1 As PictureBox
<AccessedThroughProperty("ProgressBar1")> _
Private _ProgressBar1 As ProgressBar
<AccessedThroughProperty("RadioButton1")> _
Private _RadioButton1 As RadioButton
<AccessedThroughProperty("RadioButton2")> _
Private _RadioButton2 As RadioButton
<AccessedThroughProperty("TabControl1")> _
Private _TabControl1 As TabControl
<AccessedThroughProperty("TabPage1")> _
Private _TabPage1 As TabPage
<AccessedThroughProperty("TextBox1")> _
Private _TextBox1 As TextBox
<AccessedThroughProperty("TextBox2")> _
Private _TextBox2 As TextBox
<AccessedThroughProperty("Timer1")> _
Private _Timer1 As Timer
Private components As IContainer
End Class
End Namespace
it does edit prestige if Tut instructions are followed exactly
- 0useful
- 0not useful
You are viewing our Forum Archives. To view or take place in current topics click here.