membuat komputer menulis sendiri

Kode ini jika di jalankan... komputer akan membuka notepad dan mengetik sendiri walaupun notepad di close
kode :
set wshshell = wscript.CreateObject("wscript.shell")
wshshell.run "Notepad"
wscript.sleep 2000
wshshell.AppActivate "Notepad"
   WshShell.SendKeys "H"
WScript.Sleep 500
        WshShell.SendKeys "e"
        WScript.Sleep 500
WshShell.SendKeys "l"
        WScript.Sleep 500
WshShell.SendKeys "l"
        WScript.Sleep 500
        WshShell.SendKeys "o"
        WScript.Sleep 500
WshShell.SendKeys " "
        WScript.Sleep 500
        WshShell.SendKeys "A"
        WScript.Sleep 500
        WshShell.SendKeys "l"
        WScript.Sleep 500
        WshShell.SendKeys " l"
        WScript.Sleep 500
        WshShell.SendKeys " "
        WScript.Sleep 500
        WshShell.SendKeys "T"
  WScript.Sleep 500
        WshShell.SendKeys "h"
        WScript.Sleep 500
        WshShell.SendKeys "i"
        WScript.Sleep 500
        WshShell.SendKeys "s"
        WScript.Sleep 500
        WshShell.SendKeys " "
        WScript.Sleep 500
        WshShell.SendKeys "i"
        WScript.Sleep 500
        WshShell.SendKeys "s"
        WScript.Sleep 500
        WshShell.SendKeys "M"
        WScript.Sleep 500
        WshShell.SendKeys "y"
        WScript.Sleep 500
        WshShell.SendKeys "B"
        WScript.Sleep 500
        WshShell.SendKeys "l"
        WScript.Sleep 500
        WshShell.SendKeys "o"
        WScript.Sleep 500
        WshShell.SendKeys "g"
        WScript.Sleep 500


ganti yang berwarna merah dengan tulisan anda
save dengan .bat contoh : nama.bat
untuk tulisan hijau itu bisa di copas ( copy-paste ) contoh :
        WshShell.SendKeys "g"
        WScript.Sleep 500
sumber : www.cilegonit.com