add new calendar widget
This commit is contained in:
Evgeny
314
main/calendar.lua
Normal file
314
main/calendar.lua
Normal file
@@ -0,0 +1,314 @@
|
|||||||
|
-- name = "Monthly Calendar"
|
||||||
|
-- description = "Monthly calendar with system calendar events"
|
||||||
|
-- type = "widget"
|
||||||
|
-- author = "Andrey Gavrilov"
|
||||||
|
-- version = "3.0"
|
||||||
|
|
||||||
|
local tab = {}
|
||||||
|
local line = " "
|
||||||
|
local events = {}
|
||||||
|
local dialog_id = ""
|
||||||
|
local widget_type = "table"
|
||||||
|
|
||||||
|
local year = os.date("%Y"):gsub("^0","")
|
||||||
|
local month = os.date("%m"):gsub("^0","")
|
||||||
|
local day = os.date("%d"):gsub("^0","")
|
||||||
|
|
||||||
|
function on_resume()
|
||||||
|
--ui:set_folding_flag(true)
|
||||||
|
ui:show_table(table_to_tables(tab,8),0, true, line)
|
||||||
|
widget_type = "table"
|
||||||
|
end
|
||||||
|
|
||||||
|
function on_alarm()
|
||||||
|
if next(settings:get()) == nil then
|
||||||
|
settings:set(get_all_cals()[2])
|
||||||
|
end
|
||||||
|
tab = get_cal(year,month)
|
||||||
|
line = get_line()
|
||||||
|
ui:show_table(table_to_tables(tab,8),0, true, line)
|
||||||
|
ui:set_title(ui:get_default_title().." ("..get_date(month,year)..")")
|
||||||
|
widget_type = "table"
|
||||||
|
end
|
||||||
|
|
||||||
|
function on_settings()
|
||||||
|
dialog_id = "settings"
|
||||||
|
ui:show_checkbox_dialog("Check calendars", get_all_cals()[3],cal_id_to_id(settings:get()))
|
||||||
|
end
|
||||||
|
|
||||||
|
function on_click(i)
|
||||||
|
if widget_type == "table" then
|
||||||
|
if i == 1 then
|
||||||
|
local time = os.time{year=year,month=month,day=1}-24*60*60
|
||||||
|
year,month = os.date("%Y-%m",time):match("(%d+)-(%d+)")
|
||||||
|
year,month = year:gsub("^0",""),month:gsub("^0","")
|
||||||
|
on_alarm()
|
||||||
|
elseif i == 8 then
|
||||||
|
local time = os.time{year=year,month=month,day=1}+31*24*60*60
|
||||||
|
year,month = os.date("%Y-%m",time):match("(%d+)-(%d+)")
|
||||||
|
year,month = year:gsub("^0",""),month:gsub("^0","")
|
||||||
|
on_alarm()
|
||||||
|
elseif i > 1 and i < 8 then
|
||||||
|
dialog_id = "date"
|
||||||
|
ui:show_edit_dialog("Enter month and year", "Format - 12.2020. Empty value - current month", string.format("%02d.%04d", month, year))
|
||||||
|
return
|
||||||
|
elseif (i-1)%8 ~= 0 and tab[i] ~= " " then
|
||||||
|
day = tab[i]:match(">(%d+)<"):gsub("^0","")
|
||||||
|
events = get_day_tab(get_my_events(year,month,day))
|
||||||
|
if next(events) ~= nil then
|
||||||
|
widget_type = "lines"
|
||||||
|
ui:show_table(get_lines(events),2, false, line)
|
||||||
|
end
|
||||||
|
return
|
||||||
|
else
|
||||||
|
return
|
||||||
|
end
|
||||||
|
else
|
||||||
|
if math.ceil(i/3) <= #events then
|
||||||
|
calendar:show_event_dialog(events[math.ceil(i/3)][1])
|
||||||
|
else
|
||||||
|
on_resume()
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
function on_dialog_action(data)
|
||||||
|
if data == -1 then
|
||||||
|
events = {}
|
||||||
|
event_id = ""
|
||||||
|
return
|
||||||
|
end
|
||||||
|
if dialog_id == "date" then
|
||||||
|
if data == "" then
|
||||||
|
local date = os.date("*t")
|
||||||
|
local y,m = os.date("%Y-%m"):match("(%d+)-(%d+)")
|
||||||
|
y,m = y:gsub("^0",""),m:gsub("^0","")
|
||||||
|
if y==year and m==month then
|
||||||
|
return
|
||||||
|
end
|
||||||
|
year,month = y,m
|
||||||
|
on_alarm()
|
||||||
|
return
|
||||||
|
elseif not check_date(data) then
|
||||||
|
return
|
||||||
|
else
|
||||||
|
local m,y = data:match("(%d+)%.(%d+)")
|
||||||
|
m,y = m:gsub("^0",""),y:gsub("^0","")
|
||||||
|
if y==year and m==month then
|
||||||
|
return
|
||||||
|
end
|
||||||
|
end
|
||||||
|
local month,year = data:match("(%d+)%.(%d+)")
|
||||||
|
month,year = month:gsub("^0",""),year:gsub("^0","")
|
||||||
|
on_alarm()
|
||||||
|
elseif dialog_id == "settings" then
|
||||||
|
settings:set(id_to_cal_id(data))
|
||||||
|
on_alarm()
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
function get_cal(y,m,days)
|
||||||
|
local color = ui:get_colors()
|
||||||
|
local events = get_my_events(y,m,0)
|
||||||
|
local from = os.time{year=y,month=m,day=1}
|
||||||
|
local tab = {
|
||||||
|
"ᐊ <font color=\""..color.secondary_text.."\">#</font>",
|
||||||
|
"<font color=\""..color.secondary_text.."\">Mo</font>",
|
||||||
|
"<font color=\""..color.secondary_text.."\">Tu</font>",
|
||||||
|
"<font color=\""..color.secondary_text.."\">We</font>",
|
||||||
|
"<font color=\""..color.secondary_text.."\">Th</font>",
|
||||||
|
"<font color=\""..color.secondary_text.."\">Fr</font>",
|
||||||
|
"<font color=\""..color.secondary_text.."\">Sa</font>",
|
||||||
|
"<font color=\""..color.secondary_text.."\">Su</font> ᐅ"
|
||||||
|
}
|
||||||
|
table.insert(tab,"<font color=\""..color.secondary_text.."\">"..os.date("%W",from).."</font>")
|
||||||
|
for i = 1, os.date("%w",from):gsub("0","7")-1 do
|
||||||
|
table.insert(tab," ")
|
||||||
|
end
|
||||||
|
local to = os.time{year=y,month=m,day=1}+31*24*60*60
|
||||||
|
local yy,mm = os.date("%Y-%m",to):match("(%d+)-(%d+)")
|
||||||
|
yy,mm = yy:gsub("^0",""),mm:gsub("^0","")
|
||||||
|
to = os.time{year=yy,month=mm,day=1}-24*60*60
|
||||||
|
for time = from,to,24*60*60 do
|
||||||
|
local d = os.date("%d",time):gsub("^0","")
|
||||||
|
table.insert(tab, format_day(y,m,d,events))
|
||||||
|
if os.date("%w",time):gsub("0","7")=="7" and time ~= to then
|
||||||
|
table.insert(tab, "<font color=\""..color.secondary_text.."\">"..os.date("%W",time+24*60*60).."</font>")
|
||||||
|
end
|
||||||
|
end
|
||||||
|
for i = os.date("%w",to):gsub("0","7")+1,7 do
|
||||||
|
table.insert(tab," ")
|
||||||
|
end
|
||||||
|
return tab
|
||||||
|
end
|
||||||
|
|
||||||
|
function format_day(y,m,d,events)
|
||||||
|
local color = ui:get_colors()
|
||||||
|
local from = os.time{year=y,month=m,day=d,hour=0,min=0,sec=0}
|
||||||
|
local to = os.time{year=y,month=m,day=d,hour=23,min=59,sec=59}
|
||||||
|
local yes = false
|
||||||
|
for i=1,#events do
|
||||||
|
local v = events[i]
|
||||||
|
if v.begin >= from and v["end"] <= to then
|
||||||
|
yes = true
|
||||||
|
break
|
||||||
|
end
|
||||||
|
end
|
||||||
|
local dd = d
|
||||||
|
if yes then
|
||||||
|
dd = "<b>"..dd.."</b>"
|
||||||
|
end
|
||||||
|
if year == os.date("%Y"):gsub("^0","") and month == os.date("%m"):gsub("^0","") and d == os.date("%d"):gsub("^0","") then
|
||||||
|
dd = "<font color=\""..color.progress_good.."\">"..dd.."</font>"
|
||||||
|
elseif os.date("%w",from):gsub("0","7")-5 > 0 then
|
||||||
|
dd = "<font color=\""..color.progress_bad.."\">"..dd.."</font>"
|
||||||
|
else
|
||||||
|
dd = "<font color=\""..color.primary_text.."\">"..dd.."</font>"
|
||||||
|
end
|
||||||
|
|
||||||
|
return dd
|
||||||
|
end
|
||||||
|
|
||||||
|
function check_date(date)
|
||||||
|
local m, Y = date:match("(%d+).(%d+)")
|
||||||
|
local time = os.time{day=1, month=m or 0, year=Y or 0}
|
||||||
|
local str = string.format("%02d.%04d", m or 0, Y or 0)
|
||||||
|
return str == os.date("%m.%Y", time)
|
||||||
|
end
|
||||||
|
|
||||||
|
function table_to_tables(tab, num)
|
||||||
|
local out_tab = {}
|
||||||
|
local row = {}
|
||||||
|
for k,v in ipairs(tab) do
|
||||||
|
table.insert(row, v)
|
||||||
|
if k % num == 0 then
|
||||||
|
table.insert(out_tab, row)
|
||||||
|
row = {}
|
||||||
|
end
|
||||||
|
end
|
||||||
|
return out_tab
|
||||||
|
end
|
||||||
|
|
||||||
|
function get_date(m,y)
|
||||||
|
local time = os.time{year=y,month=m,day=1}
|
||||||
|
return os.date("%B",time).." "..string.format("%04d", y)
|
||||||
|
end
|
||||||
|
|
||||||
|
function get_my_events(y,m,d)
|
||||||
|
local tab = {}
|
||||||
|
local from = os.time{year=y,month=m,day=1,hour=0,min=0,sec=0}
|
||||||
|
local to = os.date("*t",from + 31*24*60*60)
|
||||||
|
to = os.time{year=to.year,month=to.month,day=1,hour=0,min=0,sec=0}-1
|
||||||
|
if d ~= 0 then
|
||||||
|
from =os.time{year=y,month=m,day=d,hour=0,min=0,sec=0}
|
||||||
|
to = os.time{year=y,month=m,day=d,hour=23,min=59,sec=59}
|
||||||
|
end
|
||||||
|
local events = calendar:get_events(from,to,settings:get())
|
||||||
|
for i=1,#events do
|
||||||
|
local v = events[i]
|
||||||
|
if v.begin >= from and v["end"] <= to then
|
||||||
|
v["calendar_name"],v["calendar_color"]=get_my_calendar(v.calendar_id)
|
||||||
|
table.insert(tab,v)
|
||||||
|
end
|
||||||
|
if v.begin > to then
|
||||||
|
break
|
||||||
|
end
|
||||||
|
end
|
||||||
|
return tab
|
||||||
|
end
|
||||||
|
|
||||||
|
function get_line()
|
||||||
|
local line = ""
|
||||||
|
local date = os.date("*t")
|
||||||
|
local from = os.time{year=date.year,month=date.month,day=date.day,hour=0,min=0,sec=0}
|
||||||
|
local to = os.time{year=date.year,month=date.month,day=date.day,hour=23,min=59,sec=59}
|
||||||
|
local events = calendar:get_events(from,to,settings:get())
|
||||||
|
if next(events) == nil then
|
||||||
|
line = "No events today"
|
||||||
|
else
|
||||||
|
line = "There're events today"
|
||||||
|
end
|
||||||
|
return line
|
||||||
|
end
|
||||||
|
|
||||||
|
function get_my_calendar(id)
|
||||||
|
local cals = calendar:get_calendars()
|
||||||
|
for i=1,#cals do
|
||||||
|
local v = cals[i]
|
||||||
|
if id == v.id then
|
||||||
|
return v.name,v.color
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
function get_day_tab(events)
|
||||||
|
local tab = {}
|
||||||
|
for i,v in ipairs(events) do
|
||||||
|
local t = {v.id, v.all_day, os.date("%H:%M",v.begin), os.date("%H:%M",v["end"]), v.title, v.description, v.location, v.calendar_name, v.calendar_color}
|
||||||
|
table.insert(tab,t)
|
||||||
|
end
|
||||||
|
return tab
|
||||||
|
end
|
||||||
|
|
||||||
|
function get_lines(events)
|
||||||
|
local color = ui:get_colors()
|
||||||
|
local lines = {}
|
||||||
|
for i,v in ipairs(events) do
|
||||||
|
table.insert(lines,"<font color = \""..v[9].."\">•</font>")
|
||||||
|
table.insert(lines,v[5])
|
||||||
|
if v[2] == false then
|
||||||
|
table.insert(lines,"<font color = \""..color.secondary_text.."\">"..v[3].." - "..v[4].."</font>")
|
||||||
|
else
|
||||||
|
table.insert(lines,"<font color = \""..color.secondary_text.."\">All day</font>")
|
||||||
|
end
|
||||||
|
end
|
||||||
|
local t = table_to_tables(tab,8)
|
||||||
|
for i = #lines/3+1,#t-1 do
|
||||||
|
table.insert(lines," ")
|
||||||
|
table.insert(lines," ")
|
||||||
|
table.insert(lines," ")
|
||||||
|
end
|
||||||
|
if #lines/3 < #t then
|
||||||
|
table.insert(lines," ")
|
||||||
|
table.insert(lines,"☚ Back")
|
||||||
|
table.insert(lines," ")
|
||||||
|
end
|
||||||
|
return table_to_tables(lines,3)
|
||||||
|
end
|
||||||
|
|
||||||
|
function get_all_cals()
|
||||||
|
local cals = calendar:get_calendars()
|
||||||
|
local idx = {}
|
||||||
|
local id = {}
|
||||||
|
local name = {}
|
||||||
|
local color = {}
|
||||||
|
for i,v in ipairs(cals) do
|
||||||
|
table.insert(idx,i)
|
||||||
|
table.insert(id,v.id)
|
||||||
|
table.insert(name,v.name)
|
||||||
|
table.insert(color,v.color)
|
||||||
|
end
|
||||||
|
return {idx,id,name,color}
|
||||||
|
end
|
||||||
|
|
||||||
|
function id_to_cal_id(ids)
|
||||||
|
local cals = calendar:get_calendars()
|
||||||
|
local tab = {}
|
||||||
|
for i,v in ipairs(ids) do
|
||||||
|
table.insert(tab,cals[v].id)
|
||||||
|
end
|
||||||
|
return tab
|
||||||
|
end
|
||||||
|
|
||||||
|
function cal_id_to_id(cal_ids)
|
||||||
|
local cals = calendar:get_calendars()
|
||||||
|
local tab = {}
|
||||||
|
for i,v in ipairs(cal_ids) do
|
||||||
|
for ii,vv in ipairs(cals) do
|
||||||
|
if tonumber(v) == tonumber(vv.id) then
|
||||||
|
table.insert(tab,ii)
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
|
return tab
|
||||||
|
end
|
||||||
@@ -1,228 +0,0 @@
|
|||||||
-- name = "Календарь"
|
|
||||||
-- description = "Производственный календарь с праздниками"
|
|
||||||
-- data_source = ""
|
|
||||||
-- type = "widget"
|
|
||||||
-- author = "Andrey Gavrilov"
|
|
||||||
-- version = "1.0"
|
|
||||||
-- language = "ru"
|
|
||||||
|
|
||||||
local color = require "md_colors"
|
|
||||||
local json = require "json"
|
|
||||||
|
|
||||||
local days = {}
|
|
||||||
local tab = {}
|
|
||||||
local line = ""
|
|
||||||
local text = ""
|
|
||||||
|
|
||||||
local pr_text_color = ui:get_colors().primary_text
|
|
||||||
local sec_text_color = ui:get_colors().secondary_text
|
|
||||||
local year = os.date("*t").year
|
|
||||||
local month = os.date("*t").month
|
|
||||||
local day = os.date("*t").day
|
|
||||||
|
|
||||||
function on_alarm()
|
|
||||||
is_days_off(year,month)
|
|
||||||
end
|
|
||||||
|
|
||||||
function is_days_off(y,m)
|
|
||||||
http:get("https://isdayoff.ru/today?pre=1&covid=1", "today")
|
|
||||||
http:get("https://isdayoff.ru/api/getdata?year="..y.."&month="..m.."&pre=1&delimeter=-&covid=1", "month")
|
|
||||||
end
|
|
||||||
|
|
||||||
function on_network_result_month(result)
|
|
||||||
days = result:split("-")
|
|
||||||
tab = get_cal(year,month)
|
|
||||||
ui:show_table(table_to_tables(tab,8),0, true, line)
|
|
||||||
ui:set_title(ui:get_default_title().." ("..string.format("%02d.%04d",month,year)..")")
|
|
||||||
end
|
|
||||||
|
|
||||||
function on_network_result_today(result)
|
|
||||||
line = "Сегодня "
|
|
||||||
if result == "0" then
|
|
||||||
line = line.."рабочий"
|
|
||||||
elseif result == "4" then
|
|
||||||
line = line.."рабочий"
|
|
||||||
elseif result == "1" then
|
|
||||||
line = line.."нерабочий"
|
|
||||||
elseif result == "2" then
|
|
||||||
line = line.."предпраздничный"
|
|
||||||
end
|
|
||||||
line = line.." день"
|
|
||||||
end
|
|
||||||
|
|
||||||
function on_network_result_day(result)
|
|
||||||
local t = json.decode(result)
|
|
||||||
if #t.saints ~= 0 then
|
|
||||||
text = text.."<br><br><b>Святые</b>"
|
|
||||||
end
|
|
||||||
for i = 1, #t.saints do
|
|
||||||
text = text.."<br>• "..t.saints[i].title
|
|
||||||
end
|
|
||||||
if #t.ikons ~= 0 then
|
|
||||||
text = text.."<br><br><b>Иконы</b>"
|
|
||||||
end
|
|
||||||
for i = 1, #t.ikons, 1 do
|
|
||||||
text = text.."<br>• "..t.ikons[i].title
|
|
||||||
end
|
|
||||||
if #t.holidays ~= 0 then
|
|
||||||
text = text.."<br><br><b>Православные праздники</b>"
|
|
||||||
end
|
|
||||||
for i = 1, #t.holidays, 1 do
|
|
||||||
text = text.."<br>• "..t.holidays[i].title
|
|
||||||
end
|
|
||||||
ui:show_dialog(string.format("%02d.%02d.%04d", day, month, year).."\n"..os.date("*t", get_time(year,month,day)).yday.." день года", text)
|
|
||||||
end
|
|
||||||
|
|
||||||
function on_click(i)
|
|
||||||
text = "<big><b>События</b></big>"
|
|
||||||
if i == 1 then
|
|
||||||
local time = get_time(begin_month(year,month))-24*60*60
|
|
||||||
local y,m,d = get_day(time)
|
|
||||||
year = y
|
|
||||||
month = m
|
|
||||||
elseif i == 8 then
|
|
||||||
local time = get_time(end_month(year,month))+24*60*60
|
|
||||||
local y,m,d = get_day(time)
|
|
||||||
year = y
|
|
||||||
month = m
|
|
||||||
elseif i > 1 and i < 8 then
|
|
||||||
ui:show_edit_dialog("Введите месяц и год", "Формат - 12.2020. Пустое значение - текущий месяц", string.format("%02d.%04d", month, year))
|
|
||||||
elseif (i-1)%8 ~= 0 and tab[i] ~= " " then
|
|
||||||
day = tonumber(tab[i]:match(">(%d+)<"))
|
|
||||||
http:get("https://azbyka.ru/days/api/day/"..string.format("%04d-%02d-%02d", year, month, day)..".json", "day")
|
|
||||||
return
|
|
||||||
else
|
|
||||||
return
|
|
||||||
end
|
|
||||||
is_days_off(year,month)
|
|
||||||
end
|
|
||||||
|
|
||||||
function on_dialog_action(data)
|
|
||||||
if data == -1 then
|
|
||||||
return
|
|
||||||
elseif data == "" then
|
|
||||||
local date = os.date("*t")
|
|
||||||
if year == date.year and month == date.month then
|
|
||||||
return
|
|
||||||
end
|
|
||||||
year = date.year
|
|
||||||
month = date.month
|
|
||||||
is_days_off(year,month)
|
|
||||||
return
|
|
||||||
elseif not check_date(data) then
|
|
||||||
return
|
|
||||||
else
|
|
||||||
local m,y = data:match("(%d+)%.(%d+)")
|
|
||||||
if year == tonumber(y) and month == tonumber(m) then
|
|
||||||
return
|
|
||||||
end
|
|
||||||
end
|
|
||||||
local m,y = data:match("(%d+)%.(%d+)")
|
|
||||||
year = tonumber(y)
|
|
||||||
month = tonumber(m)
|
|
||||||
is_days_off(year,month)
|
|
||||||
end
|
|
||||||
|
|
||||||
function get_cal(y,m)
|
|
||||||
local from = get_time(begin_month(y,m))
|
|
||||||
local tab = {
|
|
||||||
"ᐊ <font color=\""..sec_text_color.."\">#</font>",
|
|
||||||
"<font color=\""..sec_text_color.."\">Пн</font>",
|
|
||||||
"<font color=\""..sec_text_color.."\">Вт</font>",
|
|
||||||
"<font color=\""..sec_text_color.."\">Ср</font>",
|
|
||||||
"<font color=\""..sec_text_color.."\">Чт</font>",
|
|
||||||
"<font color=\""..sec_text_color.."\">Пт</font>",
|
|
||||||
"<font color=\""..sec_text_color.."\">Сб</font>",
|
|
||||||
"<font color=\""..sec_text_color.."\">Вс</font> ᐅ"
|
|
||||||
}
|
|
||||||
table.insert(tab,"<font color=\""..sec_text_color.."\">"..weeknumber(get_day(from)).."</font>")
|
|
||||||
for i =1, weekday(get_day(from))-1,1 do
|
|
||||||
table.insert(tab," ")
|
|
||||||
end
|
|
||||||
local to = get_time(end_month(y,m))
|
|
||||||
local k=0
|
|
||||||
for time = from,to,24*60*60 do
|
|
||||||
k=k+1
|
|
||||||
local y,m,d = get_day(time)
|
|
||||||
table.insert(tab, format_day(d,k))
|
|
||||||
if weekday(get_day(time))==7 and time ~= to then
|
|
||||||
table.insert(tab, "<font color=\""..sec_text_color.."\">"..weeknumber(get_day(time+24*60*60)).."</font>")
|
|
||||||
end
|
|
||||||
end
|
|
||||||
for i = weekday(get_day(to))+1,7,1 do
|
|
||||||
table.insert(tab," ")
|
|
||||||
end
|
|
||||||
return tab
|
|
||||||
end
|
|
||||||
|
|
||||||
function weeknumber(y,m,d)
|
|
||||||
local yday = os.date("*t",os.time{day=d,month=m,year=y}).yday
|
|
||||||
local wday = weekday(y,m,1)
|
|
||||||
return math.floor((yday+10-wday)/7)
|
|
||||||
end
|
|
||||||
|
|
||||||
function weekday(y,m,d)
|
|
||||||
local wday = os.date("*t",os.time{day=d,month=m,year=y}).wday-1
|
|
||||||
if wday == 0 then wday = 7 end
|
|
||||||
return wday
|
|
||||||
end
|
|
||||||
|
|
||||||
function begin_month(y,m)
|
|
||||||
local time = os.time{day=1,month=m,year=y}
|
|
||||||
local date = os.date("*t",time)
|
|
||||||
return date.year,date.month,date.day
|
|
||||||
end
|
|
||||||
|
|
||||||
function end_month(y,m)
|
|
||||||
local time = os.time{day=1,month=m,year=y}+31*24*60*60
|
|
||||||
local date = os.date("*t",time)
|
|
||||||
local time = os.time{day=1,month=date.month,year=date.year}-24*60*60
|
|
||||||
local date = os.date("*t",time)
|
|
||||||
return date.year,date.month,date.day
|
|
||||||
end
|
|
||||||
|
|
||||||
function get_day(t)
|
|
||||||
local date = os.date("*t",t)
|
|
||||||
return date.year,date.month,date.day
|
|
||||||
end
|
|
||||||
|
|
||||||
function get_time(y,m,d)
|
|
||||||
return os.time{day=d,month=m,year=y}
|
|
||||||
end
|
|
||||||
|
|
||||||
function format_day(d,k)
|
|
||||||
local dd = d
|
|
||||||
if days[k] == "2" then
|
|
||||||
dd = "<font color=\""..color.orange_500.."\">"..dd.."</font>"
|
|
||||||
elseif days[k] == "1" then
|
|
||||||
dd = "<font color=\""..color.red_A700.."\">"..dd.."</font>"
|
|
||||||
elseif days[k] == "4" then
|
|
||||||
dd = "<font color=\""..sec_text_color.."\">"..dd.."</font>"
|
|
||||||
else
|
|
||||||
dd = "<font color=\""..pr_text_color.."\">"..dd.."</font>"
|
|
||||||
end
|
|
||||||
if year == os.date("*t").year and month == os.date("*t").month and d == os.date("*t").day then
|
|
||||||
dd = "<b>"..dd.."</b>"
|
|
||||||
end
|
|
||||||
return dd
|
|
||||||
end
|
|
||||||
|
|
||||||
function check_date(date)
|
|
||||||
local m, Y = date:match("(%d+).(%d+)")
|
|
||||||
local time = os.time{day=1, month=m or 0, year=Y or 0}
|
|
||||||
local str = string.format("%02d.%04d", m or 0, Y or 0)
|
|
||||||
return str == os.date("%m.%Y", time)
|
|
||||||
end
|
|
||||||
|
|
||||||
function table_to_tables(tab, num)
|
|
||||||
local out_tab = {}
|
|
||||||
local row = {}
|
|
||||||
for k,v in ipairs(tab) do
|
|
||||||
table.insert(row, v)
|
|
||||||
if k % num == 0 then
|
|
||||||
table.insert(out_tab, row)
|
|
||||||
row = {}
|
|
||||||
end
|
|
||||||
end
|
|
||||||
return out_tab
|
|
||||||
end
|
|
||||||
Reference in New Issue
Block a user