User:Seyegd/global.js

Mf = Math.floor , Mc = Math.ceil , Mr = Math.round , dg = document.getElementById("mw-content-text")
dg.innerHTML = "<p id='calendars' dir='rtl' style='background-color:#ff7f00; color:#0000ff'></p>" + dg.innerHTML
function DOC(p){document.getElementById("calendars").innerHTML += "\u200F &nbsp &nbsp &nbsp " + p + "<br>"}
nkeva = ["","אחת","שתים","שלש","ארבע","חמש","שש","שבע","שמנה","תשע","עשר"]
qeser = [""," ו","עשרים","שלשים","ארבעים","חמשים","ששים"]
xevaq = ["שביעית","ראשונה","שניה","שלישית","רביעית","חמישית","ששית","שביעית"]
seder = ["שביעי","ראשון","שני","שלישי","רביעי","חמישי","ששי","שביעי","שמיני","תשיעי","עשירי",
"אחד עשר","שנים עשר","שלשה עשר","ארבעה עשר","חמשה עשר","ששה עשר","שבעה עשר","שמנה עשר","תשעה עשר"]
ZSN = ["טלה","שור","תאומים","סרטן","אריה","בתולה","מאזנים","עקרב","קשת","גדי","דלי","דגים"]
APN = ["שבתאי","צדק","מאדים","חמה","נוגה","כוכב","לבנה"]
PDN = ["יהויריב","ידעיה","חרם","שערים","מלכיה","מימן","הקוץ","אביה","ישוע","שכניהו","אלישיב","יקים",
"חפה","ישבאב","בלגה","אמר","חזיר","הפצץ","פתחיה","יחזקאל","יכין","גמול","דליהו","מעזיהו"]
function gim(n,s){ gim1 = " אבגדהוזחט יכלמנסעפצ קרש" , gim4 = ["","ת","תת"]
var e = Mc(n/1000)-1 , p = ((n-1)%1000)+1; if (s != 0 && (p%100 == 15 || p%100 == 16)) {gim1 = gim1.replace("י","ט") , p ++}
var g = gim4[Mf(p / 400)] + gim1[Mf((p % 400) / 100) + 20] + gim1[Mf((p % 100) / 10) + 10] + gim1[p % 10]; g = g.replace(/ /g,"")
var t = g; if (s == null) {if (g.length < 2) {t = g + "'"} else {t = g.slice(0,-1) + '"' + g.slice(-1)}}
if (e > 0) {var k=gim(e,s); if (s != null) {t=k+"_"+t} else {if (k[k.length-2] == '"') {t=k+" "+t} else {t=k+t}}} return t}
ML = 765433 / 25920 , YL = 365.25 , MNI = [15,15,15,15,19,15,15,15,19]
function cixuv(c){ MT = c * ML + 79 / 12 , DP = MT % 1 , CM = Mf(MT) , MD = CM % 7; return this}
function qibur(x) {x = ((x * 12) + 5) % 19; return x}
function ROX(x){ var r = cixuv(Mf((x - 9) * 235 / 19) + 87).CM;
if (DP >= 0.75 || (MD == 3 && DP > 0.38285 && Q(x) > 6) || (MD == 2 && DP > 0.6477 && Q(x) > 11)) {r ++}
if ((r * 3 + 1) % 7 > 3) {r ++} return r}
function ta(x){ RH = ROX(x) , RB = ROX(x + 1) , OX = RB - RH , OC = [30,29,30,29,30,29,30,29,30,29,30,29]
XC = ["תשרי","מרחשון","כסלו","טבת","שבט","אדר","ניסן","אייר","סיון","תמוז","אב","אלול"]
if (qibur(x) < 7) {OC.splice(5,0,30) , XC.splice(5,1,"אדר א'","אדר ב'")}
if (x == 1) {OX --} if (OX % 10 == 5) {OC[1] = 30} if (OX % 10 == 3) {OC[2] = 29} return this}
function pr(x){ var YR = ta(x).RH % 7 , YP = RB % 7 , Q = qibur(x)
var PR = ["בראשית","נח","לך לך","וירא","חיי שרה","תולדת","ויצא","וישלח","וישב","מקץ","ויגש","ויחי","שמות","וארא","בא",
"בשלח","יתרו","משפטים","תרומה","תצוה","כי תשא","ויקהל","ויקרא","צו","שמיני","תזריע","אחרי מות","אמר","בהר","במדבר","נשא",
"בהעלתך","שלח","קרח","חקת","בלק","פינחס","מטות","דברים","ואתחנן","עקב","ראה","שפטים","כי תצא","כי תבא","נצבים"]
if (Q < 7 || YP == 2) {PR.splice(29,0,"בחקתי")} if (Q > 6) {PR.splice(24,0,"פסח")}
if (Q < 7 || (YR == 5 && YP == 3)) {PR.splice(22,0,"פקדי")} if (Q < 7) {PR.splice(28,0,"קדשים") , PR.splice(27,0,"מצרע")
if (YR == 5 || YP == 2) {PR.splice(42,0,"מסעי")} if (YR == 5) {PR.splice(29,0,"פסח")} else {PR.splice(28,0,"פסח")}}
if (YP == 5) {PR.push("האזינו","כפור","סכות")} else {if (YP == 0) {PR.push("ראש השנה","האזינו","סכות","וזאת הברכה")}
else {PR.push("וילך","האזינו","וזאת הברכה")}} return PR}
function YOM(){ TL = Date.now() / 86400000 + 2092241.347881 , TSC = TL
DSC = Mf(TL)+1 , WD = DSC%7; if (WD<0) {WD += 7} DN = seder[WD] , NH = "יום "; if ((TL%1)<0.5) {NH = "ליל "}
return this} function KY() {DOC("יום "+YOM().DSC+" לבריאת העולם")}
function AF(OD){ YK = YOM(OD).TSC + 7813789.625
var y = Mf(YK) % 30 + 1 , c = Mf(YK / 30) % 12 + 1 , x = Mf(YK / 360) % 600 + 1 , s = Mf(YK / 216000) + 1
if (YK > 0) {DOC("ה-"+y+" ל-"+c+" שנת "+x+" סדן "+s)}}
function MIX(OD){ var TD = (YOM(OD).TSC - 1398494.75) / 7 , PD = PDN[(Mc(TD % 24) + 23) % 24] , CPD = Mc(TD / 24)
var BAN = ["אליעזר","שבניהו","יושפט","נתנאל","עמשי","זכריהו","בניהו"] , BA = BAN[WD]
if (BA == "אליעזר" && (DSC - TSC) < 0.25) {PD = "<font color=#00ff00>"+PD+"</font>"} DOC (BA+" "+PD+" "+CPD)}
function DOR(){ var SG = YOM().DSC + 730499 , DOG = (SG % 30) + 1 , MOG = Mf((SG % 750) / 30) + 1 , GOG = Mf(SG / 750) + 1
DOC("יום "+DOG+" בגוש "+MOG+" דור "+GOG)}
function XEV(){ cd = YOM().DSC + 1403465; var dn = ["אפמיא","רבא","טיבריא","סמכו","מילחא","חולתא","שליית"] , d = dn[WD]
var wn = ["גד","דן","אשר","נפתלי","מנשה","אפרים","ראובן","יהודה","לוי","בנימין","שמעון","יששכר","זבולן"] , w = wn[Mc(cd / 7) % 13]
var sn = ["ארקא","ארץ","תבל","אדמה"] , s = sn[Mc(cd / 91) % 4]
var y = Mf(((cd - 1) % 2548) / 364) + 1 , r = Mf(((cd -1) % 17836) / 2548) + 1
var jl = "תאבגדהוזחטיכלמנסעפצקרש" , j = jl[Mc(cd / 17836) % 22] , c = gim(Mc(cd / 392392),0)
DOC(d+" "+w+" "+s+" "+y+" "+r+" "+j+" "+c)}
function HAM(){ SC = YOM().DSC + 178 , SB = Mf(SC / 10227) + 1 , AP = APN[(Mf(SC / 1461) % 7 + 7) % 7] , CD = (SC % 1461 + 1553) % 1461
TN = Mf(CD * 16 / 1461) , CD -= Mc(TN * 1461 / 16) , TN = (TN + 15) % 16 , SYN = ["הרים","ישוב","ימים","מדבר"] , SY = SYN[Mf(TN / 4)]
ZST = Mf(CD / 30); if (ZST > 2) {ZST --} ZS = ZSN[TN % 4 * 3 + ZST] , DM = CD - (ZST * 30) + 1; DOC(DM+" ב"+ZS+" "+SY+" "+AP+" "+SB)}
function HOD(){ AM = Mf((YOM().TL - (67 / 12)) / ML) , RM = AM - 83
var WNC = (DSC - cixuv(AM).CM) + MD; WN = xevaq[Mc(WNC / 7)]
if (WNC == 36) {WN = xevaq[1] , RM ++} if (DSC == CM && (MD != 1 || DP > 0.53057)) {WN = xevaq[5] , RM --}
var MIC = RM % 1080 , GIC = 0; while (MIC >= 0) {MIC -= MNI[GIC ++ % 9]} MN = seder[MIC + MNI[(GIC - 1) % 9] + 1]
GN = nkeva[GIC]; if (GIC > 10) {GN = nkeva[GIC % 10] + " עשרה"} qeser[1] = " ו"
if ((GIC % 10) == 0) {qeser[1] = ""} if (GIC > 19) {GN = qeser[Mf(GIC / 10)] + qeser[1] + nkeva[GIC % 10]}
CN = Mf(RM / 1080) + 51; return this} function KH() {DOC("ה"+HOD().DN+" ב"+WN+" ל"+MN+" מ"+GN+" מחזור "+CN)}
function QIV(){ XZ = Mf((HOD().AM + 50) * 19 / 235) - 2; if (ta(XZ).RH > DSC) {ta(-- XZ)} if (RB == DSC) {ta(++ XZ)}
YC = DSC - RH , MC = 0; while (YC >= 0) {YC -= OC[MC ++]} YC += OC[-- MC] + 1 , yom = gim(YC) , codex = XC[MC] , xana = gim(XZ)
return this} function KQ() {QIV(); DOC(NH+yom+" "+codex+" "+xana)}
function PAR(){ var I = QIV().XZ , t = RH - (RH % 7) + 22; if (t > DSC) {ta(-- I)} t = RH - (RH % 7) + 22
var par = pr(I)[Mf((DSC - t) / 7)] , mabul = I - 1657
var xemot = ["חיים","שלום","חכמה","עושר","זרע","חן","ממשלה"] , xem = xemot[WD]
DOC(xem+" "+par+" "+mabul)}
DOC(""),AF(),KY(),MIX(),DOR(),XEV(),HAM(),KH(),KQ(),PAR(),DOC(""),DOC(YK.toString(36)+"\u200F - "+YK)
document.body.style.backgroundColor = "#ffff00"; if (YC < 2) {document.body.style.backgroundColor = "#00ff00"}
if (YC > 29) {document.body.style.backgroundColor = "#ff007f"}