Друк

[Гість]

Ласкаво просимо, Гість. Будь ласка, увійдіть або зареєструйтеся.
08 Червня 2025, 13:17:49

1 година 1 день 1 тиждень 1 місяць Назавжди

Увійти

[Новини]

•    Новини
•      Астрономія
•      Астрозаходи
•    Життя клуба
•      Новини
•      Проекти
•      Заходи
•      Звіти про спостереження
•      Документи
•    Статті
•      Обладнання та телескопи
•      Спостереження
•      Астрофотографія
•      Астрософт
•      Астрономія в Україні
•      Астрономи шуткують
•      Інше
•     
•      Файловий архів

Наш канал

Наші сайти

Астро-сайти

Програми

Наш канал

Наші сайти

Астро-сайти

Програми

[Серега]

Про пек забудь... Из-за нечетного передаточного соотношения промежуточного редуктора он со временем "съезжает"
Но часть периодики он убирает.

но когда то рано или поздно все равно повторяется снова?

[MaxMan]

подозреваю что тут проблему легче всего решить энкодерами. И про гидирование можно забыть.

[sashka13]

тут вопрос такой, когда картес сам таргетит задержка есть?

[nebula]

Извните, может не совсем понимаю о чем речь, но драйвер "подтверждает" когда цель достигнута.
На соседском форуме, у белорусов, Андрей Прокопович делал что-то похожее на Вашу задачу. Попробуйте найти его.

[sashka13]

да, естьм такой
http://stardome.belastro.net/articles/7/programma-avtomatizatsii-nablyudenii

[tlgleonid]

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

var
  Form1: TForm1;
  FStartThread: TStartThread;
  FP1Thread: TP1Thread;
  FP2Thread: TP2Thread;

implementation

{$R *.dfm}
constructor TStartThread.Create;
begin
  FreeOnTerminate := True;
  inherited Create(False);
end;

constructor TP1Thread.Create;
begin
  FreeOnTerminate := True;
  inherited Create(False);
end;


procedure TStartThread.Execute;
var wnd2, wnd, TheChildHandle: HWND;
 rWindow, bWindow,sWindow: string;
begin
sWindow := 'PHD Guiding 1.12.0  -  www.stark-labs.com (Log active)';
bWindow:='wxWindow@007CF070NR';
rWindow:='Cam Dialog';
wnd := FindWindow(nil,Pchar(sWindow));
if (wnd=0) then
   begin
   sWindow := 'PHD Guiding 1.12.0  -  www.stark-labs.com';
   wnd := FindWindow(nil,Pchar(sWindow));
   end;
TheChildHandle := FindWindowEx(wnd, 0, nil, PChar(rWindow));
TheChildHandle:= GetWindow(TheChildHandle ,GW_HWNDPREV);
TheChildHandle:= GetWindow(TheChildHandle ,GW_HWNDPREV);
TheChildHandle:= GetWindow(TheChildHandle ,GW_HWNDPREV);
TheChildHandle:= GetWindow(TheChildHandle ,GW_HWNDPREV);
TheChildHandle:= GetWindow(TheChildHandle ,GW_HWNDPREV);
TheChildHandle:= GetWindow(TheChildHandle ,GW_HWNDPREV);
SendMessage(TheChildHandle, WM_LButtonDown, 1, 1);
SendMessage(TheChildHandle, WM_LButtonUP, 1, 1);
end;

procedure TP1Thread.Execute;
var wnd2, wnd, TheChildHandle: HWND;
 rWindow, bWindow,sWindow: string;
begin
sWindow := 'PHD Guiding 1.12.0  -  www.stark-labs.com (Log active)';
bWindow:='wxWindow@007CF070NR';
rWindow:='Cam Dialog';
wnd := FindWindow(nil,Pchar(sWindow));
if (wnd=0) then
   begin
   sWindow := 'PHD Guiding 1.12.0  -  www.stark-labs.com';
   wnd := FindWindow(nil,Pchar(sWindow));
   end;
SetActiveWindow(wnd);
SetForegroundWindow(wnd);
TheChildHandle := FindWindowEx(wnd, 0, nil, PChar(rWindow));
TheChildHandle:= GetWindow(TheChildHandle ,GW_HWNDPREV);
TheChildHandle:= GetWindow(TheChildHandle ,GW_HWNDPREV);
TheChildHandle:= GetWindow(TheChildHandle ,GW_HWNDPREV);
TheChildHandle:= GetWindow(TheChildHandle ,GW_HWNDPREV);
TheChildHandle:= GetWindow(TheChildHandle ,GW_HWNDPREV);
SendMessage(TheChildHandle, WM_LButtonDown, 1, 1);
SendMessage(TheChildHandle, WM_LButtonUP, 1, 1);
end;



procedure TForm1.ButtonStart(Sender: TObject);
begin
  FStartThread := TStartThread.Create;
  FStartThread.Priority := tpLower;
end;


procedure TForm1.ButtonFinish(Sender: TObject);
var wnd2, wnd, TheChildHandle: HWND;
 rWindow, bWindow,sWindow: string;
begin
sWindow := 'PHD Guiding 1.12.0  -  www.stark-labs.com (Log active)';
bWindow:='wxWindow@007CF070NR';
rWindow:='Cam Dialog';
wnd := FindWindow(nil,Pchar(sWindow));
if (wnd=0) then
   begin
   sWindow := 'PHD Guiding 1.12.0  -  www.stark-labs.com';
   wnd := FindWindow(nil,Pchar(sWindow));
   end;
TheChildHandle := FindWindowEx(wnd, 0, nil, PChar(rWindow));
TheChildHandle:= GetWindow(TheChildHandle ,GW_HWNDPREV);
TheChildHandle:= GetWindow(TheChildHandle ,GW_HWNDPREV);
TheChildHandle:= GetWindow(TheChildHandle ,GW_HWNDPREV);
TheChildHandle:= GetWindow(TheChildHandle ,GW_HWNDPREV);
SendMessage(TheChildHandle, WM_LButtonDown, 1, 1);
SendMessage(TheChildHandle, WM_LButtonUP, 1, 1);
end;




procedure TForm1.ButtonFindStar(Sender: TObject);
var wnd2, wnd, TheChildHandle,wmenu,wsmenu: HWND;
 rWindow, bWindow,sWindow: string;
begin

sWindow := 'PHD Guiding 1.12.0  -  www.stark-labs.com (Log active)';
rWindow:='Cam Dialog';
wnd := FindWindow(nil,Pchar(sWindow));
if (wnd=0) then
   begin
   sWindow := 'PHD Guiding 1.12.0  -  www.stark-labs.com';
   wnd := FindWindow(nil,Pchar(sWindow));
   end;
wmenu:=GetMenu(wnd);
wsmenu:=GetSubMenu(wmenu,2);
SendMessage(wnd, WM_INITMENU, wmenu, 0);
SendMessage(wnd, WM_INITMENUPOPUP, wsmenu, 2);
SendMessage(wnd, WM_COMMAND,$0001008C, 0);  // Alt+S
end;



procedure TForm1.ButtonGuide(Sender: TObject);
begin
  FP1Thread := TP1Thread.Create;
  FP1Thread.Priority := tpLower;
end;

[KMM]

да, естьм такой
http://stardome.belastro.net/articles/7/programma-avtomatizatsii-nablyudenii

Ага, только автор как и на форуме, так и в этой заметке пишет, что он эту программу никому не раздаёт, потому что она не доработана, а он не хотел бы раздавать полусырую вещь.

[SP]

Всё-таки, возвращаясь к вопросу. Попробуем пока первое.
1. У меня есть файл записи периодики. Как натренировать РЕС?
2. Где и что подкрутить, чтобы уменьшить люфты по альфе до минимума?
^{В сети нашёл несколько роликов тюнинга ЕК-6 с разборкой, но это пока слишком радикальная мера.
Кстати, монти всё-таки чуть отстаёт, даже если труба перевешивает к западу. Поставил "кометную" скорость 15,17. Осталось дрыганье убрать...}

[tlgleonid]

1. У меня есть файл записи периодики. Как натренировать РЕС?

1.1 Заходишь в программу PecPrep
1.2 File->Load загужаешь свою периодику. Программа ее анализирует и строит кривую.
1.3 File->Save EQMOD PEC File
2.1 Заходишь в конфигурационное окно EQMOD
2.2 Вкладка PEC, кликаешь на иконку открытия файла
2.3 Выбираешь файл, полученный на этапе 1.3

2. Где и что подкрутить, чтобы уменьшить люфты по альфе до минимума?
^{В сети нашёл несколько роликов тюнинга ЕК-6 с разборкой, но это пока слишком радикальная мера.}

Вполне нормальная мера. ИМХО с нее стоит начинать работу с монтировкой, пока она новая.
ИМХО полностью убирать люфт нельзя, иначе где-то будет подклинивать и появится качение по DEC.

Кстати, монти всё-таки чуть отстаёт, даже если труба перевешивает к западу. Поставил "кометную" скорость 15,17. Осталось дрыганье убрать...[/sup]

Если отставание устойчиво, то неверно установлена полярка. Юзай EQAlign

[SP]

ИМХО с нее стоит начинать работу с монтировкой, пока она новая.

А если нет? Так она хоть как-то работает

Если отставание устойчиво, то неверно установлена полярка. Юзай EQAlign

Тут я чё-то не понял. Сдвиг полярки приводит к уплыванию звезды по DEC. По этой оси я добился - звезда практически мёртво стоит. Как сдвиг оси может влиять на отставание по альфе?
^{Кстати, оставание не равномерное, а дрыгательное: образно говоря два шага вперёд, три назад. Как я это вижу: навожу на дост. яркую звезду, включаю КХУ-6 на непрерывную съёмку 1 кадр/сек, вывожу звезду на край окна (по нему легко визуально контролировать перемещение).}

[LifeIsGood]

По-моему, неправильнов выставленная полярка влияет и на DEC и на RA.

[tlgleonid]

А если нет? Так она хоть как-то работает

Если делать по видеороликам Дениса Саквы, беды не наделаешь и все будет работать. Тем более, что ты технарь, а не гуманитарий!

Тут я чё-то не понял. Сдвиг полярки приводит к уплыванию звезды по DEC. По этой оси я добился - звезда практически мёртво стоит. Как сдвиг оси может влиять на отставание по альфе?
^{Кстати, оставание не равномерное, а дрыгательное: образно говоря два шага вперёд, три назад. Как я это вижу: навожу на дост. яркую звезду, включаю КХУ-6 на непрерывную съёмку 1 кадр/сек, вывожу звезду на край окна (по нему легко визуально контролировать перемещение) и тихо матерюсь}

Очень просто. Ошибка в установке полярной оси имеет две компоненты. Одна из них направлена вдоль линии звезда-полюс, вторая ей перпендикулярна. Перпендикулярная составляющая проявляется в смещении звезды по оси склонений, а паралельная проявляется в изменении скорости слежения по отношению к звездной. Звезда начинает смещаться по RA. Естественно, что на это движение будет накладываться периодика монтировки и величины смещения соизмеримы со скоростью отсавания, посему звезда будет смещаться с непостоянной скоростью, а как бы рывками, характер которых будет зависеть от характера периодики.

Бывает, что на определенное направление все выставлено идеально, а на других азимутах наблюдается смещение, как будто ось не до конца выставлена. В этом случае виновата ошибка конусности.
Устранение ошибки конусности - первый шаг перед установкой полярной оси!!!

[SP]

От того, что я технарь, керамические подшипники не нарисуются, шестерни из эллипсных ровными не станут и т.д. и т.п.
Ты думаешь, у Дениса это с первого раза получилось?
Насчёт полярки - кто-то из нас явно ошибается... На Звездочёте, что ли спросить?

[LifeIsGood]

Керамические подшипники можно всунуть
Скажу так. Больше всего в 6-ке меня доставала ВЧ периодика от промежуточного редуктора. Мне удалось ее победить ОСЛАБИВ контакт двух шестеренок (12 на валу и 47 на черве). Т.е., чтобы шестеренки соприкасались, но не слишком плотно.

[tlgleonid]

Насчёт полярки - кто-то из нас явно ошибается...

Что ж, попробую пояснить, почему это так на пальцах, хотя, естественно, это можно сделать и строго, при помощи формул.
Итак:
1. Скорость движения звезды по небу зависит от его склонения. Чем ближе звезда к небесному экватору, тем быстрее она движется. По сути, ее скорость равна 15 градусов в час, умноженные на косинус склонения звезды.
2. Вектора направления движения звезды с одинаковым прямым восхождением но разными склонениями всегда паралельны. В противном случае, угловое расстояние между звездами бы менялось, что невозможно.
3. Рассмотрим случай, когда звезда находится на нулевом меридиане (строго на юг). Пусть монтировка выставлена правильно по азиумуту, но неправильно по высоте. Что мы будем наблюдать? Поскольку все звезды около нулевого меридиана движутся практически горизонтально (и паралельно друг другу!), звезда не будет смещаться ни к северу, ни к югу. Но из-за ошибки высоты полярки будет несовпадение между реальным склонением звезды и склонением звезды для монтировки на величину ошибки (скорости звезд с разными склонениями разные). А поскольку скорость движения звезд с разными склонениями различна, звезда будет уплывать по прямому восхождению. Собственно на этом и основан метод установки полярки, поскольку смещение звезд, расположенных к югу, не чувствительно к ошибке по высоте и можно подобрать установку по азимуту. (На самом деле звезда покинет центральный меридиан и ошибка установки высоты полярки начнет сказываться, но эта ошибка будет второго порядка малости и глазом смещение по склонению в 1 угловую секунду за 10 минут можно и не заметить.)
4. Рассмотрим случай, когда звезда на востоке. В этом случае ошибка установки полярки по высоте будет хорошо видна, поскольку угол наклона движения звезды будет различаться на величину этой ошибки. А вот ошибка установки полярки по азимуту сказываться не будет, поскольку мы попадаем на дугу для такой же точки на востоке, пересекающей меридиан под тем же углом, но с другим склонением. На этом основана вторя часть метода установки полярки. Можно подбирать высоту полярки. Но скорость движения звезды в зависимости от азимута будет отличаться.
5. Может возникнуть вопрос, почему же мы не используем лишь одну звезду для установки полярки? Дело в том, что на оси прямого восхождения стоит двигатель с редуктором. Периодическая ошибка по величине соизмерима со смещением звезды, из-за чего ошибка получится весьма значительна.

PS: Кстати, это свойство я использую, если снимаю один объект. Я навожусь на близкую звезду и настраиваю полярку с помощью EQAlign только по одной оси точно таким образом, что бы звезда не смещалась по склонению. Ошибку же по прямому восхождению исправит автогид. Просто движение по склонению сложнее исправить, поскольку люфт может существенно мешать.

В общем, если что-то непонятно, лучше переспроси.

[tlgleonid]

Решил дать строгое доказательство в общем случае:
Рассмотрим небесную сферу NLSP. OP направление на полюс мира. Пусть ось монтировки выставлена с ошибкой и смотрит по направлению OM. Построим плоскость, проходящую через точки MPO Она пересечет небесный экватор в точке L. Однако плоскость экватора для оси монтировки, перпендикулярная оси OM наклонена по отношению к плоскости небесного экватора и пересекает линию MPL в точке Q.
Пусть звезда находится в точке L. Если бы монтировка была выставлена правильно, то она бы вела звезду по дуге большого круга LN. Но на самом деле большой круг для монтировки - SQN и монтировка будет вести звезду по своему малому кругу LK. Если угол MOP равен A, то скорость смещения по RA будет 15'/минуту*(1-cos(A)), а по DEC - нулевая, поскольку в этой точке дуга LK достигает максимума. Если звезда находится в точке N, то ее смещение по DEC будет максимальным и равным F*sin(A).
Тут нужно обратить внимание, что мы никак не зависим от азимутальной системы координат, которая может быть ориентирована как угодно.
Для случая, если звезда имеет значимое склонение, скорости смещения будут иными и равным по смещению по RA 15'/минуту*(cos(D)-cos(D-A)). Особенно интересны два случая:
1. звезда в точке M. Телескоп ее не будет отслеживать вообще и звезда будет все время отставать по RA со скоростью 15'/минуту*sin(A) а по DEC не будет смещаться совсем.
2. звезда в точке P. В реальности она неподвижна, но телескоп будет ее вращать со скоростью 15'/минуту*sin(A). Естсественно, смещения по DEC не будет ни в какой момент времени.

[SP]

Если я правильно понял, твоё доказательство (относительно замедления по альфе без смещения по дельте) верно только для точек M и P?
Опробовал ЕКУАлигн с вебкой- процесс пошёл, но небо затянуло.
Вчера снял  с PERecorder две периодики: один оборот червяка  при звёздной скорости и три оборота с кометной скоростью 15,17.
Кто прокомментирует полученные кривые?

[tlgleonid]

Если я правильно понял, твоё доказательство (относительно замедления по альфе без смещения по дельте) верно только для точек M и P?

Для точек М и P будет отсутствовать смещение по дельте. Для всех точек на дуге PQL смещение по дельте также будет отсутствовать, но они постепенно уйдут с дуги и через какое-то время смещение станет заметно. На практике это будет где-то через 15-20 градусов.

Если внимательно проанализировать схему, можно понять, что неточная установка полярки дает вектор смещения. Для точек на дуге PN он будет перпендикулярен ходу суточного движения и звезда будет уплывать по дельте, а для точек на дуге PQL он оказывается паралелен суточному движению и смещения по  дельте не будет, но будет запаздывание. Для других точек этот вектор будет наклонен под углом, но пока угол между плоскостями (звезда, полюс, центр сферы) и (полюс, осб монтировки, центр сферы) не станет значительным, смещение по дельте получается слишком малым для того, что бы быть заметным глазу.

Опробовал ЕКУАлигн с вебкой- процесс пошёл, но небо затянуло.
Вчера снял  с PERecorder две периодики: один оборот червяка  при звёздной скорости и три оборота с кометной скоростью 15,17.
Кто прокомментирует полученные кривые?

По осям графика отложены какие-то попугаи вместо конкретных чисел. Но на верхнем графике хорошо просматриваются резкие броски примерно 4 раза за оборот червяка. Для анализа, что это такое, нужно загрузить полученные значения треков в PeRecoder-е в PecPrep и посмотреть, на каких частотах наблюдаются выбросы. Потом нужно смотреть, какая конкретно деталь дает большие выбросы. Потом можно решать, что делать с конкретной деталью.
Да, нужно загружать побольше периодов. Если получится записать периодику за час, то лучше записать за час.
Кстати, рекомендую прочесть прекрасный и очень удачный мануал Денисы Саквы
http://sakva.net/mounts/mount_pe_analysis_ru/
Согласно этому мануалу получается, что у тебя есть проблема в шестерне на валу шагового двигателя

[SP]

По осям графика отложены какие-то попугаи вместо конкретных чисел.

Не понял. Их откладывала прога автоматом, какие попугаи? По-идее, это угловые секунды.

[tlgleonid]

О попугаях принято говорить, когда оси не подписаны и (или) не указан масштаб (риски с числами по осям), без которых невозможно провести разумный анализ графиков. У тебя графики именно такие - нету шкал.
Термин попугаи пришел из мультика "38 попугаев", когда звери пытались измерять длину удава.