67 lines
No EOL
2.4 KiB
Lua
67 lines
No EOL
2.4 KiB
Lua
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 |