Вверх ↑
Этот топик читают: Гость
Разработчик
Ответов: 26303
Рейтинг: 2146
#61: 2014-11-13 22:31:58 ЛС | профиль | цитата
kir1381 писал(а):
В экселе (который я ранее выкладывал)

Я ни одного файла экселя от Вас не встречал. В том файле, который я скачал с указанной ссылки, нет такой функции. Нет такой функции и в файле Astro.vb. Просьба выложить файл для ознакомления, в котором есть такая функция, желательно, с начальными параметрами для тестирования.
------------ Дoбавленo в 23.31:
kir1381 писал(а):
Это первая попытка использования программы HiAsm для написания чего либо без знания программирования

Поставленная задача не относится к разряду "без знания программирования", тк использует стороннее dll.
карма: 22

0
Ответов: 68
Рейтинг: 1
#62: 2014-11-13 22:46:56 ЛС | профиль | цитата
Уважаемый nesco , Вот выкладываю всю связку функций написанных в VB.NET Так же функцию на Делфи и немного инфы о функциях.

https://yadi.sk/d/TukiBwq9chMp9

Спасибо за помощь и раз у нас так получилось небольшие недопонимания, то давайте тогда без обид и т.д вы называете цену, если все ок то делаете.
------------ Дoбавленo в 23.46:
nesco писал(а):

Поставленная задача не относится к разряду "без знания программирования", тк использует стороннее dll.


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

0
Разработчик
Ответов: 26303
Рейтинг: 2146
#63: 2014-11-13 22:53:26 ЛС | профиль | цитата
kir1381 писал(а):
Вот выкладываю всю связку функций написанных в VB.NET

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

0
Ответов: 68
Рейтинг: 1
#64: 2014-11-13 23:17:06 ЛС | профиль | цитата
Вот - https://yadi.sk/d/o56Qql4YchPk9
карма: 1

0
Разработчик
Ответов: 26303
Рейтинг: 2146
#65: 2014-11-13 23:30:43 ЛС | профиль | цитата
У меня есть еще один вопрос, почему давление равно 800 мбар, это же 600 мм рт. столба, где такое давление? Ведь нормальное давление должно быть 760 мм рт. столба или 1013,25 мбар, да и температура 15 градусов как-то сильно притянута за уши
карма: 22

0
Ответов: 68
Рейтинг: 1
#66: 2014-11-13 23:36:49 ЛС | профиль | цитата
nesco писал(а):

У меня есть еще один вопрос, почему давление равно 800 мбар, это же 600 мм рт. столба, где такое давление? Ведь нормальное давление должно быть 760 мм рт. столба или 1013,25 мбар, да и температура 15 градусов как-то сильно притянута за уши


Вот тут я не в курсе. Брал так сказать значения по умолчанию , которые были даны на сайте в описании как работать с DLL. - http://sweru.lordwilex.ru/
карма: 1

0
Разработчик
Ответов: 26303
Рейтинг: 2146
#67: 2014-11-14 03:41:20 ЛС | профиль | цитата
Решение задачи -- swisseph_003.sha

Необходимо использовать только последние модули, тк есть некоторые небольшие правки. И еще раз надо обратить внимание на давление и темепературу -- давление подставляется в мбарах (не в мм рт. столба), а температура в градусах Цельсия на той высоте, которая подставляется в формулу.
карма: 22

0
файлы: 1swisseph_003.sha [24KB] [410]
Ответов: 68
Рейтинг: 1
#68: 2014-11-14 08:40:55 ЛС | профиль | цитата
NESCO , к сожалению у меня вылетает ошибка.
карма: 1

0
Ответов: 16884
Рейтинг: 1239
#69: 2014-11-14 08:52:21 ЛС | профиль | цитата
kir1381 писал(а):
к сожалению у меня вылетает ошибка
Ну, блин, даёшь! Лучше рассказал бы какая или nesco должен сам догадаться ?

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 68
Рейтинг: 1
#70: 2014-11-14 09:00:14 ЛС | профиль | цитата
Вот такая - SwissEph file 'fixstart.cat' not found in PAT
карма: 1

0
Разработчик
Ответов: 26303
Рейтинг: 2146
#71: 2014-11-14 09:34:42 ЛС | профиль | цитата
kir1381 писал(а):
NESCO , к сожалению у меня вылетает ошибка.

Странно, но у меня нет этой ошибки. Видимо, компилятор не Delphi, а FPC. Вот эту схему попробуй -- swisseph_004.sha
карма: 22

0
файлы: 1swisseph_004.sha [24.1KB] [554]
Ответов: 16884
Рейтинг: 1239
#72: 2014-11-14 11:03:39 ЛС | профиль | цитата
Обмен опытом.
Если каждый следующий расчёт зависит от предыдущего, то я делаю так :swisseph_005.rar
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
1
файлы: 1swisseph_005.rar [6.8KB] [288]
Голосовали:nesco
Разработчик
Ответов: 26303
Рейтинг: 2146
#73: 2014-11-14 11:16:50 ЛС | профиль | цитата
Логично. Хотя может и не стоило бы рассчитывать все параметры, тк общий параметр -- это только юлианская дата
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#74: 2014-11-14 11:28:15 ЛС | профиль | цитата
nesco писал(а):
тк общий параметр -- это только юлианская дата
Если честно, то я не вникал.
Просто запустил и нажал Rise.
Кстати, а юлианская дата у них - точно такая как и в SQLite (чего не скажешь про наш DatePicker )
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26303
Рейтинг: 2146
#75: 2014-11-14 12:09:35 ЛС | профиль | цитата
Вот так, КМК, более интересный вариант -- swisseph_006.sha
карма: 22

0
файлы: 1swisseph_006.sha [25KB] [620]
Сообщение
...
Прикрепленные файлы
(файлы не залиты)