Шахматы

[qpuTuJlb]

Добрый день, мне дали задание сделать по типу шахмат фигуру пешку, тоесть сделать условие при каком она сможет бить, я сделал чтобы она била по диагонали как и надо, но она бьет и вперёд, как это можно убрать?

PHP код:

if RadioButton6.Checked then
if abs(x1-x2+1)=abs(y1-y2+1) and abs(x1-x2-1) and abs(y1-y2-1) then
ShowMessage('бьет') else
ShowMessage('не бьет') 


[was3110]

если пешка идет снизу вверх, поле нуменуется снизу вверх

if RadioButton6.Checked then 
if (abs(x1-x2)=1) and (y2-y1=1) then 
ShowMessage('бьет') else 
ShowMessage('не бьет')

[qpuTuJlb]

Спасибо, коечто подправил, но ваш ответ мне помог

[qpuTuJlb]

А с королем как? я сделал, но он может бить почти как захочет а не через 1 клетку, то есть он стоит в координатах 5;5 а бить может 6;100 и т.д. как правильно написать?

if RadioButton5.Checked then
if (x1=x2+1) or (y1=y2-1) or (x1=x2-1) or (y1=y2+1) then
ShowMessage('бьет') else
ShowMessage('не бьет');

[BDA]

Король:

if RadioButton5.Checked then
if abs(x1-x2)+abs(y1-y2)<=2 then
ShowMessage('бьет') else
ShowMessage('не бьет');

[qpuTuJlb]

спасибо, помогло