Trik Rahasia Membuat tulisan berjalan di Notepad

Postingan kali ini adalah postingan dari temanku IDOEN pemilik blog brengkolspirit.7ruh.com N bagi sobat blogger yg ingin berbagi artikel bisa menghubungiku........

Pernahkah kamu bikin tulisan jalan pada Notepad, kalau kamu pnasaran gimana caranya lagsung aja Begini caranya :

1. Buatlah new notepad ( .txt )

2. copy script berikut ke notepad :

Code:

set wshshell = wscript.CreateObject("wscript.shell")
        wshshell.run "Notepad"
        wscript.sleep 2000
        wshshell.AppActivate "Notepad"
        WshShell.SendKeys "C"

        WScript.Sleep 300
        WshShell.SendKeys "r"
        WScript.Sleep 300
        WshShell.SendKeys "a"
        WScript.Sleep 300
        WshShell.SendKeys "t"
        WScript.Sleep 300

        WshShell.SendKeys "e"
        WScript.Sleep 300
        WshShell.SendKeys "d"
        WScript.Sleep 300
        WshShell.SendKeys " "
        WScript.Sleep 500
        WshShell.SendKeys "b"

        WScript.Sleep 300
        WshShell.SendKeys "y"
        WScript.Sleep 300
        WshShell.SendKeys " "
        WScript.Sleep 500
        WshShell.SendKeys "i"
        WScript.Sleep 300

        WshShell.SendKeys "d"
        WScript.Sleep 300
        WshShell.SendKeys "o"
        WScript.Sleep 300
        WshShell.SendKeys "e"
        WScript.Sleep 300
        WshShell.SendKeys "n"

        WScript.Sleep 300
        WshShell.SendKeys "b"
        WScript.Sleep 300
        WshShell.SendKeys "r"
        WScript.Sleep 300
        WshShell.SendKeys "e"
        WScript.Sleep 300

        WshShell.SendKeys "n"
        WScript.Sleep 300
        WshShell.SendKeys "g"
        WScript.Sleep 300
        WshShell.SendKeys "k"
        WScript.Sleep 300
        WshShell.SendKeys "o"

        WScript.Sleep 300
        WshShell.SendKeys "l"
        WScript.Sleep 300
        WshShell.SendKeys " "
        WScript.Sleep 500
        WshShell.SendKeys "h"
        WScript.Sleep 300

        WshShell.SendKeys "a"
        WScript.Sleep 300
        WshShell.SendKeys "."
        WScript.Sleep 300
        WshShell.SendKeys "."
        WScript.Sleep 300
        WshShell.SendKeys "h"

        WScript.Sleep 300
        WshShell.SendKeys "a"
        WScript.Sleep 300
        WshShell.SendKeys "."
        WScript.Sleep 300
        WshShell.SendKeys "."
        WScript.Sleep 300

3. lalu save as dgn ekstensi .vbs

4. klik file tsb, dan liat keajaiban pun terjadi...

Anti virus terbaru karya anak bangsa

anti virus ini dibuat oleh seorang anak yg baru berusia 13 th,meskipun demikian anti virus dapat bekerja dengan baik dalam membasmi virus2 yang meresahkan........

Download Installer :

 Download Portable :