Старый 06.03.2011, 19:31   #261
Konstserg
Собеседник
 
Регистрация: 05.03.2011
Сообщения: 21
Konstserg отключил(а) отображение уровня репутации
По умолчанию

Забыл уточнить: это расчет по состоянию на какое время(по Гринвичу)?
И как понять, сколько минут секунд для 359,891773508703 ?
Понятно, что 359 градусов, а что такое ,891773.. минут/секунд?
Ведь не бывает более 59 минут же?
Konstserg вне форума   Ответить с цитированием
Старый 06.03.2011, 20:08   #262
LordWilex
В отпуске
 
Аватар для LordWilex
 
Регистрация: 01.06.2008
Адрес: Таганрог
Сообщения: 28,983
LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250
По умолчанию

Цитата:
Сообщение от Konstserg
Забыл уточнить: это расчет по состоянию на какое время(по Гринвичу)?
И как понять, сколько минут секунд для 359,891773508703 ?
Понятно, что 359 градусов, а что такое ,891773.. минут/секунд?
Ведь не бывает более 59 минут же?


Время дано на полночь по гринвичу.
Эфемериды DE406.

Нет, там не минуты, а десятые доли градуса.

Для того, чтобы перевести в минуты - нужно дробную часть умножить на 60.

Например 0,891773 означает 0,891773*60 = 53,50638 минуты.

Если нужна большая точность с дробной частью минут поступаем аналогично 0,50638 означает 0,50638*60 = 30,3828 секунды и т.д.

т.е. запись 359,891773 означает: 359°53'30,3828"

Последний раз редактировалось LordWilex, 06.03.2011 в 20:24.
LordWilex вне форума   Ответить с цитированием
Старый 06.03.2011, 20:15   #263
LordWilex
В отпуске
 
Аватар для LordWilex
 
Регистрация: 01.06.2008
Адрес: Таганрог
Сообщения: 28,983
LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250
По умолчанию

Короче пересчитал. Вот то же самое, только в градусах/минутах/секундах: Эфемериды.xls, если Вам такой формат боле привычен. Только в таком формате выборки из неё трудно делать - десятичный всегда удобней

Последний раз редактировалось LordWilex, 06.03.2011 в 20:19.
LordWilex вне форума   Ответить с цитированием
Старый 07.03.2011, 14:09   #264
Konstserg
Собеседник
 
Регистрация: 05.03.2011
Сообщения: 21
Konstserg отключил(а) отображение уровня репутации
По умолчанию

Спасибо огромное еще раз! На самом деле первого объяснения мне вполне достаточно! То есть я мог бы сам пересчитать. И эти выложенные Вами эфемериды вполне могут пригодится!
Единственное огорчение, что все сделано на полночь по гринвичу..
:(
Если Вас не затруднит можно ли то же самое, но на 10 часов утра по Гринвичу?
Konstserg вне форума   Ответить с цитированием
Старый 07.03.2011, 15:22   #265
LordWilex
В отпуске
 
Аватар для LordWilex
 
Регистрация: 01.06.2008
Адрес: Таганрог
Сообщения: 28,983
LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250
По умолчанию

Цитата:
Сообщение от Konstserg
Если Вас не затруднит можно ли то же самое, но на 10 часов утра по Гринвичу?
Легко Эфемериды.xls
LordWilex вне форума   Ответить с цитированием
Старый 09.03.2011, 21:30   #266
Konstserg
Собеседник
 
Регистрация: 05.03.2011
Сообщения: 21
Konstserg отключил(а) отображение уровня репутации
По умолчанию

спасибо большое, Вы мне очень помогли!
Konstserg вне форума   Ответить с цитированием
Старый 26.03.2011, 12:50   #267
Уттара
Собеседник
 
Регистрация: 31.12.2008
Сообщения: 13
Уттара репутация выше +10
По умолчанию

Я знаю как сделать в OOo Calc полноценную работу с swedll32.dll, вот только жаль времени на это не хватает...
Хотя... OOo мало кому нужен, по удобству и скорости работы он очень сильно проигрывает MSO

Последний раз редактировалось Уттара, 26.03.2011 в 12:53.
Уттара вне форума   Ответить с цитированием
Старый 26.03.2011, 13:13   #268
DoReMi
Бухгалтер
 
Аватар для DoReMi
 
Регистрация: 23.04.2008
Адрес: Волгодонск
Сообщения: 338
DoReMi репутация выше +50DoReMi репутация выше +50
По умолчанию

Цитата:
Сообщение от Уттара
Я знаю как сделать в OOo Calc полноценную работу с swedll32.dll, вот только жаль времени на это не хватает...
Хотя... OOo мало кому нужен, по удобству и скорости работы он очень сильно проигрывает MSO

Не очень продуктивное сообщение...
Я тоже знаю - написать свой wrapper. Насчет ненужности - поспорю, МСО перестал пользоваться сразу, как узнал что он стоит денег немного больше чем 100 рублей за диск в киоске.
DoReMi вне форума   Ответить с цитированием
Старый 26.03.2011, 13:29   #269
LordWilex
В отпуске
 
Аватар для LordWilex
 
Регистрация: 01.06.2008
Адрес: Таганрог
Сообщения: 28,983
LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250
По умолчанию

На счет OOo - не переживайте, скоро усе будет.

Причем не только для винды, и не только для электронных таблиц, но и для командной строки и для вэба - все в одном.
Правда "скоро" у меня понятие растяжимое, но обнадеживает то, что уже процентов 30 работы сделано
LordWilex вне форума   Ответить с цитированием
Старый 24.04.2011, 07:02   #270
ar-mark
Собеседник
 
Регистрация: 21.04.2011
Сообщения: 12
ar-mark репутация выше +10
По умолчанию Спасибо ! Спасибо ! Спасибо !

Все просто прекрасно работает. Хоть я и не спец по этому делу, но все планеты сели как надо. Осталось только разобраться,
как ASC и MC настроить(чтоб как в ZET-9).
Если кто знает помогите пожалуйста!
Заранее благодарен.
ar-mark вне форума   Ответить с цитированием
Старый 24.04.2011, 15:50   #271
LordWilex
В отпуске
 
Аватар для LordWilex
 
Регистрация: 01.06.2008
Адрес: Таганрог
Сообщения: 28,983
LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250
По умолчанию

Цитата:
Сообщение от ar-mark
Осталось только разобраться,
как ASC и MC настроить(чтоб как в ZET-9).
Если кто знает помогите пожалуйста!
Вы имеете в виду, чтобы координаты совпадали ЗЕТовскими тютелька в тютельку?
С "флагами" внутри PLC() поэкспериментируйте:

Код:
# Список возможных флагов: # # SEFLG_JPLEPH = 1 - JPL эфемериды # SEFLG_SWIEPH = 2 - Швейцарские эфемериды # SEFLG_MOSEPH = 4 - Эфемериды Мошьера # SEFLG_SPEED = 256 - - Вычислять скорость (иначе 1-е 3 значения выходного массива будут с координатами, а последние, предназначенные для скоростей - 3 пустые) # SEFLG_HELCTR = 8 - Гелиоцентр # SEFLG_TRUEPOS = 16 - Истинная позиция (иначе видимая) # SEFLG_J2000 = 32 - Эпоха J2000 # SEFLG_NONUT = 64 - Не учитывать нутацию # SEFLG_NOGDEFL = 512 - Не учитывать искажения света гравитацией Солнца ("gravity deflection" не помню, как этот эффект по-русски называется) # SEFLG_NOABERR = 1024 - Не учитывать абберацию # SEFLG_EQUATORIAL = 2048 - Экваториальные координаты # SEFLG_XYZ = 4096 - Декардовы координаты # SEFLG_RADIANS = 8192 - Результат в радианах # SEFLG_BARYCTR = 16384 - Барицентрические координаты # SEFLG_TOPOCTR = 32768 - Топоцентрические # SEFLG_SIDEREAL = 65536 - Сидерический зодиак #

А вообще про это я подробно писал двумя страницами раньше.
LordWilex вне форума   Ответить с цитированием
Старый 24.04.2011, 18:11   #272
ar-mark
Собеседник
 
Регистрация: 21.04.2011
Сообщения: 12
ar-mark репутация выше +10
По умолчанию Спасибо !

Нет точное совпадение не важно!
С планетами разобрался быстро, но как насчитать ASC или MC
все еще не понял.
если можно образец, хоть одну строчку.
Типа ASC=........... итд
ar-mark вне форума   Ответить с цитированием
Старый 24.04.2011, 18:58   #273
LordWilex
В отпуске
 
Аватар для LordWilex
 
Регистрация: 01.06.2008
Адрес: Таганрог
Сообщения: 28,983
LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250
По умолчанию

Цитата:
Сообщение от ar-mark
Нет точное совпадение не важно!
С планетами разобрался быстро, но как насчитать ASC или MC
все еще не понял.
если можно образец, хоть одну строчку.
Типа ASC=........... итд

Например:
=CHouse(B6;"R";"STrop";1;J3;K3;H3;I3) - выводит долготу куспида дома, в данном случае Асц

Где:

=CHouse(
B6; - Юлианская дата
"R"; - система домов. "R" - региомонтан, "P"; - плацидус и т.д.
"STrop"; - Означает, что используется швейцарские эфемериды и тропический зодиак, лучше не меняйте
1; - номер дома 1 - асц, 4 - IC, 10 - MC и т д.
J3; - Географическая долгота градусы
K3; Географическая долгота минуты
H3; Географическая широта градусы
I3 Географическая широта минуты

)


Короче, скопируйте следующий текст:

Код:
День Мец Год Час Мин Сек Шир гр. Шир мин. Долг гр. Долг мин. Поправка 10 8 1980 17 0 0 47 12 38 54 -3 JD =jdayLT(D3;C3;B3;E3;F3;G3;L3;0;0) Солнц Луна Асц МС =Plc(B6;0;"STrop";0) =Plc(B6;1;"STrop";0) =CHouse(B6;"R";"STrop";1;J3;K3;H3;I3) =CHouse(B6;"R";"STrop";10;J3;K3;H3;I3) =GetDMS(C9;4) =GetDMS(D9;4) =GetDMS(E9;4) =GetDMS(F9;4) =GetDMS(C9;1)&" "&znname(C9)&" "&GetDMS(C9;2) =GetDMS(D9;1)&" "&znname(D9)&" "&GetDMS(D9;2) =GetDMS(E9;1)&" "&znname(E9)&" "&GetDMS(E9;2) =GetDMS(F9;1)&" "&znname(F9)&" "&GetDMS(F9;2)

Поставьте курсор на самую первую верхнюю ячейку, и вставьте текст.

Должно получится вот так:
Clipboard02.jpg


А там смотрите на ячейки, и документацию по формулам, и сравнивайте. Все это документировано и много раз обсуждалось в этой теме.

Цитата:
Сообщение от http://sweru.lordwilex.ru
CHouse(ByVal JD As Double, ByVal HSys As Variant, ByVal CType As Variant, ByVal csp As Integer, ByVal LonH As Double, ByVal LonM As Double, ByVal LatH As Double, ByVal LatM As Double)



Работа с раскладкой домов (координаты вершин домов, Asc, Dsc, Vetrex и т.д.)



JD = Юлианская дата



HSys = Система домов (на пример P = плацидус, K- кох и т.д. подробней см. документацию к ШЭ).



P Плацидус

K Кох

O Порфирий

R Региомонтанус

C Кампанус

A or E Равнодомная от Asc

V Vehlow equal (Asc. in middle of house 1) (? Трудности перевода, возможно: Равнодомная, Asc в середине 1-го дома)

X Меридианная

H Горизонтальная система

T Polich/Page (“topocentric” system)

B Алькабитус

G Гукленовы сектора

M Моринус







CType = Тип эфемерид и зодиака

Где: 1-я буква вид эфемерид, а остальная часть слова - вид зодиака.

CType = Def - Зодиак и эфемериды по умолчанию (эфемериды Мошьера + тропический зодиак)



CType = STrop - Тропический зодиак, Швейцарские эфемериды

CType = SSid - Сидерический зодиак, Швейцарские эфемериды

CType = SHel - Тропический зодиак, гелиоцентрические координаты, Швейцарские эфемериды

CType = SXYZ - Прямоугольные X,Y,Z координаты, Швейцарские эфемериды

CType = SRad - Тропический зодиак (кажется...) , радианы, Швейцарские эфемериды

CType = SEq - Экваториальные координаты, градусы, Швейцарские эфемериды

CType = SEqR - Экваториальные координаты, радианы, Швейцарские эфемериды



CType = MTrop - Тропический зодиак, эфемериды Мошьера

CType = MSid - Сидерический зодиак, эфемериды Мошьера

CType = MHel - Тропические зодиак, гелиоцентрические координаты, эфемериды Мошьера

CType = MXYZ - Прямоугольные X,Y,Z координаты, эфемериды Мошьера

CType = MRad - Тропический зодиак (кажется...) , радианы, эфемериды Мошьера

CType = MEq - Экваториальные координаты, градусы, эфемериды Мошьера

CType = MEqR - Экваториальные координаты, радианы, эфемериды Мошьера



CType = JTrop - Тропический зодиак, JPL эфемериды (по умолчанию DE406)

CType = JSid - Сидерический зодиак, JPL эфемериды (по умолчанию DE406)

CType = JHel - Тропические зодиак, гелиоцентрические координаты, JPL эфемериды (по умолчанию DE406)

CType = JXYZ - Прямоугольные X,Y,Z координаты, JPL эфемериды (по умолчанию DE406)

CType = JRad - Тропический зодиак (кажется...) , радианы, JPL эфемериды (по умолчанию DE406)

CType = JEq - Экваториальные координаты, градусы, JPL эфемериды (по умолчанию DE406)

CType = JEqR - Экваториальные координаты, радианы, JPL эфемериды (по умолчанию DE406)







csp - Вершина дома или другой объект, зависящий от раскладки домов (подробней см. документацию к ШЭ).



Csp – Куспид дома

1...12 это дома с 1 по 12

13 - Asc

14 - MC

15 – ARMC

16 – Вертекс

17 – Экватариальный Asc

18 - CoAsc (Кох)

19 - CoAsc (Мункасей)

20 – Полярный Asc







LonH - Географическая Долгота градусы

LonM - Географическая долгота минуты



LatH - Географическая Широта градусы

LatM - Географическая Широта минуты


Последний раз редактировалось LordWilex, 24.04.2011 в 19:03.
LordWilex вне форума   Ответить с цитированием
Старый 24.04.2011, 19:40   #274
ar-mark
Собеседник
 
Регистрация: 21.04.2011
Сообщения: 12
ar-mark репутация выше +10
По умолчанию Спасибо за помощь!!!

Отлично попробую.
Спасибо за помощь!!!
ar-mark вне форума   Ответить с цитированием
Старый 28.04.2011, 23:42   #275
Kalashnikov Artem
Собеседник
 
Регистрация: 21.02.2010
Сообщения: 12
Kalashnikov Artem отключил(а) отображение уровня репутации
По умолчанию

Здравствуйте, LordWilex.

Не могли бы Вы прояснить следующую проблему?
Необходимо использовать экваториальную систему координат.
С расчетом положений планет никаких проблем нет, есть флаг CType, в котором это учитывается (If CType = "SEq" Then iflag = SEFLG_EQUATORIAL + SEFLG_SWIEPH). Но для расчета домов в этой системе по идее этот флаг игнорируется (в swe_houses флаг вообще не используется, а в swe_houses_ex в документации ШЭ для iflag описано, что используется только 0 or SEFLG_SIDEREAL or SEFLG_RADIANS). И не совсем понял почему Вы в процедуре Plc при расчете домов в функцию swe_houses в 3й параметр geolat передаете CType. Как быть?

С уважением, Артем.

Последний раз редактировалось Kalashnikov Artem, 29.04.2011 в 00:00.
Kalashnikov Artem вне форума   Ответить с цитированием
Старый 29.04.2011, 08:04   #276
LordWilex
В отпуске
 
Аватар для LordWilex
 
Регистрация: 01.06.2008
Адрес: Таганрог
Сообщения: 28,983
LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250
По умолчанию

Цитата:
Сообщение от Kalashnikov Artem
Здравствуйте, LordWilex.

Не могли бы Вы прояснить следующую проблему?
Необходимо использовать экваториальную систему координат.
С расчетом положений планет никаких проблем нет, есть флаг CType, в котором это учитывается (If CType = "SEq" Then iflag = SEFLG_EQUATORIAL + SEFLG_SWIEPH). Но для расчета домов в этой системе по идее этот флаг игнорируется (в swe_houses флаг вообще не используется, а в swe_houses_ex в документации ШЭ для iflag описано, что используется только 0 or SEFLG_SIDEREAL or SEFLG_RADIANS). И не совсем понял почему Вы в процедуре Plc при расчете домов в функцию swe_houses в 3й параметр geolat передаете CType. Как быть?

С уважением, Артем.
Здравствуйте, Артем.

А как Вы себе представляете раскладку домов в экваториальной системе координат и чем она будет отличаться от эклиптической?

В данном случае это не имеет ни какого астрономического смысла.
Из определения Асц и прочих углов карты следует, что они представляют собой точки пересечения линий математического горизонта и небесного меридиана с линией эклиптики.
т.е. МС/IC фактически и так выражены в экваториальных координатах, а при проекции на экватор локальных Асц и Дсц - всякий смысл в этих точках теряется

В принципе можно строить раскладку домов вводя в функцию CHouse долготу места и нулевую широту (т.е. широту экватора), тогда получатся "экваториальные координаты раскладки домов", но и смысл они, по большому счету, будут иметь только на широте экватора (Асц совпадает с "точкой востока" т.е. с экваториальным Асц).

***

А по поводу параметра CType в функции CHouse, то он там вообще не нужен, это рудимент, оставленный для совместимости с другими версиями. Можете вводить туда, что угодно, хоть приветы Вашей бабушке.
Когда-то я экспериментировал с этой функцией, зачем-то мне понадобился этот параметр. Код, который его использовал - я реализовал в виде отдельной функции, а сам параметр удалить забыл. Так получилось, что когда этот косяк обнаружился - вышло уже несколько версий, дык что если его удалить, эта функция не будет работать у людей в уже готовых макросах.
Дык, что пусть пока висит, может быть в следующих версиях придумаю, как его заюзать с пользой для дела
LordWilex вне форума   Ответить с цитированием
Старый 29.04.2011, 08:48   #277
LordWilex
В отпуске
 
Аватар для LordWilex
 
Регистрация: 01.06.2008
Адрес: Таганрог
Сообщения: 28,983
LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250
По умолчанию

P.S. Кстати, проекцию локального Асц на экватор можно получить средствами ШЭ, если отдельно вычислить локальный Асц и экваториальный, а потом добавить к экваториальному Асц/Дсц разницу между экваториальным и локальным. А МС/IC и так совпадают.
Только как вычислять куспиды остальных домов в такой системе - большой вопрос
LordWilex вне форума   Ответить с цитированием
Старый 29.04.2011, 09:09   #278
Kalashnikov Artem
Собеседник
 
Регистрация: 21.02.2010
Сообщения: 12
Kalashnikov Artem отключил(а) отображение уровня репутации
По умолчанию

LordWilex, спасибо за разъяснения :) Меня просто смутило в программе Stella, что когда выбираешь экваториальную с.к., то положения домов меняется. Но как оказалось (мне так кажется) там в этом режиме просто используется равнодомная система. Не знаю как это дело обстоит в Zet, не могу проверить, у меня Lite версия.

С уважением, Артем.
Kalashnikov Artem вне форума   Ответить с цитированием
Старый 29.04.2011, 11:30   #279
LordWilex
В отпуске
 
Аватар для LordWilex
 
Регистрация: 01.06.2008
Адрес: Таганрог
Сообщения: 28,983
LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250
По умолчанию

Цитата:
Сообщение от Kalashnikov Artem
Не знаю как это дело обстоит в Zet, не могу проверить, у меня Lite версия.
Посмотрел экваториальную в "Гермесе", там Асц остается на прежнем месте, а МС почему-то смещается на несколько градусов... тоже не понятно, как они там считаются
LordWilex вне форума   Ответить с цитированием
Старый 05.05.2011, 11:26   #280
barrel
Собеседник
 
Регистрация: 02.02.2011
Сообщения: 2
barrel отключил(а) отображение уровня репутации
По умолчанию угловое расстояние междя объектами на заданный момент времени

LordWilex, спасибо за ваш труд! Даже не представляю что бы я делал без Ваших наработок!
А вопрос у меня такой: необходимо получить угловые расстояния между двумя планетами (объектами) на заданный момент времени (юлианскую дату).
Чено говоря не могу понять как использовать для этого функцию ASPECT2, что в арументах подразумевается под Х У?
barrel вне форума   Ответить с цитированием
Ответ


Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +1, время: 05:16.


Powered by vBulletin Version 3.5.4
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
© 1995-2019, ARGO