Работаю над гонками с гравитацией.

[Андрей 93]

У всех не работает, или только у Tronix'а? Напишите, кто ещё скачивал.
На моем компе работает хорошо. Но так как на машине нет доступа в инет, я захожу на сайт со 2-го компа. Причем на 2-м компе демка тоже не работает. И после того, как архив побывает на этом втором компе, демо уже не работает и на первом. Я не могу ничего понять. Скидываю еще раз, может заработает.

[DomiNick]

Где-то на OE_Init падает...

[Вадим Буренков]

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

for i:=0 to 9 do draw3angle(triangles[i],tex);

, причем длинна массива странно скачет. Исправляй ошибки.
Компиляция на другом компьютере не поможет, так как код один и тот же.

Где-то на OE_Init падает...

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

[Андрей 93]

Но ведь на моем компе работает. Ну ладно, главное то, что я показал как это работает. Могу конечно исправить, если надо.
Кстати, вопрос по рисованию треугольников (модуль G2D_POLYGONES): Почему когда я рисую контур фигуры красным (или другим цветом), то текстура, которой закрашивается плоскость тоже приобретает красный оттенок?

OE_Init это цикл, в котором и выполняются рисование и обработка

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

[Вадим Буренков]

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

В сорсы омеги я уже давно не лазил, говорю судя по его прямому потомку ZenGL.
Там сделано так:

procedure zgl_Init;
begin
  zgl_GetSysDir();
  log_Init();

  ogl_FSAA    := FSAA;
  ogl_Stencil := StencilBits;
  if not scr_Create() Then exit;

  app_Initialized := TRUE;
  if wnd_Height >= zgl_Get( DESKTOP_HEIGHT ) Then
    wnd_FullScreen := TRUE;

  if not wnd_Create( wnd_Width, wnd_Height ) Then exit;
  if not gl_Create() Then exit;
  wnd_SetCaption( wnd_Caption );
  app_Work := TRUE;

  Set2DMode();
  wnd_ShowCursor( app_ShowCursor );

  {$IFDEF LINUX}
  scr_SetOptions( wnd_Width, wnd_Height, scr_Refresh, wnd_FullScreen, scr_VSync );
  {$ENDIF}

  app_PInit();
  app_PLoop();
  zgl_Destroy();
end;

Сначала идет создание окна, запуск opengl, потом запуск процедуры инициализации юзера движка (процедура, которую мы регистрируем до этого), после этого в app_PLoop() идут циклы таймеров и рисования, а при выходе из них zgl_Destroy() вызывает функцию деинициализации юзера и закрывает zengl. То есть в zgl_Init (OE_Init) и проходит выполение всей программы, только мы в такие дебри не лезем и работаем только в процедурах создания, рисования, таймеров и деинициализации, которые и указывали в zgl_Reg (OE_RegPRocedure).

[Андрей 93]

Переделал, исправил ошибки. Управление стрелками (перемещение дороги) и awsd (перемещение точки)

[_-Re@l-_]

Вот каким образом пройти это место?

[Вадим Буренков]

Вот каким образом пройти это место?

Никак, там конец уровня. До этого места был флажок финиша.
Весь уровень можно посмотреть в редакторе или нажав F (полет камеры).

[_-Re@l-_]

А где этот флажок финиша?

[Вадим Буренков]

Разве не видно?