10 Cara Membuat Pesan iseng di
Komputer
Membuat Pesan iseng di Komputer . baik,kali
ini saya mau berbagi trik mengenai bagaimana 10 cara mudah membuat pesan iseng
menggunakan notepad di komputer orang, khususnya iseng iseng di komputer teman
kita,hehehhe.
tapi jangan keseringan ya dan kalau temenya
marah saya gak tanggung jawab .
berikut caranya sobat :
1. Pesan Restart :
@ECHO off
:Begin
msg * WARNING !
msg * Komputer anda
error
msg * Tidak ada cara
lain
msg * Harus diinstall
ulang
GOTO BEGIN
( save dalam ektensi
.BAT )
2. Pesan Shutdown :
Quote:
@echo off
msg * Komputer anda
hank
msg * Tidak ada jalan
lain
msg * Harus dishutdown
( save dalam ektensi
.BAT )
3. Tombol Caps Lock hidup terus
:
Quote:
Set wshShell
=wscript.CreateObject("WScript.Shell") do
wscript.sleep 100
wshshell.sendkeys
"{CAPSLOCK}" loop
( save dalam ektensi
.VBS )
4. Terkena Virus :
<html>
<head>
<script type
="text/javascript">
function
display_alert()
{
alert("Komputer
dalam ranjau virus !!")
var b = true
while (b == true){
alert("Virus
Trojan 5 !!")
}}
script>
head>
<body><input
type="button" onclick="display_alert()"
value="Submit" />body>
html>center>
( save dalam ektensi
.HTML )
5. Menekan Enter Terus Menerus
:
Quote:
Set wshShell =
wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys
"~(enter)"
loop
( save dalam ektensi
.VBS )
6. Muncul Pesan Secara otomatis
:
Quote:
WScript.Sleep 180000
WScript.Sleep 10000
Set WshShell =
WScript.CreateObject("WScript.Shell")
WshShell.Run
"notepad"
WScript.Sleep 100
WshShell.AppActivate
"Notepad"
WScript.Sleep 500
WshShell.SendKeys
"Hello"
WScript.Sleep 500
WshShell.SendKeys
"how"
WScript.Sleep 500
WshShell.SendKeys
"are"
WScript.Sleep 500
WshShell.SendKeys
"you"
WScript.Sleep 500
WshShell.SendKeys
" ? "
WScript.Sleep 500
WshShell.SendKeys
"I"
WScript.Sleep 500
WshShell.SendKeys
"m"
WScript.Sleep 500
WshShell.SendKeys
"gho"
WScript.Sleep 500
WshShell.SendKeys
" st"
( save dalam ektensi
.VBS )
7. Backspace Jalan Terus-Menerus
:
Quote:
MsgBox "Let's go
back a few steps"
Set wshShell
=wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys
"{bs}"
loop
( save dalam ektensi
.VBS )
8. Korban Harus Mengetik "You
are crazy"
Secara Terus-Menerus
:
Quote:
Set wshShell =
wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys
"You are crazy"
loop
( save dalam
ektensi .VBS )
9. Buka Notepad Terus-Menerus :
Quote:
@ECHO off
:top
START
%SystemRoot%\system32\notepad.exe
GOTO top
( save dalam
ektensi .BAT )
10. 5 (lima) Pesan Buat Korban
:
Quote:
@echo off
title The end of the
world
cd C:\
:menu
cls
echo Oops Tanggung
Jawab Yah...
pause
echo Semua Ini Salahmu
=P :
echo 1. Semua Data Akan
Hilang
echo 2. Komputer Error
echo 3. Komputer Kena
Virus H1N5
echo 4. Segera Matikan
Komputernya
echo 5. Good bye.....
set input=nothing
set /p input=Choice:
if %input%==1 goto one
if %input%==2 goto two
( save dalam ektensi
.BAT )
demikian mengenai cara cara iseng membuat
pesan menggunakan notepad untuk isengin komputer teman kita , semoga cara
membuat pesan komputer ini bermanfaat untuk sahabat berry blog.
sumber : bukan pc+
