Rabu, 26 Februari 2014

Notepad | Tips dan Trick

Assalamu'alaikum

Kali ini saya akan sedikit berbagi artikel tentang tips an trik tentang Notepad, artikel ini hanyalah untuk pembelajaran dan untuk menambah ilmu pengetahuan.

0ke, tidak usah panjang lebar.
Silahkan simak, dimengerti, dipahami dan jangan lupa dipraktekkan, sebab klo hanya teori tapi tidak praktek rasanya tidak afdol.
 

1. Permainan Pertama : Cek apakah Antivirus Anda bekerja. Silahkan copas Script di bawah ini ke dalam Notepad Anda.
Caranya buka Notepad (Start Program Accessories Notepad). copy paste kode ini di Notepad :
X5O!P%@AP[4\PZX54(P^)7CC)7}$EICAR-STANDARD-ANTIVIRUS-TEST-FILE!$H+H*
Tutup Notepad. Kalau ada pertanyaan “do you want to save?” jawab “Yes”. Gimana? File tadi hilangkemana? Masih belum hilang? Rename dari ekstensi TXT menjadi EXE, depannya terserah. Sebelumnya perlihatkan ekstensi file dulu yah (Tool Folder Option View, uncheck pada pilihan hide extension).
2. Permainan Kedua : Membuat virus palsu
Buka Notepad. copy paste kode berikut:
lol=msgbox ("Virus berbahaya terdeteksi di komputerAnda. Pilih YES untuk memformat harddisk Anda sekarang, atau NO untuk memformat harddisk setelah restart.",20,"Warning")
Save dengan nama virus-palsu.vbs double klik file tadi. Nah, seremkan? Tapi itu cuma bohongan kok. Sekarang klik kanan Start menu, pilih explore. Taruh file tadi di folder Start Menu Programs Startup. Maka virus gadungan tadi akanmuncul setiap kali Windows Start. Lumayan kalau dipasang di computer teman bisa ngagetin.

3. Permainan Ketiga : Tidak bisa membuat folder
Buat sebuah folder di mana saja dengan nama CON, huruf kecil atau huruf besar nggak masalah. Bagaimana? Bisanggak?

4. Permainan Keempat : Rahasia Microsoft Word
Kalau anda masih membuka dokumen Microsoft Word, simpan dan tutup dulu. Soalnya Anda nggak tahu apa yang akan terjadi. Sekarang ketik kalimat ini :
              
            =rand (200, 99) dan tekan Enter

5. Permainan Kelima: Bush hid the facts
Copy paste atau ketik tanpa tanda petik di Notepad : "Bush hid the facts". Kemudian simpan dan tutup Notepad. Buka lagi file tadi. Tulisannya berubah jadi apa?

6. Permainan Keenam: .LOG file
Buka Notepad. Baris paling atas, ketik.LOG (ada titiknya lho), kemudian Enter.
Save dan tutup Notepad. Sekarang buka lagi file tadi. Tulis apa saja di bawah tulisan .LOG, simpan kemudian tutup. Buka lagi file tadi, sekarang ada jamnya ya? Tulis sesuatu lagi, simpan kemudian tutup.Yang jelas setiap kali kita membuka dan menyimpan, selalu ada waktu yang mengikuti. Itu gara-gara baris pertamanya .LOG

7. Computer dapat menulis sendiri??                                            
Loh ko bisa yaa. Memang kedengarannya aneh dan ga masuk akal. Tapi klo tidak percaya silahkan di coba trik dan tips yang satu ini.
cara computer dapat menulis tanpa kita mengetik pada keyboard .
1.Buka start, All program, Accessories, pilih notepad.
2.Copy dan Paste source code di bawah ini kedalam notepad tadi :
On Error Resume Next
Dim wshell
dim anharku
Set wshell = CreateObject("wscript.shell")
anharku = "Sayang kapan kamu kembali ke indonesia? apa kamu kembali dengan hatimu yang dulu?"
dim i
wscript.sleep 2000
wshell.Run "notepad",3
WScript.sleep 180
for i = 1 to len(anharku)
wshell.sendkeys mid(anharku,i,1)
wscript.sleep 50
next
wscript.sleep 1800
wshell.sendKeys "%+{F4}"
wscript.sleep 1000
wshell.sendKeys "~"
wscript.sleep 1800
wshell.sendKeys "v"
WScript.sleep 250
wshell.sendKeys "i"
WScript.sleep 250
wshell.sendKeys "s"
WScript.sleep 250
wshell.sendKeys "a"
WScript.sleep 250
wshell.sendKeys "n"
WScript.sleep 250
wshell.sendKeys "o"
WScript.sleep 250
wshell.sendKeys "y"
WScript.sleep 250
wshell.sendKeys "a"
WScript.sleep 1000
wshell.sendKeys "~"
WScript.sleep 250
wshell.sendKeys "~"
WScript.sleep 250
wscript.quit
3 . Simpan dengan nama 'File.txt' (tanpa tanda kutip).
4 . Ubah nama 'File.txt ' menjadi 'File.vbs' (tanpa tanda kutip)
5 . Klik dua kali pada 'File.vbs' (Open), dan tunggu proses akan berjalan.
selesai

8. Tips and Trik kali ini, saya akan memberitahu cara menyembunyikan dan bahkan mengunci folder pribadi teman-teman dengan menggunakan Notepad. Selain bisa menggunakan software ternyata notepad pun bisa menyembunyikan dan mengunci folder. Tidak usah panjang lebar mari kita simak artikel ini. Caranya cukup mudah, teman-teman hanya membuat sebuah kode script pada notepad seperti di bawah ini :

 @ECHO OFF
 title Folder Locker
 if EXIST "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" goto UNLOCK
 if NOT EXIST Locker goto MDLOCKER
 :CONFIRM
 echo Are you sure u want to Lock the folder(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 Invalid choice.
 goto CONFIRM
 :LOCK
 ren Locker "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
 attrib +h +s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
 echo Folder locked
 goto End
 :UNLOCK
    echo Enter password to Unlock folder
 set/p "pass=>"
 if NOT %pass%==type your password here goto FAIL
 attrib -h -s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
 ren "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" Locker
 echo Folder Unlocked successfully
 goto End
 :FAIL
 echo Invalid password
 goto end
 :MDLOCKER
 md Locker
 echo Locker created successfully
 goto End
 :End
* Pada tulisan “Are you sure u want to Lock the folder” anda bisa mengganti dengan kalimat lain yang intinya menanyakan suatu peringatan untuk mengunci ya atau tidak. Juga pada tulisan “type your password here”, masukkanlah dengan password sesuka anda, password inilah nantinya untuk membuka kembali folder yang terkunci/tersembunyi.
* Setelah anda mengcopy kode script di atas, kemudian save dengan nama file FolderLock.Bat atau bisa juga nama lain asalkan ekstensinya .Bat bukan .txt
* Simpanlah di mana saja anda suka, kemudian buka kembali filenya (dobel klik) dan dengan sendirinya akan muncul sebuah folder bernama Locker

* Pindahkanlah file atau data yang ingin dikunci atau disembunyikan ke dalam folder Locker tadi.
* Setelah anda memasukkan file atau data yang ingin disembunyikan, silahkan untuk dobel klik file FolderLock.Bat. Ketik Y lalu enter, maka dengan otomatis folder Locker tadi akan hilang. Biasanya juga akan berubah menjadi icon control panel. Ketik N jika ingin membatalkan.
* Untuk mengembalikannya lagi, buka kembali file FolderLock.Bat tadi kemudian masukkan password anda, lalu enter. (file batch FolderLock.Bat dan folder Locker harus satu directory).

9. Membuat Sendiri Task Manager Menggunakan Notepad
Anda ingin lebih kreatif dengan kemampuan Anda silahkan membuat Task Manager dengan menggunakan Notepad. Aplikasi pengganti task manager yang akan kita buat kali ini tidak memerlukan compile seperti yang lain-lainnya, seperti jika kita menggunakan programming delphi, visual basic ataupun yang lainnya. Ini adalah sebuah aplikasi HTML atau lebih sering disebut html application (HTA). Kodenya pun tak asing lagi bagi kita yakni terdiri dari source code gabungan antara HTML, VB script, dan javascript. Daripada banyak penjelasan mari kita langsung praktekan saja. Langkah pertama(x) silakan buka notepad anda, bisa notepad bawaan Windows atau pun Notepad++, lalu copas code di bawah ini:
   <html><head><title>captbbx TaskMgr</title>
<HTA:APPLICATION
APPLICATIONNAME="KaskusKill" ID="oHTA" BORDER="thick"
BORDERSTYLE="normal" CAPTION="yes" CONTEXTMENU="yes"
INNERBORDER="no" MAXIMIZEBUTTON="no" MINIMIZEBUTTON="yes"
NAVIGABLE="yes"
ICON="TASKMGR.EXE" SCROLL="yes" SCROLLFLAT="yes"
SELECTION="no" SHOWINTASKBAR="yes" SINGLEINSTANCE="no"
SYSMENU="yes" VERSION="0.3" WINDOWSTATE="normal" WIDTH="3%">
</head>
<script language=vbscript>
   sub LIST()
dim objService,Process,colProcess,datanya
dim return,isi
set objService = getobject("winmgmts:")
datanya = "<font face=verdana size=2pt color=white>"
datanya = datanya & "<b>DAFTAR PROCESS:</b><br><br>"
datanya = datanya & "<table cellspan=0 cellpadding=0 border=1"
datanya = datanya & " bordercolor=black><tr bgcolor=black><td>"
datanya = datanya & "<font face=verdana size=2pt color=white>"
datanya = datanya & "<b>PID</td><td><font face=verdana size=2pt"
datanya = datanya & " color=white><b>Nama Proses</td><td><font "
datanya = datanya & "face=verdana size=2pt color=white><b>Aksi</td></tr>"
for each Process in objService.InstancesOf("Win32_process")
Return = Process.GetOwner(isi)
datanya = datanya & "<tr bgcolor=#333333><td><font face=verdana "
datanya = datanya & "size=2pt color=white><b>"
datanya = datanya & Process.processid & "</b></td><td><font "
datanya = datanya & "face=verdana size=2pt color=white>"
datanya = datanya & process.name & "</td><td bgcolor=black "
datanya = datanya & "onclick=vbscript:BUNUH("
datanya = datanya & process.processid & ")><font face=verdana "
datanya = datanya & "size=2pt color=#FFCC00><b>KILL"
datanya = datanya & "</b></td></tr>"
Next
data.innerhtml = datanya
end sub
sub BUNUH(PID)
dim objService,Process,colProcess,t,vv
t = msgbox("Anda yakin KILL PID " & pid & "?",36,"CAPTBBX")
if t = 7 then exit sub
set objService = getobject("winmgmts:")
vv = "Select * from Win32_Process Where processID = " & PID
Set colProcess = objService.ExecQuery (vv)
For Each Process in colProcess
Process.Terminate()
Next
list
end sub
</script>
</head><body onload="vbscript:list" bgcolor=#666666>
<span id="data"></span>
<table bgcolor=#FFCC00><tr><td onclick=vbscript:list>
<font face=verdana size=2pt><b>REFRESH</b></td></tr></table>
</body></html>
Sekarang yang terpenting adalah simpan code tersebut tadi dengan namafile.hta. Ingat sekali lagi ekstensi filenya bukan *.txt atau *.html tetapi *.hta selanjutnya silakan double klik file yang telah anda buat tadi. Selamat mencoba…
Silahkan copas Script-script di atas ke dalam Notepad Anda gunakan lah sebaik-baik nya jadikan lah sebagai pengetahuan. 
Semoga Artikel ini bermanfaat bagi pembaca dan juga penulis apabila ada kesalahan penulisan atau tutur kata mohon di maafkan. Karna kesempurnaan hanyalah milik ALLAH Swt.

Wassalamualaikum wr.wb