GG Spamer! Status!

Hindukusi

Użytkownik
Dołączył
Marzec 4, 2008
Posty
29
Witam, pisze spamera GG i teraz mam problem ze zrobieniem takiej rzeczy:
-wysyłanie do osób tylko dostępnych lub ZW.

taki przykład:

i : integer;
for i:=0000000 to 9999999 do
if dostepnosc_numeru = true then
gg.sendmessage(i, wiadomosc)

tylko jak zprawdzic dostepnos_numeru?
<
jakis kodzik.. mozna?
Pozdrówki:)
 

l4f

Użytkownik
Dołączył
Wrzesień 16, 2007
Posty
160
Kod:
i:= 0

To zmień od razu. Jakiego komponentu używasz? THGG?

Kod:
i : integer;

for i:=0 to 9999999 do

if dostepnosc_numeru[i] = 1 then

gg.sendmessage(i, wiadomosc)

W miejsce 1 wstaw liczbę odpowiadającą numerowi danego statusu.
1 oznaczało chyba dostępny.
 

Hindukusi

Użytkownik
Dołączył
Marzec 4, 2008
Posty
29
Siema, Tak THGG.

a co do tych statusów, to GG chyba zmieniło liczby na :
opis hgg

-usAvailable -dostępny
-usBlocked - szczerze nie wiem
-usBusy - zraz wracam (zajęty)
-usInvisible - niewidoczny
-usNotAvailable - niedostępny

Nie wiem.. czy dobzre pisze ale moze sie przyda;) heh.
 

l4f

Użytkownik
Dołączył
Wrzesień 16, 2007
Posty
160
Więc będzie coś w tym stylu:
Kod:
i : integer;

for i:=0 to 9999999 do

if dostepnosc_numeru[i] =usAvailable  then

gg.sendmessage(i, Jesteś dostępny)

...
Jak będę miał czas to przetestuje.
 

Dark Smark

Były Moderator
Dołączył
Kwiecień 29, 2006
Posty
1953
Originally posted by Hindukusi
-usBlocked - szczerze nie wiem
Tak to jest zablokowany.
Przejrzyjcie dokumentacje thgg! Musiał byś najpierw wyszukać osobę wedle kryteriów z parametrem ActiveOnly.
Kod:
procedure THGG.PubDirSearch(GGNumber: Integer; FirstName, LastName, NickName, City: string; MinAge, MaxAge: Integer; Gender: TGender; ActiveOnly: Boolean);

Wyszukuje osoby w katalogu publicznym, parametry to:

GGNumber - numer GG osoby,

FirstName - imię,

LastName - nazwisko,

NickName - pseudo,

City - miasto,

MinAge, MaxAge - przedział wiekowy, w jakim obowiązuje wyszukiwanie,

Gender - płeć szukanej osoby (możliwe stany to: gMale - mężczyzna, gFemale - kobieta, gIndefinite - szukanie zarówno kobiet jak i mężczyzn),

ActiveOnly - decyduje, czy szukać tylko osób dostępnych (wartość True), bądź też wszystkich (False).

Jeżeli szukanie powiodło się wystąpi zdarzenie OnPubDirReply, w przypadku nie znalezienia żądanych osób - OnPubDirNoReply. W przypadku gdy nie chcemy definiować któregoś z parametrów podajemy pusty łańcuch, a za pola liczbowe - zero.
Napewno jeszcze potrzebne będzie:
Kod:
procedure THGG.PubDirSearchNext;

Podaje kolejne osoby z ostatniego szukania (ponieważ serwer wyszukuje maksymalnie 20 osób za jednym razem). Jeżeli jest więcej osób pole CanSearchNext przymuje wartość True, w przeciwnym przypadku False.
Możesz zrobić też że najpierw numer ofiary spamu zostaje wylosowany lub idzie po kolei z podanego zakresu (i++
<
, a następnie instrukcja warunkowa sprawdzająca status "ofiary" (Status: TUserStatus; - aktualny status ) decyduje czy wysłać do podanego numeru wiadomość czy nie.
Kod:
property Users.User[Index: Integer]: PUser;

Określa pojedynczego użytkownika na liście kontaktów (właściwość domyślna - nie trzeba jej wywoływać). Dostępne pola to:

GGNumber: Integer; - numer Gadu-gadu użytkownika

Name: string; - imię

Friend: Boolean; - znaczenie opisane powyżej

Status: TUserStatus; - aktualny status

Description: string; - aktualny opis

IP: string; - adres IP

MaxImageSize: Integer; - maksymalna wielkość obrazka

ClientVersion: string; - wersja klienta GG
 

Hindukusi

Użytkownik
Dołączył
Marzec 4, 2008
Posty
29
L4f:
OK, dzięki. Daje to co sie należy : PP, Pozdro.

Z tych materiałów, co teraz mam chciałbym zrobić, że pierw wyszykuje 20osób później pętla.. żeby do nich wszystkich wysłało i od nowa, lecz musiałbym zrobić bazę danych żeby nie wysyłać do tej samej osoby wiadomości. : ) Pozdro.
 

l4f

Użytkownik
Dołączył
Wrzesień 16, 2007
Posty
160
Uważaj, żeby ci się program nie zamulił. Lepiej dodaj opcję wyboru liczby wyszukiwanych osób.
 

Hindukusi

Użytkownik
Dołączył
Marzec 4, 2008
Posty
29
Ale jednorazowo tylko 20osób może wyszukać.. wiec chyba zbytnio nie będzie mulic? : D

Jeśli ktoś chciałby pomóc w pisaniu tego spamerka, to pisać na GG xD. Pozdro.
 
Do góry Bottom