Piszemy Gadu-Gadu Flooder...

[0wn3r]

Skoro nie czytałeś całego tematu, to były propozycje na zrobienie kilkunastu kont

 

[Samuelx]

WTF?
Zrobiłem juz cały kod... Tak jak powinno byc ,poprawiłem wszystko jak jest opisane.
Klikam Run i pokazuje sie na 1 sekundę ten Program po czym wywala ten błąd.
Wiece jak to naprawic?

 

[PoP_Gniezno]

Originally posted by 0wn3r
Skoro nie czytałeś całego tematu, to były propozycje na zrobienie kilkunastu kont

Samuelx:
Przetłumacz sobie na polski

Gdzieś zamiast wartość integer (liczby całkowite) podajesz puste pole co jest sprzeczne.. bo jak już mówiłem zmienna Integer przechowuje liczby całkowite...
tam gdzie masz puste pole wstaw po prostu jakąś liczbę całkowitą np. 0, 1, 1234567

Nie zaglądałem w kod więc nie wiem gdzie ten błąd występuje

//edit
Pewnie przy Timerze pokombinuj skoro mówisz, że program włącza się na sekundę ;P

 

[Samuelx]

kurna:/ próbuje wszystkiego... ale nic ciagle ten bład..
a zmiennej integer wogule nie ma w tym kodzie...
Podam go nizej moze będziesz wiedział

unit Unit1;



interface



uses

  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

  Dialogs, ExtCtrls, StdCtrls, IdBaseComponent, IdComponent,

  IdTCPConnection, IdTCPClient, HGG;



type

  TForm1 = class(TForm)

    HGG1: THGG;

    Numer: TLabeledEdit;

    Haslo: TLabeledEdit;

    Numer_Ofiary: TLabeledEdit;

    Wiadomosc: TLabeledEdit;

    Zaloguj: TButton;

    Wyloguj: TButton;

    Spam: TButton;

    Stop_Spam: TButton;

    Timer1: TTimer;

    procedure ZalogujClick(Sender: TObject);

    procedure WylogujClick(Sender: TObject);

    procedure SpamClick(Sender: TObject);

    procedure Stop_SpamClick(Sender: TObject);

    procedure Timer1Timer(Sender: TObject);

  private

    { Private declarations }

  public

    { Public declarations }

  end;



var

  Form1: TForm1;



implementation



{$R *.dfm}



procedure TForm1.ZalogujClick(Sender: TObject);

begin

hgg1.Number:=strtoint(Numer.Text);

hgg1.Password:=Haslo.Text;

hgg1.Status:=usAvailable;

hgg1.Connect(500);

end;



procedure TForm1.WylogujClick(Sender: TObject);

begin

hgg1.Status:=usNotAvailable;

end;



procedure TForm1.SpamClick(Sender: TObject);

begin

timer1.Enabled:= True;

end;



procedure TForm1.Stop_SpamClick(Sender: TObject);

begin

timer1.Enabled:= False;

end;



procedure TForm1.Timer1Timer(Sender: TObject);

begin

hgg1.SendMessage(strtoint(Numer_Ofiary.text),Wiadomosc.text,);

hgg1.SendMessage(strtoint(Numer_Ofiary.text),Wiadomosc.text,);

hgg1.SendMessage(strtoint(Numer_Ofiary.text),Wiadomosc.text,);

end;



end.

 

[PoP_Gniezno]

Pewnie Edit o nazwie Numer_Ofiary podczas włączania programu ma puste pole!
Wpisz tam jakieś cyferki..
po za tym na początku wyłącz timera...
kliknij Timera... wejdź w Object Inspector i właściwość Enabled ustaw na False!

Pomogło?

 

[Samuelx]

A no pomogło XD
jestes kochany :*
teraz go jescze poulepszam :S

 

[maros185]

A ja mam z kolei taki błąd: http://www.mfoto.pl/show.php?id=563975

 

[3nc0re]

ehh :/ nei ma to jak wrzucic narysowac butony wklejic byle jaki kod...

masz taki błąd bo Button1 masz nazwany *Name Button1* a ten koles ma tam Spam cos tam..

Powinienes miec tam z tego co tam widac

procedure TForm1.Button1Click(Sender: TObject);

zamiast

procedure TForm1.Stop_SpamClick(Sender: TObject);

Pozdrawiam

 

[voyteck]

A nie jest czasem tak, że jak floodujesz gg, to blokuje Ci numer gg? Ja kiedyś napisałem floodera i serwer mi zablokował kilka numerów gg jak zbyt często wysyłałem wiadomości. Sorki jeśli o tym było, ale nie czytałem całego tematu ;p

 

[lade]

Originally posted by voyteck
A nie jest czasem tak, że jak floodujesz gg, to blokuje Ci numer gg?

owszem, jest tak.

GG zalozylo limity na wysylane wiadomosci, limit czasu i ilosci tych waidomosci bodajże. Ale mozna napisac GGF ktory zaklada nowe losowe konta ;p

Pozdrawiam ;]

 

[Dark Smark]

Originally posted by lade+--><div class='quotetop'>CYTAT(lade)</div>

. Ale mozna napisac GGF ktory zaklada nowe losowe konta ;p[/b]

I tak troszkę uciążliwe bo token i tak trzeba przepisywać gdy zakładasz nowy numer.<!--QuoteBegin-voyteck
A nie jest czasem tak, że jak floodujesz gg,

Jest ale to zależy od różnych czynników, jeżeli ofiara ma Ciebie w kontaktach to Cię od razu nie blokuje.

 

[lade]

I tak troszkę uciążliwe bo token i tak trzeba przepisywać gdy zakładasz nowy numer.[/b]

mozna napisac bota ;p

 

[krugger]

lade watpie aby bot ci tutaj pomogl bo kod jest za akzdym razem inny generowny i nie sposob przewidziec jaki on bedzie

 

[mar_je]

Jak by ktoś chciał napisać floodera dla "kilku" numerów:

http://www.project.jmp.com.pl/index.php?option=com_content&task=view&id=161&Itemid=34

 

[-=silkroad=-]

IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient;
pisze u mnie że tu jest błąd

 

[0wn3r]

Ściągnij paczkę Indy.

www.4programmers.net/Delphi/komponenty

 

[-=silkroad=-]

już jest ok

 

[Kopaczka92]

hgg1.Connect(500); tu mi zawsze blad wyskakuje :/ pomozcie heh probowalem dac inne ip serwerow gg ale nic nie dawalo reszte kodu mam dobrze

 

[amex]

zamień

hgg1.Connect(500);

na

hgg1.Connect(-1);

 

[Kopaczka92]

dalej pokazuje blad :/ niewiem co jest ja uzywam delphi 6 enterprice moze cos z nia jest zle

ale chyba nie

nadal niewiem czemu mi blad wyswietla :/