Hallo,
ich hab jetzt mal ein Browserspiel gemacht. Es kann zwar noch nicht allzuviel, aber ihr könnt es ja mal ausprobieren. Daß es noch kein wirkliches Layout hat, ist Absicht, schließlich soll das Design nicht weiter als die Funktionalität sein ;)
http://www.xotus.de/
viel Spaß beim Testen und ich freue mich auf die Rückmeldungen,
Ishka\n\n
<!--EDIT|Ishka|1162941472-->
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}