Source koden til "kamel boten" (for at den skal funke må du ha den vanlige boten, dere forstår):


#!/usr/bin/perl
use strict;
use warnings;
use WWW::Mechanize;
my $mech;
my %counter = ( Utpressing => 16, Biltyveri => 6, 'Club.+?Gangster' => 240, Kriminalitet => 3, 'Fight Club' => 2);
my %wait = ( Utpressing => 16, Biltyveri => 6, 'Club.+?Gangster' => 240, Kriminalitet => 3, 'Fight Club' => 2);

sub gotolink {
my ($text) = @_;
$counter{$text}++;
if (!$wait{$text} || $counter{$text} >= $wait{$text}) {
check();
LINK: $mech->follow_link(text_regex=>qr/$text/) or die scalar localtime() . "Kunne ikke finne $text\n";
check() or goto LINK;
return 1;
}
return 0;
}
sub antibot {
#Finner koden i antibot verifikasjonen.

my $convert = `convert -negate -geometry 800 antibot.png antibot.pbm`;
my $gocr;
open GOCR, "gocr -m 2 -m 256 -s 200 -d 200 antibot.pbm|";
$gocr = $_ while (<GOCR>);
close GOCR;
chomp($gocr);
unlink('antibot.png', 'antibot.pbm');
return $gocr;
}
sub cdg_bruker {
#Finn en random bruker fra forumet.

$mech->follow_link(text_regex=>qr/Klubb forum/);
my @users;
$_ = $mech->content;
while(/valg=les\&id=\d+\">(.+?)<\/a>.+?brukernavn=(.+?)\">/gs) {
my $thread = $1;
my $user = $2;
push @users, $user if ($thread =~ /(0|null).*?forsvar/i);
}
$mech->back;
my $count = (scalar @users)-1;
return @users[rand($count)];
}
sub check() {
login() if (!$mech);
if (my $img = $mech->find_image( url_regex => qr/image\.php/i)) {
$mech->get( $img->url_abs, ":content_file"=>"antibot.png" );
$mech->back();
$mech->submit_form(button => 'subimgvalid', fields=> { imgenter => antibot() });
print scalar localtime() . " Skrev inn antibot kode\n";
return 0;
}
if ($mech->form_name('nmLoggInn2')) {
login();
return 0;
}

return 1;
}
sub flytt_bil {
#Flytter den siste bilen til det stedet hvor det er billigst.

FLYTT: $mech->follow_link(text_regex=>qr/Biltyveri/);
goto FLYTT unless check();
$mech->form_name('trainform');
if (my ($carid) = $mech->content =~ /style=\"cursor: pointer;\">(\d+)<\/a>/) {
my %places = map { /(.+?) - (\d+)/ } $mech->form_name('trainform')->find_input('trainto')->value_names;
my $trainto = ((sort {$places{$a}<=>$places{$b}} keys %places)[0]);

$mech->submit_form(button => 'subtrans', fields => { trainid => $carid, trainto => $trainto });
print scalar localtime() . " Flytta bilen til $trainto\n";
return 1;
}
}
sub login {
open LOGIN, "login.txt";
my $user = <LOGIN>; my $pass = <LOGIN>;
$user =~ s/\s+$//; $pass =~ s/\s+$//;
close LOGIN;

if (!$mech) {
$mech = WWW::Mechanize->new(quiet => 1);
$mech->agent_alias('Windows IE 6');
$mech->get("http://www.nordicmafia.net");
}
if ($mech->form_name('nmLoggInn2')) {
if ($mech->submit_form (form_name=>'nmLoggInn2', fields=> { brukernavn => $user, passord => $pass }) && !$mech->form_name('nmLoggInn2')) {
print scalar localtime() . " Logget inn\n";
return 1;
}
else {
die scalar localtime() . "Kunne ikke logge inn\n";
}
}
}

while(1) {
if (gotolink('Kriminalitet')) {
if ($mech->form_number(1) && $mech->submit_form (fields => { valg => 'bank'}) && (my ($content) = $mech->content =~ /class=\"content\">\s*(.+?)<table>/)) {
$content =~ s/<.+?>//g;
print scalar localtime() . " Prøvde å rane bank: $content\n";
}
}

if (gotolink('Biltyveri')) {
if ($mech->form_name('f') && $mech->submit_form (form_name => 'f', button => 'stjelsubmit', fields => { gtanr => '4'}) && (my ($content) = $mech->content =~ /class=\"content\">\s*(.+?)\s*<br>/)) {
$content = "Men kom i fengsel." if ($content =~ /side=fengsel/);
$content =~ s/<.+?>//g;
print scalar localtime() . " Prøvde å stjele bil på gata: $content\n";
flytt_bil() if ($content =~ /Du stjal/);
$counter{Biltyveri} = 0;
}
}

if (gotolink('Utpressing')) {
if ($mech->form_number(1) && $mech->submit_form(form_number => 1, button => 'subpress')) {
my ($content) = $mech->content =~ /class=\"content\">\s*(.+?)\s*<br>/; $content =~ s/<.+?>//g;
print scalar localtime() . " Prøvde utpressing: $content\n";
$counter{Utpressing} = 0;
}
}


if (gotolink('Fight Club')) {
if ($mech->form_number(1) && $mech->submit_form(form_number => 1, button => 'subtrennaa', fields => {aktivitetvalg => 1})) {
my ($content) = $mech->content =~ /class=\"content\">\s*(.+?)\s*<table/; $content =~ s/<.+?>//g;
print scalar localtime() . " Utførte 25 pushups: $content\n";
$counter{'Fight Club'} = 0;
}
}

sleep(60);
}

Heisan.
Hadde akkurat en bruker som jeg hadde jobbet mye på (uten bot) som ble drept..
Gir nå opp med å spille fair, så jeg lurer på om det er noen som kan gi meg en bot?
P.S Når jeg åpner de andre som er lagt ut åpner de seg av en eller annen grunn i Windows Media plr :O
Kan hende jeg er veldig b00b, men kan noen si meg hva jeg gjør galt?

Mvj Jakob

jeg skjønte ikke noe av det jeg. den klarer og loge in men så kansje den gjør en ting så klikker den

400 mrd??? hvordan får dere så mye penger?

jeg har et lite problem med kamelbotten..

dette her skjer bare når jeg er pålogga på denne pcen ikke på pcen jeg har hos mutter, dette er ganske irriterende.
etter kanskje 10 min eller mindre får jeg opp en feilmelding som ser slik ut.:

http://www.maj.com/gallery/oleolsss/stuff/feilmeldingfaen.bmp

hva skal jeg gjøre... dette er fryktelig irriterende.. man oppnår ikke noe når jeg må slette mappa og zippe den på nytt hele tida.
noen som kan hjelpe. på forhånd takk..

weee første innlegg fra meg!

...Ole

Hvis du lager en .bat fil som starter boten så lukker den seg ikke. Men har merket at noen pcer funker ikke boten på.
Bruker dette i "Start bot.bat"

Hei,kunne du forklart litt bedre åssen det der funker ? er ikke helt min gode side ....

Åpne notisblokk.
Skriv inn teksen ovenfor og lagre filen. For at det skal bli bat fil må du skrive "Start bot.bat (med ")
Jeg har boten i Mappen Nordic Mafia-Bot/nordicmafia på skrivebordet og Start bot på skrivebordet.
Ellers så må du endre cd Nordic Mafia-Bot\nordicmafia til cd sti\til\din\bot

kanskje du må bli medlem av fight club, eller så vet jeg ikke

kan noen kontakte meg på peppes_bm@hotmail.com hvis de vil selge poengboten?

kan bytte den mot en boss konto

woot? det er blitt antibot når du logger deg inn:O er det noen som skall selge poeng bot? kontakt larrizz@hotmail.com
wohoo, er blitt med i gjeng nå

Hva er denne poengboten?
Og det antiboten på login hindrer ingen ting enda:P
Den gjør det bare kjedelig og teit å logge på vanlig.

herregud den antiboten i starten holde på og drepe meg, så drit lenge og trykka feil :S

Og hva er den godt for?
Var på mIRC i går og så at masse folk klaga til Wetting2 om denne boten. Er sikkert derfor ha la inn antiboten i starten, men hva hjelper vel det når det er et svært hull i systemet? Man trenger ikke oppdatere kamelboten engang, den logger inn uten problemer!

Noen som har en full versjon bott til

ja, kamelboten går og logger inn som helt vanlig, syns det bare er litt teit jeg med den nye antiboten.

men hvis noen har noen poeng bugs kan de kontakte peppes_bm@hotmail.com

har faktisk en boss, en kaptein, 1 assasin og 2 hitman jeg :P

å spille med flere en 1 bruker er ulovlig, og ikke fair

Og du syns at cheating er fair? Det er ulovlig det også..

Noen som kan hjelpe meg med å legge in botten?

samma om jeg cheater med en eller 100 da?

det er ikke lov med en heller

Så klart er det no som heter poeng bug!

ok, har forstådd det nåda

får det enda ikke til får fortsatt den teite meldinga.. men var det sånna at "start bot" fila skulle være i samme mappe som kamelboten?:P

jeg får det enda ikke til.. var det sånn at jeg skulle legge inn den "start bot" fila i samme mappa som kamelboten?

det er så kjipt å få den samma feilmeldinga hele tida.. det blir bare avbrutt og da kommer jeg aldri noen vei hvis jeg ikke gjør det med pcen over hos muttern.

...Ole

hvordan funker egentlig poengbug?
hvordan har dere som har det skaffa dere det?

johansen_235 hvor kan jeg laste ned den boten du har?

Nå har de fått antibot sjekk på innloggingen.
Mulig noen av de gamle botene ikke funker da ?

tviler du har lest hele posten, les 2linjer opp

hey larizzz, hva kaller du deg på nm? du virker ganske aktiv

hva mener du med aktiv? om jeg tør spørre?

hvordan får man admin til å aktivere meg på HenriSt NordicMafia Bot !!???

har sendt en kontakt melding til han!!!

jeg får en feil, det står at jeg mangler overload.pm har noen den til kamelboten?

Kamelboten funker flott den.

jeg kan ikke forklare dere som ikke kan kamelboten hvordan man brukern, fordi jeg fikk den tilsendt på msn og så lasta jeg ned winrar.

jeg klarer heller ikke få igang HenriSt NordicMafia Bot , det kommer bare en melding om at det er noe feil og at den avslutter

Jepp, kamelboten funker fett enda den.
Men nå flytter de serverene så NM er nok nede i et par timer.
Noen som kan PMe meg og forklare meg hvordan poengbugen funker?

hadde vært kult hvis de som kunne poeng bugen eller noe annet kunne lagt det ut her

Vel, hvis det er poengbugen min vi snakker om, vil jeg helst ikke at den blir spredt (hvertfall ikke hvis det er "advanced_poengbug.exe") - for bra for folket :P

Uansett hadde det ødelagt nordic, tenk alle dem som hadde hatt over 1 mill poeng o0

hva skjer med nordicmafia nå det kommer bare siden kan ikke vises hos meg!!???

Warning: fsockopen(): unable to connect to www.nordicmafia.net:80 in cinetpub\wwwroot\nordicmafia.php on line 10

Fatal error: Call to undefined function: logg() in cinetpub\wwwroot\nordicmafia.php on line 12

dette er det som kommer når jeg prøver og logge på den derre henrist!!!!!!

Jeg har sluttet med NM nå, men hører fra venner at de flytter servere idag også

nordicmafia bytter server fra klokken 6 idag og da virker ikke nm,
tipper nm er tilbake til imorra

er det noen som har linken til et program som programerer? de som lagde botene må ha brukt et program... hvilket?

maggahalla: Etter det jeg har sett av screenshots av botene, så kan jeg anta at de er skrevet i Visual Basic. I så tilfelle kan du bruke Microsoft Visual Studio som er et meget bra IDE for utvikling av programvare. Mulighetene for å lage slike programmer er mange, C, C++, C#, Php, perl, python - you name it.

hehe det er ikke noe program som lager botter
du må lære deg et "språk" (pearl, python, c, java, OSV)

emacs, notepad, word, frontpage, dreamweaver, echo, edit? Kva er du ute etter? En teksteditor, maggahalla?