Opened by pktm at 2003-09-09 19:55
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
Ich bastel auch grad an nem Onlinespiel - ich versuche es aktuell alleine zu machen, aber
a) Ich mach gern auch bei anderen Projekten mit
b) Sobald mein code weitgenug ist um von mir als Strukturiert bezeichnet zu werden, können gerne auch andere Leute mitmachen (link stell ich ncoh nciht online, weil es momentan noch keine automatische Userverwaltung gibt und ich mit den Leuten vom Forum hier uU überfordert wäre)
a) Ich mach gern auch bei anderen Projekten mit
b) Sobald mein code weitgenug ist um von mir als Strukturiert bezeichnet zu werden, können gerne auch andere Leute mitmachen (link stell ich ncoh nciht online, weil es momentan noch keine automatische Userverwaltung gibt und ich mit den Leuten vom Forum hier uU überfordert wäre)
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}