From 863f596b76043ec374fafa38f14cdc4a97d0b267 Mon Sep 17 00:00:00 2001
From: jussi
Date: Fri, 5 Jan 2024 23:15:22 +0200
Subject: Raygui lib enhancements and Raygui lib extensions example.

---
 examples/raygui_extensions/sprite_button.lua | 50 ++++++++++++++++++++++++++++
 1 file changed, 50 insertions(+)
 create mode 100644 examples/raygui_extensions/sprite_button.lua

(limited to 'examples/raygui_extensions/sprite_button.lua')

diff --git a/examples/raygui_extensions/sprite_button.lua b/examples/raygui_extensions/sprite_button.lua
new file mode 100644
index 0000000..57adc88
--- /dev/null
+++ b/examples/raygui_extensions/sprite_button.lua
@@ -0,0 +1,50 @@
+local SpriteButton = {}
+SpriteButton.__index = SpriteButton
+
+function SpriteButton:new( bounds, text, texture, nPatchNormal, nPatchPressed, callback )
+    local object = setmetatable( {}, self )
+	object._parent = nil
+
+    object.bounds = bounds:clone()
+    object.text = text
+	object.buttonTexture = texture
+	object.nPatchNormal = nPatchNormal
+	object.nPatchPressed = nPatchPressed
+    object.callback = callback
+
+	object.visible = true
+	object.disabled = false
+
+	return object
+end
+
+function SpriteButton:process()
+    return RL.CheckCollisionPointRec( RL.GetMousePosition(), self.bounds )
+end
+
+function SpriteButton:draw()
+	if RL.IsMouseButtonDown( RL.MOUSE_BUTTON_LEFT ) and self:process() and not RL.GuiIsLocked() and not self._parent.scrolling then
+		RL.DrawTextureNPatchRepeat( self.buttonTexture, self.nPatchPressed, self.bounds, { 0, 0 }, 0.0, RL.WHITE )
+	else
+		RL.DrawTextureNPatchRepeat( self.buttonTexture, self.nPatchNormal, self.bounds, { 0, 0 }, 0.0, RL.WHITE )
+	end
+
+	local result = RL.GuiLabelButton( self.bounds, self.text )
+
+    if result == 1 and self.callback ~= nil and self._parent:clickedInBounds( self.bounds ) then
+		self.callback( self )
+    end
+end
+
+function SpriteButton:setPosition( pos )
+	self.bounds.x = pos.x
+	self.bounds.y = pos.y
+end
+
+function SpriteButton:register( gui )
+	function gui:SpriteButton( bounds, text, texture, nPatchNormal, nPatchPressed, callback )
+		return self:addElement( SpriteButton:new( bounds, text, texture, nPatchNormal, nPatchPressed, callback ) )
+	end
+end
+
+return SpriteButton
-- 
cgit v1.2.3