Mihawk

Geburtstag:

26.05.1990 (34)

Mitglied seit:

05.12.2006

Geschlecht:

männlich

letzter Login:

12.06.2011 - 10:50

Beziehungsstatus:

In einer Beziehung

Profil Views:

5701

Stadt:

02826 Görlitz

Augenfarbe:

grau-grün

Haarfarbe:

dunkelblond

#system "cat fluxbot.data";
&vprint("Verbinug zu $spin::server wird Ueberprueft...";
if(&spin::connect()){
&vprint("...connected ",1);
}else{
&vprint("...failed ",1);
die "No connection available! ";
}
&loadpasswd($spin::nick,0) if($spin::nick && !$spin::password);
if(!$spin::nick){
print &vtime()." Nickname: ";
chomp($spin::nick=<STDIN>;
}
if(!$spin::password && !&loadpasswd($spin::nick,1)){
print &vtime()." Passwort: ";
chomp($spin::password=<STDIN>;
}
#$SIG{ALRM}=&todo;

$SIG{INT}=&killed;
$SIG{TERM}=&killed;
$SIG{QUIT}=&killed;
$SIG{KILL}=&killed;
$SIG{STOP}=&killed;
&vprint("Einloggen mit dem Nickname: $spin::nick...";
if(!(($old)?&spin::login_new():&spin::login())){
&vprint("...failed ",1);
die &vprint("Error: Unable to login! ",0,0,1);
}
&vprint("...erfolgreich ",1);
&vprint("SessionID: $spin::sid " if(!$old);
&savepasswd();
&fluxdb::set("|global","login_time",time());
print "a";
&vprint("Erfolgreich eingeloggt mit dem Nickname $spin::nick in $spin::server ";
if($daemon){
exit 0 if (($pid = fork()) != 0);
exit 0 if (setsid() == -1);
}
&vprint("Automatisches Einloggen...";
my @joined;
foreach(&fluxdb::fetch("|global","autojoin"){
&main::makechan($_) if(!&fluxdb::check("|global","knownchans",$_));
if($_ && &spin::join($_,&fluxdb::get($_,"greet",&fluxdb::get($_,"passwd")){
&fluxdb::add("|global","actchans",$_);
if(&fluxdb::get($_,"quiz" eq "on"{
my $id=&quiz::start($_);
&fluxdb::set($_,"quizid",$id);
&quiz::set($id,"answer",&fluxdb::get($_,"showanswer");
&quiz::set($id,"diaaccept",&fluxdb::get($_,"diaaccept");
}else{
&fluxdb::set($_,"quizid","off";
}
&spin::topic($_,&fluxdb::get($_,"topic");
&spin::url($_,&fluxdb::get($_,"url");
push(@joined,$_);
}
}