Старый 04.05.2014, 11:36   #1
Metikos
Собеседник
 
Аватар для Metikos
 
Регистрация: 02.05.2014
Сообщения: 19
Metikos отключил(а) отображение уровня репутации
По умолчанию Astrologia & Excel

Привет Всем!
Мне нужна помощь.
Хочу сделать Excel автономным, т.е. независимый от внешних архивов. Так как все астропроцесоры для профессионалов, но совсем не удобные для исследования. Я создал всё в Excel-е но “пристегнул” к нему Эфимериды (1965-2040) которые увеличивают обьём на 5 МБ. Вся программа достигает 9 МБ, и это только с главными планетами. Если прибавлю и астероиды и фиктивные, то достигнет 15 МБ, это уже слишком много. Всё скоро это выставлю здесь, свободно, без пасс. Кто сможет улучшит, буду рад.
Я нашёл в инете астрономические алгоритмы и они рассчитывают координаты главных планет.
Но, рассчитывают (мне кажется) гелиоцентричные орбиты. Вопрос такой: нужна ещё одна формула (поправка) чтобы совпали со швейцарскими эфимеридами. В учебнике Jean-Meeus не смог разобраться, не хватает мозговых клеток.
Второй вопрос: кто может мне подсказать, как сделать диаграммы астрологических карт в Excel-е, хотя бы в грубом виде. Круг получается, а расставит планеты не хватает опять этих клеток.
Третий вопрос: есть формулы для астероидов и фиктивных планет?
Знаю, прошу много… (а вдруг…)
Прикрепляю архив, может кто-нибудь разберётся и подскажет.
Metikos вне форума   Ответить с цитированием
Старый 04.05.2014, 11:43   #2
Metikos
Собеседник
 
Аватар для Metikos
 
Регистрация: 02.05.2014
Сообщения: 19
Metikos отключил(а) отображение уровня репутации
По умолчанию

File
Вложения
Тип файла: zip ASTROFUNCTIONS.zip (238.6 Кб, 482 просмотров)
Metikos вне форума   Ответить с цитированием
Старый 04.05.2014, 11:46   #3
Metikos
Собеседник
 
Аватар для Metikos
 
Регистрация: 02.05.2014
Сообщения: 19
Metikos отключил(а) отображение уровня репутации
По умолчанию

Прикрепляю архив для тех кто балуется с Солнцем и Луной в Excel-е. Коорд рассчитывает в точность со Швейцарскими эфимеридами. В расчётах есть лунные дни и фазы, и много “бесполезные” информации. Условии только такие: установит шрифты которые находятся в зипе и Excel от 2007 и дальше. Если знаете координаты ваших планет натальной карты можете скопировать в лист BASE и у Вас будут аспекты на любой день. Отвечу на любой вопрос. Так же, если есть советы или предложение, рад принять.
Вложения
Тип файла: zip SUNMOON.ZIP (1.29 Мб, 493 просмотров)
Metikos вне форума   Ответить с цитированием
Старый 04.05.2014, 11:50   #4
Metikos
Собеседник
 
Аватар для Metikos
 
Регистрация: 02.05.2014
Сообщения: 19
Metikos отключил(а) отображение уровня репутации
По умолчанию

На вид должен выходит примерно так.
Metikos вне форума   Ответить с цитированием
Старый 04.05.2014, 11:51   #5
Metikos
Собеседник
 
Аватар для Metikos
 
Регистрация: 02.05.2014
Сообщения: 19
Metikos отключил(а) отображение уровня репутации
По умолчанию

SUNMOON
Изображения
Тип файла: jpg SUNMOON.jpg (134.9 Кб, 329 просмотров)
Metikos вне форума   Ответить с цитированием
Старый 05.05.2014, 08:44   #6
DoReMi
Бухгалтер
 
Аватар для DoReMi
 
Регистрация: 23.04.2008
Адрес: Волгодонск
Сообщения: 356
DoReMi репутация выше +50DoReMi репутация выше +50
По умолчанию

Цитата:
Сообщение от Metikos
Отвечу на любой вопрос. Так же, если есть советы или предложение, рад принять.

Я повторюсь наверное, но стране не нужен капиталистический ёксель, он либо стоит денег, которых он не стоит, либо придётся пользоваться ворованным.
Поэтому основной вопрос повестки дня/месяца/года/тысячелетия - это использование ШЭ в бесплатном OpenOffice.org и его форках (LibreOffice, Lotus Symphony).
DoReMi вне форума   Ответить с цитированием
Старый 05.05.2014, 08:52   #7
ольвия
Собеседник
 
Аватар для ольвия
 
Регистрация: 07.02.2011
Адрес: Владимирская Русь
Сообщения: 70,733
ольвия репутация выше +2000ольвия репутация выше +2000ольвия репутация выше +2000ольвия репутация выше +2000ольвия репутация выше +2000ольвия репутация выше +2000ольвия репутация выше +2000ольвия репутация выше +2000ольвия репутация выше +2000ольвия репутация выше +2000ольвия репутация выше +2000
По умолчанию

Цитата:
Сообщение от DoReMi
Я повторюсь наверное, но стране не нужен капиталистический ёксель, он либо стоит денег, которых он не стоит, либо придётся пользоваться ворованным.
Поэтому основной вопрос повестки дня/месяца/года/тысячелетия - это использование ШЭ в бесплатном OpenOffice.org и его форках (LibreOffice, Lotus Symphony).

Товарищ комбайнер, а кроме критики всех на свете прог, у вас есть еще занятия ? Во всех темах уже пометили. В другие только читать ходите. Вы же вроде спортивной астрологией занимались ? Вот придите - покажите класс
__________________
"Если вы плохо учили в школе физику и химию,то весь мир будет наполнен для вас чудесами и волшебством"(с)
ольвия вне форума   Ответить с цитированием
Старый 05.05.2014, 09:24   #8
DoReMi
Бухгалтер
 
Аватар для DoReMi
 
Регистрация: 23.04.2008
Адрес: Волгодонск
Сообщения: 356
DoReMi репутация выше +50DoReMi репутация выше +50
По умолчанию

Если у вас что-то личное ко мне - есть ЛС. Я написал по теме топика.
DoReMi вне форума   Ответить с цитированием
Старый 06.05.2014, 08:10   #9
Metikos
Собеседник
 
Аватар для Metikos
 
Регистрация: 02.05.2014
Сообщения: 19
Metikos отключил(а) отображение уровня репутации
По умолчанию

Цитата:
Сообщение от DoReMi
Я повторюсь наверное, но стране не нужен капиталистический ёксель, он либо стоит денег, которых он не стоит, либо придётся пользоваться ворованным.
Поэтому основной вопрос повестки дня/месяца/года/тысячелетия - это использование ШЭ в бесплатном OpenOffice.org и его форках (LibreOffice, Lotus Symphony).

Я с Вами согласен. В жизни отдал много за легальные программы, так как на предприятиях на западе законы очень строгие, и какое разочарование когда эти программы через год два “устарели” , и чтобы не отставать, приходилось покупать новые версии.
Сейчас мы тоже на ворованном, фирмы сами виноваты, а может это им и надо. Поэтому я “за!“, за “бесплатные” и распространение информаций и опыт.
OpenOffice у меня был как только он вышел, но был тогда тяжеловат и грубоватый, по этому остановился. Но всё таки попробую опять, может последние версии стали лучше.
Metikos вне форума   Ответить с цитированием
Старый 06.05.2014, 08:12   #10
Metikos
Собеседник
 
Аватар для Metikos
 
Регистрация: 02.05.2014
Сообщения: 19
Metikos отключил(а) отображение уровня репутации
По умолчанию

Но здесь тема о другом. Создать карту на Excel-е у меня получилось. Если кто может уменьшит размер… а то 0,4 МБ для диаграммы кажется многовато.
Изображения
Тип файла: jpg CHART.jpg (68.4 Кб, 225 просмотров)
Вложения
Тип файла: zip CHART.ZIP (275.4 Кб, 254 просмотров)
Metikos вне форума   Ответить с цитированием
Старый 06.05.2014, 09:47   #11
DoReMi
Бухгалтер
 
Аватар для DoReMi
 
Регистрация: 23.04.2008
Адрес: Волгодонск
Сообщения: 356
DoReMi репутация выше +50DoReMi репутация выше +50
По умолчанию

Цитата:
Сообщение от Metikos
OpenOffice у меня был как только он вышел, но был тогда тяжеловат и грубоватый, по этому остановился. Но всё таки попробую опять, может последние версии стали лучше.

Я не вижу проблем с использованием бесплатных офисных пакетов, они год от года всё лучше), на уровне пользователя во всяком случае. Всё необходимое есть. А вот с подключением Швейцарских Эфемерид в них проблема, я предполагаю в совместимости типов - когда пытался подключать все Int пришлось переделывать в Long (или наоборот, не помню уже). Да и с передачей массивов какая-то засада, как мне показалось. Вобщем все попытки мои закончились крашами и подвисаниями. Как бы в итоге не пришлось либо переписывать исходники библиотеки, либо писать свою библиотеку-прокладку.
Если бы у Вас был проект на бесплатном - я бы с удовольствием подключился по мере сил и возможностей. И в идеале можно было бы сделать совместимый с обоими офисами комплект)

Цитата:
Сообщение от Metikos
Создать карту на Excel-е у меня получилось

К сожалению в работе посмотреть не могу, но в восторге от идеи.
Насчет минимизации размера - в наш терабайтный век это уже не актуально. :)
DoReMi вне форума   Ответить с цитированием
Старый 06.05.2014, 10:19   #12
Metikos
Собеседник
 
Аватар для Metikos
 
Регистрация: 02.05.2014
Сообщения: 19
Metikos отключил(а) отображение уровня репутации
По умолчанию

К сожалению все мы на крючке. Много программ и все нам нужны, всегда что-то не хватает. Приходиться остановится на то что привыкли и по душе, иначе заменим стул с унитазом...
Metikos вне форума   Ответить с цитированием
Старый 06.05.2014, 12:53   #13
Strijar
Собеседник
 
Аватар для Strijar
 
Регистрация: 02.07.2007
Адрес: Всеволожск, Россия
Сообщения: 518
Strijar репутация выше +350Strijar репутация выше +350Strijar репутация выше +350Strijar репутация выше +350
По умолчанию

Для исследований есть софт. Бесплатный. И под бесплатные ОС в том числе. Пишите в личку если интересно, хотя вся информация на форуме доступна
Strijar вне форума   Ответить с цитированием
Старый 08.05.2014, 07:22   #14
Metikos
Собеседник
 
Аватар для Metikos
 
Регистрация: 02.05.2014
Сообщения: 19
Metikos отключил(а) отображение уровня репутации
По умолчанию

Карту удалось снизить до меньше 0.08 МБ и поправил ASC, сделал его горизонтальным.
Изображения
Тип файла: jpg CHART-new.jpg (105.0 Кб, 160 просмотров)
Вложения
Тип файла: zip CHART-1.ZIP (85.2 Кб, 123 просмотров)
Metikos вне форума   Ответить с цитированием
Старый 08.05.2014, 11:35   #15
Metikos
Собеседник
 
Аватар для Metikos
 
Регистрация: 02.05.2014
Сообщения: 19
Metikos отключил(а) отображение уровня репутации
По умолчанию

Без кнопочки не обошлось...
Вложения
Тип файла: zip CHART-1.ZIP (92.2 Кб, 217 просмотров)
Metikos вне форума   Ответить с цитированием
Старый 13.05.2014, 11:36   #16
DoReMi
Бухгалтер
 
Аватар для DoReMi
 
Регистрация: 23.04.2008
Адрес: Волгодонск
Сообщения: 356
DoReMi репутация выше +50DoReMi репутация выше +50
По умолчанию

Я тут посмотрел, на Софткей отдельно Excel-2013 стоит не так уж дорого - 1700 рублей. Может и стоит купить.
DoReMi вне форума   Ответить с цитированием
Старый 13.05.2014, 13:04   #17
Metikos
Собеседник
 
Аватар для Metikos
 
Регистрация: 02.05.2014
Сообщения: 19
Metikos отключил(а) отображение уровня репутации
По умолчанию

Цитата:
Сообщение от DoReMi
Я тут посмотрел, на Софткей отдельно Excel-2013 стоит не так уж дорого - 1700 рублей. Может и стоит купить.

...зачем?
есть же на е-Муле, и работают прекрасно...
Metikos вне форума   Ответить с цитированием
Старый 13.05.2014, 13:08   #18
Metikos
Собеседник
 
Аватар для Metikos
 
Регистрация: 02.05.2014
Сообщения: 19
Metikos отключил(а) отображение уровня репутации
По умолчанию

Расчёт домов на Excel (система Плацидус)

Пример на дату 1 Января 2014 в 12:00, Москва, широта 55°45’00”. долгота 37°35’00”., ч.п. + 3

1. Переводим широту и долготу в десятичный формат и потом в радианы.

2. Переводим дату и время в Юлианский день.

=JD(ГОД(G3);МЕСЯЦ(G3);ДЕНЬ(G3);ЧАС(G4);М ИНУТЫ(G4);СЕКУНДЫ(G4);G6) (где G6=ч.п.)
=2456658,875

3. Находим местное звёздное время с функцией STARTL в десятичном формате. Это приблизительное место Середины Неба (MC).

=StarTL(G11;H8) - где G11=Юлианский день и H8=долгота в десятичном формате
= 273,5213846

***Если нужно звёздное время в часах то делим на 15 и на 24.
= 273,5213846/15/24 = 18:14:05

4. С функцией ECLIPTIC находим эклиптику.

=Ecliptic(G11) - где G11=Юлианский день

5. Результаты от 3 и 4 преобразуем в радианы.
Широту в радианах назовём LAT, местное звёздное время в радианах RAMC и эклиптику в радианах Oe.

6. Начинаем с Середины Неба (MC). Функция МС

=MC(RAMC;Oe)=1,627196555 - Это в радианах, надо перевести в градусы и результат будет
=93,23149504

Так как между 93,23149504 и 273,5213846 есть большая разница надо прибавить 180 градусов

= 93,23149504 + 180 = 273,231495 - Это точное место Середины Неба (MC).

7. 11-ый Дом находим с функцией Home11.

=Home11(LAT;RAMC;Oe) =1,916234912 - переводим в градусы и результат будет =109,792173

Здесь нужна тоже поправка, так как между домами разница не должна превышать 90 градусов. Поэтому прибавляем 180 градусов.

= 109,792173 + 180 = 289,792173 - Это точное место куспида 11 Дома.

***Поправку можно сделать и так, если: Н11=109,792173

=ЕСЛИ(ABS(МС-Н11)>90;Н11+180;Н11)

***Не забывать, когда прибавляем по 180 градусов и результат превышает 360 градусов, отнимаем 360.

8. Остальные дома высчитываем так же.

ASC -> =Asca(LAT;Ramc;Oe)
II -> =Home2(LAT;Ramc;Oe)
III -> =Home3(LAT;Ramc;Oe)
XII -> =Home12(LAT;Ramc;Oe)

9. Дома от 4 до 9, отнимаем или прибавляем по 180 градусов.

IV= MC-180
V = XI-180
VI=XII-180

VII=ASC+180
VIII=II+180
IX=III+180

10. Точность с ZET выходит достаточно большая, кроме II и XII дома. Конечно разница не превышает 1 градуса.
11. Точность относительная, так как в долготе 1 секунда переводится на длину земли примерно 30 метров.
Долгота Москвы 37°35’00”. Если поставит 37°35’09”, то МС выходит с точностью, но 9 секунды это примерно 270 метров, поэтому точности нигде не бывает. Долготу и Широту все сайты дают разные.

*** Вставил пример здесь если кому интересно...
Изображения
Тип файла: jpg HOUSES.jpg (103.7 Кб, 163 просмотров)
Вложения
Тип файла: zip HOUSES.ZIP (53.2 Кб, 188 просмотров)
Metikos вне форума   Ответить с цитированием
Старый 13.05.2014, 13:18   #19
DoReMi
Бухгалтер
 
Аватар для DoReMi
 
Регистрация: 23.04.2008
Адрес: Волгодонск
Сообщения: 356
DoReMi репутация выше +50DoReMi репутация выше +50
По умолчанию

Цитата:
Сообщение от Metikos
...зачем?
есть же на е-Муле, и работают прекрасно...

Пока РФ пока не определилась с демократическими ценностями, я предпочитаю быть честным. Когда Запад окончательно будет послан и ворованный софт будет снова стоять повсеместно в госучреждениях, как раньше - можно будет расслабиться.
DoReMi вне форума   Ответить с цитированием
Старый 05.10.2014, 08:20   #20
Dremlo
Banned
 
Аватар для Dremlo
 
Регистрация: 22.12.2009
Сообщения: 37
Dremlo репутация выше +10
По умолчанию

Metikos, на каком этапе ваш труд, поделитесь чего удалось добиться в Excel?
Dremlo вне форума   Ответить с цитированием
Ответ


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

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

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


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


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