Пишу игру "Морской бой"

[OmegaBerkut]

Сообщение от zarina.serikbulato

Извините,а что такое TPole?

TPole - в источнике - тип данных матрицы.
Аналогичен моему TMatrix. только в моём быдлокоде были необходимы запасы по краям, связано с расстановкой.

[Arigato]

Сообщение от OmegaBerkut

Ладно, где тут тему закрывать ?
Придётся самому трассировать...

Так ведь никто не понял, что вы хотели.

[OmegaBerkut]

Сообщение от Arigato

Так ведь никто не понял, что вы хотели.

Что значит, "не понял" ?
Народу не понравился код, ни мой, ни с источника, а проблема уже была описана:

Сообщение от OmegaBerkut

Моя проблема в том, что: при выполнении функции state1, когда рандом попадает в ячейку матрицы, где есть корабль - весь внешний цикл repeat (функции State1) становиться бесконечным, т.е. его выполнение не завершается. ...

...Помогите пожалуйста разобраться с данной проблемой.

В любом случае, что бы там не было,

Спасибо тем, кто отказывал мне в помощи, благодаря им я всё сделал сам.

В этом случае, эта тема не несёт никакой полезности, а значит, что пора её отправлять в архив (или корзину, мусорку, или просто удалять).

[Arigato]

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

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

[OmegaBerkut]

Сообщение от Arigato

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

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

Там консольная программа по той ссылке, написанная в среде Turbo Pascal, а у меня при попытке открыть в Delphi 7 вылетала ошибка.