modified the AI logic to make it a bit more difficult

This commit is contained in:
ribtips
2022-02-11 12:12:02 -05:00
parent 0d3dbcff87
commit b59eba3534

View File

@@ -110,7 +110,7 @@ sub check_for_corners {
@precedence=(1,9,7,3,5,2,4,6,8);
}
else {
@precedence=(5,1,9,7,3,2,4,6,8);
@precedence=(5,2,4,6,8,1,9,7,3);
}
foreach my $move (@precedence) {
my $validity=&check_occupation($move);