//	Основной источник - http://old-church.ru/forum/index.php?showtopic=175
//
Dolja_SlavAri = 0;	//Доля 1/1296 Славяно-Арийской Части Часа  
Chasti = "";		//количество (с нулями) Частей (каждая 1/144 Часа) Славяно-Арийского часа
Chas_SlavAri = 4; 	//Час Славяно-Арийский (1/16 суток)
Chas = "";		//Название Славяно-Арийского Часа
Jar = "";		//Время суток
Dni = "";     		//день недели
Chislo_SlavAri = 21;	//Число Славяно-Арийского Месяца (в чётный месяц - 40 дней, в нечётный - 41)
Mes_SlavAri = 3;	//Славяно-Арийский Месяц (1-9)
Mes = "Бейлетъ";	//Славяно-Арийский Месяц (РАБГДЭВХТ)
Krug_Let = 6;		//Лето в Круге Лет - Круг - 16 Лет = 15 Простых Лет + 1 Священное Лето (все 9 Месяцев по 41 дню)
Krug = "";		//Название Лета (сейчас Морского Коня а "первое" - Звёздного Храма)
Krug_Zizni = 102;	//Лето в Круге Жизни - Цикл 144 Лета = 9 Кругов Лет
S_M_Z_H = 7478;   	//Лето от Сотворения Мира в Звёздном Храме (Победы над Аримами) на полночь 1 января 1970 года от Р.Х.
Chertog = "";		//Чертог, где находится Ярило-Солнце
//- Лета 140 - Морского Коня - это Лето
//- Лето 7516 от С.М.З.Х. - это Лето и т.д. - оно же:)
//- Лето 13016 от Великой Стужи (Великого Похолодания) 
//- Лето 40012 от 3-го Прибытия Вайтманы Перуна 
//- Лето 44552 от Сотворения Великого Коло Рассении 
//- Лето 106786 от Основания Асгарда Ирийского 
//- Лето 111814 от Великого Переселения из Даарии  
//- Лето 142998 от периода Трёх Лун 
//- Лето 153374 от Асса Деи
//- Лето 165038 от Времени Тары
//- Лето 185774 от Времени Туле
//- Лето 211694 от Времени Свага
//- Лето 273902 от Времени х’Арра
//- Лето 460526 от Времени Дары
//- Лето 604382 от Времени Трёх Солнц и т.д.
// Основная мотивация написания этого кода была в том, что  "обычно привязываются" к Григорианскому календарю.
// Этот код "привязан" только к полночи 1 января 1970 года - раньше (как бы) компьютеров не было :)
//		0:00 - 1 января 1970 года соответствует
//		по Да'Арийскому Круголету:
//Лето 7478 от Сотворения Мира в Звёздном Храме
//Лето в Круге Жизни: 102 (из 144)
//Лето в Круге Лет: 6 (из 16)
//Название Лета: Феникс Небесный
//Символьный образ: Феникс
//Стихия: Небеса
//Цвет: Небесный (голубой)
//Месяц: Бейлетъ - месяц Белого Сияния и покоя Мира (третий из девяти)
//Число месяца: 21 (из 41)
//День недели: Понедельник
//Время: 4 часа (Чертог Змея) : 0 частей
//		этот "хвостик" (4:000) соответствуют  21600000 миллисекунд 
//		столько Понедельникъ (21 Бейлетъ) уже "нащелкал" к празднику обрезания иудейского мальчика:). 
//		дополнив число миллисекунд от 1 января 1970 года "хвостиком" (4:000) в миллисекундах  и,
//		разделив полученную сумму на длительность суток (сутки = 86400000 миллисекунд - во всех календарях) 
//		- мы получим число дней от начала 21 Бейлетъ 7478 Лета от С.М.З.Х. до сегоднящнего дня - 
//              делим его (число дней) на 9 - остаток указывает текущий день недели - 0-Понедельник 1-Вторник,...8 - Неделя.
//		а взяв остаток от деления числа миллисекунд от начала 21 Бейлетъ 7478 Лета от С.М.З.Х. на длительность
//		суток - мы получим число миллисекунд в новом (сегодняшнем) дне
//              делим это число на 5400000 (Славяно-Арийский час в миллисекундах) - целое число от деления 
//		указывает на текущий час - делим новый остаток
//              на 37500 (Славяно-Арийская часть часа) - целое число от деления указывает на число частей 
//		а дробная может использоваться для Славяно-Арийских долей, но здесь (пока) не рассматривается 
//
//		
//
// V 6.1                                                                                                                                                                                                                  буду рад замечаниям, найденным ошибкам и пожеланиям (оригинал - KrugoLet.js в корне http://471.jino-net.ru) 
//		можно продолжить код и выводить на странице и Лето от Великой Стужи (Великого Похолодания)
//		и далее до  Лета от Времени Трех Солнц (интересно, какое событие стало отправной точкой этого Летоисчисления?)
//		строку состояния можно сделать "бегущей" - посему перегрузки по длинне строки не будет,
//		можно подвязать "по надобности" расчет биоритмов (23,28,33,54,84),
//		если взять свой момент рождения как отправную точку - тогда появится еще один параметр -
//		число прожитых миллисекунд, частей, часов, дней, месяцев и Лет - но это "на любителя")
//
function KrugoLet()
        {
	window.setTimeout("KrugoLet()",500); // обновление часов через 500 миллисекунд
	today=new Date();
	mSec_Greg = today.getTime() - (today.getTimezoneOffset() * 60000); // миллисекунд от полночи 1 января 1970 года до "сейчас"
// Эти удальцы "привязали" функцию getTime() к "Гринвичу" - по сему надо "добавлять свой пояс"
// a в функцию getTimezoneOffset(), которая должна возвращать различие в минутах между 
// локальным и универсальным временем, "воткнули минус" - посему и мы "на их минус" ... "свой"
	mSec_SlavAri = mSec_Greg + 21600000; // миллисекунд от 16:000 21 Бейлетъ 7478 лета от С.М.З.Х. до "сейчас"
	Vrem_SlavAri = (mSec_SlavAri % 86400000); // остаток миллисекунд в новых (текущих) сутка - сегодня
	Chas_SlavAri = Math.floor(Vrem_SlavAri / 5400000.00); // Славяно-Арийский час "числом" (текущий)
 	Chast_SlavAri = Math.floor((Vrem_SlavAri % 5400000) / 37500.00); // Славяно-Арийских частей часа (текущих)
	Dney_SlavAri = Math.floor(1.00 * (mSec_SlavAri / 86400000)); // прошло целых дней от 21 Бейлетъ 7478 от С.М.З.Х. до "сейчас"
	Den_SlavAri =  1 + Math.floor(Dney_SlavAri % 9.00); //День недели "числом" + "1", чтобы Понедельникъ был "1", а не "0" и Вторникъ - "2" т.д.
//
// Три-Девять Земель - 27 Земель системы Ярилы-Солнца. Трисветлое - значит представленно материей и в Яви и в Нави и в Прави. 
// (ИМХО).
//1  Земля Хорса (Меркурий) 
//2  Земля Мерцаны (Венера) 
//3  Мидгард-Земля - Луны: Леля и Месяц
//4  Земля Орея (Марс) - Луны: Кий (Фобос) и Хориф (Демос) 
//5  Земля Сварога - Дея (пояс астероидов) - Луны: Фатта (Фаэтон) - ["приташили" от Деи к Мидгард-Земле] и Литиция (Люцифер) - разрушена 
//6  Земля Перуна (Юпитер) - Луны: Мара (Европа), Дива (Ио), Лика (Ганимед) и Джива (Каллисто)
//7  Земля Стрибога (Сатурн)
//8  Земля Индры (Хирон, астероид номер 2060) 
//9  Земля Варуны (Уран)
//10 Земля Ния (Нептун) 
//11 Земля Вия (Плутон).
//
// Иные планеты Солнечной системы до сих пор еще не известны этим астрономам 
// (в скобках указаны периоды обращения вокруг Солнца в годах): 
//12 Земля Велеса (46,78) – "вроде" нашли между Хироном и Ураном, 
//13 Земля Семаргла (485,49)
//14 Земля Одина (689,69) 
//15 Земля Лады (883,6)
//16 Земля Удрзеца (1147,38) 
//17 Земля Коляды (1501,62)
//18 Земля Радогоста (1952,41) 
//19 Земля Тора (2537,75) 
//20 Земля Прове (3556)
//21 Земля Крода (3888)
//22 Земля Полкана (4752) 
//23 Земля Змия (5904) 
//24 Земля Ругия (6912) 
//25 Земля Чура (9504)
//26 Земля Догоды (11664) 
//27 Земля Дайма (15552) - эта Земля самая дальняя в системе Ярилы-Солнца - 
// она должна находиться (по третьему закону Кеплена) на расстоянии 623,05181 а.е, что значительно меньше 3500 а.е. 
// (астрономических единиц - расстояний от Мидгард-Земли до Ярилы-Солнца)
// или 3500 Светлых Далей - что соответствует одной Дальней Дали - это "конец Нашего рукава" Галактики, в котором
// движется вся система Ярилы-Солнца вокруг центра Галактики (сейчас Нашу Галактику называют "Млечный Путь")
// Солнечная система перемещается относительно ближайших звезд со скоростью 20 км/с в направлении созвездия Геркулеса  
// вместе с ними вращается вокруг центра Галактики со скоростью 250 км/c в направление созвездий Лебедя и Цефея
// Точка небесной сферы, в направлении которой сейчас движется Солнечная система, называется апексом.
// Центр Нашей Галактики пока не виден (скрыт галактическими облаками). Положение галактического экватора на небесной сфере 
// может быть определено лишь приближённо. Обычно оно задаётся экваториальными координатами его Северного полюса, 
// принимаемыми RA = 12ч 49м и Dec. = +27,4 град. (для эпохи 1950,0). 
// Центр ядра галактики проецируется на созвездие Стрельца (RA = 265 град., Dec. = -29 град.) Звезды созвездия Стельца находяться в том же секторе Небесной сферы, но там ли находится центр Нашей Галактики?
// Какие-то из двух координат -  "липа". Координаты даны в экваториальной системе координат, где 
// Dec. - склонение светила, о координатах которого идет речь: угол между плоскостью небесного экватора (в данном случае - плоскость эклиптики - цент - Солнце) и светилом
// RA - прямое восхождение: угол между точкой весеннего равноденствия (направление от Солнца на Землю в этот день) и направлением на светило, отсчитываемый 
//     против часовой стрелки, выражается в часах и минутах или в градусах.
//        В галактической системе основным кругом служит галактический экватор, т. е. большой круг небесной сферы, 
//         параллельный плоскости симметрии видимого с Земли Млечного Пути, полюсом — полюс этого круга 
//               (смотри выше в экваториальных координатах).
// Наличие двух направлений (векторов): на центр Галактики и на направление движения Солнечной системы - полностью определяют
// плоскость Галактики и позволяют задать галактические координаты: направление на центр 
// Галактики - Север (остальные три "стороны света" лежат в плоскости Галактики) и отклонение от плоскости с центром в 
//  точке наблюдения (имеется в виду Мидгард-Земля). По аналогии с системой координат летательного аппарата это отклонение
// можно назвать тангаж. Потребность в такой системе может возникнуть только при идентификации направлений на "свой-чужой" :) 
// С наступлением Дня Сварога (после 23 декабря 2012 года от Р.Х.) мы надеемся увидеть 
// Расчетная звездная величина балджа (центра) Галактики: -5,44 - Это более чем в два раза ярче Венеры на небосклоне (третьего по блеску из объектов - после Солнца и и полной Луны).
// Угловые размеры этого объекта 10 угловых градусов, что в 20 раз (!) больше углового размера Солнца или Луны.
//
//	"Ищейки Хаббла" не могут возпользоваться выводами Кеплера и ищут Земли у других Солнц и Звезд :( 
//
	if(Den_SlavAri == 1) Dni = "Понедельникъ";
	if(Den_SlavAri == 2) Dni = "Вторникъ";
	if(Den_SlavAri == 3) Dni = "Тритейникъ";
	if(Den_SlavAri == 4) Dni = "Четверикъ";
	if(Den_SlavAri == 5) Dni = "Пятница";
	if(Den_SlavAri == 6) Dni = "Шестица";
	if(Den_SlavAri == 7) Dni = "Седьмица";
	if(Den_SlavAri == 8) Dni = "Осьмица";
	if(Den_SlavAri == 9) Dni = "Неделя";
	if(Chast_SlavAri < 10) Chasti = "00" + Chast_SlavAri.toString();
	if(Chast_SlavAri >= 10 && Chast_SlavAri < 100) Chasti = "0" + Chast_SlavAri.toString();
	if(Chast_SlavAri >=100) Chasti = Chast_SlavAri.toString();
 	if(Chas_SlavAri >=0 && Chas_SlavAri < 4) Jar = "Вечер";
	if(Chas_SlavAri >=4 && Chas_SlavAri < 8) Jar = "Ночь";
	if(Chas_SlavAri >=8 && Chas_SlavAri < 12) Jar = "Утро";
	if(Chas_SlavAri >=12 && Chas_SlavAri <= 15) Jar = "День";
	if(Chas_SlavAri == 0) Chas_SlavAri = 16;
	if(Chas_SlavAri == 16) Chas = "Паобед (начало нового дня)  ";
	if(Chas_SlavAri == 1) Chas = "Вечир (появление звездной росы на Небесах)  ";
	if(Chas_SlavAri == 2) Chas = "Ничь (нечетное время трех Лун)  ";
	if(Chas_SlavAri == 3) Chas = "Полночь (полный путь Лун)  ";
	if(Chas_SlavAri == 4) Chas = "Заутрось (звездное утешение росы)  ";
	if(Chas_SlavAri == 5) Chas = "Заура (звездное сияние, заря)  ";
	if(Chas_SlavAri == 6) Chas = "Заурнице (окончание звездного сияния)  ";
	if(Chas_SlavAri == 7) Chas = "Настя (утренняя заря)  ";
	if(Chas_SlavAri == 8) Chas = "Сваор (восход Солнца)  ";
	if(Chas_SlavAri == 9) Chas = "Утрось (успокоение росы)  ";
	if(Chas_SlavAri == 10) Chas = "Поутрось (путь собирания успокоенной росы)  ";
	if(Chas_SlavAri == 11) Chas = "Обестина (обедня, совместное собрание) ";
	if(Chas_SlavAri == 12) Chas = "Обед (трапеза)  ";
	if(Chas_SlavAri == 13) Chas = "Подани (отдых после трапезы)  ";
	if(Chas_SlavAri == 14) Chas = "Утдайни (время окончания деяний)  ";
	if(Chas_SlavAri == 15) Chas = "Поудани (завершенный день) ";
//
	self.status=" " + Dni + " | "+Jar+" " + Chas_SlavAri.toString() + ":" + Chasti + " | Час: " + Chas;
//	строку состояния "обеспечили" - теперь займемся собственно расчетом Числа, Месяца и Лета
//	отправной параметр - Dney_SlavAri число целых дней от 21 Бейлетъ 7478 от С.М.З.Х. до "сейчас"
//   	зная, что Бейлетъ - третий Месяц (из 9), а Лето 7478 от С.М.З.Х было 102 Лето в Круге Жизни (из 144)
//      и 6 Лето в Круге Лет (из 16) воспользуемся этой информацией и "перейдем" к новолетию 7479 Лета от С.М.З.Х.
//	цикличностью не забывая, что каждое 16 Лето - Священное - то есть все Месяцы - по 41 дню.
//	21 день в Месяце Бейлетъ (c 21-ое по 41-ое), еще 120 дней (3 Месяца по 40 дней) и 123 дня (3 Месяца по 41 дню)
	Dney_SlavAri = Dney_SlavAri - 264;	//Получим число дней между Новолетием 7479 Лета от С.М.З.Х. и по вчерашний день включительно
	Chislo_SlavAri = 1;	//Следующее Число первое :)
	Mes_SlavAri = 1;	//Следующий Месяц Рамхатъ, то есть "первый"
	Krug_Let = 7;		//исходное	Krug_Let = 6  +  1
	Krug_Zizni = 103;	//Исходное	Krug_Zizni = 102  +  1
	S_M_Z_H = 7479;		//Исходное 	S_M_Z_H = 7478   +   1
//	осталось посчитать от Новолетия 7479 до "вчера" 
	while(Dney_SlavAri > 0)
		{
// отнимает (в цикле while) число полных Простых Лет
		if(Krug_Let != 16 && Dney_SlavAri >= 365 ) 
			{
			Dney_SlavAri = Dney_SlavAri - 365;
			Chislo_SlavAri = 1;	
			Mes_SlavAri = 1;
			Krug_Let = Krug_Let + 1;
			Krug_Zizni = Krug_Zizni + 1;
			S_M_Z_H = S_M_Z_H + 1;
			}
// отнимает (в цикле while) число полных Священных Лет
		if(Krug_Let == 16 && Dney_SlavAri >= 369) 
			{
			Dney_SlavAri = Dney_SlavAri - 369;
			Chislo_SlavAri = 1;	
			Mes_SlavAri = 1;
			Krug_Let = 1;
			if(Krug_Zizni == 144) Krug_Zizni = 1; else Krug_Zizni = Krug_Zizni + 1;
			S_M_Z_H = S_M_Z_H + 1;
			}
// отнимает (в цикле while) для Простого Лета число полных нечетных Месяцев - по 41 дню
		if(Krug_Let != 16 && Dney_SlavAri < 365 && Dney_SlavAri >= 41 && Mes_SlavAri != 2 && Mes_SlavAri != 4 && Mes_SlavAri != 6 && Mes_SlavAri != 8)
			{
			Dney_SlavAri = Dney_SlavAri - 41;
			Chislo_SlavAri = 1;	
			if(Mes_SlavAri == 9) 
				{
				Mes_SlavAri = 1; 
				Krug_Let = Krug_Let + 1;
				Krug_Zizni = Krug_Zizni + 1;
				S_M_Z_H = S_M_Z_H + 1;
				}
			else Mes_SlavAri = Mes_SlavAri + 1;
			}
// отнимает (в цикле while) для Простого Лета число полных четных Месяцев - по 40 дней
		if(Krug_Let != 16 && Dney_SlavAri < 365 && Dney_SlavAri >= 40 && Mes_SlavAri != 1 && Mes_SlavAri != 3 && Mes_SlavAri != 5 && Mes_SlavAri != 7 && Mes_SlavAri != 9)
			{
			Dney_SlavAri = Dney_SlavAri - 40;
			Chislo_SlavAri = 1;
			Mes_SlavAri = Mes_SlavAri + 1;
			}
// отнимает (в цикле while) для Священного Лета число полных Месяцев - по 41 дню
		if(Krug_Let == 16 && Dney_SlavAri >= 41 && Dney_SlavAri < 369)
			{
			Dney_SlavAri = Dney_SlavAri - 41;
			Chislo_SlavAri = 1;
			if(Mes_SlavAri == 9) 
				{
				Mes_SlavAri = 1; 
				Krug_Let = 1;
				if(Krug_Zizni == 144) Krug_Zizni = 1; else Krug_Zizni = Krug_Zizni + 1;
				S_M_Z_H = S_M_Z_H + 1;
				}
			else Mes_SlavAri = Mes_SlavAri + 1;
			}
// отнимает (в цикле while) для Простого Лета число дней в нечетных Месяцах - которые по 41 дню
		if(Krug_Let != 16 && Dney_SlavAri > 0 && Dney_SlavAri < 41 && Mes_SlavAri != 2 && Mes_SlavAri != 4 && Mes_SlavAri != 6 && Mes_SlavAri != 8)
			{
			Dney_SlavAri = Dney_SlavAri - 1;
			if(Chislo_SlavAri == 41)
				{
				Chislo_SlavAri = 1;
				if(Mes_SlavAri == 9) 
					{
					Mes_SlavAri = 1; 
					Krug_Let = Krug_Let + 1;
					Krug_Zizni = Krug_Zizni + 1;
					S_M_Z_H = S_M_Z_H + 1;
					}
				else Mes_SlavAri = Mes_SlavAri + 1;
				}
			else Chislo_SlavAri = Chislo_SlavAri + 1;
			}
// отнимает (в цикле while) для Простого Лета число дней в четных Месяцах - которые по 40 дней
		if(Krug_Let != 16 && Dney_SlavAri > 0 && Dney_SlavAri < 40 && Mes_SlavAri != 1 && Mes_SlavAri != 3 && Mes_SlavAri != 5 && Mes_SlavAri != 7 && Mes_SlavAri != 9)
			{
			Dney_SlavAri = Dney_SlavAri - 1;
			if(Chislo_SlavAri == 40) 
				{
				Chislo_SlavAri = 1; 
				Mes_SlavAri = Mes_SlavAri + 1;
				}
			else Chislo_SlavAri = Chislo_SlavAri + 1;
			}
// отнимает (в цикле while) для Священного Лета число дней в Месяце - которые все по 41 дню
		if(Krug_Let == 16 && Dney_SlavAri > 0 && Dney_SlavAri < 41)
			{
			Dney_SlavAri = Dney_SlavAri - 1;
			if(Chislo_SlavAri == 41)
				{
				Chislo_SlavAri = 1;
				if(Mes_SlavAri == 9) 
					{
					Mes_SlavAri = 1; 
					Krug_Let = 1;
					if(Krug_Zizni == 144) Krug_Zizni = 1; else Krug_Zizni = Krug_Zizni + 1;
					S_M_Z_H = S_M_Z_H + 1;
					}
				else Mes_SlavAri = Mes_SlavAri + 1;
				}
			else Chislo_SlavAri = Chislo_SlavAri + 1;
			}
		}
// Название Месяцев Славяно-Арийского Календаря (Коляды Даръ):
//
	if(Mes_SlavAri == 1) Mes = "Рамхатъ";
	if(Mes_SlavAri == 2) Mes = "Айлетъ";
	if(Mes_SlavAri == 3) Mes = "Бейлетъ";
	if(Mes_SlavAri == 4) Mes = "Гэйлетъ";
	if(Mes_SlavAri == 5) Mes = "Дайлетъ";
	if(Mes_SlavAri == 6) Mes = "Элетъ";
	if(Mes_SlavAri == 7) Mes = "Вэйлетъ";
	if(Mes_SlavAri == 8) Mes = "Хейлетъ";
	if(Mes_SlavAri == 9) Mes = "Тайлетъ";	
//		
//
//Чертог, где находится Ярило-Солнце
//
	if(Mes_SlavAri == 1 && Chislo_SlavAri == 1) Chertog = "Ярило-Солнце Переходит из Чертога Девы в Чертог Вепря "; 
	if(Mes_SlavAri == 1 && Chislo_SlavAri == 22) Chertog = "Ярило-Солнце Переходит из Чертога Вепря в Чертог Шуки "; 
	if(Mes_SlavAri == 2 && Chislo_SlavAri == 4) Chertog = "Ярило-Солнце Переходит из Чертога Щуки в Чертог Лебедя "; 
 	if(Mes_SlavAri == 2 && Chislo_SlavAri == 25) Chertog = "Ярило-Солнце Переходит из Чертога Лебедя в Чертог Змея "; 
 	if(Mes_SlavAri == 3 && Chislo_SlavAri == 7) Chertog = "Ярило-Солнце Переходит из Чертога Змея в Чертог Ворона "; 
 	if(Mes_SlavAri == 3 && Chislo_SlavAri == 29) Chertog = "Ярило-Солнце Переходит из Чертога Ворона в Чертог Медведя "; 
	if(Mes_SlavAri == 4 && Chislo_SlavAri == 12) Chertog = "Ярило-Солнце Переходит из Чертога Медведя в Чертог Бусла (Журавля) "; 
	if(Mes_SlavAri == 4 && Chislo_SlavAri == 37) Chertog = "Ярило-Солнце Переходит из Чертога Бусла (Журавля) в Чертог Волка "; 
	if(Mes_SlavAri == 5 && Chislo_SlavAri == 22) Chertog = "Ярило-Солнце Переходит из Чертога Волка в Чертог Лисы "; 
	if(Mes_SlavAri == 6 && Chislo_SlavAri == 4) Chertog = "Ярило-Солнце Переходит из Чертога Лисы в Чертог Тура "; 
 	if(Mes_SlavAri == 6 && Chislo_SlavAri == 26) Chertog = "Ярило-Солнце Переходит из Чертога тура в Чертог Лося "; 
	if(Mes_SlavAri == 7 && Chislo_SlavAri == 9) Chertog = "Ярило-Солнце Переходит из Чертога Лося в Чертог Финиста "; 
  	if(Mes_SlavAri == 7 && Chislo_SlavAri == 31) Chertog = "Ярило-Солнце Переходит из Чертога Финиста в Чертог Коня "; 
	if(Mes_SlavAri == 8 && Chislo_SlavAri == 13) Chertog = "Ярило-Солнце Переходит из Чертога Коня в Чертог Орла "; 
  	if(Mes_SlavAri == 8 && Chislo_SlavAri == 35) Chertog = "Ярило-Солнце Переходит из Чертога Орла в Чертог Расы (Леопарда) "; 
	if(Mes_SlavAri == 9 && Chislo_SlavAri == 18) Chertog = "Ярило-Солнце Переходит из Чертога Расы (Леопарда) в Чертог Девы "; 
	if(Mes_SlavAri == 1 && Chislo_SlavAri > 1 && Chislo_SlavAri < 22) Chertog = "Ярило-Солнце в Чертоге Вепря - Бог-Покровитель РАМХАТ "; 
	if(Mes_SlavAri == 1 && Chislo_SlavAri > 22) Chertog = "Ярило-Солнце в Чертоге Щуки - Богиня-Покровительница РОЖАНА "; 
	if(Mes_SlavAri == 2 && Chislo_SlavAri < 4) Chertog = "Ярило-Солнце в Чертоге Щуки - Богиня-Покровительница РОЖАНА "; 
	if(Mes_SlavAri == 2 && Chislo_SlavAri > 4 && Chislo_SlavAri < 25) Chertog = "Ярило-Солнце в Чертоге Лебедя - Богиня-Покровительница МАКОШЬ ";
	if(Mes_SlavAri == 2 && Chislo_SlavAri > 25) Chertog = "Ярило-Солнце в Чертоге Змея - Бог-Покровитель СЕМАРГЛ "; 
	if(Mes_SlavAri == 3 && Chislo_SlavAri < 7) Chertog = "Ярило-Солнце в Чертоге Змея - Бог-Покровитель СЕМАРГЛ "; 
	if(Mes_SlavAri == 3 && Chislo_SlavAri > 7 && Chislo_SlavAri < 29) Chertog = "Ярило-Солнце в Чертоге Ворона - Бог-Покровитель КОЛЯДА ";
	if(Mes_SlavAri == 3 && Chislo_SlavAri > 29) Chertog = "Ярило-Солнце в Чертоге Медведя - Бог-Покровитель СВАРОГ "; 
	if(Mes_SlavAri == 4 && Chislo_SlavAri < 12) Chertog = "Ярило-Солнце в Чертоге Медведя - Бог-Покровитель СВАРОГ "; 
	if(Mes_SlavAri == 4 && Chislo_SlavAri > 12 && Chislo_SlavAri < 37) Chertog = "Ярило-Солнце в Чертоге Бусла (Аиста) - Бог-Покровитель РОД ";
	if(Mes_SlavAri == 4 && Chislo_SlavAri > 37) Chertog = "Ярило-Солнце в Чертоге Волка - Бог-Покровитель ВЕЛЕС "; 
	if(Mes_SlavAri == 5 && Chislo_SlavAri < 22) Chertog = "Ярило-Солнце в Чертоге Волка - Бог-Покровитель ВЕЛЕС "; 
	if(Mes_SlavAri == 5 && Chislo_SlavAri > 22) Chertog = "Ярило-Солнце в Чертоге Лисы - Богиня-Покровительница МАРЕНА ";
	if(Mes_SlavAri == 6 && Chislo_SlavAri < 4) Chertog = "Ярило-Солнце в Чертоге Лисы - Богиня-Покровительница МАРЕНА ";
	if(Mes_SlavAri == 6 && Chislo_SlavAri > 4 && Chislo_SlavAri < 26) Chertog = "Ярило-Солнце в Чертоге Тура - Бог-Покровитель КРЫШЕНЬ ";
	if(Mes_SlavAri == 6 && Chislo_SlavAri > 26) Chertog = "Ярило-Солнце в Чертоге Лося - Богиня-Покровительница ЛАДА ";
	if(Mes_SlavAri == 7 && Chislo_SlavAri < 9) Chertog = "Ярило-Солнце в Чертоге Лося - Богиня-Покровительница ЛАДА ";
	if(Mes_SlavAri == 7 && Chislo_SlavAri > 9 && Chislo_SlavAri < 31) Chertog = "Ярило-Солнце в Чертоге Финиста - Бог-Покровитель ВЫШЕНЬ ";
	if(Mes_SlavAri == 7 && Chislo_SlavAri > 31) Chertog = "Ярило-Солнце в Чертоге Коня - Бог-Покровитель КУПАЛА ";
	if(Mes_SlavAri == 8 && Chislo_SlavAri < 13) Chertog = "Ярило-Солнце в Чертоге Коня - Бог-Покровитель КУПАЛА  ";
	if(Mes_SlavAri == 8 && Chislo_SlavAri > 13 && Chislo_SlavAri < 35) Chertog = "Ярило-Солнце в Чертоге Орла - Бог-Покровитель ПЕРУН ";
	if(Mes_SlavAri == 8 && Chislo_SlavAri > 35) Chertog = "Ярило-Солнце в Чертоге Раса (Леопарда) - Бог-Покровитель ТАРХ ";
	if(Mes_SlavAri == 9 && Chislo_SlavAri < 18) Chertog = "Ярило-Солнце в Чертоге Раса (Леопарда) - Бог-Покровитель ТАРХ ";
	if(Mes_SlavAri == 9 && Chislo_SlavAri > 18) Chertog = "Ярило-Солнце в Чертоге Девы - Богиня-Покровительница ДЖИВА";	
//		
//		
//Славяно-Арийский Месяц (РАБГДЭВХТ) (Р)наставляли (А)человека Боги Говоря Доброе, Эту (В)мудрость (Х)сохранять Твёрдо
//	можно теперь и со стихиями определиться (девять залов):
//
	if(Krug_Zizni == 1 || Krug_Zizni == 2 || Krug_Zizni == 19 || Krug_Zizni == 20 || Krug_Zizni == 37 || Krug_Zizni == 38 || Krug_Zizni == 55 || Krug_Zizni == 56 || Krug_Zizni == 73 || Krug_Zizni == 74 || Krug_Zizni == 91 || Krug_Zizni == 92 || Krug_Zizni == 109 || Krug_Zizni == 110 || Krug_Zizni == 127 || Krug_Zizni == 128) Krug = "Земной";
	if(Krug_Zizni == 129 || Krug_Zizni == 130 || Krug_Zizni == 3 || Krug_Zizni == 4 || Krug_Zizni == 21 || Krug_Zizni == 22 || Krug_Zizni == 39 || Krug_Zizni == 40 || Krug_Zizni == 57 || Krug_Zizni == 58 || Krug_Zizni == 75 || Krug_Zizni == 76 || Krug_Zizni == 93 || Krug_Zizni == 94 || Krug_Zizni == 111 || Krug_Zizni == 112) Krug = "Звездный";
	if(Krug_Zizni == 113 || Krug_Zizni == 114  || Krug_Zizni == 131 || Krug_Zizni == 132 || Krug_Zizni == 5 || Krug_Zizni == 6 || Krug_Zizni == 23 || Krug_Zizni == 24 || Krug_Zizni == 41 || Krug_Zizni == 42 || Krug_Zizni == 59 || Krug_Zizni == 60 || Krug_Zizni == 77 || Krug_Zizni == 78 || Krug_Zizni == 95 || Krug_Zizni == 96) Krug = "Огненный";
	if(Krug_Zizni == 97 || Krug_Zizni == 98 || Krug_Zizni == 115 || Krug_Zizni == 116 || Krug_Zizni == 133 || Krug_Zizni == 134 || Krug_Zizni == 7 || Krug_Zizni == 8 || Krug_Zizni == 25 || Krug_Zizni == 26 || Krug_Zizni == 43 || Krug_Zizni == 44 || Krug_Zizni == 61 || Krug_Zizni == 62 || Krug_Zizni == 79 || Krug_Zizni == 80) Krug = "Солнечный";
	if(Krug_Zizni == 81 || Krug_Zizni == 82 || Krug_Zizni == 99 || Krug_Zizni == 100 || Krug_Zizni == 117 || Krug_Zizni == 118 || Krug_Zizni == 135 || Krug_Zizni == 136 || Krug_Zizni == 9 || Krug_Zizni == 10 || Krug_Zizni == 27 || Krug_Zizni == 28 || Krug_Zizni == 45 || Krug_Zizni == 46 || Krug_Zizni == 63 || Krug_Zizni == 64) Krug = "Древесный";
	if(Krug_Zizni == 65 || Krug_Zizni == 66 || Krug_Zizni == 83 || Krug_Zizni == 84 || Krug_Zizni == 101 || Krug_Zizni == 102 || Krug_Zizni == 119 || Krug_Zizni == 120 || Krug_Zizni == 137 || Krug_Zizni == 138 || Krug_Zizni == 11 || Krug_Zizni == 12 || Krug_Zizni == 29 || Krug_Zizni == 30 || Krug_Zizni == 47 || Krug_Zizni == 48) Krug = "Свага";
	if(Krug_Zizni == 49 || Krug_Zizni == 50 || Krug_Zizni == 67 || Krug_Zizni == 68 || Krug_Zizni == 85 || Krug_Zizni == 86 || Krug_Zizni == 103 || Krug_Zizni == 104 || Krug_Zizni == 121 || Krug_Zizni == 122 || Krug_Zizni == 139 || Krug_Zizni == 140 || Krug_Zizni == 13 || Krug_Zizni == 14 || Krug_Zizni == 31 || Krug_Zizni == 32) Krug = "Морской";
	if(Krug_Zizni == 33 || Krug_Zizni == 34  || Krug_Zizni == 51 || Krug_Zizni == 52 || Krug_Zizni == 69 || Krug_Zizni == 70 || Krug_Zizni == 87 || Krug_Zizni == 88 || Krug_Zizni == 105 || Krug_Zizni == 106 || Krug_Zizni == 123 || Krug_Zizni == 124 || Krug_Zizni == 141 || Krug_Zizni == 142 || Krug_Zizni == 15 || Krug_Zizni == 16) Krug = "Лунный";
	if(Krug_Zizni == 17 || Krug_Zizni == 18  || Krug_Zizni == 35 || Krug_Zizni == 36 || Krug_Zizni == 53 || Krug_Zizni == 54 || Krug_Zizni == 71 || Krug_Zizni == 72 || Krug_Zizni == 89 || Krug_Zizni == 90 || Krug_Zizni == 107 || Krug_Zizni == 108 || Krug_Zizni == 125 || Krug_Zizni == 126 || Krug_Zizni == 143 || Krug_Zizni == 144) Krug = "Божественный";
//     	шестнадцать хором (залов):
	if(Krug_Zizni == 1 || Krug_Zizni == 129 || Krug_Zizni == 113 || Krug_Zizni == 97 || Krug_Zizni == 81 || Krug_Zizni == 65 || Krug_Zizni == 49 || Krug_Zizni == 33 || Krug_Zizni == 17) Krug = Krug + " Странник (Путь) ";
	if(Krug_Zizni == 2 || Krug_Zizni == 130 || Krug_Zizni == 114 || Krug_Zizni == 98 || Krug_Zizni == 82 || Krug_Zizni == 66 || Krug_Zizni == 50 || Krug_Zizni == 34 || Krug_Zizni == 18) Krug = Krug + " Жрец ";
	if(Krug_Zizni == 19 || Krug_Zizni == 3 || Krug_Zizni == 131 || Krug_Zizni == 115 || Krug_Zizni == 99 || Krug_Zizni == 83 || Krug_Zizni == 67 || Krug_Zizni == 51 || Krug_Zizni == 35) Krug = Krug + " Жрица (Дева) ";
	if(Krug_Zizni == 20 || Krug_Zizni == 4 || Krug_Zizni == 132 || Krug_Zizni == 116 || Krug_Zizni == 100 || Krug_Zizni == 84 || Krug_Zizni == 68 || Krug_Zizni == 52 || Krug_Zizni == 36) Krug = Krug + " Мир (Явь) ";
	if(Krug_Zizni == 37 || Krug_Zizni == 21 || Krug_Zizni == 5 || Krug_Zizni == 133 || Krug_Zizni == 117 || Krug_Zizni == 101 || Krug_Zizni == 85 || Krug_Zizni == 69 || Krug_Zizni == 53) Krug = Krug + " Свиток ";
	if(Krug_Zizni == 38 || Krug_Zizni == 22 || Krug_Zizni == 6 || Krug_Zizni == 134 || Krug_Zizni == 118 || Krug_Zizni == 102 || Krug_Zizni == 86 || Krug_Zizni == 70 || Krug_Zizni == 54) Krug = Krug + " Феникс ";
	if(Krug_Zizni == 55 || Krug_Zizni == 39  || Krug_Zizni == 23 || Krug_Zizni == 7 || Krug_Zizni == 135 || Krug_Zizni == 119 || Krug_Zizni == 103 || Krug_Zizni == 87 || Krug_Zizni == 71) Krug = Krug + " Лис (Навь) ";
	if(Krug_Zizni == 56 || Krug_Zizni == 40 || Krug_Zizni == 24 || Krug_Zizni == 8 || Krug_Zizni == 136 || Krug_Zizni == 120 || Krug_Zizni == 104 || Krug_Zizni == 88 || Krug_Zizni == 72) Krug = Krug + " Дракон ";
	if(Krug_Zizni == 73 || Krug_Zizni == 57 || Krug_Zizni == 41 || Krug_Zizni == 25 || Krug_Zizni == 9 || Krug_Zizni == 137 || Krug_Zizni == 121 || Krug_Zizni == 105 || Krug_Zizni == 89) Krug = Krug + " Змей ";
	if(Krug_Zizni == 74 || Krug_Zizni == 58 || Krug_Zizni == 42 || Krug_Zizni == 26 || Krug_Zizni == 10 || Krug_Zizni == 138 || Krug_Zizni == 122 || Krug_Zizni == 106 || Krug_Zizni == 90) Krug = Krug + " Орел ";
	if(Krug_Zizni == 91 || Krug_Zizni == 75 || Krug_Zizni == 59 || Krug_Zizni == 43 || Krug_Zizni == 27 || Krug_Zizni == 11 || Krug_Zizni == 139 || Krug_Zizni == 123 || Krug_Zizni == 107) Krug = Krug + " Дельфин ";
	if(Krug_Zizni == 92 || Krug_Zizni == 76 || Krug_Zizni == 60 || Krug_Zizni == 44 || Krug_Zizni == 28 || Krug_Zizni == 12 || Krug_Zizni == 140 || Krug_Zizni == 124 || Krug_Zizni == 108) Krug = Krug + " Конь ";
	if(Krug_Zizni == 109 || Krug_Zizni == 93 || Krug_Zizni == 77 || Krug_Zizni == 61 || Krug_Zizni == 45 || Krug_Zizni == 29 || Krug_Zizni == 13 || Krug_Zizni == 141 || Krug_Zizni == 125) Krug = Krug + " Пес ";
	if(Krug_Zizni == 110 || Krug_Zizni == 94 || Krug_Zizni == 78 || Krug_Zizni == 62 || Krug_Zizni == 46 || Krug_Zizni == 30 || Krug_Zizni == 14 || Krug_Zizni == 142 || Krug_Zizni == 126) Krug = Krug + " Тур (Корова) ";
	if(Krug_Zizni == 127 || Krug_Zizni == 111 || Krug_Zizni == 95 || Krug_Zizni == 79 || Krug_Zizni == 63 || Krug_Zizni == 47 || Krug_Zizni == 31 || Krug_Zizni == 15 || Krug_Zizni == 143) Krug = Krug + " Хоромы (Дом) ";
	if(Krug_Zizni == 128 || Krug_Zizni == 112 || Krug_Zizni == 96 || Krug_Zizni == 80 || Krug_Zizni == 64 || Krug_Zizni == 48 || Krug_Zizni == 32 || Krug_Zizni == 16 || Krug_Zizni == 144) Krug = Krug + " Капище (Храм) "; 
	}
//***

