Module:Calendar/nahan - Revision history

Annwan: Ꝼıx capıꞇalıꞅaꞇıon ın ocı-ınꞅ ꝼoꞃmaꞇꞇeꞃ

2026-05-27T09:18:59Z

Ꝼıx capıꞇalıꞅaꞇıon ın ocı-ınꞅ ꝼoꞃmaꞇꞇeꞃ

← Older revision		Revision as of 09:18, 27 May 2026
Line 125:		Line 125:
	elseif opts.lang == "oci-ins" and opts.compact then		elseif opts.lang == "oci-ins" and opts.compact then
	if m == 13 then return string.format("Ꞇꞃʋ. %d, Ꞃ-%d", y, d)		if m == 13 then return string.format("Ꞇꞃʋ. %d, Ꞃ-%d", y, d)
	else return string.format("~~ꞆꞂƲ~~. %d, %d-%d’%d", y, m, d, w)		else return string.format("Ꞇꞃʋ. %d, %d-%d’%d", y, m, d, w)
	end		end
	elseif opts.lang == "oci" and not opts.compact then		elseif opts.lang == "oci" and not opts.compact then

Annwan at 09:48, 24 May 2026

2026-05-24T09:48:41Z

← Older revision		Revision as of 09:48, 24 May 2026
Line 20:		Line 20:
	local function nahan_num(num)		local function nahan_num(num)
	local placemarker = {[0] ='', '', '', '', '','','','',''}		local placemarker = {[0] ='', '', '', '', '','','','',''}
	local values = {[0] = '', '','','','',''}		local values = {[0] = '', '','','','',''}
	local out = ''		local out = ''
	local place = 0		local place = 0
Line 26:		Line 26:
	local digit = math.floor(num / (6^place)) % 6		local digit = math.floor(num / (6^place)) % 6
	if digit == 0 then -- do nothing		if digit == 0 then -- do nothing
	elseif digit == 1 and place == 0 then out = out .. ~~values[1]~~		elseif digit == 1 and place == 0 then out = out .. ''
	else		else
	out = out .. placemarker[place] .. values[digit]		out = out .. placemarker[place] .. values[digit]

Annwan: fix tense

2026-05-24T09:39:03Z

fix tense

← Older revision		Revision as of 09:39, 24 May 2026
Line 97:		Line 97:
	opts = opts or {}		opts = opts or {}
	opts.lang = opts.lang or "eng"		opts.lang = opts.lang or "eng"
			opts.tense = opts.tense or "pst"
	if opts.lang == "eng" and opts.compact then		if opts.lang == "eng" and opts.compact then
	if m == 13 then return string.format("Cross. %d, R-%d", y, d)		if m == 13 then return string.format("Cross. %d, R-%d", y, d)
Line 110:		Line 111:
	end		end
	elseif opts.lang == "msc" and not opts.compact then		elseif opts.lang == "msc" and not opts.compact then
	if m ~= 13 then return string.format("%s %s %~~s ~~ %s  ", ordinal.msc(w), daynames.msc[d], monthnames.msc[m], ordinal.msc(y))		local tl = ""
	else return string.format("%s %~~s ~~ %s  ", daynames.msc[d], monthnames.msc[m], ordinal.msc(y))		if opts.tense == "pst" then tl = ""
			elseif opts.tense == "prs" then tl = ""
			elseif opts.tense == "fut" then tl = ""
			end
			if m ~= 13 then return string.format("%s %s %s %s %s  ", ordinal.msc(w), daynames.msc[d], monthnames.msc[m], tl, ordinal.msc(y))
			else return string.format("%s %s %s %s  ", daynames.msc[d], monthnames.msc[m], tl, ordinal.msc(y))
	end		end
	elseif opts.lang == "oci" and opts.compact then		elseif opts.lang == "oci" and opts.compact then

Annwan at 09:25, 24 May 2026

2026-05-24T09:25:32Z

← Older revision		Revision as of 09:25, 24 May 2026
Line 110:		Line 110:
	end		end
	elseif opts.lang == "msc" and not opts.compact then		elseif opts.lang == "msc" and not opts.compact then
	if m ~= 13 then return string.format("%s %s %s    ", ordinal.msc(w), daynames.msc[d], monthnames.msc[m], ordinal.msc(y))		if m ~= 13 then return string.format("%s %s %s  %s  ", ordinal.msc(w), daynames.msc[d], monthnames.msc[m], ordinal.msc(y))
	else return string.format("%s %s    ", daynames.msc[d], monthnames.msc[m], ordinal.msc(y))		else return string.format("%s %s  %s  ", daynames.msc[d], monthnames.msc[m], ordinal.msc(y))
	end		end
	elseif opts.lang == "oci" and opts.compact then		elseif opts.lang == "oci" and opts.compact then

Annwan at 09:23, 24 May 2026

2026-05-24T09:23:44Z

← Older revision		Revision as of 09:23, 24 May 2026
Line 52:		Line 52:
	end		end
	end,		end,
	msc = function(num) return nahan_num(num) + '<sub></sub>' end		msc = function(num) return nahan_num(num) .. '<sub></sub>' end
	}		}

Annwan at 09:23, 24 May 2026

2026-05-24T09:23:02Z

← Older revision		Revision as of 09:23, 24 May 2026
Line 30:		Line 30:
	out = out .. placemarker[place] .. values[digit]		out = out .. placemarker[place] .. values[digit]
	end		end
			place = place + 1
	end		end
	return out		return out

Annwan at 09:21, 24 May 2026

2026-05-24T09:21:48Z

← Older revision		Revision as of 09:21, 24 May 2026
Line 19:		Line 19:

	local function nahan_num(num)		local function nahan_num(num)
			local placemarker = {[0] ='', '', '', '', '','','','',''}
			local values = {[0] = '', '','','','',''}
	local out = ''		local out = ''
	local place = 0		local place = 0

Annwan: fix styling

2026-05-24T09:12:48Z

fix styling

← Older revision		Revision as of 09:12, 24 May 2026
Line 4:		Line 4:

	local daynames = {		local daynames = {
	oci = {'prim', 'segond', 'terç', 'quatren', 'cinquen', 'seisen' },		oci = {'prim', 'segond', 'terç', 'quatren', 'cinquen', 'seisen' },
	eng = {'Prime', 'Secondine', 'Terce', 'Quatrine', 'Quintine', 'Sixtine'},		oci_ins = {'pꞃım', 'ꞅeᵹonꝺ', 'ꞇeꞃç', 'quaꞇꞃen', 'cınquen', 'ꞅeıꞅen'},
			eng = {'Prime', 'Secondine', 'Terce', 'Quatrine', 'Quintine', 'Sixtine'},
			msc = {'', '','', '', '', ''},
	}		}

	local monthnames = {		local monthnames = {
	oci = {'monèm', 'lhinèm', 'tepnèm', 'vounèm', 'nagnèm', 'seunèm', '~~monseùnem~~', 'lhiseunèm', 'tepseunèm', 'vouseunèm', '~~nagseunèm~~', 'selhinèm'},		oci = {'monèm', 'lhinèm', 'tepnèm', 'vounèm', 'nagnèm', 'seunèm', 'monseunèm', 'lhiseunèm', 'tepseunèm', 'vouseunèm', 'naxeunèm', 'selhinèm', 'reunèm'},
	eng = {'Monem', 'Linem', 'Tepnem', 'Vounem', 'Nanèm', 'Seunem', 'Monseunem', 'Liseunem', 'Tepseunem', 'Vouseunem', 'Naseunem', '~~Seulinem~~' }		oci_ins = {'monèm', 'lhınèm', 'ꞇepnèm', 'ʋolnèm', 'naᵹnèm', 'ꞅeunèm', 'monꞅeunèm', 'lhıꞅeunèm', 'ꞇepꞅeunèm', 'ʋouꞅeunèm', 'naxeunèm', 'ꞅelhınèm', 'ꞃeunèm'},
			eng = {'Monem', 'Linem', 'Tepnem', 'Vounem', 'Nanèm', 'Seunem', 'Monseunem', 'Liseunem', 'Tepseunem', 'Vouseunem', 'Naseunem', 'Selinem', 'Reunèm'},
			msc = {'', '', '', '', '', '', '',
			'', '', '', '', '', ''},
	}		}

			local function nahan_num(num)
			local out = ''
			local place = 0
			while 6^place <= num do
			local digit = math.floor(num / (6^place)) % 6
			if digit == 0 then -- do nothing
			elseif digit == 1 and place == 0 then out = out .. values[1]
			else
			out = out .. placemarker[place] .. values[digit]
			end
			end
			return out
			end

	local ordinal = {		local ordinal = {
Line 21:		Line 40:
	end		end
	end,		end,
	oci = function(num, fem)		oci = function(num, fem, ins)
	if fem then return tostring(num) .. 'a'		if fem then return tostring(num) .. 'a'
	else		else
	if num == 1 then return '1r'		if num == 1 then return ins and '1ꞃ' or '1r'
	elseif num == 2 then return '2d'		elseif num == 2 then return ins and '2ꝺ' or '2d'
	else return tostring(num) .. 'n'		else return tostring(num) .. 'n'
	end		end
	end		end
	end		end,
			msc = function(num) return nahan_num(num) + '<sub></sub>' end
	}		}

Line 63:		Line 83:
	datestamp = datestamp - equinox_for(year)		datestamp = datestamp - equinox_for(year)
	local month = math.floor(datestamp / 30) + 1		local month = math.floor(datestamp / 30) + 1
	local week = math.floor ((datestamp ~~% 30)~~ / 6 ) + 1		datestamp = datestamp % 30
	local day = datestamp % 6 + 1		local week = math.floor(datestamp / 6) + 1
			local day = (datestamp % 6) + 1
	return{year = year, month = month, week = week, day = day}		return{year = year, month = month, week = week, day = day}
	end		end
Line 70:		Line 91:
	calendar.to_formatted = function(datestamp, opts)		calendar.to_formatted = function(datestamp, opts)
	local date_info = calendar.to(datestamp)		local date_info = calendar.to(datestamp)
			local y, m, d, w = date_info.year, date_info.month, date_info.day, date_info.week
	opts = opts or {}		opts = opts or {}
	opts.lang = opts.lang or "eng"		opts.lang = opts.lang or "eng"
	if opts.lang == "eng" then		if opts.lang == "eng" and opts.compact then
	if ~~opts~~.~~compact then~~ return string.format("Cross. %d, %d-%d’%d",		if m == 13 then return string.format("Cross. %d, R-%d", y, d)
	~~date_info~~.~~year~~, ~~date_info~~.~~month~~, ~~date_info~~.~~day~~, ~~date_info.week~~)		else --[[m ~= 13]] return string.format("Cross. %d, %d-%d’%d", y, m, d, w)
	else		end
	return string.format("%s %s of %s, Crossing %s",		elseif opts.lang == "eng" and not opts.compact then
	ordinal.~~eng~~(~~date_info~~.~~week~~), daynames.~~eng~~[~~date_info~~.~~day~~],		if m == 13 then return string.format("%s of %s, Crossing %d", daynames.eng[d], monthnames.eng[m], y)
	monthnames.~~eng~~[~~date_info~~.~~month~~], ~~date_info~~.~~year~~)		else return string.format("%s %s of %s, Crossing %d", ordinal.eng(w), daynames.eng[d], monthnames.eng[m], y)
			end
			elseif opts.lang == "msc" and opts.compact then
			if m == 13 then return string.format(" %s %s", nahan_num(y), nahan_num(d))
			else return string.format(" %s %s%s%s", nahan_num(y), nahan_num(m), nahan_num(d), nahan_num(w))
			end
			elseif opts.lang == "msc" and not opts.compact then
			if m ~= 13 then return string.format("%s %s %s    ", ordinal.msc(w), daynames.msc[d], monthnames.msc[m], ordinal.msc(y))
			else return string.format("%s %s    ", daynames.msc[d], monthnames.msc[m], ordinal.msc(y))
			end
			elseif opts.lang == "oci" and opts.compact then
			if m == 13 then return string.format("Trv. %d, R-%d", y, d)
			else return string.format("Trv. %d, %d-%d’%d", y, m, d, w)
			end
			elseif opts.lang == "oci-ins" and opts.compact then
			if m == 13 then return string.format("Ꞇꞃʋ. %d, Ꞃ-%d", y, d)
			else return string.format("ꞆꞂƲ. %d, %d-%d’%d", y, m, d, w)
			end
			elseif opts.lang == "oci" and not opts.compact then
			if m == 13 then return string.format("%s de %s, %s de la traversat", daynames.oci[d], monthnames.oci[m], ordinal.oci(y, true))
			else return string.format("%s %s de %s, %s de la traversat", ordinal.oci(w, false), daynames.oci[d], monthnames.oci[m], ordinal.oci(y, true))
	end		end
	elseif opts.lang == "oci" then		elseif opts.lang == "oci-ins" and not opts.compact then
	if ~~opts.compact~~ then return string.format("~~Trv.~~ %d, %~~d-%d’%d~~",		if m == 13 then return string.format("%s ꝺe %s, %s ꝺe la ꞇꞃaʋeꞃꞅaꞇ", daynames.oci_ins[d], monthnames.oci_ins[m], ordinal.oci(y, true, true))
	~~date_info~~.~~year~~, ~~date_info~~.~~month~~, ~~date_info~~.~~day~~, ~~date_info.week~~)		else return string.format("%s %s ꝺe %s, %s ꝺe la ꞇꞃaʋeꞃꞅaꞇ", ordinal.oci(w, false, true), daynames.oci_ins[d], monthnames.oci_ins[m], ordinal.oci(y, true, true))
	else
	return string.format("%s %s de %s, %s de la ~~traversat~~",
	ordinal.oci(~~date_info.week~~, false), daynames.~~oci~~[~~date_info.day~~],
	monthnames.~~oci~~[~~date_info.month~~], ~~date_info~~.~~year~~)
	end		end
	end		end
	end		end
	return calendar		return calendar

Annwan: Created page with "local calendar = {} local equinoxes = require "Module:Calendar/data/equinox_northwards" local daynames = { oci = {'prim', 'segond', 'terç', 'quatren', 'cinquen', 'seisen' }, eng = {'Prime', 'Secondine', 'Terce', 'Quatrine', 'Quintine', 'Sixtine'}, } local monthnames = { oci = {'monèm', 'lhinèm', 'tepnèm', 'vounèm', 'nagnèm', 'seunèm', 'monseùnem', 'lhiseunèm', 'tepseunèm', 'vouseunèm', 'nagseunèm', 'selhinèm'}, eng = {'Monem', 'Linem', 'Tepnem', 'Voun..."

2026-05-23T09:30:50Z

Created page with "local calendar = {} local equinoxes = require "Module:Calendar/data/equinox_northwards" local daynames = { oci = {'prim', 'segond', 'terç', 'quatren', 'cinquen', 'seisen' }, eng = {'Prime', 'Secondine', 'Terce', 'Quatrine', 'Quintine', 'Sixtine'}, } local monthnames = { oci = {'monèm', 'lhinèm', 'tepnèm', 'vounèm', 'nagnèm', 'seunèm', 'monseùnem', 'lhiseunèm', 'tepseunèm', 'vouseunèm', 'nagseunèm', 'selhinèm'}, eng = {'Monem', 'Linem', 'Tepnem', 'Voun..."

New page

local calendar = {}

local equinoxes = require "Module:Calendar/data/equinox_northwards"

local daynames = {
oci = {'prim', 'segond', 'terç', 'quatren', 'cinquen', 'seisen' },
eng = {'Prime', 'Secondine', 'Terce', 'Quatrine', 'Quintine', 'Sixtine'},
}

local monthnames = {
oci = {'monèm', 'lhinèm', 'tepnèm', 'vounèm', 'nagnèm', 'seunèm', 'monseùnem', 'lhiseunèm', 'tepseunèm', 'vouseunèm', 'nagseunèm', 'selhinèm'},
eng = {'Monem', 'Linem', 'Tepnem', 'Vounem', 'Nanèm', 'Seunem', 'Monseunem', 'Liseunem', 'Tepseunem', 'Vouseunem', 'Naseunem', 'Seulinem' }
}

local ordinal = {
eng = function(num)
if num % 10 == 1 and num % 100 ~= 11 then return tostring(num) .. "st"
elseif num % 10 == 2 and num % 100 ~= 12 then return tostring(num) .. "nd"
elseif num % 10 == 3 and num % 100 ~= 13 then return tostring(num) .. "rd"
else return tostring(num) .. "th"
end
end,
oci = function(num, fem)
if fem then return tostring(num) .. 'a'
else
if num == 1 then return '1r'
elseif num == 2 then return '2d'
else return tostring(num) .. 'n'
end
end
end
}

local epoch = -96346 -- year 0
local id_epoch = 0
for i, v in ipairs(equinoxes) do
if v.year == 1707 then -- year 1
id_epoch = i
break
end
end
local function equinox_for(year)
local e = equinoxes[id_epoch + year - 1]
return (e.hour < 6) and e.datestamp - 1 or e.datestamp
end

calendar.from = function(date_info)
if date_info.year < 1 then error "Years before the crossing not supported" end
local datestamp = equinox_for(date_info.year)
datestamp = datestamp + (date_info.month - 1) * 30
datestamp = datestamp + (date_info.week - 1) * 6
datestamp = datestamp + date_info.day - 1
return datestamp
end

calendar.to = function(datestamp)
if datestamp < epoch then error "Years before the crossing not supported" end
local year, nextyear = 0, 1
while equinox_for(nextyear) <= datestamp do
year = nextyear
nextyear = nextyear + 1
end
datestamp = datestamp - equinox_for(year)
local month = math.floor(datestamp / 30) + 1
local week = math.floor ((datestamp % 30) / 6 ) + 1
local day = datestamp % 6 + 1
return{year = year, month = month, week = week, day = day}
end

calendar.to_formatted = function(datestamp, opts)
local date_info = calendar.to(datestamp)
opts = opts or {}
opts.lang = opts.lang or "eng"
if opts.lang == "eng" then
if opts.compact then return string.format("Cross. %d, %d-%d’%d",
date_info.year, date_info.month, date_info.day, date_info.week)
else
return string.format("%s %s of %s, Crossing %s",
ordinal.eng(date_info.week), daynames.eng[date_info.day],
monthnames.eng[date_info.month], date_info.year)
end
elseif opts.lang == "oci" then
if opts.compact then return string.format("Trv. %d, %d-%d’%d",
date_info.year, date_info.month, date_info.day, date_info.week)
else
return string.format("%s %s de %s, %s de la traversat",
ordinal.oci(date_info.week, false), daynames.oci[date_info.day],
monthnames.oci[date_info.month], date_info.year)
end
end
end
return calendar