brmlab/brmlife
4
0
Fork 0
mirror of https://github.com/brmlab/brmlife.git synced 2025-08-02 09:53:38 +02:00
Code Issues Projects Releases Packages Wiki Activity

client/example: Moar debug

Browse source
This commit is contained in:
Petr Baudis 2011-12-03 16:02:04 +01:00
parent 04a475efbe
commit 65c02784b5
1 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
client/example.pl
View file

@ -109,11 +109,13 @@ sub take_action($%) {
}
if ($move[dirindex($dir)] > $move[dirindex($max)] or
($move[dirindex($dir)] == $move[dirindex($max)]) and (int rand(2))) {
($move[dirindex($dir)] == $move[dirindex($max)] and int rand(2))) {
$max = $dir;
}
}
print "moves ".join(", ", @move)."\n";
if ($attack[dirindex($max)]) {
print $socket "attack_dir $max->[0] $max->[1]\r\n";
} else {