Vhaerun

Du-te la filo. Eu am facut mate-info , si sincer e mult mai putin stres la filo' . Plus ca o sa fie in clasa vreo 20-25 fete si 5 baieti . Programarea ce trebuie sa o stii nu o sa o inveti in liceu , o vei invata pe cont propriu . Trust me .

Nu stiu Delphi ca sa iti explic cum sa faci . Mai tin minte ceva pascal din liceu. Daca faci in C#/Java/Perl/AutoIT interfata grafica , pot sa te ajut . In caz contrar nu

Foarte simplu.Alege-ti un limbaj de programare,si uita-te peste interfete grafice si listenere/event-uri.

Desktop PC: AMD Athlon 64 3000+ , 512 DDR2 , X1550 , 160GB HDD Laptop : Centrino Dual Core 1.6 , 1GB DDR2 , PV Intel On-Board , 120 GB HDD

Yeee ! That's my name

Folosesti alt provider

mie mi se pare o idee buna acum lucrez la ce ai spus tu deci o sa fie o versiune 2.0 (am gasit si un modul pe net care ma ajuta ff mult ms de idee Vhaerun) Sper ca tu glumeai cand ai zis de modulul ala . Fii serios , modul pt. o chestie asa simpla ?

Stii ce ar fi fain ? Sa ii poti pune optiune in cat timp sa se stinga .

Salut! Am inceput lucrul la un modul perl pentru bitefight . Momentan stie raid ( dar nu si atacuri ) , informatii despre cont si lucru . Ar urma sa ii adaug ceva optiuni pentru inventar , mesaje si atacuri . Exemplu de cod : use strict; use warnings; use Browser::Game::Bitefight; my $account=Browser::Game::Bitefight->new(user => "user",pass => "parola",server => 2); my %stats=$account->stats(); for my $key (keys %stats) { print $key . " " . $stats{$key},"\n"; } $account->lucru(2); Metode new constructor . * user => userul_tau , in loc de userul_tau vei pune numele contului * pass => parola_ta , in loc de parola_ta vei pune parola contului * server => [1,2,3,4,5,6,7,8] aici vei alege numarul serverului tau raid($TIMP) iti trimite personajul in raid - $TIMP trebuie sa se incadreze in limita timpului tau , ex : raid(10) pentru raid de zece minute lucru($TIMP) iti pune personajul la lucru - $TIMP reprezinta numarul de ore ce vor fi lucrate , $TIMP trebuie sa fie in intervalul [0,8] , ex: lucru(2) pentru doua ore de lucru . stats intoarce un hash ce contine unele informatii despre personajul tau : aur , pietre , pozitie in clasament , forta , dex , etc . timp_raid intoarce timpul ramas de raid Cand voi mai avea ceva timp o sa mai lucrez la el . Ar fi ok daca l-ati testa si voi,poate gasiti ceva ce mie mi-a scapat . Modulele sunt urmatoarele : Browser::Game package Browser::Game; sub new { my $class=shift; my $object={}; my %args=@_; $object->{account}=Game::Account->new(); map { $object->{account}->field($_,$args{$_}) } keys %args; bless($object,$class); return $object; } 1; Browser::Game::Bitefight package Browser::Game::Bitefight; @ISA=qw(Browser::Game); use strict; use warnings; use Browser::Game; use Browser::Game::Account; use WWW::Mechanize; my $mech=WWW::Mechanize->new(); sub new { my $class=shift; my $self=$class->SUPER::new(@_); bless($self,$class); $self->___login(); return $self; } sub lucru { my $self=shift; my $timp=shift; my $key; my $value; if($timp !~ /^\d+$/ || ($timp < 0 || $timp > 8)) { die "folosire functie lucru : lucru(VALOARE) , VALOARE trebuie sa fie numar , 0 < VALOARE < 9\n"; } $mech->get("http://s@{[$self->{account}->field('server')]}.bitefight.ro/bite/city.php?typ=2"); my $content=$mech->content; if($content=~/td class=\"tdn\"><select name=\"(\w+)\"/gi) { $key=$1; } while($content=~/<option value=\"(\w{32})\">(\d) ore/gi) { if($2==$timp) { $value=$1; last; } } $mech->submit_form(with_fields => { $key => $value }); } sub ___login { my $self=shift; $mech->agent_alias("Windows IE 6"); my $login_page="http://s@{[$self->{account}->field('server')]}.bitefight.ro/bite/login.php"; $mech->get($login_page); $mech->form_number(1); $mech->field("user",$self->{account}->field("user")); $mech->field("pass",$self->{account}->field("pass")); $mech->click(); if(!$mech->success()) { print "Eroare la login!!!\n"; print $mech->content,"\n"; $self->dump(); die "Eroare la login\n"; } $mech->get("http://s@{[$self->{account}->field('server')]}.bitefight.ro/bite/uebersicht.php?&web_redirected=1"); } sub content { my $self=shift; return $mech->content(); } sub dump_content { my $self=shift; $mech->save_content("temp.html"); } sub dump { my $self=shift; foreach my $val ($self->{account}->fields()) { print "$val " . $self->{account}->field($val),"\n"; } } sub stats { my $self=shift; my %stats; my @stats=qw(For?? Ap?rare Dexteritate Rezisten?? Carism? Experien?? Via??); $mech->get("http://s@{[$self->{account}->field('server')]}.bitefight.ro/bite/uebersicht.php"); my $content=$mech->content; if($content=~/<tr><td>Aurul t.*?:<\/td><td>([0-9\.]+)\s+<img src/i) { $stats{"aur"}=$1; } if($content=~/Pietre ale Iadului<\/a>:<\/td><td>(\d+)\s+<img src/i) { $stats{"iad"}=$1; } if($content=~/<tr><td>Clasament:<\/td><td>(\d+)<\/td><\/tr>/i) { $stats{"loc"}=$1; } for my $val(@stats) { #if($content=~/$val.*?class=\"fontsmall\">\s*\((\d+)\)<\/span><\/td><\/tr>/gi) { if($content=~/$val.*?class=\"fontsmall\">\s*\((\d+.*?)\)<\/span><\/td><\/tr>/gi) { $stats{$val}=$1; } } $stats{"raid"}=$self->timp_raid(); return %stats; } sub timp_raid { my $self=shift; my $available; my $content; $mech->get("http://s@{[$self->{account}->field('server')]}.bitefight.ro/bite/robbery.php"); $content=$mech->content; while($content=~/<option value=\"\w{32}\">(\d+)\sminute<\/option>/gi) { $available=$1; } return $available; } sub raid { my $self=shift; my $timp=shift; my $content; my $value; $mech->get("http://s@{[$self->{account}->field('server')]}.bitefight.ro/bite/robbery.php"); $content=$mech->content; while($content=~/<option value=\"(\w{32})\">(\d+)\sminute<\/option>/gi) { if($2==$timp) { $value=$1; last; } } if(defined $value) { $mech->submit_form(with_fields => { "mission[1]" => $value }); } else { print "$value e nedefinit. S-ar putea sa nu mai ai timp de raid !\n"; } } 1; Browser::Game::Account package Game::Account; use strict; use warnings; sub new { my $class=shift; my $object={}; bless($object,$class); return $object; } sub field { my $self=shift; my $key=shift; if(@_) { my $val=shift; return $self->{$key}=$val; } return $self->{$key}; } sub delete_field { my $self=shift; my $key=shift; delete $self->{$key}; } sub fields { my $self=shift; return keys %{ $self }; } 1;

Ce legatura are stirea asta cu securitatea ? Posturi inteligente nu stii sa faci ?

^'> , I am not worthy ! Ai descoperit ce se cheama SCAM .

Nu cred ca e nevoie de tutorial pentru buddycheck.

bt3=msdos :twisted:

Heya ! Am cautat zilele trecute cum sa fac sa iau textul din ferestrele de conversatie de pe messenger . Nu voiam sa ma bazez pe loguri , si am inceput cautarea . Am aflat ca ferestrele Y! Messenger sunt de fapt Internet Explorer_Server , si am vazut pe forumul AutoIT , ca daca atasezi un browser la ele , poti accesa textul la fel ca pentru o pagina . Dim $browser=_IEAttach("titlu ferestra messenger","embedded"); MsgBox(0,"Info",_IEDocReadHTML($browser)); Pentru a scoate textul e nevoie sa parsati HTML-ul . Aveam/am in plan sa fac un anti-mass pentru Yahoo! Messenger , poate candva o sa iasa By the way : codul asta moare pe versiunea AutoIT stabila ( a fost introdus un bug in DllCall ) , 3.2.1.10 sau cat o fi . Pentru a merge , ori folosesti o versiune mai veche , ori downloadezi ultima beta .

Confunzi niste chestii in tutorial , dar overall e ok . Uita-te si peste Cain .

Nu sunt sigur , dar nu s-ar putea exploata cu soft linkuri ? ( comanda ln )

Tu nu vezi ca ala ii Gnome ?

Tu habar n-ai ce ii aia programare.

Trebuie instalat manual. Am aratat in tutorial cum.

Salve ! Poate ca e din cauza Windows , dar am incercat sa folosesc HTTP::Cookies::Mozilla cu Mechanize si nu mi-a reusit . Din moment ce trimiterea directa a cookie-ului functioneaza pt. XSS , am zis ca trebuie sa mearga si la Mechanize . Si a mers ! Asta ar fi solutia gasita : use strict; use warnings; use HTML::Display; use WWW::Mechanize; my $mech=WWW::Mechanize->new(); my $cookie=qw{COOKIES}; $mech->add_header("Cookie",$cookie); $mech->agent_alias("Windows IE 6"); $mech->get(SITE); display($mech->content); Of course , in loc de COOKIES pui cookie-urile respective . Exemplu:copiezi linia de cookie luata cu un grabber aici , si vei fi logat .

Instalezi WWW::Mechanize .

se face , painea pe vatra .

Credits to : OFFICIAL SOURCE . Tu esti motor de cautare ? Din ala nefolositor ?

Eu optez pentru Backtrack , are tot ce vreau .

Ce rost e sa te complici cu photoshop cand poti face asa ?