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

opengl: Add texture animation.

Browse Source
This commit is contained in:
Rod Kay
2024-09-24 13:45:18 +10:00
parent d0e3870346
commit ab36317bd2
11 changed files with 259 additions and 54 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
4-high/gel/source/forge/gel-forge.adb
View File

@@ -166,7 +166,8 @@ is
Face => (Fades => [1 => 0.0, others => <>],
texture_Applies => [1 => True, others => <>],
Textures => [1 => Texture, others => <>],
texture_Count => 1)).all'Access;
texture_Count => 1,
Animation => null)).all'Access;
end if;
return gel.Sprite.Forge.new_Sprite (Name,
@@ -225,7 +226,8 @@ is
Textures => [1 => Texture, others => <>],
texture_Count => 1,
texture_Tiling => texture_Tiling,
texture_Applies => [others => <>])).all'Access;
texture_Applies => [others => <>],
Animation => null)).all'Access;
end if;
return gel.Sprite.Forge.new_Sprite (Name,