Вернуться   Астрологические форумы ARGO > Делимся информацией. Тестируем астрологию. Прогнозируем. > Астрологические программы

Ответ
 
Опции темы Опции просмотра
Старый 28.05.2009, 13:46   #101
Strijar
Собеседник
 
Аватар для Strijar
 
Регистрация: 02.07.2007
Адрес: Всеволожск, Россия
Сообщения: 517
Strijar репутация выше +150Strijar репутация выше +150Strijar репутация выше +150
По умолчанию

Цитата:
Сообщение от Уттара
А для расчета лунных дней можно сделать?

Восходы/заходы она сама считает. Надо написать поиск новолуний - но это не сложно (ретро движений то нет)
Strijar вне форума   Ответить с цитированием
Старый 10.06.2009, 12:33   #102
Scorpio
Собеседник
 
Регистрация: 23.11.2008
Сообщения: 14
Scorpio репутация выше +10
По умолчанию

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

Там каждый может только поменять даты. Но таблицу в основном пришлось заполнять вручную. Зато для интересующихся легче будет выбрать критерии более подходящего дня...
Scorpio вне форума   Ответить с цитированием
Старый 10.06.2009, 14:06   #103
Strijar
Собеседник
 
Аватар для Strijar
 
Регистрация: 02.07.2007
Адрес: Всеволожск, Россия
Сообщения: 517
Strijar репутация выше +150Strijar репутация выше +150Strijar репутация выше +150
По умолчанию

Цитата:
Сообщение от Scorpio
если кому интересно- могу поделиться файлом экселя для выбора даты свадьбы.

А можно мне? Сделаю скрипт для AstroZaur ;)
мылом belousov <тчк> oleg <плюх> gmail <тчк> com
Strijar вне форума   Ответить с цитированием
Старый 11.06.2009, 16:35   #104
LordWilex
В отпуске
 
Аватар для LordWilex
 
Регистрация: 01.06.2008
Адрес: Таганрог
Сообщения: 28,983
LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250
По умолчанию

Вышла новая версия Швейцарских эфемерид по - русски.

Версия 1.1

1. Добавленно много новых функций

2. Появилась возможность использовать JPL эфемериды NASA, наравне со Швейцарскими эфемеридами и эфемеридами Мошьера.

3. А самое главное, наконец - таки появилась болле или менее связная и , я надеюсь, полная, документация, надеюсь, теперь разобраться в пакете будет на много легче.

У меня большая просьба, в случае обнаружения ляпов и непонятностей в документации сообщать на форум.


Скачать последнюю версию можно тут: http://sweru.lordwilex.ru/sweru.zip

К сожалению, я не успел включить в обновление все заявки, что были на форуме, просто накопилось много нового материала и держать его неопубликованным нет смысла, а писать новые функции нет времени... Надеюсь в течение месяца все-таки добавлю в новой версии 1.2 все что обещал
LordWilex вне форума   Ответить с цитированием
Старый 07.11.2009, 19:53   #105
aurak
Собеседник
 
Регистрация: 07.11.2009
Сообщения: 34
aurak отключил(а) отображение уровня репутации
По умолчанию

здраствуйте
может подскажете как в swe вычислять скорости куспидов домов
и как делать тематические карты
тоесть ставить куспид любого дома в нужную точку
aurak вне форума   Ответить с цитированием
Старый 07.11.2009, 21:50   #106
aurak
Собеседник
 
Регистрация: 07.11.2009
Сообщения: 34
aurak отключил(а) отображение уровня репутации
По умолчанию

в вашей инструкции пишет

Public Declare Function swe_houses_ex Lib "swedll32.dll" _
Alias "_swe_houses_ex@40" ( _
ByVal tjd_ut As Double, _
ByVal iflag As Long, _
ByVal geolat As Double, _
ByVal geolon As Double, _
ByVal ihsy As Long, _
ByRef hcusps As Double, _
ByRef ascmc As Double _
) As Long ' hcusps must be first of 13 array elements
' ascmc must be first of 10 array elements

перевел это в делфи
Function swe_houses_ex(
tjd_ut: Double;
iflag : Longint;
geolat :Double;
geolon : Double;
ihsy : Longint;
var hcusp0 : double;
var ascmc0 : double
): double; stdcall; far; external 'swedll32.dll' name '_swe_house_pos@40';

ответ делфи точка входа не найдена
это как?
aurak вне форума   Ответить с цитированием
Старый 07.11.2009, 22:27   #107
aurak
Собеседник
 
Регистрация: 07.11.2009
Сообщения: 34
aurak отключил(а) отображение уровня репутации
По умолчанию

тут было упомянуто что вы на борланд с++ сделали длл ШЭ
где взять исходники на с++ ШЭ
реально ли сделать программу на C++ Builder 5 без блока ДЛЛ
тоесть все функции что есть в swedll32.dll будут на с++ в ехе файле программы.
Также тут было сказано что есть не официальный исходник на java
где его можно достать?

На данный момент вроде есть исходники на с++ разных эфемерид в английском интернете типа как DE404 DE406 и так дальше
может подскажите какие самые точные из них.

По поводу расчета куспидов домов. Есть книги по астрологии в которых есть формулы. Но результаты отличаются от Зет.
Почему?

Давайте откроем аналогичную тему только для перевода исходников С++ микрософт в С++ Builder 5 и Delphi php и так дальше
aurak вне форума   Ответить с цитированием
Старый 07.11.2009, 23:38   #108
LordWilex
В отпуске
 
Аватар для LordWilex
 
Регистрация: 01.06.2008
Адрес: Таганрог
Сообщения: 28,983
LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250
По умолчанию

Цитата:
Сообщение от aurak
в вашей инструкции пишет

Public Declare Function swe_houses_ex Lib "swedll32.dll" _
Alias "_swe_houses_ex@40" ( _
ByVal tjd_ut As Double, _
ByVal iflag As Long, _
ByVal geolat As Double, _
ByVal geolon As Double, _
ByVal ihsy As Long, _
ByRef hcusps As Double, _
ByRef ascmc As Double _
) As Long ' hcusps must be first of 13 array elements
' ascmc must be first of 10 array elements

перевел это в делфи
Function swe_houses_ex(
tjd_ut: Double;
iflag : Longint;
geolat :Double;
geolon : Double;
ihsy : Longint;
var hcusp0 : double;
var ascmc0 : double
): double; stdcall; far; external 'swedll32.dll' name '_swe_house_pos@40';

ответ делфи точка входа не найдена
это как?


У вас тут ошибка в декларации, правильно так:

function swe_houses_ex(tjdut : double;
iflag : Longint; {0 or SEFLG_SIDEREAL or
SEFLG_RADIANS}
geolat : double;
geolon : double;
hsys : char;
var hcusp0 : double;
var ascmc0 : double
): integer; stdcall; far; external 'swedll32.dll' name '_swe_houses_ex@40';

и вообще, декларации всех функций для delphi есть в комплеккте поставки ШЭ : swe_de32.zip

Цитата:
тут было упомянуто что вы на борланд с++ сделали длл ШЭ
где взять исходники на с++ ШЭ
Не совсем так, я подключил скомпилированную библиотеку к Ecxel при помощи VB, а сама библиотека компилилась авторами ШЭ на Visual studio
Вообще скомпилить её на borland c++ задача почти нереальная, я когда-то пробовал, получилась с 10го раза, да и то чероез ж*** пришлось компилисть каждый файл вручную, через командную строку, а потом собирать это дело из obj'ей

А сами исходники (с декларациями для delphi и примерами) можно скачать тут: ftp://ftp.astro.com/pub/swisseph/ephe/sweph.zip

Цитата:
реально ли сделать программу на C++ Builder 5 без блока ДЛЛ
тоесть все функции что есть в swedll32.dll будут на с++ в ехе файле программы.
Более чем реально!!

Цитата:
Также тут было сказано что есть не официальный исходник на java
где его можно достать?
Не совсем официальный, но есть:
swisseph-1.64.02-java-src-00.zip

Цитата:
на данный момент вроде есть исходники на с++ разных эфемерид в английском интернете типа как DE404 DE406 и так дальше
может подскажите какие самые точные из них.
DE414 и DE421 , но все они есть в составе ШЭ (т.е. эти эфемериды можно подключать через ШЭ и пользоваться ими, скачать их можно тут: ftp://ftp.astro.com/pub/swisseph/ephe/jplfiles/ ).

Цитата:
По поводу расчета куспидов домов. Есть книги по астрологии в которых есть формулы. Но результаты отличаются от Зет.
Почему?
Тут может быть много причин, скорей всего это связано с методикой расчета и точностью модели системы.

Цитата:
Давайте откроем аналогичную тему только для перевода исходников С++ микрософт в С++ Builder 5 и Delphi php и так дальше
Я не против, но перевести ШЭ на другой язык не реально!! Легче самому написать алгоритмы с нуля (чем я сейчас в общем-то и занимаюсь, врней пытаюсь, причем на ассемблере , но боюсь на этоо уйдет ооочень много времени )!!!

Цитата:
и как делать тематические карты
тоесть ставить куспид любого дома в нужную точку
для этого у меня есть функция startpoint(), думаю её легко перевести на делфи

Public Function StartPoint(SPoint, pl)
' Возвращает угловое расстояние между точками SPoint и pl
' в диапазане от 0 до 360 градусов
' Иными словами, - возвращает долготу точки pl в
' зодиаке, в котором за нулевой градус принята точка SPoint.
' Очень важная функция, полезная во многих приложениях астрологии!!!
' На пример, если мы за SPoint возьмем координату Восходящего узла
' а за pl любую планету, то получим её координату в Драконическом зодиаке
' Если за SPoint приймем Асц, - то получим раскладку домов (правда равнодомную)
' Если за SPoint принять Луну, а за pl Солнце, и умножить это на 100/360 то получим
' фазу Луны в процентах.
' Так же, мои исследования показали, что измерять угловые расстояния в системе 360 градусов
' гораздо эффективней, и научно обоснованней чем в традиционный аспектах.
'
Dim d As Double
d = pl - SPoint
If d < 0 Then d = d + 360
If d > 360 Then d = d - 360
StartPoint = d
'StartPoint = FixY(swe_difdeg2n(pl, SPoint) + 360, 360)
End Function

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

Цитата:
Сообщение от aurak
здраствуйте
может подскажете как в swe вычислять скорости куспидов домов
На это я вам подробно ответил в письме, пожалуй продублирую ответ тут, может кому пригодится


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

В ШЭ есть возможность получить скорости планет, а вот скорости элементов домов не предусмотрены, поэтому если вам это действительно нужно, вам придется программировать это дело самостоятельно, я могу дать только формулы.


В общем случае, для вычисления скорости (1 элемента системы домов, на пример Асц или МС) нужно сначала разбить на s частей интервал времени (чем больше, частей, тем больше итераций, но тем точней результат. На пример, если нам нужно узнать скорость системы домов от в интервале времени между 12 и 15 часами, разобьем интервал на 3 части по 1 часу, s1(t0-t1), s2(t0-t1), s3(t0-t1)), потом вычислить разницу во времени и в координатах ([dg] и [dt]) для каждого интервала, а потом вычислить мгновенные скорости, потом их просуммировать и разделить на кол-во шагов s, для того, чтобы не попасть в ноль, лучше сразу добавить к каждой из координат планет по 360 градусов, все равно расчеты ведутся относительно момента времени.
Формулы для вычисления скорости выглядят так:

0001.jpg


Если вам нужно вычислить (среднюю) скорость всей системы домов в целом, то производим это действие с каждым из элементов домов для каждого из шагов, складываем это дело и делим на 12, а потом делим на кол-во шагов.

0002.jpg

Что касается вычисления восхода/захода то в ШЭ для этого есть специальная функция swe_rise_trans(), вот пример вычисления восхода на VB:

Public Function parans(JD As Double, pl, CType, LonH, LonM, LatH, LatM, Alt As Double, rsmi) As Double

Dim x(6) As Double
Dim GPos(3) As Double
Dim tret As Double
Call SweInit
' Эфемериды по умолчанию (эфемериды Мошьера)
iflag = SEFLG_SPEED + SEFLG_MOSEPH
If CType = "Def" Then iflag = SEFLG_SPEED + SEFLG_MOSEPH

' Швейцарские эфемериды
If CType = "STrop" Then iflag = SEFLG_TRUEPOS + SEFLG_SWIEPH
If CType = "SSid" Then iflag = SEFLG_SIDEREAL + SEFLG_SWIEPH
If CType = "SHel" Then iflag = SEFLG_HELCTR + SEFLG_SWIEPH
If CType = "SXYZ" Then iflag = SEFLG_XYZ + SEFLG_SWIEPH
If CType = "SRad" Then iflag = SEFLG_RADIANS + SEFLG_SWIEPH
If CType = "SEq" Then iflag = SEFLG_EQUATORIAL + SEFLG_SWIEPH
If CType = "SEqR" Then iflag = SEFLG_RADIANS + SEFLG_EQUATORIAL + SEFLG_SWIEPH

' Эфемериды Мошьера
If CType = "MTrop" Then iflag = SEFLG_TRUEPOS + SEFLG_MOSEPH
If CType = "MSid" Then iflag = SEFLG_SIDEREAL + SEFLG_MOSEPH
If CType = "MHel" Then iflag = SEFLG_HELCTR + SEFLG_MOSEPH
If CType = "MXYZ" Then iflag = SEFLG_XYZ + SEFLG_MOSEPH
If CType = "MRad" Then iflag = SEFLG_RADIANS + SEFLG_MOSEPH
If CType = "MEq" Then iflag = SEFLG_EQUATORIAL + SEFLG_MOSEPH
If CType = "MEqR" Then iflag = SEFLG_RADIANS + SEFLG_EQUATORIAL + SEFLG_MOSEPH

' JPL эфемериды
If CType = "JTrop" Then iflag = SEFLG_TRUEPOS + SEFLG_JPLEPH
If CType = "JSid" Then iflag = SEFLG_SIDEREAL + SEFLG_JPLEPH
If CType = "JHel" Then iflag = SEFLG_HELCTR + SEFLG_JPLEPH
If CType = "JXYZ" Then iflag = SEFLG_XYZ + SEFLG_JPLEPH
If CType = "JRad" Then iflag = SEFLG_RADIANS + SEFLG_JPLEPH
If CType = "JEq" Then iflag = SEFLG_EQUATORIAL + SEFLG_JPLEPH
If CType = "JEqR" Then iflag = SEFLG_RADIANS + SEFLG_EQUATORIAL + SEFLG_JPLEPH



lon = LonH + 1 / 60 * LonM
Lat = LatH + 1 / 60 * LatM

GPos(0) = lon
GPos(1) = Lat
GPos(2) = Alt

atpress = 800
attemp = 15

serr$ = String(255, 0)

strname$ = String(255, 0)

Call swe_rise_trans(JD, pl, StarName$, iflag, rsmi, GPos(0), atpress, attemp, tret, serr$)

parans = tret

End Function


Для вычисления номера лунного дня есть еще пара обходных путей, но они не панацея:

1. Можно вычислить его по джотишу, в индийской астрологии лунный день это разница между долготой Луны и Солнца, деленная на 12
MDay = (MMoon - MSun)/12, если долгота Луны меньше Солнца перед этим прибавляем 360.

примерно так:

function MoonDay(MSun MSun) {
if (MMoon < MSun)MMoon += 360;
MDay = (MMoon - MSun)/12;
return(MDay); }

В 90% случаев лунный день по джотишу совпадает с западным.

2. Для вычисления лунных суток по западной традиции можно воспользоваться формулой Харви, но она дает приближенный результат, очень часто ошибка бывает в 1 сутки, хотя многие программы используют именно этот алгоритм:

0003.jpg

Последний раз редактировалось LordWilex, 07.11.2009 в 23:55.
LordWilex вне форума   Ответить с цитированием
Старый 08.11.2009, 10:29   #110
aurak
Собеседник
 
Регистрация: 07.11.2009
Сообщения: 34
aurak отключил(а) отображение уровня репутации
По умолчанию

>и вообще, декларации всех функций для delphi есть в комплекте поставки ШЭ : swe_de32.zip
нет там декларации swe_houses_ex и в ваших описания тоже ее нет
Могли бы вы предоставить описание на русском функции
swe_houses_ex и swe_houses_armc
что находится в массиве ascmc[0] и что такое armc


>Вообще скомпилить её на borland c++
почему?

если выбрать только некоторые функции такие как
расчет
юлианских дней
основных планет + лилит и лунные узлы
чем отличается истинное положение от среднего?
Куспиды досмов

Вы попытались получить доступ к адресу ftp://ftp.astro.com/pub/swisseph/ephe/sweph.zip, который сейчас недоступен.

>Более чем реально!!
Что для этого нужно взять исходники и перекомпелировать в билдере?

>Не совсем официальный, но есть:
>swisseph-1.64.02-java-src-00.zip
Если их поставить на сайт, то авторы прицепятся про лицензию?
Эти исходники можно устанавливать на виртуальных хостинг или нужен выделенный сервер.

de200.eph Файл "EPH" 41 959 KБ 31.10.1995 23:00:00
de405.eph Файл "EPH" 54 495 KБ 19.07.1997 1:00:00
de406.eph Файл "EPH" 194 763 KБ 19.07.1997 0:00:00
de414.eph Файл "EPH" 54 495 KБ 23.08.2008 0:00:00
de421.eph Файл "EPH" 13 640 KБ 20.08.2008 0:00:00
какие из них наиболее точные и быстрые

тут нет DE404 они встроены уже в модуль?
C++ есть исходник DE404. Есть ли смысл с им заниматься или он неточный?

При написании программ выяснился один очень важный момент это ретроградность
В разных эфемеридах она разная. Предлагаю сделать статью и сканер ретроградности
Например, на 100 лет с шагом в 1 минуту.
В системе Шестопалова ретроградность влияет на интерпретацию карты и прогноз
У 3 программах она разная на одну и ту же дату, поэтому будет 3 разных результата.
Какие самые точные эфемериды по ретроградности. Ретроградность определяется
по угловой скорости планеты. Если угловая скорость с знаком – то планета ретроградная.

>Тут может быть много причин, скорей всего это связано с методикой
>расчета и точностью модели системы.
Есть ли у вас математическое или на С++ описание домов в swedll
Чтобы сделать программу на делфи для расчета домов и чтобы они посностью совпалали с ШЭ

>легче самому написать алгоритмы с нуля
У вас есть полный математический расчет для того чтобы написать свой код на C++ Builder 5 ?
Давайте урезанную версию, которая считает только то о чем было упомянуто раньше.
Можно ли написать на php и чем это будет отличаться от java
Вы занимаетесь астростатискикой но где взять базу данных для анализа статистики.
Проще сделать сайт, на котором будут эфемериды и личный кабинет у каждого пользователя. В котором пользователь сможет ввести важные события в своей жизни.
Например, как в www.vgoroskope.ru
После чего сервер сделает статистику по различным методам прогноза и другим критериям поиска. Например, сделать на сайте фоторобот. Потом можно подключить нейросети Кохонена. А регистрацию на сайте сделать как в www.astropro.ru
Там пользователь регистрируется по рекомендации другого пользователя и система это фиксирует. Можно будет проанализировать синастрию с прогнозом на момент регистрации на сайте и выявить закономерности.



>для этого у меня есть функция startpoint()

>Во первых, что значит "скорость натальных домов" ?
Посмотрите в Неве и в Зет9

есть 2 метода их расчета
1 метод это сдвигать мс пока асц не попадет туда куда надо
2 метод запомнить все пропорции домов и просто в этих пропорциях сместить дома на нужное место
какой метод правильный?
aurak вне форума   Ответить с цитированием
Старый 08.11.2009, 10:57   #111
aurak
Собеседник
 
Регистрация: 07.11.2009
Сообщения: 34
aurak отключил(а) отображение уровня репутации
По умолчанию

помогите решить задачу
система домов Кох
в наличии есть координаты места рождения
и положение Асц
нужно по этим данным найти положение МС
с точностью аналогичной ШЭ
aurak вне форума   Ответить с цитированием
Старый 08.11.2009, 13:03   #112
aurak
Собеседник
 
Регистрация: 07.11.2009
Сообщения: 34
aurak отключил(а) отображение уровня репутации
По умолчанию

есть ли исходники на ШЕ на php
aurak вне форума   Ответить с цитированием
Старый 08.11.2009, 13:08   #113
LordWilex
В отпуске
 
Аватар для LordWilex
 
Регистрация: 01.06.2008
Адрес: Таганрог
Сообщения: 28,983
LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250
По умолчанию

Цитата:
Сообщение от aurak
нет там декларации swe_houses_ex и в ваших описания тоже ее нет
Как это нет, деклорацию функции swe_houses_ex в предыдущем посте я скопировал именно из этого
(официального) файла. Смотрите внимательней.

Цитата:
Могли бы вы предоставить описание на русском функции
swe_houses_ex и swe_houses_armc
что находится в массиве ascmc[0] и что такое armc
Может быть мне за вас еще и программу написать?
Я понимаю все, но боюсь, что без знанимя английского и желания внимательно смотреть текст, вы ШЭ не осилите.
В настоящее время готовится перевод документации к ШЭ на русский язык, там будет все и даже больше, но пока без английского языка, боюсь, вам будет трудно разобраться, функций очень много и все их каждому не разжуешь и в рот не положишь.


swe_houses_ex()


int swe_houses_ex(
double tjd_ut, /* Julian day number, UT - юлианский день */
int32 iflag, /* 0 or SEFLG_SIDEREAL or SEFLG_RADIANS - флаг (лучше поставить ноль)*/
double geolat, /* geographic latitude, in degrees - широта в градусах */
double geolon, /* geographic longitude, in degrees - долгота в градусах */
int hsys, /* house method, ascii code of one of the letters PKORCAEVXHTBG - первая буква в названии дома*/
double *cusps, /* array for 13 doubles - ССЫЛОЧНЫЙ массив 13 элементов*/
double *ascmc); /* array for 10 doubles -ССЫЛОЧНЫЙ массив 10 элементов*/


где:

cusps[0] = 0
cusps[1] = house 1 - 1 дом
cusps[2] = house 2 - 2 дом
etc. - и.т.д.

**

ascmc[0] = Ascendant
ascmc[1] = MC
ascmc[2] = ARMC
ascmc[3] = Vertex
ascmc[4] = "equatorial ascendant"
ascmc[5] = "co-ascendant" (Walter Koch)
ascmc[6] = "co-ascendant" (Michael Munkasey)
ascmc[7] = "polar ascendant" (M. Munkasey)

Цитата:
почему?
если выбрать только некоторые функции такие как
расчет
юлианских дней
основных планет + лилит и лунные узлы
Некоторые функции содрать конечно можно (кроме выделеного жирным шрифтом см. ниже).

Цитата:
чем отличается истинное положение от среднего?
Погрешностью в 1-10 градусов.
Если вас это не смушает, можите использовать средние
Вы где-нибудь видели астрологическую программу, которая считает положения планет с погрешностью +/- 10 градусов?

Вообще-то "среднее положение" это часть алгоритма в аналитеческих методах, необходимая для дальнейших расчетов и не более того, это даже не расчет кеплеровской орбиты


Цитата:
Вы попытались получить доступ к адресу ftp://ftp.astro.com/pub/swisseph/ephe/sweph.zip, который сейчас недоступен.
да, действительно ошибочка вышла, правильный адрес для скачивания: ftp://ftp.astro.com/pub/swisseph/sweph.zip

Цитата:
Что для этого нужно взять исходники и перекомпелировать в билдере?
Именно, но не обязательн в билдере, можно, на пример в GCC или в VC

Цитата:
swisseph-1.64.02-java-src-00.zip
Если их поставить на сайт, то авторы прицепятся про лицензию?
Эти исходники можно устанавливать на виртуальных хостинг или нужен выделенный сервер.
Врядли авторы "придируться", ни кто это не контролирует, это даже официально прописано в документации по ШЭ. Но юридически, если вы собираетесь делать комерческое ПО или ПО с закрытым исходным кодом, то по соглашению вы должны купить лицензию, для бесплатного софта с открытыми исходниками ШЭ бесплатны.

Цитата:

de200.eph Файл "EPH" 41 959 KБ 31.10.1995 23:00:00
de405.eph Файл "EPH" 54 495 KБ 19.07.1997 1:00:00
de406.eph Файл "EPH" 194 763 KБ 19.07.1997 0:00:00
de414.eph Файл "EPH" 54 495 KБ 23.08.2008 0:00:00
de421.eph Файл "EPH" 13 640 KБ 20.08.2008 0:00:00
какие из них наиболее точные и быстрые
Если вас устроят "средние координаты", то, по сравненю с ними, все эти эфемериды сверх-точные
Конечно наиболее точные, те, чей номер больше.
Но хотелось бы обратить внимание, что, на прмер, de421.eph считает координаты, на пример Марса с точностью в несколько метров, как видите точность избыточная.
Для большинства прикладных астрологических задач подойдут любые из них, все равно результат обычно округляться максимум до градусов/минут/секунд.
Поэтому если вы не собираетесь заниматься статистической обработкой данных, скачивать их вообще не нужно. Единственое приимущество - это скорость.

Для большинства астрологических программ достаточно самого файла swedll32.dll в него уже включены эфемериды Мошьера, если вам нужно чуть по точней, то скачайте еще и сами файлы ШЭ.

Цитата:
тут нет DE404 они встроены уже в модуль?
C++ есть исходник DE404. Есть ли смысл с им заниматься или он неточный?

Вы что-то путаете. DE404 не могут быть встроены в модуль, потому что занимают 200 мб ))
Файл swedll32.dll считывает данные с файлов ***.se1 (непосредствено швейцарские эфемериды) или с файлов de***.eph (JPL эфемериды). Когда этих файлов нет, то автоматически используются встроеные в swedll32.dll эфемериды Мошьера (они-то как раз и являются апроксимацией de404, скорей всего вы прочитали про это и решили, что речь идет о них?)

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

Цитата:
Какие самые точные эфемериды по ретроградности.

Вообще-то любые

Цитата:
Есть ли у вас математическое или на С++ описание домов в swedll
Чтобы сделать программу на делфи для расчета домов и чтобы они посностью совпалали с ШЭ
Все это есть в документации по ШЭ.

Цитата:
У вас есть полный математический расчет для того чтобы написать свой код на C++ Builder 5 ?

Расчетный код написать не такая уж проблема, достаточно читать учебники по астрономии )))
Проблема граматно проинтегрировать свои эфемериды :)

Цитата:
Можно ли написать на php и чем это будет отличаться от java
Тем что один код будет написан на php, а другой на java

Цитата:
Вы занимаетесь астростатискикой но где взять базу данных для анализа статистики.
АДБ поищите в интернете, но предупреждаю, она платная и официально сейчас не распространяется.

Цитата:
Посмотрите в Неве и в Зет9

есть 2 метода их расчета
1 метод это сдвигать мс пока асц не попадет туда куда надо
2 метод запомнить все пропорции домов и просто в этих пропорциях сместить дома на нужное место
какой метод правильный?

дык я вам именно оба этих метода описал в письме и даже перевел функцию с басика на дельфи, оба подхода верны. Вы читать вообще умеете? :

"function StartPoint(SPoint: double; pl :double): double;
var d : Double;
begin
d:= pl - SPoint;
If d < 0 Then d += 360;
If d > 360 Then d -= 360;
Result:= d;
end;

Короче, на пример, если вам нужно поставить Асц на Луну.
1. вычисляете координату луны
2. вычисляете любую другую точку (на пример солнце)
3. подставляете из в StartPoint() и получаете координату солнца в
системе домов, где за АСц принята Луна.

MoonSun:=StartPoint(Луна, Солнце);

Если вы хотите просто сместить раскладку домов, в тех же масштабах,
поставив асц на луну, то поочередно прибавляем разницу между Асц и
Луной к каждому из куспидов, если результат больше 360 вычитаем 360,
если меньше 0, - прибавляем 360.

"

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

Цитата:
Сообщение от aurak
есть ли исходники на ШЕ на php
Нет, и не возможно! Но есть возможность вызывать скомпилираваную программу в *nix'сах через php/perl, если ваш хостинг позволяет запускать исполняемые файлы.
К тому же, в последней версии ШЭ есть порт для perl'a.
LordWilex вне форума   Ответить с цитированием
Старый 08.11.2009, 14:01   #115
aurak
Собеседник
 
Регистрация: 07.11.2009
Сообщения: 34
aurak отключил(а) отображение уровня репутации
По умолчанию

>эфемериды Мошьера (они-то как раз и являются апроксимацией de404,
>скорей всего вы прочитали про это и решили, что речь идет о них?)
вот содержание файла readme

plan404 ephemerides

The tables of coefficients were derived by a least squares fit of
periodic terms to JPL's DE404 ephemerides. The periodic
frequencies used were determined by spectral analysis and
comparison with VSOP87 and other analytical planetary theories.
The least squares fit to DE404 covers the interval from -3000 to
+3000 for the outer planets, and -1350 to +3000 for the inner
planets.

The files mer404.c, ven404.c, ..., plu404.c contain numerical
tables for computing the J2000 heliocentric ecliptic longitude,
latitude, and distance of the indicated planet. Each file
includes a table of statistics from a comparison with DE404.
Maximum deviations from DE404 are shown, in arc seconds, over each
interval of 500 Julian years. The figure tabulated for deviation
in radial distance is scaled relative to the mean distance; to
convert to astronomical units, multiply by 4.848e-6 times the
mean distance in au.

The lunar ephemeris files mlr404.c and mlat404.c generate
positions relative to the mean equinox and ecliptic of date.
They assume the DE403 precession constants used in precess.c
and the obliquity in epsiln.c. These differ somewhat from DE200
or IAU constants but are thought to be more accurate.


Steve Moshier
moshier@world.std.com
December, 1995
December, 1996


В каких разных и почему разная?
ретрогррадность она и в африке ретроградность.


читайте сайт
http://www.astropro.ru/?p=frum&id=662
ретроградность Плутона пропадает в
(+03:00)
Астропро 05.06.1970 01:07:44
Зет7 05.06.1970 5:27
разница 4 часа
в Неве ретроградность исчезнет в 05.06.1970 04:09:15

>Вообще-то любые
вопрос о точности был в угловой скорости планет
она в разных эфемеридах разная
aurak вне форума   Ответить с цитированием
Старый 08.11.2009, 14:42   #116
aurak
Собеседник
 
Регистрация: 07.11.2009
Сообщения: 34
aurak отключил(а) отображение уровня репутации
По умолчанию

Цитата:
Есть ли у вас математическое или на С++ описание домов в swedll
Чтобы сделать программу на делфи для расчета домов и чтобы они посностью совпалали с ШЭ
Все это есть в документации по ШЭ.

тоесть в документации есть описание формул для вычисления куспидов домов в разных системах?
Если та то можно ссылку на эти формулы

по поводу java и php
тут сказали что java исполняется на компьютере пользователя
а php на сервере. пользователю приходит только результат

>есть ли исходники на ШЕ на php
>Нет, и не возможно!
почему?
php очень похож на с++
aurak вне форума   Ответить с цитированием
Старый 08.11.2009, 17:08   #117
aurak
Собеседник
 
Регистрация: 07.11.2009
Сообщения: 34
aurak отключил(а) отображение уровня репутации
По умолчанию

Цитата:
StartPoint
дык я вам именно оба этих метода описал в письме и даже перевел функцию с басика на дельфи,
оба подхода верны. Вы читать вообще умеете? :

ваша StartPoint работает с равнодомной системой домов
мне нужна система Коха и Плацидуса поэтому ваша StartPoint
не подходит

в swedll есть фунуция swe_houses_armc
она позволяет расчитать куспиды домов без времени рождения
для этого нужно знать мс долготу и широту

вопрос был в том есть ли аналогичная функция только не для мс
а для асц
Если нет то где взять математические формулы расчета для swe_houses_armc чтобы математик вывел все в обратном порядке

Вариант померять размеры домов и потом сместить все на нужную планету не подходит. Поскольку размеры домов постоянно меняются в зависимости от положения МС

Почему этот форум не влазит на экран по ширине?


По поводу баз данных вы не поняли
мне нужны даты рождения людей и важные события в их жизни для набота статистики по предсказательной астрологии. Ректификацию делать не надо поскольку прогноз будет по тематическим картам

Последний раз редактировалось aurak, 08.11.2009 в 17:10.
aurak вне форума   Ответить с цитированием
Старый 08.11.2009, 21:29   #118
DoReMi
Бухгалтер
 
Аватар для DoReMi
 
Регистрация: 23.04.2008
Адрес: Волгодонск
Сообщения: 338
DoReMi репутация выше +50DoReMi репутация выше +50
По умолчанию

Цитата:
Сообщение от aurak
Почему этот форум не влазит на экран по ширине?

Рискну влезть на эту отвлеченную тему, потому что для меня она больная, как и ряд других, из переписки с администрацией ничего не вытекло, так и не понял, не могут там или не хотят... Вобчем фиг с ним, этим форумом, есть другие.
Однако для тех кто мучается, но продолжает тут обмениваться мнениями и случайно пользуется Firefox, советую установить аддон Default Zoom Level. Он режет таблицу и переносит текст без уменьшения размера шрифта. Кроме того, аддонами AdBlock+ и Abp Element Hiding Helper можно а) удалить смайлики с этого форума, потому что ими пользуются без всякой надобности и меры и б) удалить фреймы со смайликами, которые мельтешат рядом с окошком ввода сообщения.
Вобчем, приятного общения.
DoReMi вне форума   Ответить с цитированием
Старый 08.11.2009, 22:33   #119
aurak
Собеседник
 
Регистрация: 07.11.2009
Сообщения: 34
aurak отключил(а) отображение уровня репутации
По умолчанию

>1. Скопируйте файл: "swedll32.dll" в папку c:/windows/System32
у меня файл swedll32.dll в папке с программой
а файлы эфемерид в другой папке к которой прописан путь в
команде swe_set_ephe_path('c:\swe\');
так можно?

туда можно поставить все виды скачаных эфемерид?

координаты планеты достаю так
uuu:=256;
dd - юлианская дата
dt := swe_deltat(dd);
fl := swe_calc(dd+dt, i,uuu, xx[0], serr);
xx[0] - долгота планеты
xx[3] - угловая скорость планеты

подскажите что значит когда
uuu:=256;
и uuu:=0;
также какие значения должны быть у uuu чтобы подключить все возможные эфемериды


могли бы прислать сюда значение куспидов домов по коху на такую дату
29.4.1952 18:15:0 ЖМТ 1:0:0 52°38'0''N 1°5'0''W

Где можно увидеть каталог всех звезд которые доступны в ШЭ
они находятся в fixstars.cat ?

Последний раз редактировалось aurak, 08.11.2009 в 22:42.
aurak вне форума   Ответить с цитированием
Старый 09.11.2009, 01:02   #120
LordWilex
В отпуске
 
Аватар для LordWilex
 
Регистрация: 01.06.2008
Адрес: Таганрог
Сообщения: 28,983
LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250LordWilex репутация выше +250
По умолчанию

Цитата:
Сообщение от aurak
>эфемериды Мошьера (они-то как раз и являются апроксимацией de404,
>скорей всего вы прочитали про это и решили, что речь идет о них?)
вот содержание файла readme

plan404 ephemerides

The tables of coefficients were derived by a least squares fit of
periodic terms to JPL's DE404 ephemerides. The periodic
frequencies used were determined by spectral analysis and
comparison with VSOP87 and other analytical planetary theories.
The least squares fit to DE404 covers the interval from -3000 to
+3000 for the outer planets, and -1350 to +3000 for the inner
planets.

The files mer404.c, ven404.c, ..., plu404.c contain numerical
tables for computing the J2000 heliocentric ecliptic longitude,
latitude, and distance of the indicated planet. Each file
includes a table of statistics from a comparison with DE404.
Maximum deviations from DE404 are shown, in arc seconds, over each
interval of 500 Julian years. The figure tabulated for deviation
in radial distance is scaled relative to the mean distance; to
convert to astronomical units, multiply by 4.848e-6 times the
mean distance in au.

The lunar ephemeris files mlr404.c and mlat404.c generate
positions relative to the mean equinox and ecliptic of date.
They assume the DE403 precession constants used in precess.c
and the obliquity in epsiln.c. These differ somewhat from DE200
or IAU constants but are thought to be more accurate.


Steve Moshier
moshier@world.std.com
December, 1995
December, 1996

Это и есть эфемериды Мошьера, тут как раз и говориться, о том что пердставляют собой они интерполяционные коэффициенты, полученые путем апроксимации эфемерид DE404 методом наименьших квадратов.
Кстати, скачать их в чистом виде без Швейцарских эфемерид можно на сайте Мошьера http://www.moshier.net/ (тут есть еще куча других интересных алгоритмов, на пример, интегратор, который, как я подозреваю, и был использован авторами ШЭ для генерации эфемерид астероидов).

Цитата:
Сообщение от aurak
В каких разных и почему разная?
ретрогррадность она и в африке ретроградность.


читайте сайт
http://www.astropro.ru/?p=frum&id=662
ретроградность Плутона пропадает в
(+03:00)
Астропро 05.06.1970 01:07:44
Зет7 05.06.1970 5:27
разница 4 часа
в Неве ретроградность исчезнет в 05.06.1970 04:09:15

>Вообще-то любые
вопрос о точности был в угловой скорости планет
она в разных эфемеридах разная

Вы путаете эфемериды и астрологические программы, это не одно и то же :)))
Во всех современных эфемеридах точность вычисления координат примерно одинаковая и почти все ини так или иначе опираются на DE** теории.
Другой вопрос, как та или иная программа использует эти эфемериды.
Точность вычисления момента перехода в ретроградность зависит от многих причин:

1. Относительно чего расчитано положение Земли и вообще что имеется в виду под координатами Земли (барицентр Земля/Луна, Относительно центра Земли, или относительно топоцентра). Какая из этих систем отсчета "правильная" вопрос скорей философский (я, на пример, затрудняюсь ответить на этот вопрос), но координаты планеты будут отличаться на несколько сикунд друг от друга, а следовательно и момент наступления ретроградности.

2. Относительно чего и по какой формуле вычислен горизонтальный параллакс, а следовательно какое расстояние до объекта. То же самое, вариантов много, и какой из них "правильный", сказать трудно, но разница в пару угловых секунд при вычислении момента наступления ретроградности гарантированна.

3. Используется ли поправки на аберацию и скорость света? Вопрос тоже философский, какие координаты использовать истиные или видимые? Свет от Земли до Плутона идет 4,5 часа. т.е. реально момент наступления ретроградности произойдет на 4,5 раньше того, как мы это увидим в телескоп. Если мы принимаем, что астрологическое влияние происходит мгновенно, то скорость света учитывать не следует, если мы увязывыаем астрологическое влияние со светом, то скорость света учитывать обязательно.
LordWilex вне форума   Ответить с цитированием
Ответ


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

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

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


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


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