[must read] 10 cara membuat pesan iseng di komputer teman anda
TS
oobenkk
[must read] 10 cara membuat pesan iseng di komputer teman anda
Membuat Pesan iseng di Komputer
Spoiler for pertama:
Quote:
baik,kali ini ane mau berbagi trik mengenai bagaimana 10 cara mudah membuat pesan iseng menggunakan notepad di komputer orang, khususnya iseng iseng di komputer teman kita tapi jangan keseringan ya dan kalau temenya marah saya gak tanggung jawab
berikut caranya gan
Spoiler for buka:
Quote:
tunggu dulu... ada baiknya di dulu gan
Spoiler for 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 ) [/quote]
Spoiler for pesan shutdown:
Quote:
Quote:
@echo off
msg * Komputer anda hank
msg * Tidak ada jalan lain
msg * Harus dishutdown
( save dalam ektensi .BAT )
Spoiler for tombol capslock hidup terus:
Quote:
Quote:
Set wshShell =wscript.CreateObject("WScript.Shell") do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}" loop
( save dalam ektensi .VBS )
Spoiler for pesan terkena virus:
Quote:
<html>
<head>
[removed]
function display_alert()
{
alert("Komputer dalam ranjau virus !!")
var b = true
while (b == true){
alert("Virus Trojan 5 !!")
}}
script>
head>
<body><input type="button">body>
html>center>
( save dalam ektensi .HTML )
Spoiler for menekan enter terus menerus:
Quote:
Quote:
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop
( save dalam ektensi .VBS )
Spoiler for muncul pesan secara otomatis:
Quote:
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 )
Spoiler for backspace jalan terus menerus:
Quote:
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 )
Spoiler for korban harus mengetik ''saya gila'' terus menerus:
Quote:
Quote:
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "saya gila"
loop
( save dalam ektensi .VBS )
Spoiler for buka notepad terus - terusan :
[quote] Quote:
@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top
( save dalam ektensi .BAT )
Spoiler for 5 pesan untuk korban :
5 (lima) Pesan Buat Korban :
Quote:
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 )
Quote:
ini gak ada efek sampingnya kok gan, karna tujuanya cuma buat iseng, bukan merusak
Spoiler for Pesan TS:
Quote:
kalo thread ane bermanfaat untuk menjaili teman anda bolehlah dikasih