Pilots School, игра с исходником.

[Mikle]

Это немного доделанная игра на конкурс леталок.
Можно менять задания, создавать новые задания, переводить на другие языки и т. п., просто редактируя ini-файл.

Скачать игру Школа пилотов (старая версия) с исходниками.
Игра написана на Visual Basic 6 с использованием моего порта DX9 для VB6.
Модель самолёта предоставил bodja, текстуры травы и асфальта с открытых источников, остальное моё.
Для работы требуется DX9-совместимая видеокарта от nVidia либо DX10-совместимая от ATI.

Новая версия от 17-04-2019: https://yadi.sk/d/WXNvqCxkSsoiPw

[DODge]

Очень качественно сделано! Правда после игры GTA5 управление здесь кажется слегка инерционным.
Не смог пройти задание где надо пролететь чекпоинты в горах. Видимо пилот из меня хреновый

[Хакер]

Roll и Pitch, по-моему, вводят в заблуждение. Особенно меня смутил Pitch. Хотя потом, если подумать, что оба показывают землю относительно самолёта, оси которого горизонтальны на экране, то всё логично.

Но раз способ индикации сбивает с толку, может что-то в нём додумать?

[Хакер]

А ещё в списке участников там есть ASD. Это случайно не наш ASD?

[Хакер]

Дошли руки запустить — процесс сразу же крэшнулся при запуске.

Если запускать из проекта, ошибка на Set RTMain = Dev.GetRenderTarget(0). В этом месте Dev содержит Nothing.

[Mikle]

Если запускать из проекта, ошибка на Set RTMain = Dev.GetRenderTarget(0). В этом месте Dev содержит Nothing.

А если EXE, что, работает?
До этого делается две попытки создать Device:

Код: Выделить всё

Set Dev = d3D.CreateDevice(frmMain.hWnd, D3DCREATE_HARDWARE_VERTEXPROCESSING Or D3DCREATE_FPU_PRESERVE, d3dpp)

и, если HARDWARE_VERTEXPROCESSING не поддерживается:

Код: Выделить всё

Set Dev = d3D.CreateDevice(frmMain.hWnd, D3DCREATE_SOFTWARE_VERTEXPROCESSING Or D3DCREATE_FPU_PRESERVE, d3dpp)

Если не удалось создать даже так, значит видеокарта не поддерживает что-то из параметров:

Код: Выделить всё

  d3dpp.Windowed = D3D_TRUE
  d3dpp.SwapEffect = D3DSWAPEFFECT_DISCARD
  d3dpp.BackBufferFormat = D3DFMT_UNKNOWN
  d3dpp.BackBufferCount = 0
  d3dpp.EnableAutoDepthStencil = D3D_TRUE
  d3dpp.AutoDepthStencilFormat = D3DFMT_D24S8
  d3dpp.PresentationInterval = D3DPRESENT_ONE
  d3dpp.MultiSampleType = D3DMULTISAMPLE_4_SAMPLES


Что весьма странно, когда пройдена проверка:

Код: Выделить всё

If (Caps.VertexTextureFilterCaps And D3DPTFILTERCAPS_MAGFPOINT) = 0 Then

Попробуй заремить строку:

Код: Выделить всё

Set Dev = d3D.CreateDevice(frmMain.hWnd, D3DCREATE_HARDWARE_VERTEXPROCESSING Or D3DCREATE_FPU_PRESERVE, d3dpp)

Может создаётся аппаратный VERTEXPROCESSING, но он по возможностям сильно урезан.

[Хакер]

А если EXE, что, работает?

Я там в верхнем посте пропустил одно важное слово. Сейчас я его добавил и выделил цветом.

Если не удалось создать даже так, значит видеокарта не поддерживает что-то из параметров:

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

Может создаётся аппаратный VERTEXPROCESSING, но он по возможностям сильно урезан.

Вообще не понял, что ты имеешь в виду. Первый вызов возвращает Nothing. Второй вызов возвращает Nothing. Какой может быть смысл рэмить любой из вызовов. Ума не приложу.

[Mikle]

Первый вызов возвращает Nothing. Второй вызов возвращает Nothing. Какой может быть смысл рэмить любой из вызовов. Ума не приложу.

Я тоже пропустил важную информацию
Строку:

Код: Выделить всё

d3dpp.AutoDepthStencilFormat = D3DFMT_D24S8

заменить на

Код: Выделить всё

d3dpp.AutoDepthStencilFormat = D3DFMT_D16

а эту просто убрать:

Код: Выделить всё

d3dpp.MultiSampleType = D3DMULTISAMPLE_4_SAMPLES

А ещё в списке участников там есть ASD. Это случайно не наш ASD?

Не знаю, не общался с ним об этом. Можно посмотреть список его тем, станет понятнее круг его интересов.

Roll и Pitch, по-моему, вводят в заблуждение. Особенно меня смутил Pitch. Хотя потом, если подумать, что оба показывают землю относительно самолёта, оси которого горизонтальны на экране, то всё логично.
Но раз способ индикации сбивает с толку, может что-то в нём додумать?

Это, в общем, в игровом процессе не особо требуется, просто сделано "для солидности", мол "есть приборы" .

Вызываю jangle в тред, пусть вставит слово про обработку ошибок

Там в ReadMe написано:

Video card that supports Vertex Texture Fetch (VTF).

Такие видеокарты должны всё это поддерживать.
Понимаю, что более правильно было бы отловить все случаи несовместимости, но уж больно их много, недаром даже игры от солидных производителей страдают подобными багами. Правда, есть ещё вариант - общий On Error Goto, но такой подход я очень не люблю.

[Хакер]

а эту просто убрать:

Код: Выделить всё

d3dpp.MultiSampleType = D3DMULTISAMPLE_4_SAMPLES

Одного этого оказалось достаточным. Формат менять не обязательно.

Там в ReadMe написано:

Video card that supports Vertex Texture Fetch (VTF).

Такие видеокарты должны всё это поддерживать.

Ну обывателю это ни о чём не говорит. У меня нет отдельной видеокарты, используется видео, встроенное в Core i7.

___

Вообще, у меня от вида твоих обёрток кровавые слёзы на глаза наворачиваются.

[Mikle]

у меня от вида твоих обёрток кровавые слёзы на глаза наворачиваются.

Ты про надстройку над dx_vb? Скоро совсем перестану ей пользоваться, есть tlb от The Trick. Просто эта игра начиналась ещё на dx_vb, да и в tlb пока не всё есть.

Одного этого оказалось достаточным.

Это радует. И горы видны? Или вместо них плоскость?

[Хакер]

Всё видно, но стрелка совершенно наркоманская. Я во второй миссии как идиот искал невидимую цель в воздухе, летая вокруг некой точки в пространстве, изменяя своё направления в соответствии с меняющейся стрелкой. И только случайно увидел вдали красную точку и понял, что на стрелку лучше не смотреть.

[Mikle]

Сначала я сделал стрелку, как проекцию направления на цель на плоскость экрана в 3D. Но меня убедили, что так не понятно, такой вариант, как сейчас, устроил большинство. Это - проекция направления на цель на плоскость карты.

[Хакер]

Но меня убедили

Кто эти люди и что они курили?

[Mikle]

Кто эти люди и что они курили?

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

[Qwertiy]

Тоже попробовал. Работает. Летать что-то не особо выходит. Но стрелка реально какая-то бредовая. Если уж это порекция на землю, то надо её на земле и рисовать, а не непонятно где.

[Mikle]

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

Скачать можно тут: https://yadi.sk/d/WXNvqCxkSsoiPw

Скриншоты:



Видео прохождения двух последних (самых сложных) заданий:
https://youtu.be/0oqTpwr2D-E

[bon818]

После прогресса, получаю это:
---------------------------
Pilots School
---------------------------
Run-time error '91':

Object variable or With block variable not set
---------------------------
ОК
---------------------------

XP SP3
Video: intel G41 exp.. встроена в MB

Vertex Texture Fetch (VTF) ?

[Mikle]

intel G41

Это причина, VTF тут вряд ли есть. Вот на Intel HD 4000 игра работает и даже показывает очень приличное быстродействие в FullHD.

[bon818]

intel G41

Это причина, VTF тут вряд ли есть. Вот на Intel HD 4000 игра работает и даже показывает очень приличное быстродействие в FullHD.

Понятно. Попробую с GT 430? , где-то валяется.

[Mikle]

Попробую с GT 430?

Пойдёт без проблем. У меня большая часть разработки игры прошла именно на GT 430.