Unused file removed.

copy2remote.sh

@@ -0,0 +1,38 @@
+#!/usr/bin/env bash
+archivename="nback$(date +"%m_%d_%Hh%Mm%Ss").zip"
+dest=~/myprojects/autoupdate/server/archives_examples
+
+apack $archivename gfx/* \
+sfx/* \
+libs/* \
+README.md \
+alignedlabels.lua \
+background.lua \
+bhupur.lua \
+common.lua \
+conf.lua \
+dbg.lua \
+devlog.md \
+generator.lua \
+geo.lua \
+help.lua \
+ihelp.lua \
+inspect.lua \
+kons.lua \
+logclient.lua \
+logthread.lua \
+main.lua \
+menu.lua \
+nback.lua \
+pallete.lua \
+pviewer.lua \
+ruler.lua \
+serpent.lua \
+setupmenu.lua \
+signal.lua \
+splash.lua
+
+#mv $archivename $dest
+scp $archivename [email protected]:~/myprojects
+rm $archivename
+#ls $dest

list.lua

@@ -0,0 +1,217 @@
+----------------------
+-- List object
+----------------------
+
+local List = {}
+
+function inside(mx, my, x, y, w, h)
+    return mx >= x and mx <= (x+w) and my >= y and my <= (y+h)
+end
+
+function List:new(x, y, w, h)
+    o = {}
+    setmetatable(o, self)
+    self.__index = self
+
+    o.items = {}
+	o.hoveritem = 0
+	o.onclick = nil
+
+    o.x = x
+    o.y = y
+
+    o.width = w
+    o.height = h
+
+    o.item_height = 23
+    o.sum_item_height = 0
+
+    o.bar = { size = 20, pos = 0, maxpos = 0, width = 15, lock = nil}
+
+	o.colors = {}
+	o.colors.normal = {bg = {0.19, 0.61, 0.88}, fg = {0.77, 0.91, 1}}
+	o.colors.hover  = {bg = {0.28, 0.51, 0.66}, fg = {1, 1, 1}}
+	o.windowcolor = {0.19, 0.61, 0.88}
+	o.bordercolor = {0.28, 0.51, 0.66}
+    return o
+end
+
+function List:add(title, id, tooltip)
+	local item = {}
+	item.title = title
+	item.id = id
+	if type(tooltip) == "string" then
+		item.tooltip = tooltip
+	else
+		item.tooltip = ""
+	end
+    table.insert(self.items, item)
+end
+
+function List:done()
+
+    self.items.n = #self.items
+
+    -- Recalc bar size.
+    self.bar.pos = 0
+
+    local num_items = (self.height/self.item_height)
+    local ratio = num_items/self.items.n
+    self.bar.size = self.height * ratio
+    self.bar.maxpos = self.height - self.bar.size - 3
+
+    -- Calculate height of everything.
+    self.sum_item_height = (self.item_height+1) * self.items.n + 2
+
+end
+
+function List:hasBar()
+    return self.sum_item_height > self.height
+end
+
+function List:getBarRatio()
+    return self.bar.pos / self.bar.maxpos
+end
+
+function List:getOffset()
+    local ratio = self.bar.pos / self.bar.maxpos
+    return math.floor((self.sum_item_height - self.height) * ratio + 0.5)
+end
+
+function List:update(dt)
+    if self.bar.lock then
+	local dy = math.floor(love.mouse.getY()-self.bar.lock.y+0.5)
+	self.bar.pos = self.bar.pos + dy
+
+	if self.bar.pos < 0 then
+	    self.bar.pos = 0
+	elseif self.bar.pos > self.bar.maxpos then
+	   self.bar.pos = self.bar.maxpos
+	end
+
+	self.bar.lock.y = love.mouse.getY()
+
+    end
+end
+
+function List:mousepressed(x, y, b, it)
+	if b == 1 and self:hasBar() then
+		local rx, ry, rw, rh = self:getBarRect()
+		if inside(x, y, rx, ry, rw, rh) then
+			self.bar.lock = { x = x, y = y }
+			return
+		end
+	end
+
+	if type(self.onclick) ~= "function" then return end
+
+	if inside(x, y, self.x + 2, self.y + 1, self.width - 3, self.height - 3) then
+		local tx, ty = x - self.x, y + self:getOffset() - self.y
+		local index = math.floor((ty / self.sum_item_height) * self.items.n)
+		local item = self.items[index + 1]
+		if item then
+			self.onclick(index + 1, b)
+		end
+    end
+end
+
+function List:mousereleased(x, y, b, it)
+	if b == 1 and self:hasBar() then
+		self.bar.lock = nil
+	end
+end
+
+function List:mousemoved(x, y, dx, dy)
+	self.hoveritem = 0
+
+	if self:hasBar() then
+		local rx, ry, rw, rh = self:getBarRect()
+		if inside(x, y, rx, ry, rw, rh) then
+			self.hoveritem = -1
+			return
+		end
+	end
+
+	if inside(x, y, self.x + 2, self.y + 1, self.width - 3, self.height - 3) then
+		local tx, ty = x - self.x, y + self:getOffset() - self.y
+		local index = math.floor((ty / self.sum_item_height) * self.items.n)
+		self.hoveritem = index + 1
+	end
+end
+
+function List:wheelmoved(x, y)
+	if self:hasBar() then
+		local per_pixel = (self.sum_item_height - self.height) / self.bar.maxpos
+		local bar_pixel_dt = math.floor((self.item_height * 3) / per_pixel + 0.5)
+
+		self.bar.pos = self.bar.pos - y * bar_pixel_dt
+		if self.bar.pos > self.bar.maxpos then self.bar.pos = self.bar.maxpos end
+		if self.bar.pos < 0 then self.bar.pos = 0 end
+	end
+end
+
+function List:getBarRect()
+	return self.x + self.width + 2, self.y + self.bar.pos + 1,
+		self.bar.width - 3, self.bar.size
+end
+
+function List:getItemRect(i)
+	return self.x + 2, self.y + ((self.item_height + 1) * (i - 1) + 1) - self:getOffset(),
+		self.width - 3, self.item_height
+end
+
+function List:draw()
+	love.graphics.setLineWidth(1)
+	love.graphics.setLineStyle("rough")
+	love.graphics.setColor(self.windowcolor)
+
+	-- Get interval to display
+	local start_i = math.floor(self:getOffset() / (self.item_height + 1)) + 1
+	local end_i = start_i + math.floor(self.height / (self.item_height + 1)) + 1
+	if end_i > self.items.n then end_i = self.items.n end
+
+	love.graphics.setScissor(self.x, self.y, self.width, self.height)
+
+	-- Items
+	local rx, ry, rw, rh
+	local colorset
+	for i = start_i,end_i do
+		if i == self.hoveritem then
+			colorset = self.colors.hover
+		else
+			colorset = self.colors.normal
+		end
+
+		rx, ry, rw, rh = self:getItemRect(i)
+		love.graphics.setColor(colorset.bg)
+		love.graphics.rectangle("fill", rx, ry, rw, rh)
+
+		love.graphics.setColor(colorset.fg)
+		love.graphics.print(self.items[i].title, rx + 10, ry + 5) 
+
+	end
+
+	love.graphics.setScissor()
+
+	-- Bar
+	if self:hasBar() then
+		if self.hoveritem == -1 or self.bar.lock then
+			colorset = self.colors.hover
+		else
+			colorset = self.colors.normal
+		end
+
+		rx, ry, rw, rh = self:getBarRect()
+		love.graphics.setColor(colorset.bg)
+		love.graphics.rectangle("fill", rx, ry, rw, rh)
+	end
+
+	-- Border
+	love.graphics.setColor(self.bordercolor)
+	love.graphics.rectangle("line", self.x + self.width, self.y, self.bar.width, self.height)
+	love.graphics.rectangle("line", self.x, self.y, self.width, self.height)
+
+end
+
+
+return List

signal.lua

@@ -88,7 +88,7 @@ function signal:draw(xd, yd, type, color)
     local w, h = self.width - border * 2, self.width - border * 2
     local x = self.x0 + xd * self.width + border 
     local y = self.y0 + yd * self.width + border
-    print("x, y = ", x, y)
+    --print("x, y = ", x, y)
 
     self.borderColor[4] = color[4] -- анимирую альфа-канал цвета рамки
     g.setColor(color)