Opened by Strat at 2003-08-21 13:37
User since
2003-08-04
771 Artikel
HausmeisterIn
![[Homepage]](/battie/theme/default/homepage.gif)
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-08-04
771 Artikel
HausmeisterIn
Und bitte bau nichts ein, was sich mit JS öffnet - JS-Links sind immer so umständlich mit w3m zu öffnen.
Sehr gut finde ich, daß sich die Links im gleichen Fenster öffnen und nicht ein neues aufmachen.
Das Design gefällt mir - es passt zum Rest vom Forum (vielleicht wär linksseitig besser als zentriert, bin mir aber da selbst nicht sicher, was ich besser finde).
Sehr gut finde ich, daß sich die Links im gleichen Fenster öffnen und nicht ein neues aufmachen.
Das Design gefällt mir - es passt zum Rest vom Forum (vielleicht wär linksseitig besser als zentriert, bin mir aber da selbst nicht sicher, was ich besser finde).
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}
"":"\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}