Старый 13.06.2013, 13:45   #441
LordWilex
В отпуске
 
Аватар для LordWilex
 
Регистрация: 01.06.2008
Адрес: Таганрог
Сообщения: 28,983
LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250
По умолчанию

Цитата:
Сообщение от ольвия
Спасибо, учитель

Нам и этого достаточно пока, нам бы с этим разобраться
Тогда будет сделано
LordWilex вне форума   Ответить с цитированием
Старый 17.06.2013, 19:52   #442
Amitayus
Собеседник
 
Регистрация: 07.06.2013
Сообщения: 3
Amitayus отключил(а) отображение уровня репутации
По умолчанию Функция CHOUSE неправильно считает

Здравствуйте!

Начал работать с ШЭ в Excel и столкнулся с тем, что функция CHouse у меня как-то неправильно считает.

Для простоты привожу пример вычисления ASC в Плацидусе в тропическом зодиаке на момент 01.01.2013 в 0 часов 0 минут для географической точки Гринвич (доглота 0 гр 0мин ; широта 51 гр 29мин).

Получаю:

Jday (2013; 1; 1; 0; 0; 0) = 2456293.5
CHouse(2456293.5; "P"; "STrop"; 13; 0; 0; 51; 29) = 244.2743293
Это 4 гр. 16 мин. Стрельца.

Тогда как пр-мма ZET , тоже использующая ШЭ, выдаёт 7гр 38 мин Весов.

Подскажите пожалуйста, от чего такое расхождение, что у меня неправильно?
При этом координаты планет функция PLC считает верно.

Путь к файлу swedll32.dll у меня указан (swe_set_ephe_path ("c:\WINDOWS\system32\")).

Правда, файлы sepl_18.se1, semo_18.se1, seas_18.se1 у меня не используются, но в этом ли причина? Кстати, как их подключить, где указать путь к ним?
Amitayus вне форума   Ответить с цитированием
Старый 17.06.2013, 20:37   #443
LordWilex
В отпуске
 
Аватар для LordWilex
 
Регистрация: 01.06.2008
Адрес: Таганрог
Сообщения: 28,983
LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250
По умолчанию

Цитата:
Сообщение от Amitayus
Здравствуйте!

Начал работать с ШЭ в Excel и столкнулся с тем, что функция CHouse у меня как-то неправильно считает.

Для простоты привожу пример вычисления ASC в Плацидусе в тропическом зодиаке на момент 01.01.2013 в 0 часов 0 минут для географической точки Гринвич (доглота 0 гр 0мин ; широта 51 гр 29мин).

Получаю:

Jday (2013; 1; 1; 0; 0; 0) = 2456293.5
CHouse(2456293.5; "P"; "STrop"; 13; 0; 0; 51; 29) = 244.2743293
Это 4 гр. 16 мин. Стрельца.

Тогда как пр-мма ZET , тоже использующая ШЭ, выдаёт 7гр 38 мин Весов.

Подскажите пожалуйста, от чего такое расхождение, что у меня неправильно?
При этом координаты планет функция PLC считает верно.

Путь к файлу swedll32.dll у меня указан (swe_set_ephe_path ("c:\WINDOWS\system32\")).

Правда, файлы sepl_18.se1, semo_18.se1, seas_18.se1 у меня не используются, но в этом ли причина? Кстати, как их подключить, где указать путь к ним?


Здравствуйте. Вы не первый человек на этой неделе, у которого такой глюк.


В общем, пересчитал по Вашим данным - у меня все посчиталось корректно:



В чем дело я не знаю, раньше на такой глюк ни кто не жаловался, а сейчас 3 жалобы подряд буквально в течение недели. Я так подозреваю, что это либо эксель обновился и там появились какие-то несовместимости, либо ШЭ обновились и Вам досталась обновленная версия. Возможно еще, что у Вас на компе стоит какая-то астрологическая программа со своей версией файла swedll32.dll, которая пишет его в c:\WINDOWS\system32\ и этот файл скомпилирован с ошибкой.
Попробуйте более старую версию файла swedll32.dll, возможно поможет Так же если есть возможность - попробуйте проверить на другом компе.
Пока сам не могу понять в чем дело

Кстати, файлы sepl_18.se1, semo_18.se1, seas_18.se1 - для определения куспидов домов не нужны, в них тока координаты планет :)

Последний раз редактировалось LordWilex, 17.06.2013 в 20:42.
LordWilex вне форума   Ответить с цитированием
Старый 18.06.2013, 19:40   #444
Amitayus
Собеседник
 
Регистрация: 07.06.2013
Сообщения: 3
Amitayus отключил(а) отображение уровня репутации
По умолчанию

Спасибо за быстрый ответ!

Проверил на 4 компах с OS WinXP + Excel 2003 и на одном с Win7 + Excel 2010 – везде рузультат один и тот же - неверный ):

Притом на каждом компе испробовал по две разные версии swedll32.dll (от 07.04.2009 и от 02.02.2011). Последняя - это та, к-рую использует ZET, считая ASC по ней правильно.

Кажется, дело не в версиях swedll32.dll или Excel, а в чём-то другом.
Amitayus вне форума   Ответить с цитированием
Старый 18.06.2013, 20:46   #445
LordWilex
В отпуске
 
Аватар для LordWilex
 
Регистрация: 01.06.2008
Адрес: Таганрог
Сообщения: 28,983
LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250
По умолчанию

Цитата:
Сообщение от Amitayus
Спасибо за быстрый ответ!

Проверил на 4 компах с OS WinXP + Excel 2003 и на одном с Win7 + Excel 2010 – везде рузультат один и тот же - неверный ):

Притом на каждом компе испробовал по две разные версии swedll32.dll (от 07.04.2009 и от 02.02.2011). Последняя - это та, к-рую использует ZET, считая ASC по ней правильно.

Кажется, дело не в версиях swedll32.dll или Excel, а в чём-то другом.

Похоже в другом

У меня аналогичная формула дает

=CHouse(2456293,5; "P"; "STrop"; 1; 0; 0; 51; 29) = 187,6258706

Единственное различие, которое я заметил - это то, что в Вашем примере в юлианской дате стоит точка в качестве разделителдя целой и дробной части числа:
Цитата:
Сообщение от Amitayus
CHouse(2456293.5; "P"; "STrop"; 13; 0; 0; 51; 29) = 244.2743293
В общем-то - по крайней мере у меня эксель не дает ввести точку, я полагаю во всех остальных версиях эксель - тоже в качестве разделителя используются строго запятые.

Попробуйте скопировать и вставить в эксель именно мой вариант:

=CHouse(2456293,5; "P"; "STrop"; 1; 0; 0; 51; 29)

Может это какой глюк с форматом числа или кодировкой
LordWilex вне форума   Ответить с цитированием
Старый 18.06.2013, 20:52   #446
Алексей
Собеседник
 
Аватар для Алексей
 
Регистрация: 01.11.2007
Сообщения: 8,437
Алексей репутация выше +2000Алексей репутация выше +2000Алексей репутация выше +2000Алексей репутация выше +2000Алексей репутация выше +2000Алексей репутация выше +2000Алексей репутация выше +2000Алексей репутация выше +2000Алексей репутация выше +2000Алексей репутация выше +2000Алексей репутация выше +2000
По умолчанию

В Экселе:

Смена разделителей групп разрядов и целой и дробной частей
Выберите команду Параметры в меню Сервис, а затем откройте вкладку Международные.

В группе Числа снимите флажок Использовать системные разделители.

Введите новые разделители в поля Разделитель целой и дробной части и Разделитель разрядов.
Алексей вне форума   Ответить с цитированием
Старый 19.06.2013, 19:33   #447
Amitayus
Собеседник
 
Регистрация: 07.06.2013
Сообщения: 3
Amitayus отключил(а) отображение уровня репутации
По умолчанию

Цитата:
Сообщение от LordWilex

Попробуйте скопировать и вставить в эксель именно мой вариант:

=CHouse(2456293,5; "P"; "STrop"; 1; 0; 0; 51; 29)

Может это какой глюк с форматом числа или кодировкой

Попробовална разных компах. Увы, не ничего не меняется :(. Придётся подождать до лучших времён.
Amitayus вне форума   Ответить с цитированием
Старый 26.06.2013, 02:56   #448
Filosof
Собеседник
 
Регистрация: 09.11.2012
Сообщения: 5
Filosof отключил(а) отображение уровня репутации
По умолчанию

Доброго времени, коллеги!

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

Как это можно сделать?

С Уважением, Андрей.
Filosof вне форума   Ответить с цитированием
Старый 26.06.2013, 07:58   #449
DoReMi
Бухгалтер
 
Аватар для DoReMi
 
Регистрация: 23.04.2008
Адрес: Волгодонск
Сообщения: 338
DoReMi репутация выше +50DoReMi репутация выше +50
По умолчанию

Без формул - макросом по событию (кнопка, открытие файла и т.п.)
DoReMi вне форума   Ответить с цитированием
Старый 26.06.2013, 08:15   #450
Алексей
Собеседник
 
Аватар для Алексей
 
Регистрация: 01.11.2007
Сообщения: 8,437
Алексей репутация выше +2000Алексей репутация выше +2000Алексей репутация выше +2000Алексей репутация выше +2000Алексей репутация выше +2000Алексей репутация выше +2000Алексей репутация выше +2000Алексей репутация выше +2000Алексей репутация выше +2000Алексей репутация выше +2000Алексей репутация выше +2000
По умолчанию

Цитата:
чтобы сразу долготу заносить в переменную, минуя ячейки листа файла.
используете в тексте макроса функцию определения долготы. Например так:

DolgotaPlanety = Plc(12322545, 4, "STrop",0)

или с занесением результата в ячейку текущего листа:

Cells(3,8) = Plc(12322545, 4, "STrop",0)
Алексей вне форума   Ответить с цитированием
Старый 30.06.2013, 12:44   #451
Filosof
Собеседник
 
Регистрация: 09.11.2012
Сообщения: 5
Filosof отключил(а) отображение уровня репутации
По умолчанию

Алексей, спасибо огромное!

С Уважением, Андрей.
Filosof вне форума   Ответить с цитированием
Старый 13.08.2013, 04:43   #452
irishka.rf
Собеседник
 
Регистрация: 13.07.2013
Сообщения: 5
irishka.rf отключил(а) отображение уровня репутации
По умолчанию

Здравствуйте, в ходе работы по подключению швейцарских эфемерид к excel у меня возникла проблема, с которой я не могу справится, срочно требуется совет.
Функции не работают, а код выдает ошибку:
Compile error:
The code in this project must be updated for use on 64-bit systems. Please review and update Declare statements and then mark them with the PtrSafe attribute.
Вы не знаете, как этим можно разобраться?
Заранее спасибо.
irishka.rf вне форума   Ответить с цитированием
Старый 13.08.2013, 07:08   #453
LordWilex
В отпуске
 
Аватар для LordWilex
 
Регистрация: 01.06.2008
Адрес: Таганрог
Сообщения: 28,983
LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250
По умолчанию

Цитата:
Сообщение от irishka.rf
Здравствуйте, в ходе работы по подключению швейцарских эфемерид к excel у меня возникла проблема, с которой я не могу справится, срочно требуется совет.
Функции не работают, а код выдает ошибку:
Compile error:
The code in this project must be updated for use on 64-bit systems. Please review and update Declare statements and then mark them with the PtrSafe attribute.
Вы не знаете, как этим можно разобраться?
Заранее спасибо.
Это значит, что у Вас 64 разрядная винда и/или 64 разряднвй офис. См. 397 сообщение в этой теме и дальше.
LordWilex вне форума   Ответить с цитированием
Старый 17.08.2013, 21:31   #454
irishka.rf
Собеседник
 
Регистрация: 13.07.2013
Сообщения: 5
irishka.rf отключил(а) отображение уровня репутации
По умолчанию

Еще раз здравствуйте. С предыдущей проблемой мне удалось разобраться. Спасибо.
Однако дальше зайти я так и не смогла. Не смотря на то, что я выполняла все строго по инструкции и Excel Visual Basic не выдает никакой ошибки функция Plc не хочет работать. Изначально я предполагала, что дело в строчке "swe_set_ephe_path ("D:\SWESEMPHES")" (которую я, естественно, изменила), но ни одной ошибки в конце концов я там не обнаружила. Очень надеюсь на вашу помощь. Заранее спасибо.
PS: прилагаю файл zip
Вложения
Тип файла: zip Лист Microsoft Excel.zip (70.9 Кб, 17 просмотров)

Последний раз редактировалось irishka.rf, 17.08.2013 в 21:45.
irishka.rf вне форума   Ответить с цитированием
Старый 20.08.2013, 12:37   #455
Valera
Собеседник
 
Регистрация: 20.08.2013
Сообщения: 1
Valera отключил(а) отображение уровня репутации
По умолчанию

Добрый день.
Подскажите, как лучше сделать обратную операцию - из точного градуса получить дату нахождения в нем планеты.
Например, рассчитать дату и время, когда Солнце будет в 234,56 градусе или Венера в 123,45?

Спасибо :)
Valera вне форума   Ответить с цитированием
Старый 20.08.2013, 15:17   #456
gsvgsv12
Собеседник
 
Регистрация: 01.01.2013
Сообщения: 15
gsvgsv12 отключил(а) отображение уровня репутации
По умолчанию

Здравствуйте!
Подскажите, пожалуйста, где можно найти справочник имен звезд для функции stars?
Заранее спасибо!
gsvgsv12 вне форума   Ответить с цитированием
Старый 20.08.2013, 19:00   #457
LordWilex
В отпуске
 
Аватар для LordWilex
 
Регистрация: 01.06.2008
Адрес: Таганрог
Сообщения: 28,983
LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250
По умолчанию

Цитата:
Сообщение от Valera
Добрый день.
Подскажите, как лучше сделать обратную операцию - из точного градуса получить дату нахождения в нем планеты.
Например, рассчитать дату и время, когда Солнце будет в 234,56 градусе или Венера в 123,45?

Спасибо :)
Увы, пока не реализованно.
Можно только написать свой макрос, который будет искать дату ингрессии, но это имеет смысл когда не слишком много ячеек, для которых это вычисляется, а если по-хорошему - надо писать отдельную dll'ку с этими фкнкциями (затратными в плане ресурсов, типа лунные дни, ингрессии и т.п.) на си, а до этого пока руки не дошли, да и редко когда требуется на практике
LordWilex вне форума   Ответить с цитированием
Старый 20.08.2013, 19:03   #458
LordWilex
В отпуске
 
Аватар для LordWilex
 
Регистрация: 01.06.2008
Адрес: Таганрог
Сообщения: 28,983
LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250
По умолчанию

Цитата:
Сообщение от gsvgsv12
Здравствуйте!
Подскажите, пожалуйста, где можно найти справочник имен звезд для функции stars?
Заранее спасибо!
http://www.astro.com/ftp/swisseph/src/fixstars.cat
LordWilex вне форума   Ответить с цитированием
Старый 21.08.2013, 04:27   #459
gsvgsv12
Собеседник
 
Регистрация: 01.01.2013
Сообщения: 15
gsvgsv12 отключил(а) отображение уровня репутации
По умолчанию

Цитата:
Сообщение от LordWilex

Спасибо! Кажется разобрался. Все заработало.

Правильно я понимаю, что в качестве имени, например, Альдебарана нужно подставить число 629?

Последний раз редактировалось gsvgsv12, 21.08.2013 в 04:31.
gsvgsv12 вне форума   Ответить с цитированием
Старый 21.08.2013, 21:45   #460
LordWilex
В отпуске
 
Аватар для LordWilex
 
Регистрация: 01.06.2008
Адрес: Таганрог
Сообщения: 28,983
LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250
По умолчанию

Цитата:
Сообщение от gsvgsv12
Правильно я понимаю, что в качестве имени, например, Альдебарана нужно подставить число 629?
Нет, нужно подставлять латинское название звезды , хотя наверное можно и номер, надо попробовать.... просто сейчас я с планшета, а по памяти не помню как там точно надо, давно не пользовался этой функцией
LordWilex вне форума   Ответить с цитированием
Ответ


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

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

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


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


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