[Cologne-pm] Treffen am 08.02.2006...

[Krusenotto, Patrick]

Hallo Aristoteles,

Danke für die Info.

Falls einer heute Abend einen Laptop mitbringt:

Ich gebe ein Lage Kölsch aus, falls einer gegen mein Skript gewinnt:

#!/usr/bin/perl
#4gewinnt,p.krusenotto 2005
@f=(0)x42;$M=9999;@S[1,2,3,5,10,15]=(1,9,99,-1,-9,-99);sub p{for$y(0..5){print{
1=>'O',5=>'X',0=>'-'}->{$f[$y*7+$_]},' 'for(0..6);print"\n";}print
"1 2 3 4 5 6 7\n";}sub d{($p,$c)=@_;$c+=7while($c<42&&!$f[$c]);next if$c<7;$f
[$c-7]=$p;$c-7;}sub e{($o,$d)=@_;$S=0;for(0..3,7..10,14..17,21..24,
28..31,35..38){$Z=$f[$_+3]+$f[$_+2]+$f[$_+1]+$f[$_];return-$M-$d if$Z==4*$o;$S
+=$S[$Z];}for(0..20){$Z=$f[$_]+$f[$_+7]+$f[$_+14]+$f[$_+21];return-$M-$d if$Z==
4*$o;$S+=$S[$Z];}for(0..3,7..10,14..17){$Z=$f[$_]+$f[$_+8]+$f[$_+16]+$f[$_+24];
return-$M-$d if$Z==4*$o;$S+=$S[$Z];}for(3..6,10..13,17..20){$Z=$f[$_]+$f[$_+6]+
$f[$_+12]+$f[$_+18];return-$M-$d if$Z==4*$o;$S+=$S[$Z];}$o!=1?$S:-$S;}sub a{my(
$c,$a,$b,$D)=@_;my$S=e(6-$c,$D);return$S if!$D||abs($S)>999;my$B;for(0..6){next
if$f[$_];my$j=d $c,$_;my($s)=a(6-$c,-$b,-$a,$D-1);$s=-$s;$f[$j]=0;if($s>$a){$a
=$s;$B=$_;}last if$a>=$b;}($a,$B);}while(1){p;last if abs(e 5)>$M/9;$m=<>;d 1
,$m-1;last if abs(e 1)>$M/9;($v,$m)=a 5,-$M,$M,6;d 5,$m;}

Gruss,
  Patrick  


-----Ursprüngliche Nachricht-----
Von: cologne-pm-bounces at pm.org [mailto:cologne-pm-bounces at pm.org] Im Auftrag von A. Pagaltzis
Gesendet: Dienstag, 7. Februar 2006 12:27
An: cologne.pm
Betreff: Re: [Cologne-pm] Treffen am 08.02.2006...

Hi Patrick,

* Krusenotto, Patrick <pkrusenotto at cosa.de> [2006-02-07 12:15]:
>Leider kenne ich keinen von euch - ebenfalls die "Sansibar" nicht.

Man kann uns aber eigentlich nicht wirklich übersehen. :-) Das
Sansibar ist recht klein, und wir sitzen immer ganz hinten in
einer (hoffentlich) grösseren Gruppe um einen Tisch herum. Sollte
einer gar seinen Laptop aufgebaut haben, dann gibt es garkeinen
Zweifel mehr.

>Finden wär nicht so sehr das Problem, aber kann man irgendwo in
>der Nähe parken?

Geht schon. Auf Anhieb wirst du wahrscheinlich keinen Platz
finden, aber irgendwas findet sich in der Nähe eigentlich immer.

Gruss,
-- 
Aristoteles Pagaltzis // <http://plasmasturm.org/>
_______________________________________________
Cologne-pm mailing list
Cologne-pm at pm.org
http://mail.pm.org/mailman/listinfo/cologne-pm
 
E-Mail Disclaimer 
 
Aus Rechts- und Sicherheitsgruenden ist die in dieser E-Mail gegebene 
Information nicht rechtsverbindlich. Eine rechtsverbindliche Bestaetigung 
reichen wir Ihnen gerne auf Anforderung in schriftlicher Form nach. 
Beachten Sie bitte, dass jede Form der unautorisierten Nutzung, 
Veroeffentlichung, Vervielfaeltigung oder Weitergabe des Inhalts dieser 
E-Mail nicht gestattet ist. Diese Nachricht ist ausschliesslich fuer 
den bezeichneten Adressaten oder dessen Vertreter bestimmt. Sollten Sie 
nicht der vorgesehene Adressat dieser E-Mail oder dessen Vertreter sein, 
so bitten wir Sie, sich mit dem Absender der E-Mail in Verbindung zu setzen.


For legal and security reasons the information provided in this e-mail is not 
legally binding. Upon request we would be pleased to provide you with a legally 
binding confirmation in written form. Any form of unauthorised use, publication, 
reproduction, copying or disclosure of the content of this e-mail is not permitted. 
This message is exclusively for the person addressed or their representative. 
If you are not the intended recipient of this message and its contents, please 
notify the sender immediately.