Thread Projekt "CYA": Rundenspiel wie History / Battle Isle
(29 answers)
Opened by master at 2006-03-24 13:03
Es gab mal eine Projektseite, aber da ich momentan wenig Zeit habe, habe ich diese wieder weggemacht, da ich sonst zu oft von anderen daran erinnert werde, daß ich da weitermachen müßte..
Aber unter http://217.20.116.50/~ishka/elementar.png kannst du dir gerne nen Screenshot anschauen (ist nicht ganz aktuell, aber recht nahe dran). sub z{if(@_){1while$x[$k=rand 10];t($t=$x[$k]=1)}print map"$z[$x[$_]]$_".($_%3?
"":"\n"),1..9}sub t{$j=0;$x[$_+1]==$t&&($j+=2**$_)for 0..8;z,die"Gewinner $z[$t] "if grep$_==($j&$_),7,56,73,84,146,273,292,448;z,die"Gleichstand\n"if@x>9&&!grep !$_,@x}@x=4;@z=qw{. [ (};z$^T&1;while(<>){next if$_>9||$x[$_];t$t=$x[$_]=2;z 1} |