utton = {}

function utton:create(x,y,id)
local t = {}
t.toch = false
t.x = x
t.y = y
t.id = id
return setmetatable(t,{__index = self})
end

function utton:update(dt)
    self.toch = false
    local x = love.mouse.getX(); local y = love.mouse.getY()
    if x > self.x and x < self.x + self.id:getWidth()and y < self.y + self.id:getHeight() and y > self.y then
  self.toch = true
    end
end

function utton:draw()
love.graphics.setColor(255,255,255)
if self.toch then
    love.graphics.setColor(0,255,255)
end
love.graphics.draw(self.id,self.x,self.y)
end

function utton:mpress(x,y)
    if self.toch then
  self.toch = false
  return true
    end
return false
end

function love.load()
    button = utton:create(100,100, "Какая нибудь картиночка")
end
function love.update(dt)
    button:update(dt)
end
function love.draw()
    button:draw()
end
function love.mousepressed(x, y)
    if button:mpress(x,y) then
  print("Super Button Pressed!!!")
    end
end

utton = {}

function utton:create(x,y,image,imagehover)
local t = {}
t.toch = false
t.x = x
t.y = y
t.image = love.graphics.newImage(image)
t.imagehover = love.graphics.newImage(imagehover)
return setmetatable(t,{__index = self})
end

function utton:update(dt)
    self.toch = false
    local x = love.mouse.getX(); local y = love.mouse.getY()
    if x > self.x and x < self.x + self.image:getWidth()and y < self.y + self.image:getHeight() and y > self.y then
  self.toch = true
    end
end

function utton:draw()
     love.graphics.draw(self.image,self.x,self.y)
     --love.graphics.setColor(255,255,255)
if self.toch then
    --love.graphics.setColor(0,255,255)
    love.graphics.draw(self.imagehover,self.x,self.y)
end
--love.graphics.draw(self.image,self.x,self.y)
end

function utton:mpress(x,y)
    if self.toch then
  self.toch = false
  return true
    end
return false
end

isHover = not (a == 1) -- если (a == 0) - прозрачность учитывается

function rtopacy(opacy) --Функция реакцию на прозрачность, если у какой-то фиговины есть прозрачность, функция выведет true
      if opacy < 255 then
        return true
      end
return false
end

function love.load()
alfacolor = 255
timer = 10
end

function love.update(dt)
timer = timer - dt
if timer <= 0 then
    alfacolor = alfacolor/5
    timer = 10
end

if rtopacy(alfacolor) then
     print("Prozrachnost\'!!!!!!")
end
end

function utton:draw()
     love.graphics.draw(self.image,self.x,self.y)
     --love.graphics.setColor(255,255,255)
if self.toch then
    --love.graphics.setColor(0,255,255)
    love.graphics.draw(self.imagehover,self.x,self.y)
end
--love.graphics.draw(self.image,self.x,self.y)
end

function utton:draw()
if self.toch then
    love.graphics.draw(self.imagehover,self.x,self.y)
else
    love.graphics.draw(self.image,self.x,self.y)
end
end

-- button library

button ={}

function button:create(x,y,image,imagehover)
local t = {}
t.isHover = false
t.x = x
t.y = y
t.image = love.graphics.newImage(image)
t.imagehover = love.graphics.newImage(imagehover)
return setmetatable(t,{__index = self})
end

function button:update(dt)

     local data = self.image:getData()
     self.isHover = false
      --function love.mousepressed(mx, my)
   local mx = love.mouse.getX(); local my = love.mouse.getY()
        if ((mx - self.x) > 0) and ((mx - self.x) <= data:getWidth() - 1) and ((my - self.y) > 0) and ((my - self.y) <= data:getHeight() - 1) then
     self.isHover = true
   --  end

end

   self.isHover = false
   local data = self.image:getData()

     -- local mx, my = love.mouse.getPosition()
   if ((mx - self.x) > 0) and ((mx - self.x) <= data:getWidth() - 1) and ((my - self.y) > 0) and ((my - self.y) <= data:getHeight() - 1) then
      local r, g, b, a = data:getPixel(mx - self.x - 1, my - self.y - 1)
   --loadstring(button.action)()
    click:play()  
   self.isHover = not (a == 0) -- если (a == 0) - прозрачность учитывается
   end
    
end

function button:draw()

   if self.isHover then
      love.graphics.draw(self.imagehover,self.x,self.y) -- кнопка старт- меняется бекграунд кнопки, если над ней курсор
   else
      love.graphics.draw(self.image,self.x,self.y) -- кнопка старт - нормальный бекграунд кнопки, если над ней нет курсора
   end

end

function button:mpress(x,y)
    if self.isHover then
  self.isHover = false
  return true
    end
return false
end

require "button"

function love.load()

click = love.audio.newSource("Click.mp3", "static")

Start = button:create(200, 200, "start_n.png", "start_nn.png")

end

function love.update(dt)

   Start:update(dt)
   
end

function love.draw()

    Start:draw()
           
end

function love.mousepressed(mx, my)
   if  love.mouse.isDown(1) then
    if Start:mpress(x, y) then
  --print("Super Button Pressed!!!")
    click:play()
    end
    end
end

function love.mouse.getPosition()

      click:play()
   
end

move_x = function (a) a.x = a.x + 10 end

oa = object_a:new(100, 100, move_x)

function object_a:new(x, y, f)
local t = {}
t.x = x or 100
t.y = y or 100
t.Hover = false
t.f = f
return setmetatable(t,{__index = self})
end

function object_a:click()
if self.Hover then self.f(self) end
end

local Button = {}

function Button:new(o)
  local t = {}
  t.callbacks = {}
  t.pos = Vector( 0, 0 )
  t.size = Vector( 0, 0 )
  t.img = nil
  t.imgH = nil
  t.data = {}
  t.isHover = false
  t.triggerInOut = false
  t.triggerClick = false

  if o.pos ~= nil then
    t.pos = o.pos
  end

  if o.size ~= nil then
    t.size = o.size
  end

  if o.img ~= nil then
    t.img = love.graphics.newImage( o.img )
    local data = t.img:getData()
    data:mapPixel(
      function( x, y, r, g, b, a )
        if a == 255 then
          t.data[ tostring(x) .. "-" .. tostring(y) ] = true
        end

        return r, g, b, a
      end
    )
    data = nil
  end

  if o.imgH ~= nil then
    t.imgH = love.graphics.newImage( o.imgH )
  end

  return setmetatable( t, { __index = self } )
end

function Button:draw()
  local img = self.img

  if self.isHover then
    img = self.imgH
  end

  love.graphics.draw(
    img,
    self.pos.x,
    self.pos.y,
    0,
    1,
    1
  )
end

function Button:update( dt )
  local mx, my = Input.mousePos().x - self.pos.x, Input.mousePos().y - self.pos.y

  if self.data[ tostring( mx ) .. "-" .. tostring( my ) ] then
    self.isHover = true
  else
    self.isHover = false
  end

  if self.isHover and not self.triggerClick and Input.mouseDown(1) then
    self.triggerClick = true

    if self.callbacks["click"] then
      (self.callbacks["click"])()
    end
  elseif self.isHover and self.triggerClick and Input.mouseUp(1) then
    self.triggerClick = false
  end

  if self.isHover and not self.triggerInOut then
    self.triggerInOut = true

    if self.callbacks["mousein"] then
      (self.callbacks["mousein"])()
    end
  elseif not self.isHover and self.triggerInOut then
    self.triggerInOut = false

    if self.callbacks["mouseout"] then
      (self.callbacks["mouseout"])()
    end
  end
end

function Button:click(f)
  self.callbacks["click"] = f
end

function Button:mouseIn(f)
  self.callbacks["mousein"] = f
end

function Button:mouseOut(f)
  self.callbacks["mouseout"] = f
end

return Button