Программа написана на языке С под операционную систему  DOS и занимает 65.5 КБт. При этом лично мной написаны блоки ввода-вывода и алгоритм вычисления номера карты атласа Uranometria 2000.0 по координатам эпохи 2000.0, а также связки между разными частями. Алгоритм коррекции экваториальных координат за прецессию взят из программного обеспечения модуля "Квант", созданного Е.Чуразовым и М.Гильфановым (на языке FORTRAN-78). Алгоритмы преобразований экваториальных координат в эклиптические и экваториальные (и обратно), вычисления угла наклона экватора к эклиптике, а также программа вычисления созвездия по экваториальным координатам на эпоху 1875.0 взяты мной из программы - суперпланетария XEphem, версия 2.9.1 (на С++, автор - Elwood Downey). С января 2001 г. эта программа (за исключением вычисления номера карты) также доступна в виде реализованного мною же WEB-калькулятора (см. Universal coordinates transformer на странице General astronomical tools Центра Данных проекта СРГ).

2). Type initial epoch:
Выбор начальной эпохи - печатается год - целое четырехзначное число и "Enter". Если в качестве исходных выбраны галактические координаты, то начальной автоматически считается эпоха 1950.0, и запрашивается только конечная эпоха (Initial epoch is 1950. Type finish epoch:).

3). Type finish epoch:
Выбор конечной эпохи (если исходные координаты - не галактические) - печатается целое четырехзначное число и "Enter".

4). Choose coordinats form: 1-rad, 2-degrees, 3-h,m,s & deg,m,s:
Выбор формы вводимых координат: в радианах, градусах или (если исходные координаты - экваториальные)  в ч:м:с/°:':" - соответственно 1, 2 или 3, и "Enter".

5). Add rezults to file ari.dat (y/n)?
Печать результатов в файл ARI.DAT - "y" если нужно, или "n", если не нужно (здесь "Enter" не нужен).

6). Ввод исходных координат выбранного типа в выбранной форме. При вводе в радианах или градусах это должны быть два дробных (можно и целых) числа, разделенных пробелом, и "Enter".
    Ввод экваториальных координат в форме ч:м:с/°:':" осуществляется раздельно по прямому восхождению и склонению. Сначала вводится прямое восхождение - три целых числа, разделенных пробелами (последнее - секунды - может быть и дробным) и "Enter". Затем - склонение: обязателен знак (+/-), и три целых числа, разделенных пробелами (последнее - секунды - также может быть и дробным, между знаком и градусами пробел не нужен) и "Enter".

7). На этом этапе программа выдает результаты вычислений (См. рисунок - рабочее окно) и
запрашивает следующий шаг. Это может быть выход из программы - "0", продолжение вычислений в текущем режиме - "1" (т.е. для текущего типа исходных координат, начальной и конечной эпохи и формы вводимых данных) - возвращение к пункту 6, или изменение начальных условий: типа исходных координат - "2" - возвращение к пункту 1, начальной и конечной эпох - "3" - возвращение к пункту 2-3, или формы вводимых координат "4" - возвращение к пункту 4. После смены одного из начальных условий программа снова запрашивает следующий шаг, и можно опять поменять одно начальное условие, продолжить вычисления в текущем (только что измененном) режиме или выйти из программы.

    В файл ARI.DAT программа записывает следующие данные: трехбуквенное обозначение созвездия, прямое восхождение и склонение на начальную и конечную эпохи (в градусах), эклиптическую долготу и широту на конечную эпоху (в градусах), галактические долготу и широту (в градусах), и номер карты атласа Uranometria 2000.0.

    При вычислении галактических координат использовались следующие начальные данные по ориентации галактической системы координат:
    галактическая долгота восходящего узла экватора = 33°.0;
    прямое восхождение северного Галактического полюса = 192°.25 (на эпоху 2000.0);
    склонение северного Галактического полюса = +27°.4 (на эпоху 2000.0).

9 12 1999 19 55 12.0                - день, месяц, год, час, минута и секунда (UT)
9.83 12 1999                             - день (время выражено в долях суток), месяц и год
343.83 1999                              - порядковый номер дня и год
1999.939260274                       - год (дата и время выражены в долях года)
2451522.33                               - обычный Юлианский День (JD)
36502.33                                   - модифицированный JD (сутки с 0.5 января 1900 г.)
18240.33                                   - модифицированный JD (сутки с 0.5 января 1950 г.)
51521.83                                   - разность JD - 2400000.5
11521.83                                   - разность JD - 2450000.5
521.83                                       - разность JD - 2451000.5

Кроме того, определяет день недели, а начиная со 2-го вычисления - еще и разность в сутках между текущим и предыдущим вычислениями.

Программа написана на языке С под операционную систему  DOS и занимает 35 КБт. Почти полностью собрана из программы - суперпланетария XEphem, версия 2.9.1 (на С++, автор - Elwood Downey). С января 2001 г. эта программа также доступна в виде реализованного мною же WEB-калькулятора (см. Universal dates transformer на странице General astronomical tools Центра Данных проекта СРГ).