אונטערשייד צווישן ווערסיעס פון "יחידה:קביעות"

1,724 בייטן צוגעלייגט ,  פֿאַר 4 חדשים
קיין רעדאגירונג באמערקונג
אין תקציר עריכה
אין תקציר עריכה
שורה 3: שורה 3:
-- פונקציית עזר – החזרת אות בעברית או מספר
-- פונקציית עזר – החזרת אות בעברית או מספר
local function gim(n)
local function gim(n)
    if n > 10 then
        error("gim: input out of range (must be 1–10), got " .. tostring(n))
    end
     local a = "אבגדהוזחכש"
     local a = "אבגדהוזחכש"
    if n > 11 then return tostring(n) end
     return mw.ustring.sub(a, n, n)
     return mw.ustring.sub(a, n, n)
end
end


-- הפונקציה הראשית: מקבלת שנה עברית ומחזירה סימן (למשל "כז*")
-- Private: Compute Rosh Hashanah dates (JDN) for year and year+1
p["סימן"] = function(frame)
local function rosh_pair(y)
     local Y = tonumber(frame.args[1]) or tonumber(frame:getParent().args[1])
     local parts = 38004 + 765433 * math.floor((235 * y - 234) / 19)
    if not Y or Y <= 0 then return "שנה לא תקפה" end
     local days = math.floor(parts / 25920)
    local b = 38004 + 765433 * math.floor((235 * Y - 234) / 19)
     local part_rem = parts % 25920
     local d = math.floor(b / 25920)
     local weekday = 1 + (days % 7)
     local i = b % 25920
     local f = 1 + (d % 7)
    local g = math.floor(((7 * Y + 13) % 19) / 12)
    local h = math.floor(((7 * Y + 6) % 19) / 12)


     if (i >= 16404 and f == 3 and g == 0) or (i >= 23269 and f == 2 and h == 1) then
    local ibur1 = math.floor(((7 * y + 13) % 19) / 12)
         d = d + 1
    local ibur2 = math.floor(((7 * y + 6) % 19) / 12)
         i = i - 25920
 
     if (part_rem >= 16404 and weekday == 3 and ibur1 == 0)
        or (part_rem >= 23269 and weekday == 2 and ibur2 == 1) then
         days = days + 1
         part_rem = part_rem - 25920
     end
     end


     local j1 = d + ((d + 5) % 7) % 2
     local jdn1 = days + ((days + 5) % 7) % 2


     b = i + 9516 + (39673 * g)
     parts = part_rem + 9516 + (13753 * ibur1)
     d = d + math.floor(b / 25920) + 354 + 28 * g
     days = days + math.floor(parts / 25920) + 354 + 29 * ibur1
     i = b % 25920
     part_rem = parts % 25920
     f = 1 + (d % 7)
     weekday = 1 + (days % 7)
     h = math.floor(((7 * Y + 1) % 19) / 12)
     ibur2 = math.floor(((7 * y + 1) % 19) / 12)


     if (i >= 16404 and f == 3 and h == 0) or (i >= 23269 and f == 2 and g == 1) then
     if (part_rem >= 16404 and weekday == 3 and ibur2 == 0)
         d = d + 1
        or (part_rem >= 23269 and weekday == 2 and ibur1 == 1) then
         days = days + 1
     end
     end


     local j2 = d + ((d + 5) % 7) % 2
     local jdn2 = days + ((days + 5) % 7) % 2
    return { jdn1, jdn2 }
end


     local s = gim(j1 % 7 + 1)
--  Convert JDN to Gregorian/Julian MM/DD
          .. gim((j2 - j1) % 10 + 5)
local function jd_to_date(j, julian)
          .. gim((j2 - 2) % 7 + 1)
     local f = j + 1401
    if not julian then
        f = f + math.floor((math.floor((4 * j + 274277) / 146097) * 3) / 4) - 38
    end
    local e = 4 * f + 3
    local g = math.floor((e % 1461) / 4)
    local h = 5 * g + 2
    local month = ((math.floor(h / 153) + 2) % 12) + 1
    local day = math.floor((h % 153) / 5) + 1
    return month .. "/" .. day
end


-- מקבלת שנה עברית ומחזירה סימן (למשל "הכז")
p["סימן"] = function(frame)
    local y = tonumber(frame.args[1] or frame.args["year"])
    if not y then return "Invalid year" end
    local roshs = rosh_pair(y)
    return gim((roshs[1] % 7) + 1) ..
          gim(((roshs[2] - roshs[1]) % 10) + 5) ..
          gim(((roshs[2] - 2) % 7) + 1)
end
-- אפשניט אין ציווילע קאלענדערס
p["אפשניט"] = function(frame)
    local y = tonumber(frame.args[1] or frame.args["year"])
    local c = frame.args[2] or frame.args["cal"]
    if not y then return "Invalid year" end
    if not c then return "Missing calendar type" end
    local roshs = rosh_pair(y)
    if c == "ג" then
        return jd_to_date(roshs[1]) .. "-" .. jd_to_date(roshs[2])
    elseif c == "י" then
        return jd_to_date(roshs[1], true) .. "-" .. jd_to_date(roshs[2], true)
    elseif c == "ה" then
        if y <= 5342 then
            return jd_to_date(roshs[1], true) .. "-" .. jd_to_date(roshs[2], true)
        elseif y >= 5344 then
            return jd_to_date(roshs[1]) .. "-" .. jd_to_date(roshs[2])
        elseif y == 5343 then
            return jd_to_date(roshs[1], true) .. "-" .. jd_to_date(roshs[2])
        end
    end
    return "Invalid"
end


  return mw.text.trim(s)
end
return p
return p