Pages

Tuesday, July 24, 2012

Trik Iseng Bermain dengan Notepad


Agan kurang kerjaan dan pengen mengisi waktu dengan kegiatan yang menambah wawasan dan menyenangkan ? yuk kita coba main-main dengan tools script editornya windows yang sudah kita kenal dari dulu : si abang notepad

  • Membuat Pesan yang Muncul Berulang-Ulang
 Ketik/Copy Script Dibawah Ini ke Notepad Anda

@ECHO off
:Begin
msg * ini virus brontok
msg * komputer anda telah terinfeksi
msg * bentar lagi rusak loh
msg * cpu anda akan terbakar
msg * bye bye
GOTO BEGIN

Simpan dengan Nama apapun asal formatnya (nama file).bat
  •   Membuat Tombol Capslock Menyala Terus
Ketik/Copy Script Dibawah Ini ke Notepad Anda

Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{CAPSLOCK}”
loop

Simpan dengan nama apapun asal formatnya (nama file).vbs
  • Membuka Notepad Terus Menerus
Ketik/Copy Script Dibawah Ini ke Notepad Anda

@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top

Simpan dengan nama apapun asal formatnya (nama file).bat
  • Membuka dan Menutup CD Drive Komputer
Ketik/Copy Script Dibawah Ini ke 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
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 nama apapun asal formatnya (nama file).vbs
  • Notepad Menulis Sendiri
Ketik/Copy Script Dibawah Ini ke Notepad Anda

Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “Tulisan ini akan menulis sendiri di notepad anda”
loop

 Simpan dengan nama apapun asal formatnya (nama file).vbs
  • Mematikan Komputer dan Muncul Pesan
Ketik/Copy Script Dibawah Ini ke Notepad Anda

@echo off
msg * Hahahahhaha
shutdown -s -c “Komputer anda mati”

Simpan dengan nama apapun asal formatnya (nama file).bat
  • Membuat Tombol Backspace Aktif Terus
Ketik/Copy Script Dibawah Ini ke Notepad Anda
 
MsgBox “Kembali ke menu sebelumnya”
Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{bs}”
loop

Simpan dengan nama apapun asal formatnya (nama file).vbs

Setelah agan selesai biar greget langsung dicoba gan atau kalau mau lebih greget copy in ke laptop temen biar supertrap :D


Referensi : Dari berbagai sumber

No comments:

Post a Comment

Budayakan komen gan ! Sekalian silaturahmi :D