Idintifier expected... канешно убираю

пытался сделать майнинг попроще... прошу токо одно помогите с весом разобратся почемуто MyMaxweight скопипастеный у Едреда просит идентифаер какойто... когда прописываю просто через иф вейт больше .... копает криво почу я незнаю.... хелп program Mining; {$Include 'all.inc'} const M_nothing1 = 'There...

Объясняю еще раз. Возьми листик бумаги. Нарисуй на нем две оси - прямые, идущие наискосок через лист: одна с верхнего левого угла к нижнему правому, вторая с верхнего правого угла к нижнему левому. Первая - это ось X, вторая Y. Так выглядит мир УО. На пересечении стоит чар. Это, предположим, старто...

уточнение
StartMinPoint[1] := 4551; =Х ??
StartMinPoint[2] := 3172; =У ??
и кейв лимит ето точка или макрос воспринимает ее как границу оси?

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