KALIMAT HANTU - PLAY MP3

Berbeda dengan kalimat hantu yang sebelumnya.. kali ini kita akan menambahkan agar kalimat hantu ini tiba-tiba memainkan salah satu file music. Wow..! keren banget tuh..caranya gimana.? Ote, silahkan anda ketik script berikut..kalo capek, yaudah Copas juga boleh..


WScript.Sleep 180
WScript.Sleep 100
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "cmd"
WScript.Sleep 100
WshShell.AppActivate "cmd"
WScript.Sleep 100
WshShell.SendKeys "H"
WScript.Sleep 100
WshShell.SendKeys "E"
WScript.Sleep 100
WshShell.SendKeys "L"
WScript.Sleep 100
WshShell.SendKeys "L"
WScript.Sleep 100
WshShell.SendKeys "O"
WScript.Sleep 100
WshShell.SendKeys "."
WScript.Sleep 100
WshShell.SendKeys "."
WScript.Sleep 100
WshShell.SendKeys "."
WshShell.SendKeys "{ENTER}"
WScript.Sleep 100
WshShell.SendKeys "A"
WScript.Sleep 100
WshShell.SendKeys "P"
WScript.Sleep 100
WshShell.SendKeys "A "
WScript.Sleep 100
WshShell.SendKeys "KA"
WScript.Sleep 100
WshShell.SendKeys "BAR"
WScript.Sleep 100
WshShell.SendKeys "?"
WScript.Sleep 100
WshShell.SendKeys "."
WScript.Sleep 100
WshShell.SendKeys "."
WScript.Sleep 100
WshShell.SendKeys "."
WshShell.SendKeys "{ENTER}"
WScript.Sleep 100
WshShell.SendKeys "K"
WScript.Sleep 100
WshShell.SendKeys "O"
WScript.Sleep 100
WshShell.SendKeys "M"
WScript.Sleep 100
WshShell.SendKeys "P"
WScript.Sleep 100
WshShell.SendKeys "U"
WScript.Sleep 100
WshShell.SendKeys "T"
WScript.Sleep 100
WshShell.SendKeys "E"
WScript.Sleep 100
WshShell.SendKeys "R "
WScript.Sleep 100
WshShell.SendKeys "I"
WScript.Sleep 100
WshShell.SendKeys "N"
WScript.Sleep 100
WshShell.SendKeys "I "
WScript.Sleep 100
WshShell.SendKeys "TELAH "
WScript.Sleep 100
WshShell.SendKeys "DI HACK "
WScript.Sleep 100
WshShell.SendKeys "OLEH "
WScript.Sleep 100
WshShell.SendKeys "PANJI GUMELAR"
WshShell.SendKeys "{ENTER}"
WScript.Sleep 100
WshShell.SendKeys "."
WScript.Sleep 100
WshShell.SendKeys "."
WScript.Sleep 100
WshShell.SendKeys "."
WshShell.SendKeys "{ENTER}"
WScript.Sleep 100
WshShell.SendKeys "D:"
WshShell.SendKeys "{ENTER}"
WScript.Sleep 100
WshShell.SendKeys "CD "
WScript.Sleep 100
WshShell.SendKeys "M"
WScript.Sleep 100
WshShell.SendKeys "u"
WScript.Sleep 100
WshShell.SendKeys "s"
WScript.Sleep 100
WshShell.SendKeys "i"
WScript.Sleep 100
WshShell.SendKeys "c"
WshShell.SendKeys "{ENTER}"
WScript.Sleep 100
WshShell.SendKeys "start sofaraway.mp3"
WshShell.SendKeys "{ENTER}"
WScript.Sleep 500
WshShell.SendKeys "exit{ENTER}"

Pada contoh script diatas, saya menggunakan file music yang terdapat pada path Drive D:\Music\sofaraway.mp3 ,,untuk itu, anda perlu menyesuaikan dimana lokasi file music anda simpan, dan ubahlah bentuk script diatas sesuai lokasi file music koleksi anda. Disini yang perlu anda perhatikan benar-benar yaitu lokasi file music dan format penulisan nama file music asli nya. Penulisan nama ini sangat penting sekali, saya contohkan pada script diatas penulisan nama file music asli sofaraway.mp3 jangan ditulis so far away.mp3 … kenapa? Karena cmd tidak dapat mengeksekusi format penulisan perintah yang terdapat embel_embel spasi, tanda desh, simbol2 lain pada nama file music..

*TIPS: biar trik ini lebih serem gunakanlah Backsound music_musik Horor….!

0 komentar:

senyum kagum sip trims bingung pusing

Posting Komentar