home *** CD-ROM | disk | FTP | other *** search
/ PDA Software Library / pdasoftwarelib.iso / PSION / 1997 / 1012.ZIP / HOL / HEBREW.HOL < prev    next >
Encoding:
Text File  |  1997-05-10  |  9.7 KB  |  298 lines
  1. ! hebrew.hol V1.4
  2.  
  3. style = italic;
  4. year_symbol = "j";
  5.  
  6. ! new year for trees - 15th Shevat
  7. "Tu Bi'Shvat" = hfix(11,15);
  8.  
  9. ! Passover 15-22 Nisan
  10. {"Pesach (1/8)"     = hfix(1,15); alias = p;}
  11. "Erev Pesach"        = p - 1;
  12. "Pesach (2/8)"       = p + 1;
  13. "Pesach (3/8)"       = p + 2;
  14. "Pesach (4/8)"       = p + 3;
  15. "Pesach (5/8)"       = p + 4;
  16. "Pesach (6/8)"       = p + 5;
  17. "Pesach (7/8)"       = p + 6;
  18. "Pesach (8/8)"       = p + 7;
  19.  
  20. !*****
  21. ! Passover for residents of Israel
  22. ! {"Pesach (1/7)"     = hfix(1,15); alias = p;}
  23. ! "Erev Pesach"        = p - 1;
  24. ! "Pesach (2/7)"       = p + 1;
  25. ! "Pesach (3/7)"       = p + 2;
  26. ! "Pesach (4/7)"       = p + 3;
  27. ! "Pesach (5/7)"       = p + 4;
  28. ! "Pesach (6/7)"       = p + 5;
  29. ! "Pesach (7/7)"       = p + 6;
  30. !*******
  31.  
  32. "Shabbat Shekalim"       = p - 43 ! Saturday on or before p - 43
  33.                            if (weekday(0)) {       ! Sunday
  34.                               -1
  35.                            } elseif (weekday(1)) { ! Monday
  36.                               -2
  37.                            } elseif (weekday(2)) { ! Tuesday
  38.                               -3
  39.                            } elseif (weekday(3)) { ! Wednesday
  40.                               -4
  41.                            } elseif (weekday(4)) { ! Thursday
  42.                               -5
  43.                            } elseif (weekday(5)) { ! Friday
  44.                               -6
  45.                            };
  46.  
  47. !Fast of Esther - 13th Adar Sheni 
  48. "Taanith Esther"          = p
  49.                            if (weekday(2)) { ! Is Pesach on tuesday?
  50.                               -33
  51.                            } else {
  52.                               -31
  53.                            };
  54.  
  55. "Shabbat Zachor"         = p - 30 ! Saturday on or before
  56.                            if (weekday(0)) {       ! Sunday
  57.                               -1
  58.                            } elseif (weekday(1)) { ! Monday
  59.                               -2
  60.                            } elseif (weekday(2)) { ! Tuesday
  61.                               -3
  62.                            } elseif (weekday(3)) { ! Wednesday
  63.                               -4
  64.                            } elseif (weekday(4)) { ! Thursday
  65.                               -5
  66.                            } elseif (weekday(5)) { ! Friday
  67.                               -6
  68.                            };
  69.                                 
  70.  
  71. "Erev Purim" = p - 31;
  72. "Purim"      = p - 30;
  73. "Shushan Purim" = p
  74.                   if (weekday(0)) {
  75.                      -28
  76.                   } else {
  77.                      -29
  78.                   };
  79.  
  80. {
  81.   alias = hahodesh;
  82.   "Shabbat HaHodesh"     = p - 14 ! Saturday on or before this date
  83.                            if (weekday(0)) {       ! Sunday
  84.                               -1
  85.                            } elseif (weekday(1)) { ! Monday
  86.                               -2
  87.                            } elseif (weekday(2)) { ! Tuesday
  88.                               -3
  89.                            } elseif (weekday(3)) { ! Wednesday
  90.                               -4
  91.                            } elseif (weekday(4)) { ! Thursday
  92.                               -5
  93.                            } elseif (weekday(5)) { ! Friday
  94.                               -6
  95.                            };
  96. }
  97. "Shabbat Parah" = hahodesh - 7;
  98.  
  99. "Shabbat HaGadol"        = p - 1
  100.                            if (weekday(0)) {       ! Sunday
  101.                               -1
  102.                            } elseif (weekday(1)) { ! Monday
  103.                               -2
  104.                            } elseif (weekday(2)) { ! Tuesday
  105.                               -3
  106.                            } elseif (weekday(3)) { ! Wednesday
  107.                               -4
  108.                            } elseif (weekday(4)) { ! Thursday
  109.                               -5
  110.                            } elseif (weekday(5)) { ! Friday
  111.                               -6
  112.                            };
  113.  
  114. "Yom HaShoah" = p + 12;
  115.  
  116. "Yom HaZikaron" = hfix(2,4)
  117.                   doneif(weekday(0))
  118.                   hfix(2,5);
  119.  
  120. ! 5th Iyar - Israeli Independence Day
  121. "Yom HaAtzma'ut" = p
  122.                    if (weekday(0)) {
  123.                       +18
  124.                    } elseif (weekday(6)) {
  125.                       + 19
  126.                    } else {
  127.                       +20
  128.                    };
  129.  
  130. ! 18th Iyar - 33rd day of omer
  131. "Lag Ba'Omer" = hfix(2,18);
  132.  
  133. "Yom Yerushalim" = p + 43;
  134. "Erev Shavuot" = p + 49;
  135.  
  136. ! 6th & 7th Sivan
  137. "Shavouot (1/2)" = hfix(3,6);
  138. "Shavouot (2/2)" = hfix(3,7);
  139.  
  140. !*****
  141. ! Shavouot for residents of Israel
  142. ! "Shavouot" = hfix(3,6);
  143. !******
  144.  
  145. { 
  146.   alias = t; 
  147.   entry_type = ignore;  ! Don't write to agenda - only a help variable
  148.   "[Tish'a B'Av help date]" = hfix(5,9);
  149. }
  150.  
  151. "Tzom Tammuz" = t
  152.                 if (weekday(6)) {
  153.                    -20
  154.                 } else {
  155.                    -21
  156.                 };
  157.  
  158. "Shabbat Hazon" = t
  159.                            if (weekday(0)) {       ! Sunday
  160.                               -1
  161.                            } elseif (weekday(1)) { ! Monday
  162.                               -2
  163.                            } elseif (weekday(2)) { ! Tuesday
  164.                               -3
  165.                            } elseif (weekday(3)) { ! Wednesday
  166.                               -4
  167.                            } elseif (weekday(4)) { ! Thursday
  168.                               -5
  169.                            } elseif (weekday(5)) { ! Friday
  170.                               -6
  171.                            };
  172.                            
  173.  
  174. ! 9th av - fast postponed to sunday if saturday
  175. "Tish'a B'Av" = hfix(5,10)
  176.                 doneif(weekday(0))
  177.                 hfix(5,9);
  178.  
  179.  
  180. "Shabbat Nahamu" = t + 7
  181.                            if (weekday(0)) {       ! Sunday
  182.                               -1
  183.                            } elseif (weekday(1)) { ! Monday
  184.                               -2
  185.                            } elseif (weekday(2)) { ! Tuesday
  186.                               -3
  187.                            } elseif (weekday(3)) { ! Wednesday
  188.                               -4
  189.                            } elseif (weekday(4)) { ! Thursday
  190.                               -5
  191.                            } elseif (weekday(5)) { ! Friday
  192.                               -6
  193.                            };
  194.                            
  195. ! 15th av - midsummers day - Hamisha Asar B'Av
  196. "Hamisha Asar B'av" = hfix(5,15);
  197.  
  198.  
  199. ! Rosh HaShanah / new year
  200. {"Rosh HaShanah %hy (1/2)" = hfix(7,1); alias = r;}
  201. "Rosh HaShanah (2/2)"      = r + 1;
  202.  
  203. "Selichot (night)"         = r - 4
  204.                              if (weekday(0)) {       ! Sunday
  205.                                 -1
  206.                              } elseif (weekday(1)) { ! Monday
  207.                                 -2
  208.                              } elseif (weekday(2)) { ! Tuesday
  209.                                 -3
  210.                              } elseif (weekday(3)) { ! Wednesday
  211.                                 -4
  212.                              } elseif (weekday(4)) { ! Thursday
  213.                                 -5
  214.                              } elseif (weekday(5)) { ! Friday
  215.                                 -6
  216.                              };
  217.  
  218. "Erev Rosh HaShanah"       = r - 1;
  219.  
  220. "Shabbat Shuvah"           = r + 7 ! Saturday on or before r + 7
  221.                              if (weekday(0)) {       ! Sunday
  222.                                 -1
  223.                              } elseif (weekday(1)) { ! Monday
  224.                                 -2
  225.                              } elseif (weekday(2)) { ! Tuesday
  226.                                 -3
  227.                              } elseif (weekday(3)) { ! Wednesday
  228.                                 -4
  229.                              } elseif (weekday(4)) { ! Thursday
  230.                                 -5
  231.                              } elseif (weekday(5)) { ! Friday
  232.                                 -6
  233.                              };
  234.  
  235. ! postponed to sunday if saturday
  236. "Tzom Gedaliah"      = r + 3
  237.                        doneif(weekday(0))
  238.                        r + 2;
  239.  
  240. "Erev Yom Kippur"          = r + 8;
  241. ! Yom Kippur - day of atonement - 10th Tishri
  242. "Yom Kippur"               = r + 9;
  243.  
  244. "Erev Succot"              = r + 13;
  245.  
  246. ! Succot - tabernacles - 15-23 Tishri
  247. "Succot (1/9)"                 = r + 14;
  248. "Succot (2/9)"                 = r + 15;
  249. "Succot (3/9)"                 = r + 16;
  250. "Succot (4/9)"                 = r + 17;
  251. "Succot (5/9)"                 = r + 18;
  252. "Succot (6/9)"                 = r + 19;
  253. "Succot (7/9) Hoshanah Rabbah" = r + 20;
  254. ! solemn assembly
  255. "Shemini Atzeret"              = r + 21;
  256. ! rejoycing of the law
  257. "Simchas Torah"                = r + 22;
  258.  
  259. !**********
  260. ! Succot for residents of Israel
  261. ! "Succot (1/8)"                 = r + 14;
  262. ! "Succot (2/8)"                 = r + 15;
  263. ! "Succot (3/8)"                 = r + 16;
  264. ! "Succot (4/8)"                 = r + 17;
  265. ! "Succot (5/8)"                 = r + 18;
  266. ! "Succot (6/8)"                 = r + 19;
  267. ! "Succot (7/8) Hoshanah Rabbah" = r + 20;
  268. ! solemn assembly
  269. !"Shemini Atzeret/Simchas Torah" = r + 21;
  270. !**********
  271.  
  272. !**********
  273. !Tal U'Matar for residents of Israel
  274. !"Tal U'Matar (evening)"         = hfix(8,7);
  275. !**********
  276. "Tal U'Matar (evening)"          = fix(12,4);
  277.  
  278. ! Chanukah - 25th Kislev - festival of lights
  279. {"Chanukah (1/8)" = hfix(9,25); alias = c;}
  280. "Erev Chanukah"   = c - 1;
  281. "Chanukah (2/8)"  = c + 1;
  282. "Chanukah (3/8)"  = c + 2;
  283. "Chanukah (4/8)"  = c + 3;
  284. "Chanukah (5/8)"  = c + 4;
  285. "Chanukah (6/8)"  = c + 5;
  286. "Chanukah (7/8)"  = c + 6;
  287. "Chanukah (8/8)"  = c + 7;
  288.  
  289.  
  290.  
  291. !Tzom Tevet
  292. "Tzom Tevet" = hfix(10,11)
  293.                doneif(weekday(0))
  294.                hfix(10,10);
  295.  
  296.  
  297.  
  298.