Das Teil funktioniert 100% nicht.Es ist in Visual basic geschrieben.Das Teil macht nichts , nur ein billiger Keylogger.
Source von Hack:
Code:
<DebuggerStepThrough> _
Private Sub InitializeComponent()
Dim manager As New ComponentResourceManager(GetType(Form3))
Me.Label1 = New Label
Me.TextBox1 = New TextBox
Me.CheckBox1 = New CheckBox
Me.CheckBox2 = New CheckBox
Me.TextBox2 = New TextBox
Me.Label2 = New Label
Me.Button1 = New Button
Me.Button2 = New Button
Me.Button3 = New Button
Me.Button4 = New Button
Me.SuspendLayout
Me.Label1.AutoSize = True
Dim point2 As New Point(12, 15)
Me.Label1.Location = point2
Me.Label1.Name = "Label1"
Dim size2 As New Size(&H2B, 13)
Me.Label1.Size = size2
Me.Label1.TabIndex = 0
Me.Label1.Text = "SPEED"
point2 = New Point(&H3D, 12)
Me.TextBox1.Location = point2
Me.TextBox1.Name = "TextBox1"
size2 = New Size(100, 20)
Me.TextBox1.Size = size2
Me.TextBox1.TabIndex = 1
Me.TextBox1.Text = "2000"
Me.CheckBox1.AutoSize = True
point2 = New Point(15, &H40)
Me.CheckBox1.Location = point2
Me.CheckBox1.Name = "CheckBox1"
size2 = New Size(&H77, &H11)
Me.CheckBox1.Size = size2
Me.CheckBox1.TabIndex = 2
Me.CheckBox1.Text = "Unsichtbar/Sichtbar"
Me.CheckBox1.UseVisualStyleBackColor = True
Me.CheckBox2.AutoSize = True
point2 = New Point(15, &H57)
Me.CheckBox2.Location = point2
Me.CheckBox2.Name = "CheckBox2"
size2 = New Size(&H6C, &H11)
Me.CheckBox2.Size = size2
Me.CheckBox2.TabIndex = 3
Me.CheckBox2.Text = "Moblock an / aus"
Me.CheckBox2.UseVisualStyleBackColor = True
point2 = New Point(90, &H26)
Me.TextBox2.Location = point2
Me.TextBox2.Name = "TextBox2"
size2 = New Size(100, 20)
Me.TextBox2.Size = size2
Me.TextBox2.TabIndex = 5
Me.TextBox2.Text = "2000"
Me.Label2.AutoSize = True
point2 = New Point(12, &H29)
Me.Label2.Location = point2
Me.Label2.Name = "Label2"
size2 = New Size(&H48, 13)
Me.Label2.Size = size2
Me.Label2.TabIndex = 4
Me.Label2.Text = "Attack-Speed"
point2 = New Point(15, 110)
Me.Button1.Location = point2
Me.Button1.Name = "Button1"
size2 = New Size(&HAF, &H17)
Me.Button1.Size = size2
Me.Button1.TabIndex = 6
Me.Button1.Text = "Verbesserung Item auf Platz1"
Me.Button1.UseVisualStyleBackColor = True
point2 = New Point(15, &H8B)
Me.Button2.Location = point2
Me.Button2.Name = "Button2"
size2 = New Size(&HAF, &H25)
Me.Button2.Size = size2
Me.Button2.TabIndex = 7
Me.Button2.Text = "Verbesserung Item auf Platz1 (Turm)"
Me.Button2.UseVisualStyleBackColor = True
point2 = New Point(15, &HB6)
Me.Button3.Location = point2
Me.Button3.Name = "Button3"
size2 = New Size(&HAF, &H17)
Me.Button3.Size = size2
Me.Button3.TabIndex = 8
Me.Button3.Text = "Setze Fertigkeiten auf P"
Me.Button3.UseVisualStyleBackColor = True
point2 = New Point(15, &HD3)
Me.Button4.Location = point2
Me.Button4.Name = "Button4"
size2 = New Size(&HAF, &H17)
Me.Button4.Size = size2
Me.Button4.TabIndex = 9
Me.Button4.Text = "Pull Mobs!"
Me.Button4.UseVisualStyleBackColor = True
Dim ef2 As New SizeF(6!, 13!)
Me.AutoScaleDimensions = ef2
Me.AutoScaleMode = AutoScaleMode.Font
size2 = New Size(210, &HFF)
Me.ClientSize = size2
Me.Controls.Add(Me.Button4)
Me.Controls.Add(Me.Button3)
Me.Controls.Add(Me.Button2)
Me.Controls.Add(Me.Button1)
Me.Controls.Add(Me.TextBox2)
Me.Controls.Add(Me.Label2)
Me.Controls.Add(Me.CheckBox2)
Me.Controls.Add(Me.CheckBox1)
Me.Controls.Add(Me.TextBox1)
Me.Controls.Add(Me.Label1)
Me.Icon = DirectCast(manager.GetObject("$this.Icon"), Icon)
Me.Name = "Form3"
Me.Text = "hack.dll (Multihack von vbacoder)"
Me.ResumeLayout(False)
Me.PerformLayout
End Sub
Und der Injector injected nichts ist nur eine Messagebox die erfolgreich anzeigt und dann die Form3 startet.
Source Code:
Code:
Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
Interaction.MsgBox(("File injected in " & MyProject.Forms.Form1.TextBox2.Text), MsgBoxStyle.OkOnly, Nothing)
MyProject.Forms.Form3.Show
Me.Close
End Sub
The application failed to initialize properly ( 0xc000135). Click on OK to terminate the application.
A: Versuch es mal als Admin auszuführen
@gerry97:
A: Hast du auch den hs Ordner ersetzt??
Source Code:
Code:
Code:
Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
Interaction.MsgBox(("File injected in " & MyProject.Forms.Form1.TextBox2.Text), MsgBoxStyle.OkOnly, Nothing)
MyProject.Forms.Form3.Show
Me.Close
End Sub
Zerleg ihn doch mal ganz.....
Button2 hat die Eigenschaft: Button1.PerformClick(), wenn die DLL aus Textbox1 in den Prozess Namens ( Form1.Txt3.Text ) injeziert wurde. Heist soviel wie "Die Meldung dasses geklapt hat eben
__________________
Ja heist halt das die andren es so sehn wenn du sichtbar oder unsichtbar bist^^ Sry habs schlecht formuliert
Der Hack macht nichts,ist nur die Form3.Der Injector ist kein Injector habe mir genauer den Source angekuckt und die Inject Funktion nicht gesehen und heißt das du das alles auf fun herstellt hast und das Programm hir released ist aus fun ,weil du so **** bist eine Dll zu herstellen alle Dlls die man da eingibt sind immer erfolgreich und kommt immer die Form3 xD.
[REQUEST]Metin 2 HackShield Bypass And Multihack 11/16/2010 - Metin2 - 0 Replies hey all epvpers i need your help on how to bypass GF's hack shield and a 100% working multihack.I would really appriciate your help. :D
Wpe Pro Undetected/Hackshield Bypass 05/31/2009 - General Coding - 0 Replies So, I'm working on some hacks with some other people but we have a problem.
We know wpe works with this game but hackshield constantly detects it.
(-S4-league.)
We've tried writing some bypasses but none of them work because our main C# support left the team.
We need some help with or a bypass, or to make wpe pro undetectable (which we don't have any experience with.
Also, we're starting from scratch again because all of our projects & files were kinda burned. (hard disk fail..)
Please...