Trik Sederhana Bermain Notepad

Notepad merupakan salah satu aplikasi sederhana bawaan windows yang bisa kita gunakan untuk minyampan catatan. Namun tahukah kamu bahwa dengan sedikit kreatifitas dan kemampuan di sisi coding, dengan aplikasi sederhana kita bisa buat hal-hal yang menyenangkan bahkan kita bisa membuat sebuah program yang merugikan SEPERTI sebuah Virus. Tapi saya tidak ingin anda berbbuat begitu, disini saya hanya akan memberikan beberapa script "jahil" sederhana untuk sekedar bersenang-senang dengan aplikasi ini.
Berikut ini beberapa script sederhana yang mungkin anda coba-coba saat bermain notepad.

1. Membuka dan menutup CD/DVD Komputer
   Copy script dibawah ini dan paste di notepad anda.
   Set oWMP = CreateObject("WMPlayer.OCX.7")
   Set colCDROMs = oWMP.cdromCollection
   do
   if colCDROMs.Count >= 1 then
   For i = 0 to colCDROMs.count - 1
   Next
   For i = 0 to colCDROMs.Count - 1
   colCDROMs.Item(i).Eject
   Next
   wscript.sleep 5000
   loop
   Simpan dengan format*.vbs.
   Lalu buka file tersebut
2. Menulis otomatis di notepad
   Copy script dibawah ini dan paste di notepad anda.
   Set wshShell = wscript.CreateObject("WScript.Shell")
   do
   wscript.sleep 100
   wshshell.sendkeys "Tulisan ini akan menulis sendiri di norepad anda"
   loop
   Simpan dengan format*.vbs.
   Lalu buka file tersebut
3. Membuat pesan muncul berulang-ulang
   Copy script dibawah ini dan paste di notepad anda.
   @ECHO off
   :Begin
   msg * ini hanya main - main
   msg * jangan marah ya
   msg * hanya becanda
   GOTO BEGIN
   Simpan dengan format*.bat.
   Lalu buka file tersebut
4.  Membuat Komputer Shutdown dengan muncul pesan
   Copy script dibawah ini dan paste di notepad anda.
   @ ECHO off
   msg * hahaha
   shutdown -s -c "Komputer anda mati"
   Simpan dengan format*.bat.
   Lalu buka file tersebut
5. Membuat tombol Capslock terus menyala
   Copy script dibawah ini dan paste di notepad anda.
   Set wshShell = wscript.CreateObject("WScript.Shell")
   do
   wscript.sleep 100
   wshshell.sendkeys "{CAPSLOCK}"
   loop
   Simpan dengan format*.vbs.
   Lalu buka file tersebut
6. Membuat terus - menerus menekan tombol "Backspace"
   Copy script dibawah ini dan paste di notepad anda.
   MsgBox "Kembali ke menu sebelumnya"
   Set wshShell = wscript.CreateObject("WScript.Shell")
   do
   wscript.s;eep 100
   wshshell.sendkeys "{bs}"
   loop
   Simpan dengan format*.vbs.
   Lalu buka file tersebut
7. Membuka notepad terus - menerus
   Copy script dibawah ini dan paste di notepad anda.
   @ECHO off
   :top
   START%SystemRoot%\system32\notepad.exe
   GOTO top
   Simpan dengan format*.bat.
   Lalu buka file tersebut