0 Script Isenk Untuk Komputer
|
Berlangganan artikel via email! |
Follow us! 
|
Assalamualaikum Wr. Wb.
Pertama tama saya mau ngasih tau, ini isenk jangandigunakan buat merugikan orang lain, pa lagi digunakan untuk hal bisnis !! tetapi saya share ini untuk belajar dan menambah ilmu pengetahuan kita, sebelumnya kita telah membahas tentang keamanan system komputer kita seperti Enable Disable Regedit , Antivirus Rekomendasi Microsoft dan yang lainnya silahkan lihat di Daftar Isi.
Baiklah, Lansung saja kita lihat satu persatu tentangScript Isenk Untuk Komputer yang pada umumnya dibuat melalui Notepad yang akhirnya berextensi .bat atau .vbs :
Baiklah, Lansung saja kita lihat satu persatu tentangScript Isenk Untuk Komputer yang pada umumnya dibuat melalui Notepad yang akhirnya berextensi .bat atau .vbs :
1. Memberi pesan dan shutdown komputer.
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .BAT
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .BAT
Code:
@echo off
msg * Aku tidak suka kamu
shutdown -c "Error! Kamu jelek
sekali" -s
msg * Aku tidak suka kamu
shutdown -c "Error! Kamu jelek
sekali" -s
2. Menyalakan tombol Caps lock secara terus-menerus
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .VBS
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .VBS
Code:
Set wshShell=wscript.CreateObject< /STRONG>
("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
loop
("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
loop
3. Buka/tutup CD drive secara terus menerus
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .VBS
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .VBS
Code:
Set oWMP = CreateObject< /STRONG >
("WMPlayer.OCX.7")
Set colCDROMs =< /STRONG >
oWMP.cdromCollection
do if colCDROMs.Count >= 1 then< /STRONG>
For i = 0 to colCDROMs.Count - 1< /STRONG >
colCDROMs.Item(i).Eject
Next
For i = 0 to colCDROMs.Count - 1< /STRONG >
colCDROMs.Item(i).Eject
Next
End If
wscript.sleep 5000
loop
("WMPlayer.OCX.7")
Set colCDROMs =< /STRONG >
oWMP.cdromCollection
do if colCDROMs.Count >= 1 then< /STRONG>
For i = 0 to colCDROMs.Count - 1< /STRONG >
colCDROMs.Item(i).Eject
Next
For i = 0 to colCDROMs.Count - 1< /STRONG >
colCDROMs.Item(i).Eject
Next
End If
wscript.sleep 5000
loop
4. Tekan Enter secara terus-menerus
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .VBS
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .VBS
Code:
Set wshShell =< /STRONG >
wscript.CreateObject
("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop
wscript.CreateObject
("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop
5. Mengetik pesan kita secara otomatis di notepad
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .VBS
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .VBS
Code:
WScript.Sleep 180000
WScript.Sleep 10000
Set WshShell =< /STRONG >
WScript.CreateObject ("WScript.Shell")
WshShell.Run "notepad"
WScript.Sleep 100
WshShell.AppActivate
"Notepad"
WScript.Sleep 500
WshShell.SendKeys "Hel"
WScript.Sleep 500
WshShell.SendKeys "lo "
WScript.Sleep 500
WshShell.SendKeys ", ho"
WScript.Sleep 500
WshShell.SendKeys "w a"
WScript.Sleep 500
WshShell.SendKeys "re "
WScript.Sleep 500
WshShell.SendKeys "you"
WScript.Sleep 500 WshShell.SendKeys "? "
WScript.Sleep 500
WshShell.SendKeys "I a"
WScript.Sleep 500
WshShell.SendKeys "m g"
WScript.Sleep 500
WshShell.SendKeys "ood"
WScript.Sleep 500
WshShell.SendKeys " th"
WScript.Sleep 500
WshShell.SendKeys "ank"
WScript.Sleep 500
WshShell.SendKeys "s! "
WScript.Sleep 10000
Set WshShell =< /STRONG >
WScript.CreateObject ("WScript.Shell")
WshShell.Run "notepad"
WScript.Sleep 100
WshShell.AppActivate
"Notepad"
WScript.Sleep 500
WshShell.SendKeys "Hel"
WScript.Sleep 500
WshShell.SendKeys "lo "
WScript.Sleep 500
WshShell.SendKeys ", ho"
WScript.Sleep 500
WshShell.SendKeys "w a"
WScript.Sleep 500
WshShell.SendKeys "re "
WScript.Sleep 500
WshShell.SendKeys "you"
WScript.Sleep 500 WshShell.SendKeys "? "
WScript.Sleep 500
WshShell.SendKeys "I a"
WScript.Sleep 500
WshShell.SendKeys "m g"
WScript.Sleep 500
WshShell.SendKeys "ood"
WScript.Sleep 500
WshShell.SendKeys " th"
WScript.Sleep 500
WshShell.SendKeys "ank"
WScript.Sleep 500
WshShell.SendKeys "s! "
6. Menjalankan BACKSPACE secara terus-menerus
Buka Notepad ketik script dibawah ini dan Save Asmenggunakan Extension .VBS
Buka Notepad ketik script dibawah ini dan Save Asmenggunakan Extension .VBS
Code:
MsgBox "Let's go back a few
steps"
Set wshShell
=wscript.CreateObject
("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{bs}"
loop
steps"
Set wshShell
=wscript.CreateObject
("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{bs}"
loop
7. Hack keyboard sehingga korban dipaksa mengetik " You are a gay" secara terus-menerus
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .VBS
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .VBS
Code:
Set wshShell =< /STRONG >
wscript.CreateObject
("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "You are a
gay"
loop
wscript.CreateObject
("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "You are a
gay"
loop
8. Buka Notepad secara terus menerus
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .BAT
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .BAT
Code:
@ECHO off :top
START %SystemRoot%
\system32\notepad.exe
GOTO top
START %SystemRoot%
\system32\notepad.exe
GOTO top
9. Munculin 5 pilihan yang harus korban pilih
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .BAT
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .BAT
Code:
@echo off
title The end of the world
cd C:\
:menu
cls
echo oops gw gak tanggung
jawab lho apa yang barusan lu
lakuin hehhe,,semuanya dh jadi
tanggung jawab lu sendiri...
pause
echo pilih nama cwe yang lu
suka =P :
echo 1. datanya bakal ilang lho.
echo 2. komputer nya corrupt
lho
echo 3. heheh no comment deh
klo yang ini
echo 4. mau mati pake jalan ini?
echo 5. bye bye...
set input=nothing< /STRONG>
set /p input=Choice:< /STRONG>
if %input%==1 goto one< /STRONG>
if %input%==2 goto two< /STRONG>
title The end of the world
cd C:\
:menu
cls
echo oops gw gak tanggung
jawab lho apa yang barusan lu
lakuin hehhe,,semuanya dh jadi
tanggung jawab lu sendiri...
pause
echo pilih nama cwe yang lu
suka =P :
echo 1. datanya bakal ilang lho.
echo 2. komputer nya corrupt
lho
echo 3. heheh no comment deh
klo yang ini
echo 4. mau mati pake jalan ini?
echo 5. bye bye...
set input=nothing< /STRONG>
set /p input=Choice:< /STRONG>
if %input%==1 goto one< /STRONG>
if %input%==2 goto two< /STRONG>
10. Membuat kuis menjebak
Buka Notepad ketik script dibawah ini dan Save As menggunakan Extension .BAT
Code:
@echo off
title quiz hari ini coyac
:menu
cls
echo apa yang sobad selalu makan nasi?
pause
echo pilih yang mana:
echo 1. Iya
echo 2. Bukan
echo 3. Tidak Jelas
set input=nothing
set /p input=Choice:
if %input%==1 shutdown -s -t 30
if %input%==2 shutdown -s -t 45
if %input%==3 shutdown -s -t 60
msg * ea.. mampus
msg * ngaca dulu gih
msg * hayo loo.. kok jadi begini?
msg * hayo...
msg * pusing kan? makanya jangan banyak gaya..
msg * mampus deh...
msg * bukan salah gue ye
msg * salah loe sendiri buka neh quis..
msg * gue gag tanggung jawab
@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top
title quiz hari ini coyac
:menu
cls
echo apa yang sobad selalu makan nasi?
pause
echo pilih yang mana:
echo 1. Iya
echo 2. Bukan
echo 3. Tidak Jelas
set input=nothing
set /p input=Choice:
if %input%==1 shutdown -s -t 30
if %input%==2 shutdown -s -t 45
if %input%==3 shutdown -s -t 60
msg * ea.. mampus
msg * ngaca dulu gih
msg * hayo loo.. kok jadi begini?
msg * hayo...
msg * pusing kan? makanya jangan banyak gaya..
msg * mampus deh...
msg * bukan salah gue ye
msg * salah loe sendiri buka neh quis..
msg * gue gag tanggung jawab
@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top
Oke sobat semua, itulah script Isenk Untuk Komputer yang mungkin berguna untuk sebat, dan silahkan berkomentar dibawah ini, Terima Kasih.
Rating: 4.5
Categories:
system
Terima kasih, anda membaca :
Script Isenk Untuk KomputerSemoga Informasi ini bermanfaat dan sesuai dengan kriteria pencarian anda di Script Isenk Untuk Komputer
Script Isenk Untuk KomputerSemoga Informasi ini bermanfaat dan sesuai dengan kriteria pencarian anda di Script Isenk Untuk Komputer
