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

opengl.model.polygon.lit_textured: Use model texturing mixin.

Browse Source
This commit is contained in:
Rod Kay
2025-09-07 06:27:46 +10:00
parent eb12d98f65
commit b766155987
6 changed files with 243 additions and 216 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
3-mid/opengl/source/demo/opengl-demo.adb
View File

@@ -213,7 +213,7 @@ is
the_textured_hexagon_Model : constant Model.hexagon.lit_textured.view
:= Model.hexagon.lit_textured.new_Hexagon (Radius => 0.5,
Face => (Fades => [1 => 0.0, others => <>],
Textures => (1 => the_Texture, others => <>),
Textures => [1 => the_Texture, others => <>],
texture_Count => 1,
texture_Applies => <>,
Animation => null));
@@ -263,7 +263,7 @@ is
-- Textures => (1 => the_Texture, others => <>),
-- texture_Tiling => <>,
-- texture_Count => 1));
Face => (Texture_Details => (openGL.texture_Set.to_Details ([1 => the_Texture]))));
texture_Details => (openGL.texture_Set.to_Details ([1 => the_Texture])));
the_text_Model : constant Model.Text.lit_colored.view
:= Model.Text.lit_colored.new_Text (Text => "Once upon a midnight dreary ...",