יחידה:תאריך עברי: הבדלים בין גרסאות בדף

יצירת דף עם התוכן "function sub1(str, from, to) return mw.ustring.sub(str, from, to) end function find1(str, what, ...) local args = ...; local where = 1; if (args ~= nil) the..."
 
אין תקציר עריכה
שורה 21: שורה 21:
end
end
return mw.ustring.len(s)
return mw.ustring.len(s)
end
function takemonth(s)
local ans
if (s == "בתשרי") then
ans = 7
elseif (s == "בחשוון") then
ans = 8
elseif (s == "בכסלו") then
ans = 9
elseif (s == "בטבת") then
ans = 10
elseif (s == "בשבט") then
ans = 11
elseif (s == "באדר א'") then
ans = 12
elseif (s == "באדר ב'") then
ans = 13
elseif (s == "באדר") then
ans = 13
elseif (s == "בניסן") then
ans = 1
elseif (s == "באייר") then
ans = 2
elseif (s == "בסיוון") then
ans = 3
elseif (s == "בתמוז") then
ans = 4
elseif (s == "באב") then
ans = 5
elseif (s == "באלול") then
ans = 6
end
return ans
end
end


function hebnum(s)
function hebnum(s)
numberstable = {
["א"] = 1, ["ב"] = 2, ["ג"] = 3, ["ד"] = 4, ["ה"] = 5,
["ו"] = 6, ["ז"] = 7, ["ח"] = 8, ["ט"] = 9, ["י"] = 10,
["כ"] = 20, ["ך"] = 20, ["ל"] = 30, ["מ"] = 40, ["ם"] = 40,
["נ"] = 50, ["ן"] = 50, ["ס"] = 60, ["ע"] = 70, ["פ"] = 80,
["ף"] = 80, ["צ"] = 90, ["ץ"] = 90, ["ק"] = 100, ["ר"] = 200,
["ש"] = 300, ["ת"] = 400, ["'"] = 0, ["\""] = 0,
}
local ans = 0
local ans = 0
local str = s
local str = s
while len1(str) > 0 do
while len1(str) > 0 do
local next = sub1(str, 1, 1)
ans = ans + numberstable[sub1(str, 1, 1)]
if (next == "א") then
ans = ans + 1
elseif (next == "ב") then
ans = ans + 2
elseif (next == "ג") then
ans = ans + 3
elseif (next == "ד") then
ans = ans + 4
elseif (next == "ה") then
ans = ans + 5
elseif (next == "ו") then
ans = ans + 6
elseif (next == "ז") then
ans = ans + 7
elseif (next == "ח") then
ans = ans + 8
elseif (next == "ט") then
ans = ans + 8
elseif (next == "י") then
ans = ans + 10
elseif (next == "כ") then
ans = ans + 20
elseif (next == "ך") then
ans = ans + 20
elseif (next == "ל") then
ans = ans + 30
elseif (next == "מ") then
ans = ans + 40
elseif (next == "ם") then
ans = ans + 40
elseif (next == "נ") then
ans = ans + 50
elseif (next == "ן") then
ans = ans + 50
elseif (next == "ס") then
ans = ans + 60
elseif (next == "ע") then
ans = ans + 70
elseif (next == "פ") then
ans = ans + 80
elseif (next == "ף") then
ans = ans + 80
elseif (next == "צ") then
ans = ans + 90
elseif (next == "ץ") then
ans = ans + 90
elseif (next == "ק") then
ans = ans + 100
elseif (next == "ר") then
ans = ans + 200
elseif (next == "ש") then
ans = ans + 300
elseif (next == "ת") then
ans = ans + 400
end
str = sub1(str, 2, len1(str))
str = sub1(str, 2, len1(str))
end
end
return ans
return ans
end
end
function indent(m, d)
 
local ans
if (m == 7) then
ans = 0
elseif (m == 8) then
ans = 30
elseif (m == 9) then
ans = 59
elseif (m == 10) then
ans = 88
elseif (m == 11) then
ans = 117
elseif (m == 12) then
ans = 147
elseif (m == 13) then
ans = 147
elseif (m == 1) then
ans = 176
elseif (m == 2) then
ans = 206
elseif (m == 3) then
ans = 235
elseif (m == 4) then
ans = 265
elseif (m == 5) then
ans = 294
elseif (m == 6) then
ans = 324
end
return ans + d - 1
end
function mindate(fix, frame)
function mindate(fix, frame)
local monthtable = {
["בתשרי"] = 7,
["בחשוון"] = 8,
["בכסלו"] = 9,
["בטבת"] = 10,
["בשבט"] = 11,
["באדר א'"] = 12,
["באדר ב'"] = 13,
["באדר"] = 13,
["בניסן"] = 1,
["באייר"] = 2,
["בסיוון"] = 3,
["בתמוז"] = 4,
["באב"] = 5,
["באלול"] = 6,
}
local indenttable = {176, 206, 235, 265, 294, 324, 0, 30, 59, 88, 117, 147, 147}
return to("28-08-" .. frame:callParserFunction("padleft", {hebnum(sub1(fix[3], 3, len1(fix[3]))) + 1000 *
return to("28-08-" .. frame:callParserFunction("padleft", {hebnum(sub1(fix[3], 3, len1(fix[3]))) + 1000 *
hebnum(sub1((fix[3]), 1, 2)) - 3761, 4}) .. " + " .. indent(takemonth(fix[2]), hebnum(fix[1])) .. " days", frame)
hebnum(sub1((fix[3]), 1, 2)) - 3761, 4}) .. " + " .. (indenttable[monthtable[fix[2]]] + hebnum(fix[1]) - 1) .. " days", frame)
end
end
function exacttdate(hdate, mindate, frame)
function exacttdate(hdate, mindate, frame)
local count = 0
local count = 0