Замеченные неполадки - Страница 9 - Форум

ещё странность - в последней весрии при мерседесе(автобусе) почему то постоянно виснет на предпоследнем вагоне при загрузке..(запускал уже 13 раз)

Добавлено (02.01.2010, 21:42)
---------------------------------------------
Неполдака в последней версии.
При задании грузового маршрута(на нем используется модель ГЗРВ-10Г), при запуске игры выдает деление на ноль.с чем это связано?

Иллюстрирую:

Девятка свалилась на главном проспекте при подъезде ко второму кольцу.
И так на каждом маршруте ((((((

А эта загадка посложнее будет.

Result := True;
for j := 0 to Trums[TrumIndex].Vagons - 1 do with Trums[TrumIndex].VagPos[j] do begin
for i := 0 to TrumCount - 1 do if (i <> TrumIndex) and Trums[i].Valid and Trums[i].Visible then begin
for k := 0 to Trums[i].Vagons - 1 do begin
Result := Result
and (abs(Z - Trums[i].VagPos[k].Z) > 4)
or (DistLL2(X1, Y1, X2, Y2,
Trums[i].VagPos[k].X1, Trums[i].VagPos[k].Y1, Trums[i].VagPos[k].X2, Trums[i].VagPos[k].Y2) * 4 >
Sqr(Trums[i].Model.Width + Trums[TrumIndex].Model.Width));
end;
end;
end;

В кабине в вызываемой модели? Это я сегодня исправил уже.

Добавлено (05.01.2010, 00:22)
---------------------------------------------
Мда, пригрузил я чего-то.
Значит, Result - это переменная, в которую заносится информация о том, что вагон игрока ни с кем не столкнулся.

for j := 0 to Trums[TrumIndex].Vagons - 1 do with Trums[TrumIndex].VagPos[j] do begin
for i := 0 to TrumCount - 1 do if (i <> TrumIndex) and Trums[i].Valid and Trums[i].Visible then begin
for k := 0 to Trums[i].Vagons - 1 do begin

Тут ничего интересного - просто перебор по всем вагонам поезда игрока и по всем вагонам всех других поездов.

Result := Result
and (abs(Z - Trums[i].VagPos[k].Z) > 4)
or (DistLL2(X1, Y1, X2, Y2,
Trums[i].VagPos[k].X1, Trums[i].VagPos[k].Y1, Trums[i].VagPos[k].X2, Trums[i].VagPos[k].Y2) * 4 >
Sqr(Trums[i].Model.Width + Trums[TrumIndex].Model.Width));

Прикол тут.

abs(Z - Trums[i].VagPos[k].Z) > 4

Это условие того, что трамваи едут не разной высоте. Типа один на мосту, другой - под.

DistLL2(X1, Y1, X2, Y2,
Trums[i].VagPos[k].X1, Trums[i].VagPos[k].Y1, Trums[i].VagPos[k].X2, Trums[i].VagPos[k].Y2) * 4 >
Sqr(Trums[i].Model.Width + Trums[TrumIndex].Model.Width)

А вот тут уже расчёт расстояния между вагонами как отрезками, оно не должно превышать полусуммы ширин вагонов. Вместо деления суммы на два я умножил расстояние на 2. Так как оно в квадрате, то не на 2, а на 4. Хотя логичнее правую часть умножать на 0.25.

И еще один недочет.

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

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

Result := true;
Для всех вагонов игрока и для всех вагонов всех других трамваев
Result := Result and
(разность высот достаточно велика) or
(проекции вагонов на плоскость достаточно далеки друг от друга)

Где ошибка?

Вот та же проблема, лишний знак вопроса не убирается, приходится обратно возвращать модель и уже потом убирать её из списка