gel.demos: Update code to use new openGL updates.

This commit is contained in:
Rod Kay
2025-09-14 10:11:21 +10:00
parent d357ce109b
commit 5afee0e2e4
41 changed files with 677 additions and 347 deletions

View File

@@ -7,6 +7,7 @@ with
openGL.Model.any,
openGL.Light,
openGL.texture_Set,
ada.command_Line,
ada.Calendar,
@@ -54,6 +55,7 @@ begin
the_Rig : aliased gel.Rig.item;
the_rig_Model : aliased constant openGL.Model.any.view := openGL.Model.any.new_Model (Model => openGL.to_Asset (model_Name),
Texture => openGL.null_Asset,
texture_Details => openGL.texture_Set.to_Details ([1 => openGL.to_Asset ("assets/gel/Face1.bmp")]),
Texture_is_lucid => False);
next_render_Time : ada.calendar.Time := ada.calendar.Clock;