Привет всем! Учу Турбо Паскаль где то 2 месяца, вообщем у меня задание написать маленькую игрушку на Турбо Паскале. Торпедная атака. Я уже написал процедуры для Начала типа ввести имя и показать счетчик выпущенных торпед и подбитых кораблей, процедуру Рисунок, Попал, Не попал. Но вот не пойму как еще написать процедуру Счетчик чтоб она считала торпеды и корабли, точнее как сделать так чтобы подбитые корабли и торпеды появлялись наверху где уже написано имя и счетчик(эт все я написал в процедуре начало), ну чтоб нули там наверху менялись на 1 и т.д. Может кто подскажет?
Помощь с играми
Помощь с играми, Игра на Турбо Паскале
|
03.01.2011 16:43:31
|
|
|
|
|
|
06.01.2011 21:14:57
У тебя корабли однопалубные или как? Просто у тебя только процедуры попал или не попал, но нет процедуры так сказать Убит.
|
|
|
|
|
|
06.01.2011 22:32:38
ну наконец то кто то ответил, я то уж было отчаялся)
Ольга Кабушева, да нет, корабли эт просто эллипсы,процедура попал это и значит что корабль убит а Непопал, значит промазал,так вот мне нужно когда я попадаю, чтоб наверху где я поставил счетчик кораблей и торпед увеличивалось., в любом случае должен увеличиться счетчик торпед, я увеличиваю счетчик но вот как сделать чтоб число присущие счетчику торпед увеличивались и наверху, думал цикл gоtо сделать, других вариантов не вижу |
|
|
|
|
|
07.01.2011 20:28:19
Честно еще не очень поняла. Счетчик в программе у тебя увеличивается при попадании. Что тебе не дает это число выводить на экран? Ты ведь в графическом режиме работаешь скорей всего. И при попадании, так сказать, затираешь их, а проще говоря перерисовываешь поля и кораблики? Или же нет. Если все таки да, то процедурой TextOutXY выводи число подбитых и все.
|
|
|
|
|
|
08.01.2011 01:30:39
не совсем, при попадании затираются только кораблик и торпедо и обратно идет кораблик пока не выпущу торпедо, а остальное остается на своем месте, а процедура ТехtОut она стандартная? Я чет про такую процедуру не читал.
|
|
|
|
|
|
08.01.2011 19:29:46
Да стандартная процедура в графической библиотеке. Только название перепутала. Вот правильно.
OutTextXY(X, Y: Integer; TextString: String) Выводит текст в заданное место экрана. Т.е. тоже затирай это и выводи, что нужно. Почитай, может чего интересное найдешь. Практикум |
||||
|
|
|
|||
Читают тему (гостей: 1, пользователей: 0, из них скрытых: 0)