Anim Editor: refactoring side pane code

Data/Scripts/801_UI controls/Control elements/008_BitmapButton.rb

@@ -0,0 +1,36 @@
+#===============================================================================
+#
+#===============================================================================
+class UIControls::BitmapButton < UIControls::Button
+  BUTTON_PADDING = 4
+
+  def initialize(x, y, viewport, button_bitmap, disabled_bitmap = nil)
+    super(button_bitmap.width + (BUTTON_PADDING * 2), button_bitmap.height + (BUTTON_PADDING * 2), viewport)
+    self.x = x
+    self.y = y
+    @button_bitmap = button_bitmap
+    @disabled_bitmap = disabled_bitmap
+  end
+
+  def set_interactive_rects
+    @interactions&.clear
+    @button_rect = Rect.new(0, 0, width, height)
+    @interactions = {
+      :button => @button_rect
+    }
+  end
+
+  #-----------------------------------------------------------------------------
+
+  def refresh
+    super
+    # Draw button bitmap
+    if @disabled_bitmap && disabled?
+      self.bitmap.blt(BUTTON_PADDING, BUTTON_PADDING, @disabled_bitmap,
+                      Rect.new(0, 0, @disabled_bitmap.width, @disabled_bitmap.height))
+    else
+      self.bitmap.blt(BUTTON_PADDING, BUTTON_PADDING, @button_bitmap,
+                      Rect.new(0, 0, @button_bitmap.width, @button_bitmap.height))
+    end
+  end
+end