- or download this
if (
(
!&test2($xCur, $yCur, $wall)
...
&& !&test8($xCur, $yCur, $wall)
)
)
- or download this
if (
(
!&test2($xCur, $yCur, $wall)
...
&& !&test8($xCur, $yCur, $wall)
)
)
- or download this
my %test1 = (
2 => 0,
3 => 0,
...
7 => 1,
8 => 0,
);
- or download this
if(
not(grep { check_coord($xCur, $yCur, $wall, $_) ne $test1{$_} } ke
+ys %test1)
or not(grep { check_coord($xCur, $yCur, $wall, $_) ne $test2{$_} }
+ keys %test2)
) {
}