home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: Science / Science.zip / fblnk224.zip / formblink.c < prev    next >
C/C++ Source or Header  |  1999-01-28  |  60KB  |  1,302 lines
  1. /* Form definition file generated with fdesign. */
  2.  
  3. #include "forms.h"
  4. #include <stdlib.h>
  5. #include "formblink.h"
  6.  
  7. FD_setting *create_form_setting(void)
  8. {
  9.   FL_OBJECT *obj;
  10.   FD_setting *fdui = (FD_setting *) fl_calloc(1, sizeof(*fdui));
  11.  
  12.   fdui->setting = fl_bgn_form(FL_NO_BOX, 390, 480);
  13.   obj = fl_add_box(FL_UP_BOX,0,0,390,480,"");
  14.     fl_set_object_resize(obj, FL_RESIZE_NONE);
  15.   fdui->secondleraseW = obj = fl_add_button(FL_NORMAL_BUTTON,285,40,45,25,"Erase");
  16.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  17.     fl_set_object_callback(obj,eraseC,1);
  18.   fdui->secondgreyW = obj = fl_add_xyplot(FL_NORMAL_XYPLOT,205,120,140,130,"Grey level histogram");
  19.     fl_set_object_boxtype(obj,FL_EMBOSSED_BOX);
  20.     fl_set_object_lsize(obj,FL_DEFAULT_SIZE);
  21.     fl_set_object_lalign(obj,FL_ALIGN_TOP);
  22.     fl_set_object_callback(obj,greyC,1);
  23.   fdui->firstgreyW = obj = fl_add_xyplot(FL_NORMAL_XYPLOT,15,120,140,130,"Grey level histogram");
  24.     fl_set_object_boxtype(obj,FL_EMBOSSED_BOX);
  25.     fl_set_object_lsize(obj,FL_DEFAULT_SIZE);
  26.     fl_set_object_lalign(obj,FL_ALIGN_TOP);
  27.     fl_set_object_callback(obj,greyC,0);
  28.   fdui->firstgammaW = obj = fl_add_xyplot(FL_ACTIVE_XYPLOT,15,265,140,140,"Grey level correction");
  29.     fl_set_object_boxtype(obj,FL_EMBOSSED_BOX);
  30.     fl_set_object_lsize(obj,FL_DEFAULT_SIZE);
  31.     fl_set_object_lalign(obj,FL_ALIGN_TOP);
  32.     fl_set_object_callback(obj,gammaC,0);
  33.   fdui->secondgammaW = obj = fl_add_xyplot(FL_ACTIVE_XYPLOT,205,265,140,140,"Grey level correction");
  34.     fl_set_object_boxtype(obj,FL_EMBOSSED_BOX);
  35.     fl_set_object_lsize(obj,FL_DEFAULT_SIZE);
  36.     fl_set_object_lalign(obj,FL_ALIGN_TOP);
  37.     fl_set_object_callback(obj,gammaC,1);
  38.  
  39.   fdui->firstsecond = fl_bgn_group();
  40.   fdui->firstimageW = obj = fl_add_button(FL_RADIO_BUTTON,50,5,80,30,"1. image");
  41.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  42.     fl_set_object_callback(obj,turnimageC,0);
  43.   fdui->secondimageW = obj = fl_add_button(FL_RADIO_BUTTON,240,5,80,30,"2. image");
  44.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  45.     fl_set_object_callback(obj,turnimageC,1);
  46.   fl_end_group();
  47.  
  48.   fdui->firstdeltaxW = obj = fl_add_input(FL_FLOAT_INPUT,35,450,50,25,"dx");
  49.     fl_set_object_lsize(obj,FL_NORMAL_SIZE);
  50.     fl_set_object_callback(obj,deltaxC,0);
  51.   fdui->firstdeltayW = obj = fl_add_input(FL_FLOAT_INPUT,105,450,50,25,"dy");
  52.     fl_set_object_lsize(obj,FL_NORMAL_SIZE);
  53.     fl_set_object_callback(obj,deltayC,0);
  54.   fdui->seconddeltaxW = obj = fl_add_input(FL_FLOAT_INPUT,220,450,55,25,"dx");
  55.     fl_set_object_lsize(obj,FL_NORMAL_SIZE);
  56.     fl_set_object_callback(obj,deltaxC,1);
  57.   fdui->seconddeltayW = obj = fl_add_input(FL_FLOAT_INPUT,295,450,50,25,"dy");
  58.     fl_set_object_lsize(obj,FL_NORMAL_SIZE);
  59.     fl_set_object_callback(obj,deltayC,1);
  60.   fdui->firstloadW = obj = fl_add_button(FL_NORMAL_BUTTON,40,40,45,25,"Load");
  61.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  62.     fl_set_object_callback(obj,loadC,0);
  63.   fdui->firstleraseW = obj = fl_add_button(FL_NORMAL_BUTTON,95,40,45,25,"Erase");
  64.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  65.     fl_set_object_callback(obj,eraseC,0);
  66.   fdui->secondloadW = obj = fl_add_button(FL_NORMAL_BUTTON,230,40,45,25,"Load");
  67.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  68.     fl_set_object_callback(obj,loadC,1);
  69.   fdui->quitW = obj = fl_add_button(FL_NORMAL_BUTTON,160,40,45,30,"Quit");
  70.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  71.     fl_set_object_callback(obj,quitC,0);
  72.   fdui->firstinvertW = obj = fl_add_button(FL_NORMAL_BUTTON,160,310,35,25,"Invert");
  73.     fl_set_object_callback(obj,invertC,0);
  74.   fdui->firstautoW = obj = fl_add_button(FL_NORMAL_BUTTON,160,280,35,25,"Auto");
  75.     fl_set_object_callback(obj,autoC,0);
  76.   fdui->firstnameW = obj = fl_add_choice(FL_NORMAL_CHOICE,50,70,90,30,"File");
  77.     fl_set_object_boxtype(obj,FL_FRAME_BOX);
  78.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  79.     fl_set_object_callback(obj,nameC,0);
  80.   fdui->secondnameW = obj = fl_add_choice(FL_NORMAL_CHOICE,240,70,90,30,"File");
  81.     fl_set_object_boxtype(obj,FL_FRAME_BOX);
  82.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  83.     fl_set_object_callback(obj,nameC,1);
  84.   fdui->firstfitsW = obj = fl_add_button(FL_NORMAL_BUTTON,160,130,35,25,"FITS");
  85.     fl_set_object_lsize(obj,FL_NORMAL_SIZE);
  86.     fl_set_object_callback(obj,fitsC,0);
  87.   fdui->secondfitsW = obj = fl_add_button(FL_NORMAL_BUTTON,350,130,35,25,"FITS");
  88.     fl_set_object_lsize(obj,FL_NORMAL_SIZE);
  89.     fl_set_object_callback(obj,fitsC,1);
  90.   fdui->secondinvertW = obj = fl_add_button(FL_NORMAL_BUTTON,350,310,35,25,"Invert");
  91.     fl_set_object_callback(obj,invertC,1);
  92.   fdui->secondautoW = obj = fl_add_button(FL_NORMAL_BUTTON,350,280,35,25,"Auto");
  93.     fl_set_object_callback(obj,autoC,1);
  94.   fdui->helpW = obj = fl_add_menu(FL_PUSH_MENU,160,80,45,35,"Help");
  95.     fl_set_object_boxtype(obj,FL_UP_BOX);
  96.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  97.     fl_set_object_lstyle(obj,FL_NORMAL_STYLE);
  98.     fl_set_object_callback(obj,helpC,0);
  99.   fdui->leftlowdecW = obj = fl_add_button(FL_NORMAL_BUTTON,10,410,35,35,"@<");
  100.     fl_set_object_callback(obj,histadjC,1);
  101.   obj = fl_add_button(FL_NORMAL_BUTTON,45,410,35,35,"@>");
  102.     fl_set_object_callback(obj,histadjC,2);
  103.   obj = fl_add_button(FL_NORMAL_BUTTON,90,410,35,35,"@<");
  104.     fl_set_object_callback(obj,histadjC,3);
  105.   obj = fl_add_button(FL_NORMAL_BUTTON,125,410,35,35,"@>");
  106.     fl_set_object_callback(obj,histadjC,4);
  107.   obj = fl_add_button(FL_NORMAL_BUTTON,200,410,35,35,"@<");
  108.     fl_set_object_callback(obj,histadjC,5);
  109.   obj = fl_add_button(FL_NORMAL_BUTTON,235,410,35,35,"@>");
  110.     fl_set_object_callback(obj,histadjC,6);
  111.   obj = fl_add_button(FL_NORMAL_BUTTON,280,410,35,35,"@<");
  112.     fl_set_object_callback(obj,histadjC,7);
  113.   obj = fl_add_button(FL_NORMAL_BUTTON,315,410,35,35,"@>");
  114.     fl_set_object_callback(obj,histadjC,8);
  115.   fl_end_form();
  116.  
  117.   fdui->setting->fdui = fdui;
  118.  
  119.   return fdui;
  120. }
  121. /*---------------------------------------*/
  122.  
  123. FD_blinker *create_form_blinker(void)
  124. {
  125.   FL_OBJECT *obj;
  126.   FD_blinker *fdui = (FD_blinker *) fl_calloc(1, sizeof(*fdui));
  127.  
  128.   fdui->blinker = fl_bgn_form(FL_NO_BOX, 1000, 910);
  129.   obj = fl_add_box(FL_UP_BOX,0,0,1000,910,"");
  130.   fdui->ycoorW = obj = fl_add_input(FL_NORMAL_INPUT,255,10,90,40,"y=");
  131.     fl_set_object_boxtype(obj,FL_NO_BOX);
  132.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  133.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  134.     fl_set_object_gravity(obj, FL_West, FL_West);
  135.     fl_set_object_callback(obj,emptyC,0);
  136.   fdui->zoom1W = obj = fl_add_box(FL_FRAME_BOX,10,716,251,141,"");
  137.     fl_set_object_callback(obj,zoom1C,0);
  138.   fdui->zoom2W = obj = fl_add_box(FL_FRAME_BOX,271,716,251,141,"");
  139.     fl_set_object_callback(obj,zoom2C,0);
  140.   fdui->lockedW = obj = fl_add_text(FL_NORMAL_TEXT,195,871,152,29,"LOCKED !");
  141.     fl_set_object_color(obj,FL_RED,FL_BOTTOM_BCOL);
  142.     fl_set_object_lcolor(obj,FL_WHITE);
  143.     fl_set_object_lsize(obj,FL_NORMAL_SIZE);
  144.     fl_set_object_lalign(obj,FL_ALIGN_CENTER|FL_ALIGN_INSIDE);
  145.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  146.     fl_set_object_callback(obj,emptyC,0);
  147.   fdui->valueW = obj = fl_add_input(FL_NORMAL_INPUT,385,10,85,40,"v=");
  148.     fl_set_object_boxtype(obj,FL_NO_BOX);
  149.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  150.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  151.     fl_set_object_gravity(obj, FL_West, FL_West);
  152.     fl_set_object_callback(obj,emptyC,0);
  153.   fdui->racoorW = obj = fl_add_input(FL_NORMAL_INPUT,120,60,125,40,"ra=");
  154.     fl_set_object_boxtype(obj,FL_NO_BOX);
  155.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  156.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  157.     fl_set_object_gravity(obj, FL_West, FL_West);
  158.     fl_set_object_callback(obj,emptyC,0);
  159.   fdui->deccoorW = obj = fl_add_input(FL_NORMAL_INPUT,310,60,120,40,"dec=");
  160.     fl_set_object_boxtype(obj,FL_NO_BOX);
  161.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  162.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  163.     fl_set_object_gravity(obj, FL_West, FL_West);
  164.     fl_set_object_callback(obj,emptyC,0);
  165.   fdui->xcoorW = obj = fl_add_input(FL_NORMAL_INPUT,120,10,95,40,"x=");
  166.     fl_set_object_boxtype(obj,FL_NO_BOX);
  167.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  168.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  169.     fl_set_object_gravity(obj, FL_West, FL_West);
  170.     fl_set_object_callback(obj,emptyC,0);
  171.   fdui->astrometryW = obj = fl_add_menu(FL_PULLDOWN_MENU,510,15,105,35,"Astrometry");
  172.     fl_set_object_boxtype(obj,FL_UP_BOX);
  173.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  174.     fl_set_object_callback(obj,astrometryC,0);
  175.  
  176.   fdui->bgroupW = fl_bgn_group();
  177.   fdui->playW = obj = fl_add_lightbutton(FL_PUSH_BUTTON,890,720,85,40,"Blink");
  178.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  179.     fl_set_object_gravity(obj, FL_East, FL_East);
  180.   fdui->leftW = obj = fl_add_button(FL_NORMAL_BUTTON,530,770,35,35,"@4>");
  181.     fl_set_object_lcolor(obj,FL_BLUE);
  182.     fl_set_object_resize(obj, FL_RESIZE_NONE);
  183.     fl_set_object_callback(obj,leftC,0);
  184.   fdui->upW = obj = fl_add_button(FL_NORMAL_BUTTON,565,735,35,35,"@8>");
  185.     fl_set_object_lcolor(obj,FL_BLUE);
  186.     fl_set_object_resize(obj, FL_RESIZE_NONE);
  187.     fl_set_object_callback(obj,upC,0);
  188.   fdui->rightW = obj = fl_add_button(FL_NORMAL_BUTTON,600,770,35,35,"@6>");
  189.     fl_set_object_lcolor(obj,FL_BLUE);
  190.     fl_set_object_resize(obj, FL_RESIZE_NONE);
  191.     fl_set_object_callback(obj,rightC,0);
  192.   fdui->downW = obj = fl_add_button(FL_NORMAL_BUTTON,565,805,35,35,"@2>");
  193.     fl_set_object_lcolor(obj,FL_BLUE);
  194.     fl_set_object_resize(obj, FL_RESIZE_NONE);
  195.     fl_set_object_callback(obj,downC,0);
  196.   fdui->circleW = obj = fl_add_button(FL_NORMAL_BUTTON,565,770,35,35,"@circle");
  197.     fl_set_object_lcolor(obj,FL_BLUE);
  198.     fl_set_object_resize(obj, FL_RESIZE_NONE);
  199.     fl_set_object_callback(obj,circleC,0);
  200.   fl_end_group();
  201.  
  202.   fdui->blinkW = obj = fl_add_free(FL_NORMAL_FREE,10,105,980,605,"",
  203.             freeobj_blinkW_handle);
  204.     fl_set_object_boxtype(obj,FL_EMBOSSED_BOX);
  205.   fdui->deltatW = obj = fl_add_counter(FL_SIMPLE_COUNTER,890,785,85,40,"Delay");
  206.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  207.     fl_set_object_lalign(obj,FL_ALIGN_TOP);
  208.     fl_set_object_gravity(obj, FL_East, FL_East);
  209.     fl_set_object_callback(obj,deltatC,0);
  210.   fdui->telescope_controlW = obj = fl_add_button(FL_NORMAL_BUTTON,620,15,140,35,"Telescope control");
  211.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  212.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  213.     fl_set_object_callback(obj,telescope_controlC,0);
  214.   fdui->markersW = obj = fl_add_lightbutton(FL_RADIO_BUTTON,840,50,75,35,"Mark.");
  215.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  216.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  217.     fl_set_object_callback(obj,markersC,0);
  218.     fl_set_button(obj, 1);
  219.  
  220.   fdui->colorsW = fl_bgn_group();
  221.   fdui->greybutW = obj = fl_add_lightbutton(FL_RADIO_BUTTON,840,15,75,35,"Grey");
  222.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  223.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  224.     fl_set_object_callback(obj,colormapC,1);
  225.     fl_set_button(obj, 1);
  226.   fdui->colorbutW = obj = fl_add_lightbutton(FL_RADIO_BUTTON,915,15,75,35,"Color");
  227.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  228.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  229.     fl_set_object_callback(obj,colormapC,2);
  230.   fl_end_group();
  231.  
  232.   fl_end_form();
  233.  
  234.   fdui->blinker->fdui = fdui;
  235.  
  236.   return fdui;
  237. }
  238. /*---------------------------------------*/
  239.  
  240. FD_Edit *create_form_Edit(void)
  241. {
  242.   FL_OBJECT *obj;
  243.   FD_Edit *fdui = (FD_Edit *) fl_calloc(1, sizeof(*fdui));
  244.  
  245.   fdui->Edit = fl_bgn_form(FL_NO_BOX, 440, 470);
  246.   fdui->helpW = obj = fl_add_box(FL_UP_BOX,0,0,440,470,"");
  247.   fdui->browseW = obj = fl_add_browser(FL_NORMAL_BROWSER,15,15,405,395,"");
  248.   fdui->closeeditW = obj = fl_add_button(FL_NORMAL_BUTTON,15,425,80,35,"Close");
  249.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  250.   fl_end_form();
  251.  
  252.   fdui->Edit->fdui = fdui;
  253.  
  254.   return fdui;
  255. }
  256. /*---------------------------------------*/
  257.  
  258. FD_info *create_form_info(void)
  259. {
  260.   FL_OBJECT *obj;
  261.   FD_info *fdui = (FD_info *) fl_calloc(1, sizeof(*fdui));
  262.  
  263.   fdui->info = fl_bgn_form(FL_NO_BOX, 450, 240);
  264.   obj = fl_add_box(FL_UP_BOX,0,0,450,240,"");
  265.   obj = fl_add_text(FL_NORMAL_TEXT,125,95,225,30,"by Jure Skvarc, December 1998");
  266.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  267.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  268.   obj = fl_add_text(FL_NORMAL_TEXT,60,140,370,45,"Please send remarks, questions and bug reports to:");
  269.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  270.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  271.   obj = fl_add_text(FL_NORMAL_TEXT,160,170,125,25,"jure.skvarc@ijs.si");
  272.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  273.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  274.   obj = fl_add_text(FL_NORMAL_TEXT,15,65,415,30,"A program for display and visual comparison of FITS images");
  275.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  276.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  277.   fdui->infookW = obj = fl_add_button(FL_NORMAL_BUTTON,10,195,430,35,"OK");
  278.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  279.   fdui->versionW = obj = fl_add_text(FL_NORMAL_TEXT,100,20,230,35,"Fitsblink 2.21");
  280.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  281.     fl_set_object_lalign(obj,FL_ALIGN_CENTER|FL_ALIGN_INSIDE);
  282.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  283.   fl_end_form();
  284.  
  285.   fdui->info->fdui = fdui;
  286.  
  287.   return fdui;
  288. }
  289. /*---------------------------------------*/
  290.  
  291. FD_Error *create_form_Error(void)
  292. {
  293.   FL_OBJECT *obj;
  294.   FD_Error *fdui = (FD_Error *) fl_calloc(1, sizeof(*fdui));
  295.  
  296.   fdui->Error = fl_bgn_form(FL_NO_BOX, 440, 470);
  297.   obj = fl_add_box(FL_UP_BOX,0,0,440,470,"");
  298.   fdui->closeW = obj = fl_add_button(FL_NORMAL_BUTTON,15,420,80,40,"Close");
  299.     fl_set_object_lsize(obj,FL_NORMAL_SIZE);
  300.   fdui->errorW = obj = fl_add_browser(FL_NORMAL_BROWSER,15,10,415,405,"");
  301.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  302.   fl_end_form();
  303.  
  304.   fdui->Error->fdui = fdui;
  305.  
  306.   return fdui;
  307. }
  308. /*---------------------------------------*/
  309.  
  310. FD_help *create_form_help(void)
  311. {
  312.   FL_OBJECT *obj;
  313.   FD_help *fdui = (FD_help *) fl_calloc(1, sizeof(*fdui));
  314.  
  315.   fdui->help = fl_bgn_form(FL_NO_BOX, 400, 470);
  316.   fdui->helpW = obj = fl_add_box(FL_UP_BOX,0,0,400,470,"");
  317.   fdui->readmeW = obj = fl_add_browser(FL_NORMAL_BROWSER,10,10,385,410,"");
  318.     fl_set_object_lsize(obj,FL_NORMAL_SIZE);
  319.     fl_set_object_callback(obj,emptyC,0);
  320.   fdui->closehelpW = obj = fl_add_button(FL_NORMAL_BUTTON,10,430,70,30,"Close");
  321.     fl_set_object_lsize(obj,FL_NORMAL_SIZE);
  322.   fl_end_form();
  323.  
  324.   fdui->help->fdui = fdui;
  325.  
  326.   return fdui;
  327. }
  328. /*---------------------------------------*/
  329.  
  330. FD_Parameters *create_form_Parameters(void)
  331. {
  332.   FL_OBJECT *obj;
  333.   FD_Parameters *fdui = (FD_Parameters *) fl_calloc(1, sizeof(*fdui));
  334.  
  335.   fdui->Parameters = fl_bgn_form(FL_NO_BOX, 430, 680);
  336.   obj = fl_add_box(FL_UP_BOX,0,0,430,680,"");
  337.   obj = fl_add_labelframe(FL_ENGRAVED_FRAME,20,400,395,60,"Object");
  338.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  339.     fl_set_object_lalign(obj,FL_ALIGN_TOP);
  340.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  341.   obj = fl_add_labelframe(FL_EMBOSSED_FRAME,20,60,395,60,"Center coordinates");
  342.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  343.     fl_set_object_lalign(obj,FL_ALIGN_TOP);
  344.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  345.   obj = fl_add_labelframe(FL_EMBOSSED_FRAME,20,270,395,110,"Time");
  346.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  347.     fl_set_object_lalign(obj,FL_ALIGN_TOP);
  348.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  349.   obj = fl_add_labelframe(FL_EMBOSSED_FRAME,20,200,395,60,"Rotation angle");
  350.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  351.     fl_set_object_lalign(obj,FL_ALIGN_TOP);
  352.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  353.   obj = fl_add_labelframe(FL_EMBOSSED_FRAME,20,130,395,60,"Pixel size");
  354.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  355.     fl_set_object_lalign(obj,FL_ALIGN_TOP);
  356.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  357.   fdui->rainputW = obj = fl_add_input(FL_NORMAL_INPUT,60,80,115,30,"RA:");
  358.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  359.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  360.     fl_set_object_callback(obj,rainputC,0);
  361.   fdui->decinputW = obj = fl_add_input(FL_NORMAL_INPUT,275,80,115,30,"Dec:");
  362.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  363.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  364.     fl_set_object_callback(obj,decinputC,0);
  365.   fdui->xpixelW = obj = fl_add_input(FL_FLOAT_INPUT,75,145,100,30,"x:");
  366.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  367.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  368.     fl_set_object_callback(obj,xpixelC,0);
  369.   fdui->ypixelW = obj = fl_add_input(FL_FLOAT_INPUT,290,145,100,30,"y:");
  370.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  371.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  372.     fl_set_object_callback(obj,ypixelC,0);
  373.   fdui->rotationW = obj = fl_add_input(FL_NORMAL_INPUT,80,215,95,30,"decimal degrees");
  374.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  375.     fl_set_object_lalign(obj,FL_ALIGN_RIGHT);
  376.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  377.     fl_set_object_callback(obj,rotationC,0);
  378.   fdui->timeyearW = obj = fl_add_input(FL_INT_INPUT,65,300,55,30,"Year");
  379.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  380.     fl_set_object_lalign(obj,FL_ALIGN_TOP);
  381.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  382.     fl_set_object_callback(obj,timeyearC,0);
  383.   fdui->timemonthW = obj = fl_add_input(FL_INT_INPUT,125,300,35,30,"Month");
  384.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  385.     fl_set_object_lalign(obj,FL_ALIGN_TOP);
  386.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  387.     fl_set_object_callback(obj,timemonthC,0);
  388.   fdui->timehourW = obj = fl_add_input(FL_INT_INPUT,245,300,35,30,"Hours");
  389.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  390.     fl_set_object_lalign(obj,FL_ALIGN_TOP);
  391.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  392.     fl_set_object_callback(obj,timehourC,0);
  393.   fdui->timeminuteW = obj = fl_add_input(FL_INT_INPUT,285,300,35,30,"Min");
  394.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  395.     fl_set_object_lalign(obj,FL_ALIGN_TOP);
  396.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  397.     fl_set_object_callback(obj,timeminuteC,0);
  398.   fdui->timesecondW = obj = fl_add_input(FL_FLOAT_INPUT,325,300,65,30,"Sec");
  399.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  400.     fl_set_object_lalign(obj,FL_ALIGN_TOP);
  401.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  402.     fl_set_object_callback(obj,timesecondC,0);
  403.   fdui->timedecdayW = obj = fl_add_input(FL_FLOAT_INPUT,265,340,130,30,"Decimal day");
  404.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  405.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  406.     fl_set_object_callback(obj,timedecdayC,0);
  407.   obj = fl_add_text(FL_NORMAL_TEXT,175,145,20,35,"\"");
  408.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  409.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  410.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  411.   obj = fl_add_text(FL_NORMAL_TEXT,390,145,20,35,"\"");
  412.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  413.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  414.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  415.   fdui->parokW = obj = fl_add_button(FL_NORMAL_BUTTON,175,625,100,45,"OK");
  416.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  417.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  418.   fdui->timedayW = obj = fl_add_input(FL_INT_INPUT,165,300,35,30,"Day");
  419.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  420.     fl_set_object_lalign(obj,FL_ALIGN_TOP);
  421.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  422.     fl_set_object_callback(obj,timedayC,0);
  423.   obj = fl_add_text(FL_NORMAL_TEXT,135,10,155,40,"Image parameters");
  424.     fl_set_object_lsize(obj,FL_LARGE_SIZE);
  425.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  426.   fdui->objectW = obj = fl_add_input(FL_NORMAL_INPUT,30,420,375,30,"");
  427.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  428.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  429.     fl_set_object_callback(obj,objectC,0);
  430.   fdui->observerW = obj = fl_add_input(FL_NORMAL_INPUT,110,475,295,30,"Observer");
  431.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  432.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  433.     fl_set_object_callback(obj,observerC,0);
  434.   fdui->telescopeW = obj = fl_add_input(FL_NORMAL_INPUT,110,510,295,30,"Telescope");
  435.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  436.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  437.     fl_set_object_callback(obj,telescopeC,0);
  438.   fdui->instrumentW = obj = fl_add_input(FL_NORMAL_INPUT,110,545,295,30,"Instrument");
  439.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  440.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  441.     fl_set_object_callback(obj,instrumentC,0);
  442.   fl_end_form();
  443.  
  444.   fdui->Parameters->fdui = fdui;
  445.  
  446.   return fdui;
  447. }
  448. /*---------------------------------------*/
  449.  
  450. FD_Report *create_form_Report(void)
  451. {
  452.   FL_OBJECT *obj;
  453.   FD_Report *fdui = (FD_Report *) fl_calloc(1, sizeof(*fdui));
  454.  
  455.   fdui->Report = fl_bgn_form(FL_NO_BOX, 885, 650);
  456.   obj = fl_add_box(FL_UP_BOX,0,0,885,650,"");
  457.   fdui->reportW = obj = fl_add_browser(FL_SELECT_BROWSER,15,15,855,585,"");
  458.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  459.     fl_set_object_callback(obj,reportC,0);
  460.   fdui->closereportW = obj = fl_add_button(FL_NORMAL_BUTTON,740,610,115,35,"Close");
  461.     fl_set_object_lsize(obj,FL_LARGE_SIZE);
  462.   fdui->savereportW = obj = fl_add_button(FL_NORMAL_BUTTON,20,610,115,35,"Save");
  463.     fl_set_object_lsize(obj,FL_LARGE_SIZE);
  464.     fl_set_object_callback(obj,savereportC,0);
  465.   fl_end_form();
  466.  
  467.   fdui->Report->fdui = fdui;
  468.  
  469.   return fdui;
  470. }
  471. /*---------------------------------------*/
  472.  
  473. FD_Options *create_form_Options(void)
  474. {
  475.   FL_OBJECT *obj;
  476.   FD_Options *fdui = (FD_Options *) fl_calloc(1, sizeof(*fdui));
  477.  
  478.   fdui->Options = fl_bgn_form(FL_NO_BOX, 850, 515);
  479.   obj = fl_add_box(FL_UP_BOX,0,0,850,515,"");
  480.   obj = fl_add_frame(FL_ENGRAVED_FRAME,445,365,380,85,"");
  481.   obj = fl_add_labelframe(FL_EMBOSSED_FRAME,430,140,405,315,"Star counting");
  482.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  483.     fl_set_object_lalign(obj,FL_ALIGN_TOP);
  484.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  485.   obj = fl_add_labelframe(FL_EMBOSSED_FRAME,15,140,405,315,"Star matching");
  486.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  487.     fl_set_object_lalign(obj,FL_ALIGN_TOP);
  488.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  489.   fdui->logfileW = obj = fl_add_input(FL_NORMAL_INPUT,225,70,175,35,"Name of the log file");
  490.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  491.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  492.     fl_set_object_callback(obj,logfileC,0);
  493.   fdui->minconstW = obj = fl_add_input(FL_FLOAT_INPUT,335,160,65,35,"Minimal value to accept constellation");
  494.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  495.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  496.     fl_set_object_callback(obj,minconstC,0);
  497.   fdui->initconstW = obj = fl_add_input(FL_INT_INPUT,335,200,65,35,"Number of bright stars in initial  matching");
  498.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  499.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  500.     fl_set_object_callback(obj,initconstC,0);
  501.   fdui->starconstW = obj = fl_add_input(FL_INT_INPUT,335,240,65,35,"Number of stars in constellation");
  502.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  503.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  504.     fl_set_object_callback(obj,starconstC,0);
  505.   fdui->countsigmaW = obj = fl_add_input(FL_FLOAT_INPUT,755,160,65,35,"Sigma above background");
  506.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  507.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  508.     fl_set_object_callback(obj,countsigmaC,0);
  509.   fdui->countminvalW = obj = fl_add_input(FL_INT_INPUT,755,200,65,35,"Minimal accepted intensity");
  510.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  511.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  512.     fl_set_object_callback(obj,countminvalC,0);
  513.   fdui->starerrorW = obj = fl_add_input(FL_FLOAT_INPUT,335,280,65,35,"Maximal positional error in pixels");
  514.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  515.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  516.     fl_set_object_callback(obj,starerrorC,0);
  517.   fdui->starminsizeW = obj = fl_add_input(FL_INT_INPUT,755,240,65,35,"Minimal star size in pixels");
  518.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  519.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  520.     fl_set_object_callback(obj,starminsizelC,0);
  521.   fdui->acceptoptionsW = obj = fl_add_button(FL_NORMAL_BUTTON,20,460,95,45,"Accept");
  522.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  523.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  524.   fdui->defaultoptionsW = obj = fl_add_button(FL_NORMAL_BUTTON,740,460,95,45,"Defaults");
  525.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  526.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  527.     fl_set_object_callback(obj,defaultoptionsC,0);
  528.   obj = fl_add_text(FL_NORMAL_TEXT,140,15,175,35,"Astrometry options");
  529.     fl_set_object_lsize(obj,FL_LARGE_SIZE);
  530.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  531.   fdui->starminmagW = obj = fl_add_input(FL_FLOAT_INPUT,335,320,65,35,"Minimal magnitude (brightest star)");
  532.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  533.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  534.     fl_set_object_callback(obj,starminmagC,0);
  535.   fdui->starmaxmagW = obj = fl_add_input(FL_FLOAT_INPUT,335,360,65,35,"Maximal magnitude (faintest star)");
  536.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  537.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  538.     fl_set_object_callback(obj,starmaxmagC,0);
  539.   fdui->maxresW = obj = fl_add_input(FL_FLOAT_INPUT,335,400,65,35,"Maximal residual (arcseconds)");
  540.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  541.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  542.     fl_set_object_callback(obj,maxresC,0);
  543.   fdui->stargridW = obj = fl_add_input(FL_INT_INPUT,755,280,65,35,"Background grid size");
  544.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  545.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  546.     fl_set_object_callback(obj,stargridC,0);
  547.   fdui->staredgeW = obj = fl_add_input(FL_INT_INPUT,755,325,65,35,"Insensitive edge");
  548.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  549.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  550.     fl_set_object_callback(obj,staredgeC,0);
  551.   fdui->starinnerW = obj = fl_add_input(FL_FLOAT_INPUT,755,365,65,35,"Radius of inner circle");
  552.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  553.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  554.     fl_set_object_callback(obj,starinnerC,0);
  555.   fdui->starouterW = obj = fl_add_input(FL_FLOAT_INPUT,755,405,65,35,"Radius of outer circle");
  556.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  557.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  558.     fl_set_object_callback(obj,starouterC,0);
  559.   fdui->starapertureW = obj = fl_add_checkbutton(FL_PUSH_BUTTON,455,380,115,45,"Aperture");
  560.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  561.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  562.     fl_set_object_callback(obj,starapertureC,0);
  563.   fl_end_form();
  564.  
  565.   fdui->Options->fdui = fdui;
  566.  
  567.   return fdui;
  568. }
  569. /*---------------------------------------*/
  570.  
  571. FD_Catalog *create_form_Catalog(void)
  572. {
  573.   FL_OBJECT *obj;
  574.   FD_Catalog *fdui = (FD_Catalog *) fl_calloc(1, sizeof(*fdui));
  575.  
  576.   fdui->Catalog = fl_bgn_form(FL_NO_BOX, 625, 330);
  577.   obj = fl_add_box(FL_UP_BOX,0,0,625,330,"");
  578.   obj = fl_add_labelframe(FL_EMBOSSED_FRAME,20,30,590,230,"Star catalogs");
  579.     fl_set_object_lsize(obj,FL_LARGE_SIZE);
  580.     fl_set_object_lalign(obj,FL_ALIGN_TOP);
  581.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  582.   fdui->checkusnoW = obj = fl_add_checkbutton(FL_PUSH_BUTTON,30,55,145,40,"USNO SA 1.0");
  583.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  584.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  585.     fl_set_object_callback(obj,checkusnoC,0);
  586.   fdui->checkppmW = obj = fl_add_checkbutton(FL_PUSH_BUTTON,30,105,145,40,"PPM");
  587.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  588.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  589.     fl_set_object_callback(obj,checkppmC,0);
  590.   fdui->checkguidesouthW = obj = fl_add_checkbutton(FL_PUSH_BUTTON,30,205,145,40,"Guide south");
  591.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  592.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  593.     fl_set_object_callback(obj,checkguideC,1);
  594.   fdui->usnodirW = obj = fl_add_input(FL_NORMAL_INPUT,220,55,370,40,"Path:");
  595.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  596.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  597.     fl_set_object_callback(obj,usnodirC,0);
  598.   fdui->ppmdirW = obj = fl_add_input(FL_NORMAL_INPUT,220,105,370,40,"Path:");
  599.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  600.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  601.     fl_set_object_callback(obj,ppmdirC,0);
  602.   fdui->guidedirsouthW = obj = fl_add_input(FL_NORMAL_INPUT,220,205,370,40,"Path:");
  603.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  604.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  605.     fl_set_object_callback(obj,guidedirsouthC,0);
  606.   fdui->okcatalogsW = obj = fl_add_button(FL_NORMAL_BUTTON,260,275,105,40,"OK");
  607.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  608.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  609.   fdui->checkguideW = obj = fl_add_checkbutton(FL_PUSH_BUTTON,30,155,145,40,"Guide north");
  610.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  611.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  612.     fl_set_object_callback(obj,checkguideC,0);
  613.   fdui->guidedirW = obj = fl_add_input(FL_NORMAL_INPUT,220,155,370,40,"Path:");
  614.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  615.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  616.     fl_set_object_callback(obj,guidedirC,0);
  617.   fl_end_form();
  618.  
  619.   fdui->Catalog->fdui = fdui;
  620.  
  621.   return fdui;
  622. }
  623. /*---------------------------------------*/
  624.  
  625. FD_Mail *create_form_Mail(void)
  626. {
  627.   FL_OBJECT *obj;
  628.   FD_Mail *fdui = (FD_Mail *) fl_calloc(1, sizeof(*fdui));
  629.  
  630.   fdui->Mail = fl_bgn_form(FL_NO_BOX, 635, 745);
  631.   obj = fl_add_box(FL_UP_BOX,0,0,635,745,"");
  632.   fdui->toaddressW = obj = fl_add_input(FL_NORMAL_INPUT,45,55,575,25,"To:");
  633.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  634.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  635.     fl_set_object_callback(obj,toaddressC,0);
  636.   fdui->ccaddressW = obj = fl_add_input(FL_NORMAL_INPUT,45,85,575,25,"CC:");
  637.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  638.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  639.     fl_set_object_callback(obj,ccaddressC,0);
  640.   fdui->messageW = obj = fl_add_browser(FL_HOLD_BROWSER,45,265,575,410,"");
  641.     fl_set_object_callback(obj,messageC,0);
  642.   fdui->sendmailW = obj = fl_add_button(FL_NORMAL_BUTTON,50,685,100,40,"Send");
  643.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  644.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  645.     fl_set_object_gravity(obj, FL_West, FL_West);
  646.     fl_set_object_resize(obj, FL_RESIZE_NONE);
  647.     fl_set_object_callback(obj,sendmailC,0);
  648.   fdui->closemailW = obj = fl_add_button(FL_NORMAL_BUTTON,510,685,100,40,"Close");
  649.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  650.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  651.     fl_set_object_gravity(obj, FL_West, FL_West);
  652.     fl_set_object_resize(obj, FL_RESIZE_NONE);
  653.   obj = fl_add_text(FL_NORMAL_TEXT,110,20,350,25,"Send astrometry report");
  654.     fl_set_object_lsize(obj,FL_LARGE_SIZE);
  655.     fl_set_object_lalign(obj,FL_ALIGN_CENTER|FL_ALIGN_INSIDE);
  656.   fdui->editorW = obj = fl_add_input(FL_NORMAL_INPUT,45,195,575,25,"Edit:");
  657.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  658.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  659.     fl_set_object_callback(obj,editorC,0);
  660.   fdui->editlineW = obj = fl_add_button(FL_NORMAL_BUTTON,45,230,85,30,"Edit");
  661.     fl_set_object_lsize(obj,FL_NORMAL_SIZE);
  662.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  663.     fl_set_object_gravity(obj, FL_West, FL_West);
  664.     fl_set_object_resize(obj, FL_RESIZE_NONE);
  665.     fl_set_object_callback(obj,editlineC,0);
  666.   fdui->insertlineW = obj = fl_add_button(FL_NORMAL_BUTTON,135,230,85,30,"Insert");
  667.     fl_set_object_lsize(obj,FL_NORMAL_SIZE);
  668.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  669.     fl_set_object_gravity(obj, FL_West, FL_West);
  670.     fl_set_object_resize(obj, FL_RESIZE_NONE);
  671.     fl_set_object_callback(obj,insertlineC,0);
  672.   fdui->deletelineW = obj = fl_add_button(FL_NORMAL_BUTTON,225,230,85,30,"Delete");
  673.     fl_set_object_lsize(obj,FL_NORMAL_SIZE);
  674.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  675.     fl_set_object_gravity(obj, FL_West, FL_West);
  676.     fl_set_object_resize(obj, FL_RESIZE_NONE);
  677.     fl_set_object_callback(obj,deletelineC,0);
  678.   fdui->mailtitleW = obj = fl_add_input(FL_NORMAL_INPUT,45,115,575,25,"Subj:");
  679.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  680.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  681.     fl_set_object_callback(obj,mailtitleC,0);
  682.   fdui->mailfileW = obj = fl_add_input(FL_NORMAL_INPUT,45,145,480,25,"File:");
  683.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  684.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  685.     fl_set_object_callback(obj,mailfileC,0);
  686.   fdui->findfileW = obj = fl_add_button(FL_NORMAL_BUTTON,530,145,90,25,"Find");
  687.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  688.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  689.     fl_set_object_callback(obj,findfileC,0);
  690.   fdui->savemailW = obj = fl_add_button(FL_NORMAL_BUTTON,155,685,100,40,"Save");
  691.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  692.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  693.     fl_set_object_gravity(obj, FL_West, FL_West);
  694.     fl_set_object_resize(obj, FL_RESIZE_NONE);
  695.     fl_set_object_callback(obj,savemailC,0);
  696.   fdui->headerW = obj = fl_add_button(FL_NORMAL_BUTTON,495,230,125,30,"Insert header");
  697.     fl_set_object_lsize(obj,FL_NORMAL_SIZE);
  698.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  699.     fl_set_object_gravity(obj, FL_West, FL_West);
  700.     fl_set_object_resize(obj, FL_RESIZE_NONE);
  701.     fl_set_object_callback(obj,headerC,0);
  702.   fl_end_form();
  703.  
  704.   fdui->Mail->fdui = fdui;
  705.  
  706.   return fdui;
  707. }
  708. /*---------------------------------------*/
  709.  
  710. FD_Wcs *create_form_Wcs(void)
  711. {
  712.   FL_OBJECT *obj;
  713.   FD_Wcs *fdui = (FD_Wcs *) fl_calloc(1, sizeof(*fdui));
  714.  
  715.   fdui->Wcs = fl_bgn_form(FL_NO_BOX, 375, 475);
  716.   obj = fl_add_box(FL_UP_BOX,0,0,375,475,"");
  717.   obj = fl_add_text(FL_NORMAL_TEXT,30,20,320,45,"Do you want to accept the new WCS values?");
  718.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  719.     fl_set_object_lalign(obj,FL_ALIGN_CENTER|FL_ALIGN_INSIDE);
  720.   obj = fl_add_text(FL_NORMAL_TEXT,120,70,70,30,"OLD");
  721.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  722.     fl_set_object_lalign(obj,FL_ALIGN_CENTER|FL_ALIGN_INSIDE);
  723.   obj = fl_add_text(FL_NORMAL_TEXT,230,70,70,30,"NEW");
  724.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  725.     fl_set_object_lalign(obj,FL_ALIGN_CENTER|FL_ALIGN_INSIDE);
  726.   fdui->crval1oldW = obj = fl_add_input(FL_NORMAL_INPUT,90,105,105,30,"CRVAL1");
  727.   fdui->crval1newW = obj = fl_add_input(FL_NORMAL_INPUT,210,105,105,30,"");
  728.   fdui->crval2oldW = obj = fl_add_input(FL_NORMAL_INPUT,90,145,105,30,"CRVAL2");
  729.   fdui->crval2newW = obj = fl_add_input(FL_NORMAL_INPUT,210,145,105,30,"");
  730.   fdui->crpix1oldW = obj = fl_add_input(FL_NORMAL_INPUT,90,185,105,30,"CRPIX1");
  731.   fdui->crpix1newW = obj = fl_add_input(FL_NORMAL_INPUT,210,185,105,30,"");
  732.   fdui->crpix2oldW = obj = fl_add_input(FL_NORMAL_INPUT,90,225,105,30,"CRPIX2");
  733.   fdui->crpix2newW = obj = fl_add_input(FL_NORMAL_INPUT,210,225,105,30,"");
  734.   fdui->cdelt1oldW = obj = fl_add_input(FL_NORMAL_INPUT,90,265,105,30,"CDELT1");
  735.   fdui->cdelt1newW = obj = fl_add_input(FL_NORMAL_INPUT,210,265,105,30,"");
  736.   fdui->cdelt2oldW = obj = fl_add_input(FL_NORMAL_INPUT,90,305,105,30,"CDELT2");
  737.   fdui->cdelt2newW = obj = fl_add_input(FL_NORMAL_INPUT,210,305,105,30,"");
  738.   fdui->crota2oldW = obj = fl_add_input(FL_NORMAL_INPUT,90,345,105,30,"CROTA2");
  739.   fdui->crota2newW = obj = fl_add_input(FL_NORMAL_INPUT,210,345,105,30,"");
  740.   fdui->wcsyesW = obj = fl_add_button(FL_NORMAL_BUTTON,45,405,85,45,"Yes");
  741.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  742.   fdui->wcsnoW = obj = fl_add_button(FL_NORMAL_BUTTON,235,405,85,45,"No");
  743.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  744.   fdui->writetofileW = obj = fl_add_button(FL_NORMAL_BUTTON,140,405,85,45,"Write to file");
  745.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  746.   fl_end_form();
  747.  
  748.   fdui->Wcs->fdui = fdui;
  749.  
  750.   return fdui;
  751. }
  752. /*---------------------------------------*/
  753.  
  754. FD_Settings *create_form_Settings(void)
  755. {
  756.   FL_OBJECT *obj;
  757.   FD_Settings *fdui = (FD_Settings *) fl_calloc(1, sizeof(*fdui));
  758.  
  759.   fdui->Settings = fl_bgn_form(FL_NO_BOX, 755, 445);
  760.   obj = fl_add_box(FL_UP_BOX,0,0,755,445,"");
  761.   fdui->savesettingsW = obj = fl_add_button(FL_NORMAL_BUTTON,25,390,105,45,"Save");
  762.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  763.   fdui->closesettingsW = obj = fl_add_button(FL_NORMAL_BUTTON,630,390,105,45,"Close");
  764.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  765.   obj = fl_add_text(FL_NORMAL_TEXT,195,15,320,30,"Fitsblink default settings");
  766.     fl_set_object_lsize(obj,FL_HUGE_SIZE);
  767.     fl_set_object_lalign(obj,FL_ALIGN_CENTER|FL_ALIGN_INSIDE);
  768.   fdui->setfolderW = obj = fl_add_tabfolder(FL_TOP_TABFOLDER,15,95,730,290,"");
  769.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  770.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  771.   fl_end_form();
  772.  
  773.   fdui->Settings->fdui = fdui;
  774.  
  775.   return fdui;
  776. }
  777. /*---------------------------------------*/
  778.  
  779. FD_Set_catalogs *create_form_Set_catalogs(void)
  780. {
  781.   FL_OBJECT *obj;
  782.   FD_Set_catalogs *fdui = (FD_Set_catalogs *) fl_calloc(1, sizeof(*fdui));
  783.  
  784.   fdui->Set_catalogs = fl_bgn_form(FL_NO_BOX, 665, 250);
  785.   obj = fl_add_box(FL_FLAT_BOX,0,0,665,250,"");
  786.   fdui->usno_pathW = obj = fl_add_input(FL_NORMAL_INPUT,135,55,480,30,"USNO SA");
  787.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  788.     fl_set_object_callback(obj,usno_path_setC,0);
  789.   fdui->ppm_pathW = obj = fl_add_input(FL_NORMAL_INPUT,135,90,480,30,"PPM");
  790.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  791.     fl_set_object_callback(obj,ppm_path_setC,0);
  792.   fdui->gsc_north_pathW = obj = fl_add_input(FL_NORMAL_INPUT,135,125,480,30,"GSC_NORTH");
  793.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  794.     fl_set_object_callback(obj,gsc_north_path_setC,0);
  795.   fdui->gsc_south_pathW = obj = fl_add_input(FL_NORMAL_INPUT,135,160,480,30,"GSC_SOUTH");
  796.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  797.     fl_set_object_callback(obj,gsc_south_path_setC,0);
  798.   fl_end_form();
  799.  
  800.   fdui->Set_catalogs->fdui = fdui;
  801.  
  802.   return fdui;
  803. }
  804. /*---------------------------------------*/
  805.  
  806. FD_Set_observatory *create_form_Set_observatory(void)
  807. {
  808.   FL_OBJECT *obj;
  809.   FD_Set_observatory *fdui = (FD_Set_observatory *) fl_calloc(1, sizeof(*fdui));
  810.  
  811.   fdui->Set_observatory = fl_bgn_form(FL_NO_BOX, 665, 250);
  812.   obj = fl_add_box(FL_FLAT_BOX,0,0,665,250,"");
  813.   fdui->instrumentW = obj = fl_add_input(FL_NORMAL_INPUT,125,130,480,30,"Instrument");
  814.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  815.     fl_set_object_callback(obj,instrument_setC,0);
  816.   fdui->telescopeW = obj = fl_add_input(FL_NORMAL_INPUT,125,95,480,30,"Telescope");
  817.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  818.     fl_set_object_callback(obj,telescope_setC,0);
  819.   fdui->observatoryW = obj = fl_add_input(FL_INT_INPUT,125,25,50,30,"Observatory");
  820.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  821.     fl_set_object_callback(obj,observatory_setC,0);
  822.   fdui->observerW = obj = fl_add_input(FL_NORMAL_INPUT,125,60,480,30,"Observer");
  823.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  824.     fl_set_object_callback(obj,observer_setC,0);
  825.   fdui->observatory_longitudeW = obj = fl_add_input(FL_FLOAT_INPUT,125,165,85,30,"Longitude");
  826.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  827.     fl_set_object_callback(obj,observatory_longitudeC,0);
  828.   fdui->observatory_latitudeW = obj = fl_add_input(FL_FLOAT_INPUT,125,200,85,30,"Latitude");
  829.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  830.     fl_set_object_callback(obj,observatory_latitudeC,0);
  831.   obj = fl_add_text(FL_NORMAL_TEXT,220,165,185,65,"In decimal degrees\npositive for north and west");
  832.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  833.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  834.   fl_end_form();
  835.  
  836.   fdui->Set_observatory->fdui = fdui;
  837.  
  838.   return fdui;
  839. }
  840. /*---------------------------------------*/
  841.  
  842. FD_Set_display *create_form_Set_display(void)
  843. {
  844.   FL_OBJECT *obj;
  845.   FD_Set_display *fdui = (FD_Set_display *) fl_calloc(1, sizeof(*fdui));
  846.  
  847.   fdui->Set_display = fl_bgn_form(FL_NO_BOX, 665, 250);
  848.   obj = fl_add_box(FL_FLAT_BOX,0,0,665,250,"");
  849.   fdui->color_setW = obj = fl_add_checkbutton(FL_PUSH_BUTTON,95,30,30,30,"Color");
  850.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  851.     fl_set_object_lalign(obj,FL_ALIGN_LEFT);
  852.     fl_set_object_callback(obj,color_setC,0);
  853.   fdui->inverse_setW = obj = fl_add_checkbutton(FL_PUSH_BUTTON,95,65,30,30,"Inverse");
  854.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  855.     fl_set_object_lalign(obj,FL_ALIGN_LEFT);
  856.     fl_set_object_callback(obj,inverse_setC,0);
  857.   fdui->set_deltatW = obj = fl_add_counter(FL_SIMPLE_COUNTER,95,115,85,40,"Delay");
  858.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  859.     fl_set_object_lalign(obj,FL_ALIGN_LEFT);
  860.     fl_set_object_gravity(obj, FL_East, FL_East);
  861.     fl_set_object_resize(obj, FL_RESIZE_NONE);
  862.   fdui->blinkerwidthW = obj = fl_add_input(FL_INT_INPUT,530,30,75,30,"Blinker window width");
  863.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  864.     fl_set_object_callback(obj,blinkerwidthC,0);
  865.   fdui->blinkerheightW = obj = fl_add_input(FL_INT_INPUT,530,65,75,30,"Blinker window height");
  866.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  867.     fl_set_object_callback(obj,blinkerheightC,0);
  868.   fdui->set_autolevel_highW = obj = fl_add_input(FL_FLOAT_INPUT,140,180,70,30,"Autolevel parameter");
  869.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  870.     fl_set_object_callback(obj,set_autolevel_highC,0);
  871.   fl_end_form();
  872.  
  873.   fdui->Set_display->fdui = fdui;
  874.  
  875.   return fdui;
  876. }
  877. /*---------------------------------------*/
  878.  
  879. FD_Set_mail *create_form_Set_mail(void)
  880. {
  881.   FL_OBJECT *obj;
  882.   FD_Set_mail *fdui = (FD_Set_mail *) fl_calloc(1, sizeof(*fdui));
  883.  
  884.   fdui->Set_mail = fl_bgn_form(FL_NO_BOX, 665, 250);
  885.   obj = fl_add_box(FL_FLAT_BOX,0,0,665,250,"");
  886.   fdui->toW = obj = fl_add_input(FL_NORMAL_INPUT,120,60,480,30,"To");
  887.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  888.     fl_set_object_callback(obj,to_setC,0);
  889.   fdui->ccW = obj = fl_add_input(FL_NORMAL_INPUT,120,95,480,30,"Cc");
  890.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  891.     fl_set_object_callback(obj,cc_setC,0);
  892.   fdui->subjectW = obj = fl_add_input(FL_NORMAL_INPUT,120,130,480,30,"Subject");
  893.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  894.     fl_set_object_callback(obj,subject_setC,0);
  895.   fdui->fileW = obj = fl_add_input(FL_NORMAL_INPUT,120,165,480,30,"File");
  896.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  897.     fl_set_object_callback(obj,file_setC,0);
  898.   fl_end_form();
  899.  
  900.   fdui->Set_mail->fdui = fdui;
  901.  
  902.   return fdui;
  903. }
  904. /*---------------------------------------*/
  905.  
  906. FD_Star *create_form_Star(void)
  907. {
  908.   FL_OBJECT *obj;
  909.   FD_Star *fdui = (FD_Star *) fl_calloc(1, sizeof(*fdui));
  910.  
  911.   fdui->Star = fl_bgn_form(FL_NO_BOX, 390, 515);
  912.   obj = fl_add_box(FL_UP_BOX,0,0,390,515,"");
  913.   fdui->windstarW = obj = fl_add_frame(FL_ENGRAVED_FRAME,10,10,370,320,"");
  914.   fdui->acceptstarW = obj = fl_add_button(FL_NORMAL_BUTTON,10,460,110,40,"Accept");
  915.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  916.   fdui->rejectstarW = obj = fl_add_button(FL_NORMAL_BUTTON,270,460,110,40,"Reject");
  917.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  918.   fdui->xstarW = obj = fl_add_text(FL_NORMAL_TEXT,15,345,90,35,"x=");
  919.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  920.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  921.   fdui->ystarW = obj = fl_add_text(FL_NORMAL_TEXT,165,345,90,35,"y=");
  922.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  923.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  924.   obj = fl_add_text(FL_NORMAL_TEXT,15,385,90,35,"x=");
  925.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  926.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  927.   fdui->rastarW = obj = fl_add_text(FL_NORMAL_TEXT,15,380,145,35,"RA=");
  928.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  929.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  930.   fdui->decstarW = obj = fl_add_text(FL_NORMAL_TEXT,165,380,140,35,"DEC=");
  931.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  932.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  933.   fdui->okstarW = obj = fl_add_button(FL_NORMAL_BUTTON,140,460,110,40,"OK");
  934.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  935.   fdui->objstarW = obj = fl_add_input(FL_NORMAL_INPUT,60,415,320,35,"Object");
  936.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  937.     fl_set_object_callback(obj,objstarC,0);
  938.   fdui->vstarW = obj = fl_add_text(FL_NORMAL_TEXT,285,345,90,35,"v=");
  939.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  940.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  941.   fl_end_form();
  942.  
  943.   fdui->Star->fdui = fdui;
  944.  
  945.   return fdui;
  946. }
  947. /*---------------------------------------*/
  948.  
  949. FD_Telescope *create_form_Telescope(void)
  950. {
  951.   FL_OBJECT *obj;
  952.   FD_Telescope *fdui = (FD_Telescope *) fl_calloc(1, sizeof(*fdui));
  953.  
  954.   fdui->Telescope = fl_bgn_form(FL_NO_BOX, 765, 590);
  955.   obj = fl_add_box(FL_UP_BOX,0,0,765,590,"");
  956.   obj = fl_add_labelframe(FL_ENGRAVED_FRAME,460,245,295,290,"Camera");
  957.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  958.     fl_set_object_lalign(obj,FL_ALIGN_TOP);
  959.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  960.   obj = fl_add_labelframe(FL_ENGRAVED_FRAME,460,70,295,160,"Time");
  961.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  962.     fl_set_object_lalign(obj,FL_ALIGN_TOP);
  963.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  964.   obj = fl_add_labelframe(FL_ENGRAVED_FRAME,15,70,410,465,"Telescope");
  965.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  966.     fl_set_object_lalign(obj,FL_ALIGN_TOP|FL_ALIGN_INSIDE);
  967.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  968.   fdui->teldecW = obj = fl_add_input(FL_NORMAL_INPUT,260,90,130,40,"DEC:");
  969.     fl_set_object_boxtype(obj,FL_FRAME_BOX);
  970.     fl_set_object_lsize(obj,FL_LARGE_SIZE);
  971.     fl_set_object_callback(obj,teldecC,0);
  972.   fdui->telraW = obj = fl_add_input(FL_NORMAL_INPUT,65,90,130,40,"RA:");
  973.     fl_set_object_boxtype(obj,FL_FRAME_BOX);
  974.     fl_set_object_lsize(obj,FL_LARGE_SIZE);
  975.     fl_set_object_callback(obj,telraC,0);
  976.   fdui->telaziW = obj = fl_add_input(FL_NORMAL_INPUT,260,135,130,40,"AZ:");
  977.     fl_set_object_boxtype(obj,FL_FRAME_BOX);
  978.     fl_set_object_lsize(obj,FL_LARGE_SIZE);
  979.     fl_set_object_callback(obj,telaziC,0);
  980.   fdui->telaltW = obj = fl_add_input(FL_NORMAL_INPUT,65,135,130,40,"ALT:");
  981.     fl_set_object_boxtype(obj,FL_FRAME_BOX);
  982.     fl_set_object_lsize(obj,FL_LARGE_SIZE);
  983.     fl_set_object_callback(obj,telaltC,0);
  984.   fdui->telbrowsecatW = obj = fl_add_browser(FL_SELECT_BROWSER,65,255,325,260,"");
  985.     fl_set_object_lsize(obj,FL_NORMAL_SIZE);
  986.     fl_set_object_callback(obj,telbrowsecatC,0);
  987.   fdui->telutW = obj = fl_add_clock(FL_DIGITAL_CLOCK,580,95,140,30,"UTC");
  988.     fl_set_object_boxtype(obj,FL_FRAME_BOX);
  989.     fl_set_object_color(obj,FL_COL1,FL_BOTTOM_BCOL);
  990.     fl_set_object_lsize(obj,FL_LARGE_SIZE);
  991.     fl_set_object_lalign(obj,FL_ALIGN_LEFT);
  992.   fdui->tellocalW = obj = fl_add_clock(FL_DIGITAL_CLOCK,580,125,140,30,"Local");
  993.     fl_set_object_boxtype(obj,FL_FRAME_BOX);
  994.     fl_set_object_color(obj,FL_COL1,FL_BOTTOM_BCOL);
  995.     fl_set_object_lsize(obj,FL_LARGE_SIZE);
  996.     fl_set_object_lalign(obj,FL_ALIGN_LEFT);
  997.   fdui->teltempW = obj = fl_add_input(FL_NORMAL_INPUT,515,260,55,30,"Temp");
  998.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  999.     fl_set_object_callback(obj,teltempC,0);
  1000.   fdui->telreadtempW = obj = fl_add_button(FL_NORMAL_BUTTON,610,260,50,30,"Read");
  1001.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1002.     fl_set_object_callback(obj,telreadtempC,0);
  1003.   fdui->telsettempW = obj = fl_add_button(FL_NORMAL_BUTTON,660,260,50,30,"Set");
  1004.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1005.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  1006.     fl_set_object_callback(obj,telsettempC,0);
  1007.   fdui->telexposureW = obj = fl_add_input(FL_NORMAL_INPUT,540,300,75,30,"Exposure");
  1008.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1009.     fl_set_object_callback(obj,telexposureC,0);
  1010.   obj = fl_add_text(FL_NORMAL_TEXT,615,300,60,30,"seconds");
  1011.     fl_set_object_lsize(obj,FL_NORMAL_SIZE);
  1012.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  1013.   fdui->telfileW = obj = fl_add_input(FL_NORMAL_INPUT,505,340,145,30,"File");
  1014.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1015.     fl_set_object_callback(obj,telfileC,0);
  1016.   obj = fl_add_text(FL_NORMAL_TEXT,575,260,20,30,"C");
  1017.     fl_set_object_lsize(obj,FL_NORMAL_SIZE);
  1018.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  1019.   fdui->teldarkW = obj = fl_add_lightbutton(FL_PUSH_BUTTON,480,380,65,35,"Dark");
  1020.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1021.     fl_set_object_callback(obj,teldarkC,0);
  1022.   fdui->telstartexposureW = obj = fl_add_button(FL_NORMAL_BUTTON,550,380,75,35,"Expose");
  1023.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1024.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  1025.     fl_set_object_callback(obj,telstartexposureC,0);
  1026.   fdui->telcloseW = obj = fl_add_button(FL_NORMAL_BUTTON,10,540,85,40,"Close");
  1027.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1028.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  1029.   fdui->telstartW = obj = fl_add_button(FL_NORMAL_BUTTON,65,180,60,35,"Start");
  1030.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1031.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  1032.     fl_set_object_callback(obj,telstartC,0);
  1033.   fdui->telparkW = obj = fl_add_button(FL_NORMAL_BUTTON,135,180,60,35,"Park");
  1034.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1035.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  1036.     fl_set_object_callback(obj,telparkC,0);
  1037.   obj = fl_add_text(FL_NORMAL_TEXT,235,10,335,50,"Telescope and camera control");
  1038.     fl_set_object_lsize(obj,FL_HUGE_SIZE);
  1039.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  1040.   fdui->telreadposW = obj = fl_add_button(FL_NORMAL_BUTTON,260,180,130,35,"Read position");
  1041.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1042.     fl_set_object_callback(obj,telreadposC,0);
  1043.   fdui->telgoW = obj = fl_add_button(FL_NORMAL_BUTTON,260,215,130,35,"Go!");
  1044.     fl_set_object_lsize(obj,FL_LARGE_SIZE);
  1045.     fl_set_object_callback(obj,telgoC,0);
  1046.   fdui->telchoosecatW = obj = fl_add_button(FL_NORMAL_BUTTON,65,215,130,35,"Choose catalog");
  1047.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1048.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  1049.     fl_set_object_callback(obj,telchoosecatC,0);
  1050.   fdui->teljulianW = obj = fl_add_input(FL_NORMAL_INPUT,580,155,140,30,"Julian");
  1051.     fl_set_object_boxtype(obj,FL_FRAME_BOX);
  1052.     fl_set_object_lsize(obj,FL_LARGE_SIZE);
  1053.   fdui->telsiderealW = obj = fl_add_input(FL_NORMAL_INPUT,580,185,140,30,"Sidereal");
  1054.     fl_set_object_boxtype(obj,FL_FRAME_BOX);
  1055.     fl_set_object_lsize(obj,FL_LARGE_SIZE);
  1056.   fdui->telzeroW = obj = fl_add_button(FL_NORMAL_BUTTON,195,180,65,35,"Zero");
  1057.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1058.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  1059.     fl_set_object_callback(obj,telzeroC,0);
  1060.   fdui->telcenterW = obj = fl_add_button(FL_NORMAL_BUTTON,630,380,65,35,"Center");
  1061.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1062.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  1063.     fl_set_object_callback(obj,telcenterC,0);
  1064.   fl_end_form();
  1065.  
  1066.   fdui->Telescope->fdui = fdui;
  1067.  
  1068.   return fdui;
  1069. }
  1070. /*---------------------------------------*/
  1071.  
  1072. FD_Commands *create_form_Commands(void)
  1073. {
  1074.   FL_OBJECT *obj;
  1075.   FD_Commands *fdui = (FD_Commands *) fl_calloc(1, sizeof(*fdui));
  1076.  
  1077.   fdui->Commands = fl_bgn_form(FL_NO_BOX, 665, 250);
  1078.   obj = fl_add_box(FL_FLAT_BOX,0,0,665,250,"");
  1079.   fdui->comstartW = obj = fl_add_input(FL_NORMAL_INPUT,80,15,565,25,"Start");
  1080.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1081.     fl_set_object_callback(obj,comstartC,0);
  1082.   fdui->compointW = obj = fl_add_input(FL_NORMAL_INPUT,80,45,565,25,"Point");
  1083.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1084.     fl_set_object_callback(obj,compointC,0);
  1085.   fdui->comparkW = obj = fl_add_input(FL_NORMAL_INPUT,80,75,565,25,"Park");
  1086.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1087.     fl_set_object_callback(obj,comparkC,0);
  1088.   fdui->comwhereW = obj = fl_add_input(FL_NORMAL_INPUT,80,105,565,25,"Where");
  1089.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1090.     fl_set_object_callback(obj,comwhereC,0);
  1091.   fdui->comzeroW = obj = fl_add_input(FL_NORMAL_INPUT,80,135,565,25,"Zero");
  1092.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1093.     fl_set_object_callback(obj,comzeroC,0);
  1094.   fdui->comcenterW = obj = fl_add_input(FL_NORMAL_INPUT,80,165,565,25,"Center");
  1095.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1096.     fl_set_object_callback(obj,comcenterC,0);
  1097.   fl_end_form();
  1098.  
  1099.   fdui->Commands->fdui = fdui;
  1100.  
  1101.   return fdui;
  1102. }
  1103. /*---------------------------------------*/
  1104.  
  1105. FD_Message *create_form_Message(void)
  1106. {
  1107.   FL_OBJECT *obj;
  1108.   FD_Message *fdui = (FD_Message *) fl_calloc(1, sizeof(*fdui));
  1109.  
  1110.   fdui->Message = fl_bgn_form(FL_NO_BOX, 375, 140);
  1111.   obj = fl_add_box(FL_UP_BOX,0,0,375,140,"");
  1112.   fdui->messagetextW = obj = fl_add_text(FL_NORMAL_TEXT,10,20,355,60,"");
  1113.     fl_set_object_lsize(obj,FL_HUGE_SIZE);
  1114.     fl_set_object_lalign(obj,FL_ALIGN_CENTER|FL_ALIGN_INSIDE);
  1115.   fdui->messagecancelW = obj = fl_add_button(FL_NORMAL_BUTTON,135,90,115,40,"Cancel");
  1116.     fl_set_object_lsize(obj,FL_LARGE_SIZE);
  1117.   fl_end_form();
  1118.  
  1119.   fdui->Message->fdui = fdui;
  1120.  
  1121.   return fdui;
  1122. }
  1123. /*---------------------------------------*/
  1124.  
  1125. FD_Set_help *create_form_Set_help(void)
  1126. {
  1127.   FL_OBJECT *obj;
  1128.   FD_Set_help *fdui = (FD_Set_help *) fl_calloc(1, sizeof(*fdui));
  1129.  
  1130.   fdui->Set_help = fl_bgn_form(FL_NO_BOX, 665, 250);
  1131.   obj = fl_add_box(FL_FLAT_BOX,0,0,665,250,"");
  1132.   fdui->setbrowserW = obj = fl_add_input(FL_NORMAL_INPUT,145,45,495,35,"WWW browser path");
  1133.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1134.     fl_set_object_callback(obj,setbrowserC,0);
  1135.   fdui->sethelpfileW = obj = fl_add_input(FL_NORMAL_INPUT,145,85,495,35,"Help file path");
  1136.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1137.     fl_set_object_callback(obj,sethelpfileC,0);
  1138.   fl_end_form();
  1139.  
  1140.   fdui->Set_help->fdui = fdui;
  1141.  
  1142.   return fdui;
  1143. }
  1144. /*---------------------------------------*/
  1145.  
  1146. FD_Set_ccd *create_form_Set_ccd(void)
  1147. {
  1148.   FL_OBJECT *obj;
  1149.   FD_Set_ccd *fdui = (FD_Set_ccd *) fl_calloc(1, sizeof(*fdui));
  1150.  
  1151.   fdui->Set_ccd = fl_bgn_form(FL_NO_BOX, 665, 250);
  1152.   obj = fl_add_box(FL_FLAT_BOX,0,0,665,250,"");
  1153.   fdui->comgettempW = obj = fl_add_input(FL_NORMAL_INPUT,80,30,565,25,"Get temp.");
  1154.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1155.     fl_set_object_callback(obj,comgettempC,0);
  1156.   fdui->comsettempW = obj = fl_add_input(FL_NORMAL_INPUT,80,60,565,25,"Set temp");
  1157.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1158.     fl_set_object_callback(obj,comsettempC,0);
  1159.   fdui->comexposeW = obj = fl_add_input(FL_NORMAL_INPUT,80,90,565,25,"Expose");
  1160.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1161.     fl_set_object_callback(obj,comexposeC,0);
  1162.   fl_end_form();
  1163.  
  1164.   fdui->Set_ccd->fdui = fdui;
  1165.  
  1166.   return fdui;
  1167. }
  1168. /*---------------------------------------*/
  1169.  
  1170. FD_Comet *create_form_Comet(void)
  1171. {
  1172.   FL_OBJECT *obj;
  1173.   FD_Comet *fdui = (FD_Comet *) fl_calloc(1, sizeof(*fdui));
  1174.  
  1175.   fdui->Comet = fl_bgn_form(FL_NO_BOX, 392, 575);
  1176.   obj = fl_add_box(FL_UP_BOX,0,0,392,575,"");
  1177.   fdui->windcometW = obj = fl_add_frame(FL_ENGRAVED_FRAME,10,10,370,320,"");
  1178.   fdui->xcometW = obj = fl_add_text(FL_NORMAL_TEXT,15,345,90,35,"x=");
  1179.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1180.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  1181.   fdui->ycometW = obj = fl_add_text(FL_NORMAL_TEXT,165,345,90,35,"y=");
  1182.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1183.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  1184.   fdui->racometW = obj = fl_add_text(FL_NORMAL_TEXT,15,380,145,35,"RA=");
  1185.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1186.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  1187.   fdui->deccometW = obj = fl_add_text(FL_NORMAL_TEXT,165,380,140,35,"DEC=");
  1188.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1189.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  1190.   fdui->objcometW = obj = fl_add_input(FL_NORMAL_INPUT,60,415,320,35,"Object");
  1191.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1192.     fl_set_object_callback(obj,objstarC,0);
  1193.   fdui->acceptcometW = obj = fl_add_button(FL_NORMAL_BUTTON,15,525,110,40,"Accept");
  1194.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1195.   fdui->okcometW = obj = fl_add_button(FL_NORMAL_BUTTON,145,525,110,40,"OK");
  1196.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1197.   fdui->rejectcometW = obj = fl_add_button(FL_NORMAL_BUTTON,270,525,110,40,"Reject");
  1198.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1199.   fdui->innercircleW = obj = fl_add_counter(FL_NORMAL_COUNTER,40,475,135,35,"Inner circle");
  1200.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1201.     fl_set_object_lalign(obj,FL_ALIGN_TOP);
  1202.     fl_set_object_callback(obj,innercircleC,0);
  1203.   fdui->outercircleW = obj = fl_add_counter(FL_NORMAL_COUNTER,220,475,135,35,"Outer circle");
  1204.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1205.     fl_set_object_lalign(obj,FL_ALIGN_TOP);
  1206.     fl_set_object_callback(obj,outercircleC,0);
  1207.   fdui->vcometW = obj = fl_add_text(FL_NORMAL_TEXT,285,345,90,35,"v=");
  1208.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1209.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  1210.   fl_end_form();
  1211.  
  1212.   fdui->Comet->fdui = fdui;
  1213.  
  1214.   return fdui;
  1215. }
  1216. /*---------------------------------------*/
  1217.  
  1218. FD_Set_count *create_form_Set_count(void)
  1219. {
  1220.   FL_OBJECT *obj;
  1221.   FD_Set_count *fdui = (FD_Set_count *) fl_calloc(1, sizeof(*fdui));
  1222.  
  1223.   fdui->Set_count = fl_bgn_form(FL_NO_BOX, 665, 250);
  1224.   obj = fl_add_box(FL_FLAT_BOX,0,0,665,250,"");
  1225.   fdui->set_sg_numW = obj = fl_add_input(FL_FLOAT_INPUT,210,45,70,30,"Threshold");
  1226.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1227.     fl_set_object_callback(obj,set_sg_numC,0);
  1228.   fdui->set_minbrightW = obj = fl_add_input(FL_FLOAT_INPUT,210,80,70,30,"Minimal brightness");
  1229.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1230.     fl_set_object_callback(obj,set_minbrightC,0);
  1231.   fdui->set_minstarW = obj = fl_add_input(FL_INT_INPUT,210,115,70,30,"Minimal star size");
  1232.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1233.     fl_set_object_callback(obj,set_minstarC,0);
  1234.   fdui->set_gridsizeW = obj = fl_add_input(FL_INT_INPUT,210,150,70,30,"Backgrund grid size");
  1235.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1236.     fl_set_object_callback(obj,set_gridsizeC,0);
  1237.   fdui->set_borderW = obj = fl_add_input(FL_INT_INPUT,210,185,70,30,"Insensitive edge size");
  1238.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1239.     fl_set_object_callback(obj,set_borderC,0);
  1240.   fdui->set_innerW = obj = fl_add_input(FL_FLOAT_INPUT,485,80,70,30,"Size of the inner circle");
  1241.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1242.     fl_set_object_callback(obj,set_innerC,0);
  1243.   fdui->set_outerW = obj = fl_add_input(FL_FLOAT_INPUT,485,115,70,30,"Size of the outer circle");
  1244.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1245.     fl_set_object_callback(obj,set_outerC,0);
  1246.   fdui->set_apertureW = obj = fl_add_checkbutton(FL_PUSH_BUTTON,485,50,70,25,"Aperture photometry");
  1247.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1248.     fl_set_object_lalign(obj,FL_ALIGN_LEFT);
  1249.     fl_set_object_callback(obj,set_apertureC,0);
  1250.   obj = fl_add_text(FL_NORMAL_TEXT,190,5,390,25,"Default settings for star detection routines");
  1251.     fl_set_object_lsize(obj,FL_LARGE_SIZE);
  1252.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  1253.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  1254.   fl_end_form();
  1255.  
  1256.   fdui->Set_count->fdui = fdui;
  1257.  
  1258.   return fdui;
  1259. }
  1260. /*---------------------------------------*/
  1261.  
  1262. FD_Set_match *create_form_Set_match(void)
  1263. {
  1264.   FL_OBJECT *obj;
  1265.   FD_Set_match *fdui = (FD_Set_match *) fl_calloc(1, sizeof(*fdui));
  1266.  
  1267.   fdui->Set_match = fl_bgn_form(FL_NO_BOX, 665, 250);
  1268.   obj = fl_add_box(FL_FLAT_BOX,0,0,665,250,"");
  1269.   fdui->set_starerrorW = obj = fl_add_input(FL_FLOAT_INPUT,205,150,55,25,"Max. pos. error (pixels)");
  1270.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1271.     fl_set_object_callback(obj,set_starerrorC,0);
  1272.   obj = fl_add_text(FL_NORMAL_TEXT,130,10,420,30,"Default settings for catalog matching routines");
  1273.     fl_set_object_lsize(obj,FL_LARGE_SIZE);
  1274.     fl_set_object_lalign(obj,FL_ALIGN_LEFT|FL_ALIGN_INSIDE);
  1275.     fl_set_object_lstyle(obj,FL_BOLD_STYLE);
  1276.   fdui->set_minconstW = obj = fl_add_input(FL_FLOAT_INPUT,205,60,55,25,"Min. value to accept const.");
  1277.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1278.     fl_set_object_callback(obj,set_minconstC,0);
  1279.   fdui->set_initconstW = obj = fl_add_input(FL_INT_INPUT,205,90,55,25,"No. of stars in initial matching.");
  1280.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1281.     fl_set_object_callback(obj,set_initconstC,0);
  1282.   fdui->set_starconstW = obj = fl_add_input(FL_INT_INPUT,205,120,55,25,"No. of stars in constellation");
  1283.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1284.     fl_set_object_callback(obj,set_starconstC,0);
  1285.   fdui->set_maxresW = obj = fl_add_input(FL_FLOAT_INPUT,205,180,55,25,"Max. residual (arcseconds)");
  1286.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1287.     fl_set_object_callback(obj,set_maxresC,0);
  1288.   fdui->set_minmagW = obj = fl_add_input(FL_FLOAT_INPUT,510,60,55,25,"Minimal magnitude");
  1289.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1290.     fl_set_object_callback(obj,set_minmagC,0);
  1291.   fdui->set_maxmagW = obj = fl_add_input(FL_FLOAT_INPUT,510,90,55,25,"Maximal magnitude");
  1292.     fl_set_object_lsize(obj,FL_MEDIUM_SIZE);
  1293.     fl_set_object_callback(obj,set_maxmagC,0);
  1294.   fl_end_form();
  1295.  
  1296.   fdui->Set_match->fdui = fdui;
  1297.  
  1298.   return fdui;
  1299. }
  1300. /*---------------------------------------*/
  1301.  
  1302.