nichkara/lace
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

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

Browse Source
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
Download Patch File Download Diff File Expand all files Collapse all files

4
4-high/gel/source/world/gel-world-client.adb
View File

@@ -1,3 +1,4 @@
with any_math.any_Algebra.any_linear.any_d3;
with
gel.Events,
@@ -112,6 +113,7 @@ is
the_Sprite := gel.Sprite.forge.new_Sprite (+the_Pair.sprite_Name,
sprite.World_view (the_World),
get_Translation (the_Pair.Transform),
get_Rotation (the_Pair.Transform),
the_graphics_Model,
the_physics_Model,
owns_Graphics => False,
@@ -565,6 +567,8 @@ is
Self. physics_Models,
gel.World.view (Self));
-- log ("*** gel.world.client.is_a_Mirror.add sprite ~ " & the_Sprite.Name'Image);
-- the_Sprite.Spin_is (z_Rotation_from (to_Radians (90.0)));
Self.add (the_Sprite);
end loop;
end;

1
4-high/gel/source/world/gel-world-server.adb
View File

@@ -110,6 +110,7 @@ is
the_Sprite := gel.Sprite.forge.new_Sprite ("2Sprite" & the_Pair.sprite_Id'Image,
sprite.World_view (the_World),
get_Translation (the_Pair.Transform),
get_Rotation (the_Pair.Transform),
the_graphics_Model,
the_physics_Model,
owns_Graphics => False,

2
4-high/gel/source/world/gel-world.adb
View File

@@ -1,3 +1,4 @@
with any_math.any_Algebra.any_linear.any_d3;
with
gel.Events,
@@ -105,6 +106,7 @@ is
the_Sprite := gel.Sprite.forge.new_Sprite ("Sprite" & the_Pair.sprite_Id'Image,
sprite.World_view (the_World),
get_Translation (the_Pair.Transform),
get_Rotation (the_Pair.Transform),
the_graphics_Model,
the_physics_Model,
owns_Graphics => False,