Просто. Создаешь список, элементы которого имеют тип TCoord, например.
Type TCoord
Field x
Field y
Field dir ; направление движения
Field next ; указатель на следующий элемент, в случае односвязного списка
End Type
; Определить значения для направления
const DIR_RIGHT = 0
const DIR_LEFT = 1
const DIR_UP = 2
const DIR_DOWN = 3