ToDay = new Date();
ddd=ToDay.getDate() + '' + (ToDay.getMonth()+1) + '' + ToDay.getFullYear();
iii=0;jjj=0;kkk=0;
fff=new Array(365);fff[0]=0;
fff[iii]="01 января 2009
Начало действия метеорного потока Квадрантиды
УРАН: начало вечерней видимости
ВЕНЕРА(-4,3) близ Луны (Ф=0,22); 9.2° ниже"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="03 января 2009
Максимум метеорного потока Квадрантиды"; iii=iii+1;
fff[iii]="04 января 2009
Луна в фазе первой четверти
МЕРКУРИЙ: вечерняя элонгация (m =-0,5; Эл=19°21')
Земля в перигелии 0,9833А.Е. = 147,095 млн.км."; iii=iii+1;
fff[iii]="05 января 2009
Окончание действия метеорного потока Квадрантиды"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="08 января 2009
03:05 покр. Луной (Ф=0,83) 17 Tau(3,7 m)
03:17 покр. Луной (Ф=0,83) 19 Tau(4,3 m)
03:28 покр. Луной (Ф=0,83) 20 Tau(3,9 m)
03:51 откр. Луной (Ф=0,84) 17 Tau(3,7 m)
04:21 откр. Луной (Ф=0,84) 19 Tau(4,3 m)
04:28 откр. Луной (Ф=0,84) 20 Tau(3,9 m)"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="10 января 2009
ЮПИТЕР: окончание видимости
ЛУНА: в перигее R=56,053 (Ф=0,99)"; iii=iii+1;
fff[iii]="11 января 2009
Полнолуние
Церера: cтояние (m =7,1; Эл=127°11')
МЕРКУРИЙ: cтояние (m =0,6; Эл=15°45')"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="13 января 2009
сближ. с Луной (Ф=0,91) Регул(1,4 m) до 2,58°"; iii=iii+1;
fff[iii]="14 января 2009
Паллада: cтояние (m =7,5; Эл=113°27')"; iii=iii+1;
fff[iii]="15 января 2009
ВЕНЕРА: вечерняя элонгация (m =-4,4; Эл=47°07')
сближ. с Луной (Ф=0,79) 69 Leo(5,4 m) до 0,06°
(утро) САТУРН(+0,7) близ Луны (Ф=0,79); 6.6° выше"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="17 января 2009
МЕРКУРИЙ: окончание видимости"; iii=iii+1;
fff[iii]="18 января 2009
Луна в фазе последней четверти"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="20 января 2009
откр. Луной (Ф=0,31) SAO 183269(6,5 m)
МЕРКУРИЙ: нижнее соединение (m =6,6; Эл=03°13')"; iii=iii+1;
fff[iii]="21 января 2009
сближ. с Луной (Ф=0,23) SAO 184144(5,4 m) до 0,01°"; iii=iii+1;
fff[iii]="22 января 2009
МЕРКУРИЙ: сближение до 0,663 a.e. (m =5,5)
Последний восход старой Луны утром"; iii=iii+1;
fff[iii]="23 января 2009
ВЕНЕРА 1,21° сев. планеты УРАН (Эл.47°)
ЛУНА: в апогее R=63,676 (Ф=0,10)"; iii=iii+1;
fff[iii]="24 января 2009
МЕРКУРИЙ: начало утренней видимости
ЮПИТЕР: соединение (m =-1,9; Эл=00°26')"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="26 января 2009
Паллада: начало видимости вечером и ночью
14:58 Кольцевое солнечное затмение (Ц), начало для Земли
16:07 начало центрального солнечного затмения для Земли
17:55 Новолуние
17:59 середина солнечного затмения для Земли
19:51 конец центрального солнечного затмения для Земли
20:59 конец солнечного затмения на Земле"; iii=iii+1;
fff[iii]="27 января 2009
МЕРКУРИЙ 4,32° сев. планеты МАРС (Эл.14°)
Первое появление Луны на вечернем небе"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="29 января 2009
ВЕНЕРА(-4,6) близ Луны (Ф=0,10); 9.8° левее"; iii=iii+1;
fff[iii]="30 января 2009
ВЕНЕРА(-4,6) близ Луны (Ф=0,17); 2.9° ниже
покр. Луной (Ф=0,17) 22 Psc(5,6 m)
откр. Луной (Ф=0,18) 22 Psc(5,6 m)"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="01 февраля 2009
МЕРКУРИЙ: cтояние (m =0,6; Эл=21°44')
сближ. с Луной (Ф=0,37) 99 Eta Psc(3,6 m) до 0,40°"; iii=iii+1;
fff[iii]="02 февраля 2009
покр. Луной (Ф=0,49) 26 Ari(6,2 m)
откр. Луной (Ф=0,49) 26 Ari(6,2 m)"; iii=iii+1;
fff[iii]="03 февраля 2009
НЕПТУН: окончание видимости
Веста : начало вечерней видимости
Луна в фазе первой четверти
Начало весны в северном полушарии Земли, Осени - в южном"; iii=iii+1;
fff[iii]="04 февраля 2009
покр. Луной (Ф=0,69) 59 Chi Tau(5,4 m)
откр. Луной (Ф=0,69) 59 Chi Tau(5,4 m)"; iii=iii+1;
fff[iii]="05 февраля 2009
сближ. с Луной (Ф=0,79) Элнат(B Tau)(1,7 m) до 1,76°"; iii=iii+1;
fff[iii]="06 февраля 2009
Церера : начало ночной видимости"; iii=iii+1;
fff[iii]="07 февраля 2009
покр. Луной (Ф=0,89) 27 Eps Gem(3,0 m)
откр. Луной (Ф=0,90) 27 Eps Gem(3,0 m)
ЛУНА: в перигее R=56,674 (Ф=0,95)"; iii=iii+1;
fff[iii]="08 февраля 2009
Начало действия метеорного потока Авригиды
сближ. с Луной (Ф=0,99) ск. Ясли(2,0 m) до 1,64°
сближ. с Луной (Ф=0,99) 47 Del Cnc(3,9 m) до 0,25°"; iii=iii+1;
fff[iii]="09 февраля 2009
Максимум метеорного потока Авригиды
Метис : начало вечерней видимости
22:40 полутеневое лунное затмение(Ю) частные фазы (восх в затмении)"; iii=iii+1;
fff[iii]="10 февраля 2009
00:39 полутеневое лунное затмение(Ю), середина (Ф=-0,09)
00:49 Полнолуние
02:37 конец лунного затмения"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="12 февраля 2009
Окончание действия метеорного потока Авригиды
НЕПТУН: соединение (m =7,9; Эл=00°22') "; iii=iii+1;
fff[iii]="13 февраля 2009
МЕРКУРИЙ: утренняя элонгация (m =0,0; Эл=26°06')"; iii=iii+1;
fff[iii]="14 февраля 2009
сближ. с Луной (Ф=0,77) Спика(1,0 m) до 3,64°
Эвномия : cтояние (m =10,1; Эл=119°09')"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="17 февраля 2009
МЕРКУРИЙ: окончание видимости
Луна в фазе последней четверти
сближ. с Луной (Ф=0,48) 1 Sco(4,6 m) до 0,01°"; iii=iii+1;
fff[iii]="18 февраля 2009
покр. Луной (Ф=0,39) SAO 184591(6,6 m)
откр. Луной (Ф=0,38) SAO 184591(6,6 m)"; iii=iii+1;
fff[iii]="19 февраля 2009
ЛУНА: в апогее R=63,523 (Ф=0,25)"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="21 февраля 2009
Последний восход старой Луны утром"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="23 февраля 2009
МАРС (+1,3) 0,7° южнее Луны (Ф=0,03 Аз=-026 Вс=14)"; iii=iii+1;
fff[iii]="24 февраля 2009
Эвномия : начало видимости всю ночь"; iii=iii+1;
fff[iii]="25 февраля 2009
Новолуние
Церера : противостояние (m =6,5; Эл=163°17') "; iii=iii+1;
fff[iii]="26 февраля 2009
САТУРН: начало ночной видимости
Церера : сближение до 1,583 a.e. (m =6,5)
Первое появление Луны на вечернем небе
покр. Луной (Ф=0,03) 18 Lam Psc(4,5 m)"; iii=iii+1;
fff[iii]="27 февраля 2009
ВЕНЕРА(-4,6) близ Луны (Ф=0,07); 5.4° выше"; iii=iii+1;
fff[iii]="28 февраля 2009
ВЕНЕРА(-4,6) близ Луны (Ф=0,14); 8° ниже"; iii=iii+1;
fff[iii]="март 2009"; iii=iii+31;
fff[iii]="апрель 2009"; iii=iii+30;
fff[iii]="01 мая 2009
07:31 МЕРКУРИЙ(1,1) 1,39° южн. звезды Плеяды ( 1.87)"; iii=iii+1;
fff[iii]="02 мая 2009
00:44 Луна в фазе первой четверти"; iii=iii+1;
fff[iii]="03 мая 2009
08:52 МЕРКУРИЙ: 9,74° близ планеты Веста (Эл.27°)"; iii=iii+1;
fff[iii]="04 мая 2009
Максимум метеорного потока Эта-Аквариды (Радиант виден утром, c 03:16 до рассвета)"; iii=iii+1;
fff[iii]="05 мая 2009
12:49 Начало Лета в северном полушарии Земли, Зимы - в южном"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="07 мая 2009
07:53 МЕРКУРИЙ: cтояние (m =2,7; Эл=14°10')"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="09 мая 2009
08:02 Полнолуние"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="11 мая 2009
01:00 МЕРКУРИЙ: окончание видимости"; iii=iii+1;
fff[iii]="12 мая 2009
Окончание действия метеорного потока Эта-Аквариды"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="14 мая 2009
ЛУНА: в апогее R=63,489 (Ф=0,79) "; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="17 мая 2009
03:02 САТУРН: cтояние (m =0,9; Эл=108°33')
(утро) ЮПИТЕР(-2,1) близ Луны (Ф=0,53); 3.1° левее
11:26 Луна в фазе последней четверти"; iii=iii+1;
fff[iii]="18 мая 2009
04:11 (утро) ЮПИТЕР(-2,2) близ Луны (Ф=0,43); 9.7° правее
11:17 МЕРКУРИЙ: нижнее соединение (m =12,6; Эл=00°55')"; iii=iii+1;
fff[iii]="19 мая 2009
23:05 МЕРКУРИЙ: сближение до 0,551 a.e. (m =8,9)"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="21 мая 2009
04:04 (утро) ВЕНЕРА(-4,5) близ Луны (Ф=0,16); 5.3° ниже
06:51 ВЕНЕРА (-4,5) 5,3° южнее Луны (Ф=0,15 Аз=-064 Вс=28)"; iii=iii+1;
fff[iii]="22 мая 2009
04:02 Последний восход старой Луны утром
04:02 (утро) ВЕНЕРА(-4,5) близ Луны (Ф=0,09); 12.5° правее"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="24 мая 2009
01:00 МАРС: начало утренней видимости
16:11 Новолуние"; iii=iii+1;
fff[iii]="25 мая 2009
22:58 Первое появление Луны на вечернем небе"; iii=iii+1;
fff[iii]="26 мая 2009
07:39 ЛУНА: в перигее R=56,625 (Ф=0,04) "; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="28 мая 2009
08:40 ЮПИТЕР 0,39° южн.планеты НЕПТУН (Эл.100°)"; iii=iii+1;
fff[iii]="29 мая 2009
02:53 НЕПТУН: cтояние (m =7,9; Эл=101°21') "; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="31 мая 2009
04:10 МЕРКУРИЙ: cтояние (m =2,1; Эл=18°13')
07:22 Луна в фазе первой четверти
14:27 САТУРН (+0,9) 6,1° севернее Луны (Ф=0,53 Аз=-084 Вс=07)
23:10 (вечер) САТУРН(+0,9) близ Луны (Ф=0,57); 7.7° выше"; iii=iii+1;
fff[iii]="01 июня 2009
15:44 Метис (10,6) 0,74° сев. звезды 27 Eps Gem( 2.98)"; iii=iii+1;
fff[iii]="02 июня 2009
02:09 Эвномия : cтояние (m =10,1; Эл=118°11') "; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="04 июня 2009
01:00 Церера : начало вечерней видимости"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="06 июня 2009
00:37 ВЕНЕРА: утренняя элонгация (m =-4,3; Эл=45°51'"; iii=iii+1;
fff[iii]="07 июня 2009
22:12 Полнолуние "; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="09 июня 2009
00:54 Флора : cтояние (m =10,3; Эл=122°21')"; iii=iii+1;
fff[iii]="10 июня 2009
20:20 ЛУНА: в апогее R=63,625 (Ф=0,92)"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="12 июня 2009
01:00 Флора : начало вечерней видимости"; iii=iii+1;
fff[iii]="13 июня 2009
03:29 (утро) ЮПИТЕР(-2,4) близ Луны (Ф=0,77); 8.1° левее
15:46 МЕРКУРИЙ: утренняя элонгация (m =0,6; Эл=23°27')"; iii=iii+1;
fff[iii]="14 июня 2009
03:29 (утро) ЮПИТЕР(-2,4) близ Луны (Ф=0,69); 4.7° правее"; iii=iii+1;
fff[iii]="15 июня 2009
10:12 ЮПИТЕР: cтояние (m =-2,4; Эл=118°05')"; iii=iii+1;
fff[iii]="16 июня 2009
02:15 Луна в фазе последней четверти"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="19 июня 2009
(утро) ВЕНЕРА(-4,2) близ Луны (Ф=0,20); 9.9° ниже"; iii=iii+1;
fff[iii]="20 июня 2009
03:27 (утро) ВЕНЕРА(-4,2) близ Луны (Ф=0,12); 9° правее
03:27 (утро) МАРС(+1,2) близ Луны (Ф=0,12); 7.3° правее"; iii=iii+1;
fff[iii]="21 июня 2009
03:27 Последний восход старой Луны утром
08:56 ВЕНЕРА 1,97° южн.планеты МАРС (Эл.45°)
09:43 Середина Лета в северном полушарии Земли, Зимы - в южном
11:48 МЕРКУРИЙ (-0,1) 5,9° южнее Луны (Ф=0,03 Аз=-004 Вс=60)"; iii=iii+1;
fff[iii]="22 июня 2009
23:35 Новолуние"; iii=iii+1;
fff[iii]="23 июня 2009
14:35 ЛУНА: в перигее R=56,134 (Ф=0,01)"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="25 июня 2009
23:34 Первое появление Луны на вечернем небе"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="27 июня 2009
23:33 (вечер) САТУРН(+1,0) близ Луны (Ф=0,32); 6.8° выше"; iii=iii+1;
fff[iii]=0; iii=iii+1;
fff[iii]="29 июня 2009
15:29 Луна в фазе первой четверти"; iii=iii+1;
fff[iii]=0; iii=iii+1;
if (ddd==112009) jjj=kkk; kkk=kkk+1;
if (ddd==212009) jjj=kkk; kkk=kkk+1;
if (ddd==312009) jjj=kkk; kkk=kkk+1;
if (ddd==412009) jjj=kkk; kkk=kkk+1;
if (ddd==512009) jjj=kkk; kkk=kkk+1;
if (ddd==612009) jjj=kkk; kkk=kkk+1;
if (ddd==712009) jjj=kkk; kkk=kkk+1;
if (ddd==812009) jjj=kkk; kkk=kkk+1;
if (ddd==912009) jjj=kkk; kkk=kkk+1;
if (ddd==1012009) jjj=kkk; kkk=kkk+1;
if (ddd==1112009) jjj=kkk; kkk=kkk+1;
if (ddd==1212009) jjj=kkk; kkk=kkk+1;
if (ddd==1312009) jjj=kkk; kkk=kkk+1;
if (ddd==1412009) jjj=kkk; kkk=kkk+1;
if (ddd==1512009) jjj=kkk; kkk=kkk+1;
if (ddd==1612009) jjj=kkk; kkk=kkk+1;
if (ddd==1712009) jjj=kkk; kkk=kkk+1;
if (ddd==1812009) jjj=kkk; kkk=kkk+1;
if (ddd==1912009) jjj=kkk; kkk=kkk+1;
if (ddd==2012009) jjj=kkk; kkk=kkk+1;
if (ddd==2112009) jjj=kkk; kkk=kkk+1;
if (ddd==2212009) jjj=kkk; kkk=kkk+1;
if (ddd==2312009) jjj=kkk; kkk=kkk+1;
if (ddd==2412009) jjj=kkk; kkk=kkk+1;
if (ddd==2512009) jjj=kkk; kkk=kkk+1;
if (ddd==2612009) jjj=kkk; kkk=kkk+1;
if (ddd==2712009) jjj=kkk; kkk=kkk+1;
if (ddd==2812009) jjj=kkk; kkk=kkk+1;
if (ddd==2912009) jjj=kkk; kkk=kkk+1;
if (ddd==3012009) jjj=kkk; kkk=kkk+1;
if (ddd==3112009) jjj=kkk; kkk=kkk+1;
if (ddd==122009) jjj=kkk; kkk=kkk+1;
if (ddd==222009) jjj=kkk; kkk=kkk+1;
if (ddd==322009) jjj=kkk; kkk=kkk+1;
if (ddd==422009) jjj=kkk; kkk=kkk+1;
if (ddd==522009) jjj=kkk; kkk=kkk+1;
if (ddd==622009) jjj=kkk; kkk=kkk+1;
if (ddd==722009) jjj=kkk; kkk=kkk+1;
if (ddd==822009) jjj=kkk; kkk=kkk+1;
if (ddd==922009) jjj=kkk; kkk=kkk+1;
if (ddd==1022009) jjj=kkk; kkk=kkk+1;
if (ddd==1122009) jjj=kkk; kkk=kkk+1;
if (ddd==1222009) jjj=kkk; kkk=kkk+1;
if (ddd==1322009) jjj=kkk; kkk=kkk+1;
if (ddd==1422009) jjj=kkk; kkk=kkk+1;
if (ddd==1522009) jjj=kkk; kkk=kkk+1;
if (ddd==1622009) jjj=kkk; kkk=kkk+1;
if (ddd==1722009) jjj=kkk; kkk=kkk+1;
if (ddd==1822009) jjj=kkk; kkk=kkk+1;
if (ddd==1922009) jjj=kkk; kkk=kkk+1;
if (ddd==2022009) jjj=kkk; kkk=kkk+1;
if (ddd==2122009) jjj=kkk; kkk=kkk+1;
if (ddd==2222009) jjj=kkk; kkk=kkk+1;
if (ddd==2322009) jjj=kkk; kkk=kkk+1;
if (ddd==2422009) jjj=kkk; kkk=kkk+1;
if (ddd==2522009) jjj=kkk; kkk=kkk+1;
if (ddd==2622009) jjj=kkk; kkk=kkk+1;
if (ddd==2722009) jjj=kkk; kkk=kkk+1;
if (ddd==2822009) jjj=kkk; kkk=kkk+1;
if (ddd==132009) jjj=kkk; kkk=kkk+1;
if (ddd==232009) jjj=kkk; kkk=kkk+1;
if (ddd==332009) jjj=kkk; kkk=kkk+1;
if (ddd==432009) jjj=kkk; kkk=kkk+1;
if (ddd==532009) jjj=kkk; kkk=kkk+1;
if (ddd==632009) jjj=kkk; kkk=kkk+1;
if (ddd==732009) jjj=kkk; kkk=kkk+1;
if (ddd==832009) jjj=kkk; kkk=kkk+1;
if (ddd==932009) jjj=kkk; kkk=kkk+1;
if (ddd==1032009) jjj=kkk; kkk=kkk+1;
if (ddd==1132009) jjj=kkk; kkk=kkk+1;
if (ddd==1232009) jjj=kkk; kkk=kkk+1;
if (ddd==1332009) jjj=kkk; kkk=kkk+1;
if (ddd==1432009) jjj=kkk; kkk=kkk+1;
if (ddd==1532009) jjj=kkk; kkk=kkk+1;
if (ddd==1632009) jjj=kkk; kkk=kkk+1;
if (ddd==1732009) jjj=kkk; kkk=kkk+1;
if (ddd==1832009) jjj=kkk; kkk=kkk+1;
if (ddd==1932009) jjj=kkk; kkk=kkk+1;
if (ddd==2032009) jjj=kkk; kkk=kkk+1;
if (ddd==2132009) jjj=kkk; kkk=kkk+1;
if (ddd==2232009) jjj=kkk; kkk=kkk+1;
if (ddd==2332009) jjj=kkk; kkk=kkk+1;
if (ddd==2432009) jjj=kkk; kkk=kkk+1;
if (ddd==2532009) jjj=kkk; kkk=kkk+1;
if (ddd==2632009) jjj=kkk; kkk=kkk+1;
if (ddd==2732009) jjj=kkk; kkk=kkk+1;
if (ddd==2832009) jjj=kkk; kkk=kkk+1;
if (ddd==2932009) jjj=kkk; kkk=kkk+1;
if (ddd==3032009) jjj=kkk; kkk=kkk+1;
if (ddd==3132009) jjj=kkk; kkk=kkk+1;
if (ddd==142009) jjj=kkk; kkk=kkk+1;
if (ddd==242009) jjj=kkk; kkk=kkk+1;
if (ddd==342009) jjj=kkk; kkk=kkk+1;
if (ddd==442009) jjj=kkk; kkk=kkk+1;
if (ddd==542009) jjj=kkk; kkk=kkk+1;
if (ddd==642009) jjj=kkk; kkk=kkk+1;
if (ddd==742009) jjj=kkk; kkk=kkk+1;
if (ddd==842009) jjj=kkk; kkk=kkk+1;
if (ddd==942009) jjj=kkk; kkk=kkk+1;
if (ddd==1042009) jjj=kkk; kkk=kkk+1;
if (ddd==1142009) jjj=kkk; kkk=kkk+1;
if (ddd==1242009) jjj=kkk; kkk=kkk+1;
if (ddd==1342009) jjj=kkk; kkk=kkk+1;
if (ddd==1442009) jjj=kkk; kkk=kkk+1;
if (ddd==1542009) jjj=kkk; kkk=kkk+1;
if (ddd==1642009) jjj=kkk; kkk=kkk+1;
if (ddd==1742009) jjj=kkk; kkk=kkk+1;
if (ddd==1842009) jjj=kkk; kkk=kkk+1;
if (ddd==1942009) jjj=kkk; kkk=kkk+1;
if (ddd==2042009) jjj=kkk; kkk=kkk+1;
if (ddd==2142009) jjj=kkk; kkk=kkk+1;
if (ddd==2242009) jjj=kkk; kkk=kkk+1;
if (ddd==2342009) jjj=kkk; kkk=kkk+1;
if (ddd==2442009) jjj=kkk; kkk=kkk+1;
if (ddd==2542009) jjj=kkk; kkk=kkk+1;
if (ddd==2642009) jjj=kkk; kkk=kkk+1;
if (ddd==2742009) jjj=kkk; kkk=kkk+1;
if (ddd==2842009) jjj=kkk; kkk=kkk+1;
if (ddd==2942009) jjj=kkk; kkk=kkk+1;
if (ddd==3042009) jjj=kkk; kkk=kkk+1;
if (ddd==152009) jjj=kkk; kkk=kkk+1;
if (ddd==252009) jjj=kkk; kkk=kkk+1;
if (ddd==352009) jjj=kkk; kkk=kkk+1;
if (ddd==452009) jjj=kkk; kkk=kkk+1;
if (ddd==552009) jjj=kkk; kkk=kkk+1;
if (ddd==652009) jjj=kkk; kkk=kkk+1;
if (ddd==752009) jjj=kkk; kkk=kkk+1;
if (ddd==852009) jjj=kkk; kkk=kkk+1;
if (ddd==952009) jjj=kkk; kkk=kkk+1;
if (ddd==1052009) jjj=kkk; kkk=kkk+1;
if (ddd==1152009) jjj=kkk; kkk=kkk+1;
if (ddd==1252009) jjj=kkk; kkk=kkk+1;
if (ddd==1352009) jjj=kkk; kkk=kkk+1;
if (ddd==1452009) jjj=kkk; kkk=kkk+1;
if (ddd==1552009) jjj=kkk; kkk=kkk+1;
if (ddd==1652009) jjj=kkk; kkk=kkk+1;
if (ddd==1752009) jjj=kkk; kkk=kkk+1;
if (ddd==1852009) jjj=kkk; kkk=kkk+1;
if (ddd==1952009) jjj=kkk; kkk=kkk+1;
if (ddd==2052009) jjj=kkk; kkk=kkk+1;
if (ddd==2152009) jjj=kkk; kkk=kkk+1;
if (ddd==2252009) jjj=kkk; kkk=kkk+1;
if (ddd==2352009) jjj=kkk; kkk=kkk+1;
if (ddd==2452009) jjj=kkk; kkk=kkk+1;
if (ddd==2552009) jjj=kkk; kkk=kkk+1;
if (ddd==2652009) jjj=kkk; kkk=kkk+1;
if (ddd==2752009) jjj=kkk; kkk=kkk+1;
if (ddd==2852009) jjj=kkk; kkk=kkk+1;
if (ddd==2952009) jjj=kkk; kkk=kkk+1;
if (ddd==3052009) jjj=kkk; kkk=kkk+1;
if (ddd==3152009) jjj=kkk; kkk=kkk+1;
if (ddd==162009) jjj=kkk; kkk=kkk+1;
if (ddd==262009) jjj=kkk; kkk=kkk+1;
if (ddd==362009) jjj=kkk; kkk=kkk+1;
if (ddd==462009) jjj=kkk; kkk=kkk+1;
if (ddd==562009) jjj=kkk; kkk=kkk+1;
if (ddd==662009) jjj=kkk; kkk=kkk+1;
if (ddd==762009) jjj=kkk; kkk=kkk+1;
if (ddd==862009) jjj=kkk; kkk=kkk+1;
if (ddd==962009) jjj=kkk; kkk=kkk+1;
if (ddd==1062009) jjj=kkk; kkk=kkk+1;
if (ddd==1162009) jjj=kkk; kkk=kkk+1;
if (ddd==1262009) jjj=kkk; kkk=kkk+1;
if (ddd==1362009) jjj=kkk; kkk=kkk+1;
if (ddd==1462009) jjj=kkk; kkk=kkk+1;
if (ddd==1562009) jjj=kkk; kkk=kkk+1;
if (ddd==1662009) jjj=kkk; kkk=kkk+1;
if (ddd==1762009) jjj=kkk; kkk=kkk+1;
if (ddd==1862009) jjj=kkk; kkk=kkk+1;
if (ddd==1962009) jjj=kkk; kkk=kkk+1;
if (ddd==2062009) jjj=kkk; kkk=kkk+1;
if (ddd==2162009) jjj=kkk; kkk=kkk+1;
if (ddd==2262009) jjj=kkk; kkk=kkk+1;
if (ddd==2362009) jjj=kkk; kkk=kkk+1;
if (ddd==2462009) jjj=kkk; kkk=kkk+1;
if (ddd==2562009) jjj=kkk; kkk=kkk+1;
if (ddd==2662009) jjj=kkk; kkk=kkk+1;
if (ddd==2762009) jjj=kkk; kkk=kkk+1;
if (ddd==2862009) jjj=kkk; kkk=kkk+1;
if (ddd==2962009) jjj=kkk; kkk=kkk+1;
if (ddd==3062009) jjj=kkk; kkk=kkk+1;
document.write(" Основные астрономические явления на ближайшие 10 дней:
");
if (jjj!=0)
{
for(lll=jjj;lll<=jjj+10;lll++)
{
if (fff[lll]!=0)
{
if (lll==jjj)
{
document.write("");
}
document.write(" " + fff[lll] + "
");
if (lll==jjj)
{
document.write("");
}
}
}
}
else
{
document.write(" некорректно указана дата");
}