Шахматная задача, Фигуры не могут прыгать через друг друга Опции

[Hindelberg]

Задача: НА шахматной доске слон и ладья(белые). НАйти сколько на доске клеток, куда можно поставить черную пешку чтобы ее нельзя было срубить слоном или ладьей. Это я сделал.

Код

if (i+j=cs+bs) or (i-j=cs-bs) then
mas[i,j]:=1;
end;
mas[cs,bs]:=2;
for i:=1 to n do
for j:=1 to n do
begin
if (i=cl) or (j=bl) then
mas[i,j]:=1;
end;
mas[cl,bl]:=3;
for i:=n downto 3 do
for j:=1 to n do
if mas[i,j]=0 then s:=s+1;

cl, cs - цифра ладьи и слона соответственно
bl, bs - буква ладьи и слона соответственно

В этом решении я не учел, что фигуры не могут прыгать друг через друга.
Как это сделать?