ISCLEAR
if (ISCLEAR(y, x))
i = ISCLEAR(y, x + 1);
i += ISCLEAR(y, x - 1);
i += ISCLEAR(y + 1, x);
i += ISCLEAR(y - 1, x);