Шахматы на Pascal

Требуется написать программу, решающую задачу поиска матовой ситуации в шахматной

игре за ближайшие два хода. На вход программе подается имя файла с описанием

конфигурации шахматной доски и указание, от какого игрока требуется поставить мат. В

результате работы программы должна быть выведена (одна или несколько)

последовательность ходов, приводящая к матовой ситуации, если таковая может быть

гарантированно достигнута не более чем за два хода; в противном случае требуется

вывести строку unsat.

(либо написать полностью, либо изменить мой код)