Киевский клуб любителей астрономии "Астрополис"

astromagazin.net
* *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
12 Декабря 2017, 23:49:00


Автор Тема: софтинка для зеркалки с диззерингом.. под ДОС ))))  (Прочитано 745 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Серега

  • Оффлайн Оффлайн
  • Сообщений: 5965
  • Благодарностей: 293

долго смотрел на старый ноутбук Р-1 и придумал ему применение - управлять затвором кенона через ЛПТ-порт, для сьемок без гидирования на обьективы, т.к. так и не осилил допаять и отладить програмируемый пультик.

попросил друга - он накидал мне на паскале примитивную програмку
которая из *.dat файла смотрела сколько экспозиций с какими паузами
 и сколько раз нужно снять.. интерфейса никакого и т.п..

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

Не знаю кому оно сейчас вообще нужно ;D, писал тупо для себя, но мало-ли, может кому пригодится.

в архиве есть исходники - не пугайтесь, паскаль 2 дня знаю :gigi: :gigi:



картинки:
1.окно запуска - выбор контактов порта под управление
2. режим ручного управления с клавиатуры.
3. режим програмного управления. экспозиция в процессе.


ЗЫ. может я что-то не так сделал но чем быстрее проц тем быстрее проходит секунда экспозиции :lol:
поэтому в файле s.dat есть строка куда нужно записать поДобранное опытным путем значение. у меня оно около 2100.

остальные строки этого файла - цвета некоторых элементов программы. значения от 0 до 16.
« Последнее редактирование: 02 Февраля 2010, 23:22:16 от stepan »
Записан

Серега

  • Оффлайн Оффлайн
  • Сообщений: 5965
  • Благодарностей: 293
Re: софтинка для зеркалки с диззерингом.. под ДОС ))))
« Ответ #1 : 02 Февраля 2010, 21:57:14 »
. - .

картинки
Записан

Серега

  • Оффлайн Оффлайн
  • Сообщений: 5965
  • Благодарностей: 293
Re: софтинка для зеркалки с диззерингом.. под ДОС ))))
« Ответ #2 : 02 Февраля 2010, 22:02:01 »
. - .

,,,
Записан

Серега

  • Оффлайн Оффлайн
  • Сообщений: 5965
  • Благодарностей: 293
Re: софтинка для зеркалки с диззерингом.. под ДОС ))))
« Ответ #3 : 02 Февраля 2010, 22:03:42 »
. - .

,,,
Записан

Thomas

  • Оффлайн Оффлайн
  • Сообщений: 2313
  • Благодарностей: 1
  • Натер зеркало - получи +1 в карму
Re: софтинка для зеркалки с диззерингом.. под ДОС ))))
« Ответ #4 : 02 Февраля 2010, 22:08:31 »
. - .

Цитировать
case i0 of

  0 : mir:= 0;

  1 : mir:= 1;

  2 : mir:= 2;

  3 : mir:= 3;

  4 : mir:= 4;

  5 : mir:= 5;

  6 : mir:= 6;

  7 : mir:= 7;

  8 : mir:= 8;

  9 : mir:= 9;

 10 : mir:= 10;

end;
А не проще ли просто mir := i0 ?

И сразу скажу вам надо разделить код от графики. Через неделю вы будете полдня разбираться что наваяли.
Записан
Телескоп Алькор производства НПЗ
Телескоп-самопал D=150mm, F=1250, ГЗ - сфера собственного изготовления
Canon EOS 350D, Canon EF 24-85 USM, Юпитер 37 MC

Серега

  • Оффлайн Оффлайн
  • Сообщений: 5965
  • Благодарностей: 293
Re: софтинка для зеркалки с диззерингом.. под ДОС ))))
« Ответ #5 : 02 Февраля 2010, 22:14:49 »
. - .

 :gigi:
та мне все равно. она работает и делает что нужно - нечего там через неделю лазить. :)

ну и я же предупреждал чтоб не пугались :gigi:

и кстати насчет mir := i0 - оно не должно быть больше 10 и я тогда еше не знал как это записать правильно ;D
Записан

Sergey07

  • Клуб Астрополис
  • Оффлайн Оффлайн
  • Сообщений: 2051
  • Благодарностей: 143
  • Бывший boris07
Re: софтинка для зеркалки с диззерингом.. под ДОС ))))
« Ответ #6 : 02 Февраля 2010, 22:25:15 »
. - .

Что бы не подбирать опытным путём секунды нужно использоасть системное время - прямая дорога к использованию модуля DOS (команда gettime). 
Записан
Sky-Watcher MaxView 127SP NEQ5-GoToStar
Nikula (8-32)*x50


Sergey07

  • Клуб Астрополис
  • Оффлайн Оффлайн
  • Сообщений: 2051
  • Благодарностей: 143
  • Бывший boris07
Re: софтинка для зеркалки с диззерингом.. под ДОС ))))
« Ответ #7 : 02 Февраля 2010, 22:34:33 »
. - .

так же там есть програмка DIZGRAPH.EXE которая по идее рисует смещения звезд после диззеринга, но почему то она запускается только из папки с компилятором паскаля.. из других папок нехотит >:(
хз короче. не знаю как побороть.
Уже не поммню ДОС. Возможно нужно прописать путь (path ) к компилятору Паскаля или его библиотекам в config.sys или autoexec.bat
Записан
Sky-Watcher MaxView 127SP NEQ5-GoToStar
Nikula (8-32)*x50


Серега

  • Оффлайн Оффлайн
  • Сообщений: 5965
  • Благодарностей: 293
Re: софтинка для зеркалки с диззерингом.. под ДОС ))))
« Ответ #8 : 02 Февраля 2010, 22:39:23 »
. - .

Что бы не подбирать опытным путём секунды нужно использоасть системное время - прямая дорога к использованию модуля DOS (команда gettime). 
спасибо за подсказку - теперь знаю какую команду юзать. а то в лит-ре по паскалю сам черт ногу сломит, особенно новичек :)

я почему то думал что миллисекунды (команда DELAY) на любом компе одинаковые... А вышло не так :hz:
Записан

Серега

  • Оффлайн Оффлайн
  • Сообщений: 5965
  • Благодарностей: 293
Re: софтинка для зеркалки с диззерингом.. под ДОС ))))
« Ответ #9 : 02 Февраля 2010, 22:45:04 »
. - .

Что бы не подбирать опытным путём секунды нужно использоасть системное время - прямая дорога к использованию модуля DOS (команда gettime). 

Цитировать
...в полночь происходит сброс часов в 0;
:(
Записан

logrus

  • Оффлайн Оффлайн
  • Сообщений: 679
  • Благодарностей: 6
  • Максим
Re: софтинка для зеркалки с диззерингом.. под ДОС ))))
« Ответ #10 : 02 Февраля 2010, 22:56:57 »
. - .

так же там есть програмка DIZGRAPH.EXE которая по идее рисует смещения звезд после диззеринга, но почему то она запускается только из папки с компилятором паскаля.. из других папок нехотит >:(
хз короче. не знаю как побороть.
Чтобы турбо-паскалевская программка, созданная с использованием модуля Graph, могла работать где угодно, вместе с ней необходимо распространять *.bgi и *.chr файлы.
Записан

Sergey07

  • Клуб Астрополис
  • Оффлайн Оффлайн
  • Сообщений: 2051
  • Благодарностей: 143
  • Бывший boris07
Re: софтинка для зеркалки с диззерингом.. под ДОС ))))
« Ответ #11 : 02 Февраля 2010, 23:01:42 »
. - .

Что бы не подбирать опытным путём секунды нужно использоасть системное время - прямая дорога к использованию модуля DOS (команда gettime). 

Цитировать
...в полночь происходит сброс часов в 0;
:(
Думаю, это можно обойти либо изменением системного времени, либо каким-нибуть условием. (постараюсь на досуге подумать)
Записан
Sky-Watcher MaxView 127SP NEQ5-GoToStar
Nikula (8-32)*x50


logrus

  • Оффлайн Оффлайн
  • Сообщений: 679
  • Благодарностей: 6
  • Максим
Re: софтинка для зеркалки с диззерингом.. под ДОС ))))
« Ответ #12 : 02 Февраля 2010, 23:22:31 »
. - .

Условие простое: если вторая отметка времени меньше первой, то прибавить 24 часа ко второй отметке.
Записан

Серега

  • Оффлайн Оффлайн
  • Сообщений: 5965
  • Благодарностей: 293
Re: софтинка для зеркалки с диззерингом.. под ДОС ))))
« Ответ #13 : 02 Февраля 2010, 23:29:18 »
. - .

так же там есть програмка DIZGRAPH.EXE которая по идее рисует смещения звезд после диззеринга, но почему то она запускается только из папки с компилятором паскаля.. из других папок нехотит >:(
хз короче. не знаю как побороть.
Чтобы турбо-паскалевская программка, созданная с использованием модуля Graph, могла работать где угодно, вместе с ней необходимо распространять *.bgi и *.chr файлы.

спасибо - заработало :up:

сменил архивчик во вложении.


и инфа по файлу diz.dat - порядок заполнения

значения в секундах времени.
Записан

vvv2007

  • Оффлайн Оффлайн
  • Сообщений: 2335
  • Благодарностей: 0
Re: софтинка для зеркалки с диззерингом.. под ДОС ))))
« Ответ #14 : 03 Февраля 2010, 12:02:05 »
. - .

:gigi:
та мне все равно. она работает и делает что нужно - нечего там через неделю лазить. :)
ну и я же предупреждал чтоб не пугались :gigi:
и кстати насчет mir := i0 - оно не должно быть больше 10 и я тогда еше не знал как это записать правильно ;D
В таком случае все равно неверно. При i0>10 и i0<0, mir может быть каким угодно.
Записан
Sky-Watcher BD2001P, Sky-Watcher ED80 OTA PRO, SW 1206, EQ-6 SynTrek, БПЦ2 7х50, Canon 400Da, QHY-5, Logitech 9000Pro