1
0
Fork 0
forked from Simnation/Main
Main/resources/[tools]/NativeUI/elements/Sprite.lua

67 lines
2.4 KiB
Lua
Raw Normal View History

2025-06-07 08:51:21 +02:00
Sprite = setmetatable({}, Sprite)
Sprite.__index = Sprite
Sprite.__call = function() return "Sprite" end
function Sprite.New(TxtDictionary, TxtName, X, Y, Width, Height, Heading, R, G, B, A)
local _Sprite = {
TxtDictionary = tostring(TxtDictionary),
TxtName = tostring(TxtName),
X = tonumber(X) or 0,
Y = tonumber(Y) or 0,
Width = tonumber(Width) or 0,
Height = tonumber(Height) or 0,
Heading = tonumber(Heading) or 0,
_Colour = {R = tonumber(R) or 255, G = tonumber(G) or 255, B = tonumber(B) or 255, A = tonumber(A) or 255},
}
return setmetatable(_Sprite, Sprite)
end
function Sprite:Position(X, Y)
if tonumber(X) and tonumber(Y) then
self.X = tonumber(X)
self.Y = tonumber(Y)
else
return {X = self.X, Y = self.Y}
end
end
function Sprite:Size(Width, Height)
if tonumber(Width) and tonumber(Width) then
self.Width = tonumber(Width)
self.Height = tonumber(Height)
else
return {Width = self.Width, Height = self.Height}
end
end
function Sprite:Colour(R, G, B, A)
if tonumber(R) or tonumber(G) or tonumber(B) or tonumber(A) then
self._Colour.R = tonumber(R) or 255
self._Colour.B = tonumber(B) or 255
self._Colour.G = tonumber(G) or 255
self._Colour.A = tonumber(A) or 255
else
return self._Colour
end
end
function Sprite:Draw()
if not HasStreamedTextureDictLoaded(self.TxtDictionary) then
RequestStreamedTextureDict(self.TxtDictionary, true)
end
local Position = self:Position()
local Size = self:Size()
Size.Width, Size.Height = FormatXWYH(Size.Width, Size.Height)
Position.X, Position.Y = FormatXWYH(Position.X, Position.Y)
DrawSprite(self.TxtDictionary, self.TxtName, Position.X + Size.Width * 0.5, Position.Y + Size.Height * 0.5, Size.Width, Size.Height, self.Heading, self._Colour.R, self._Colour.G, self._Colour.B, self._Colour.A)
end
function DrawTexture(TxtDictionary, TxtName, X, Y, Width, Height, Heading, R, G, B, A)
if not HasStreamedTextureDictLoaded(tostring(TxtDictionary) or "") then
RequestStreamedTextureDict(tostring(TxtDictionary) or "", true)
end
X, Y, Width, Height = X or 0, Y or 0, Width or 0, Height or 0
X, Y = FormatXWYH(X, Y)
Width, Height = FormatXWYH(Width, Height)
DrawSprite(tostring(TxtDictionary) or "", tostring(TxtName) or "", X + Width * 0.5, Y + Height * 0.5, Width, Height, tonumber(Heading) or 0, tonumber(R) or 255, tonumber(G) or 255, tonumber(B) or 255, tonumber(A) or 255)
end