DAS_Spat_ConfCBs.c File Reference

DAS configuration procedures. More...

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <windows.h>
#include <direct.h>
#include <math.h>
#include "mgui.h"
#include "DAS_Spatram.h"
#include "dcl.h"
#include "dil.h"
#include "bil.h"
#include "wsc.h"
#include "dxl.h"
#include "dscud.h"
#include "DOAS.h"

Include dependency graph for DAS_Spat_ConfCBs.c:

Go to the source code of this file.

Functions
void	ActEditCB (MOBJECT edit, char *text, void *ed)
	Text Application callback Apply to the variables the text typed in various text box and validated by ValidateCB(MOBJECT edit, EDIT_VAL *ev, void *ii) More...
void	ADTesterCB (MOBJECT shell, void *od, void *ad)
	Test Temperature AD Converter callback. More...
void	ApplyChCB (MOBJECT shell, void *od, void *ad)
	Apply changes in DAS Config callback. More...
void	ApplyImgCB (MOBJECT shell, void *od, void *ad)
	Image type Application callback Apply to the CCD buffer the selected type of image (MONO or RGB) More...
void	CCDSetupCB (MOBJECT shell, void *od, void *ad)
	CCD setup Callback. Execute DCS.exe (DTA Camera Select) More...
void	CloseColPickCB (MOBJECT obj, void *s, void *v)
	Declared but not used. More...
void	CloseConfigCB (MOBJECT shell, void *od, void *ad)
	Close DAS-Config callback close the DAS_Config window. If the testing of the ADConverter is running it is stopped. More...
void	CloseFontViewCB (MOBJECT p, void *a, void *data)
	This callback Unloads the latest loaded font and destroys the dialog. More...
void	ColObjCB (MOBJECT o, void *a, void *v)
	select the object to consider for color picking More...
void	ColorAssignCB (MOBJECT o, void *o_data, void *a_data)
void	ColorFreeCB (MOBJECT o, void *o_data, void *a_data)
	Declared but not used. More...
void	ColorMapExposeCB (MOBJECT obj, MEvent *pexp, void *a_data)
	Declared but not used. More...
void	ColorMapInputCB (MOBJECT obj, MEvent *pe, void *a_data)
	Declared but not used. More...
void	ColorMapResizeCB (MOBJECT obj, DRAWAREA_PREF *pref, void *a_data)
	Declared but not used. More...
void	ColorPickCB (MOBJECT o, void *o_data, void *a_data)
void	ColorSaveCB (MOBJECT o, void *o_data, void *a_data)
	Declared but not used. More...
void	ColPickBackForeGCB (MOBJECT o, void *a, void *v)
	select if the foreground or background color of the selected object will be picked More...
void	ConfigCB (MOBJECT p, void *od, void *ad)
	DAS Configuration shell creation callback. More...
void	D_UndoCB (MOBJECT o, void *a, void *v)
	Undo the previous color setting operation. More...
void	DB_AMSposmode_CB (MOBJECT o, void *a, void *v)
	callback selecting the positioning mode for stepper motors ( sequential or simulaneaous) More...
void	DB_AMSProgBar_CB (MOBJECT o, void *a, void *v)
	callback selecting if show or not the progress bar for motor positioning More...
void	DB_CellExposeCB (MOBJECT obj, MEvent *pexp, void *a_data)
	display selected Color More...
void	DB_CellResizeCB (MOBJECT obj, DRAWAREA_PREF *pref, void *a_data)
	display selected Color More...
void	DB_ChangeColorCellCB (MOBJECT o, MVALUE o_data, void *a_data)
	draw the object 'o' with the selected color More...
void	DB_ColorAssign (MOBJECT a[], int numel, short tc[])
	Assign to the selected object the chosen color. More...
void	DB_ColorPick (MOBJECT o)
void	DB_DispBlindPixCB (MOBJECT o, void *id, void *a_data)
	Display Blind Pixel Callback Set if the blind pixels will be displayed or not on the plot window. More...
void	DB_Do2Undo_Colors (short docol[], short undocol[])
void	DB_Do2Undo_Fonts (MTFont dofont, MTFont undofont)
void	DB_FilterType_CB (MOBJECT o, void *a, void *v)
	callback selecting the type of installed filter wheel module More...
void	DB_FontAssign (MOBJECT a[], int numel, MTFont fnt)
	This callback assign font to the selected object. More...
void	DB_ImgTypeCB (MOBJECT o, void *id, void *a_data)
	Set the Image type. More...
void	DB_MIGE_CB (MOBJECT o, void *a, void *v)
	callback selecting the operation mode for the AltAzPlatform More...
void	DB_MIGEopmode_CB (MOBJECT o, void *a, void *v)
	callback selecting the operation mode for the AltAzPlatform More...
void	DB_MIGEType_CB (MOBJECT o, void *a, void *v)
void	DB_MirrorImg_CB (MOBJECT o, void *a, void *v)
	callback selecting the activation of the mirroring of the CCD image along the X or Y axis More...
void	DB_PlotDisplayCB (MOBJECT o, void *id, void *a_data)
	Select if the PLOT will be displayed after the measurement . More...
void	DB_PlotYAxisCB (MOBJECT o, void *id, void *a_data)
	Select the Y axis Unit mode . More...
void	DB_RadDrkSourceCB (MOBJECT o, void *a, void *v)
	Set the dark source. More...
void	DB_RadioAvgModeCB (MOBJECT o, void *id, void *a_data)
	Set the Averaging mode flag. More...
void	DB_RadioDarkCB (MOBJECT o, void *id, void *a_data)
	Set the dark removing from the measurements. More...
void	DB_RadioFNSelCB (MOBJECT o, void *id, void *a_data)
	Set the file name mode. More...
void	DB_RadioModeSelCB (MOBJECT o, void *id, void *a_data)
	Set the saving mode. More...
void	DB_RadioPixCorrCB (MOBJECT o, void *id, void *a_data)
	Set the image Correction flag. More...
void	DB_SelOutModeCB (MOBJECT o, void *id, void *a_data)
	Select the Output for the Temperature AD Converter . More...
void	DB_SetCCDTargetTempCB (MOBJECT o, void *id, void *a_data)
	Select the CCD temperature mode . More...
void	DB_SetXUnitsCB (MOBJECT o, void *id, void *a_data)
	Select the X axis Unit mode . More...
void	DB_Shutter_CB (MOBJECT o, void *a, void *v)
	callback selecting if the shutter is installed or not More...
void	DB_ShutterType_CB (MOBJECT o, void *a, void *v)
	callback selecting the type of installed shutter More...
void	DB_TestF (void)
void	DB_Undo2Do_Colors (short undocol[], short docol[])
	Assign to the DO_Color structure the Color Values of the UNDO_Color Structure. More...
void	DB_Undo2Do_Fonts (MTFont undofont, MTFont dofont)
void	DB_VMRsfCB (MOBJECT o, void *id, void *a_data)
	Set the flag for modification or reload of DAS configuration files Set the VMRsf (View Modify Re-load system files) flag. More...
void	DrawAreaExpFontCB (MOBJECT obj, MEvent *pe, void *data)
	This callback draws strings using the selected font. More...
char *	EquipCode2Name (int eqcode, char *src, char *dest)
	translate the Equipment Code in the Equipment Name More...
void	FontOBJSelCB (MOBJECT obj, void *a, void *v)
	This callback select the object for applying font. More...
int	fraz2val (int mod, char *val)
	ratio value to decimal value opposite than listval2fraz or val2fraz More...
int	GetDefPix (int mod)
	Maps the defective pixel. More...
int	hertz2int (int mod, char *string)
	translate the Hertz speed in AMS digit unit. More...
double	int2hertz (int mod, int k)
double	int2perc (int mod, int k)
	translate the AMS digit unit in text. The power assigned to the motor trough the AMS, is translated in text More...
void	listval2fraz (int mod, int val)
	Decimal value to ratio value The decimal value indicating the fractioning of the step is translated in ratio (i.e. 0 –> 1/2 = 400 s/r, 1–> 1/4 =800 s/r) More...
void	LoadFontCB (MOBJECT obj, void *a, void *data)
	This callback tries to load the specified font. More...
int	LoadPaletteCB (MOBJECT o, void *o_data, void *a_data)
	Callback for LoadTestPalette. More...
void	MAPDefPix (int mod)
	create the Under/Over exposed pixels window At the pression of the button in DAS_Config the appropriate shell (For the creation of the Under or Over exposed pixel map) will be created. More...
void	MAPDefPixCB (MOBJECT o, void *id, void *a_data)
	GetDefPix(mod) Callback At the pression of the 'Execute' button in the appropriate shell the GetDefPix procedure will be executed. More...
void	ModifyConfFileCB (MOBJECT o, void *id, void *a_data)
	Modification DAS Configuration files Callback Set if the blind pixels will be displayed or not on the plot window. More...
void	NovaTypeCB (MOBJECT p, void *od, void *ad)
	Callback for NOVA selection. More...
void	PB_H_CB (MOBJECT p, void *od, void *ad)
	Quick Help Callback. More...
int	perc2int (int mod, char *string)
	translate the percent power in AMS digit unit. The percent power assigned to the motor trough the AMS , is translated in digital unit (i.e. 50% –> 38) More...
void	print2file (FILE *ff, int x, int y, unsigned int m)
	Print to file the defective pixel. More...
void	ScreenInfoCB (MOBJECT o, void *s, void *v)
void	SetBoldCB (MOBJECT obj, MVALUE a, void *data)
	This callback toggles the Bold attribute. More...
void	SetItalicCB (MOBJECT obj, MVALUE a, void *data)
	This callback toggles the Italic attribute. More...
void	TestFontCB (MOBJECT obj, void *a, void *data)
	This callback tries to load the specified font. More...
void	TextColorAssignCB (MOBJECT o, MVALUE o_data, void *a_data)
void	UnderOverPixCB (MOBJECT o, void *id, void *a_data)
	Under/Over exposed pixels Callback At the pression of the button in DAS_Config the appropriate shell (For the creation of the Under or Over exposed pixel map - with the MAPDefPix() function) will be created. More...
void	UndoFCB (MOBJECT obj, void *a, void *v)
	This callback UnDo the font choice (Not implemented yet) More...
void	val2fraz (int id, int sn, int val)
	Decimal value to ratio value Similar to listval2fraz The decimal value indicating the fractioning of the step is translated in ratio (i.e. 0 –> 1/2 = 400 s/r, 1–> 1/4 =800 s/r) More...
void	ValidateCB (MOBJECT edit, EDIT_VAL *ev, void *ii)
	Text Validation callback Validation callback for the text typed in different text box. More...
int	WriteAMSCB (MOBJECT shell, void *od, void *ad)
	Write AMS.ini file . More...
int	WriteColorsCB (MOBJECT o, void *a, void *v)
	Write selected color in DASSysColor.INI. More...
int	WriteEquipini (void)
	Write equipment.ini file . More...
void	WriteFontCB (MOBJECT obj, void *a, void *v)
	This callback write on file the selected font (Not implemented yet) More...
int	WriteHardwareiniCB (MOBJECT shell, void *od, void *ad)
	Write hardware.ini file . More...
int	WriteOptioniniCB (MOBJECT shell, void *od, void *ad)
	Write Options.ini file . More...
int	WriteParaminiCB (MOBJECT shell, void *od, void *ad)
	Write Param.ini file . More...
int	WritewlstepiniCB (MOBJECT shell, void *od, void *ad)
	Write wlstep.ini file . More...

Variables
adtester	ADTESTER
bil	BIL
ccd	cc
config	Cfg
MOBJECT	CP_Sh
das	DAS
ccd	DC_CCD
ptf	DC_HP
dftp	DFTP
dil	DIL
doas	DOAS
palette	DPAL
DSCCB	dsccb
DXL_par	DXL
flag	FLAG
ids	IDS
	ID tasks. More...
listf	LISTF
mtcl	MTCL
	MTColor. More...
omuthr	OMUTHR
paramini	PARAM
unsigned char	Port = 0
undopal	UDPAL
int	undofont = 15

Detailed Description

DAS configuration procedures.

Author

Daniele Bortoli

Definition in file DAS_Spat_ConfCBs.c.

Function Documentation

ActEditCB()

void ActEditCB	(	MOBJECT	edit,
		char *	text,
		void *	ed
	)

Text Application callback Apply to the variables the text typed in various text box and validated by ValidateCB(MOBJECT edit, EDIT_VAL *ev, void *ii)

Definition at line 1877 of file DAS_Spat_ConfCBs.c.

References optionini::avgmode, paramini::ccdWx, paramini::ccdWy, paramini::ccdXoff, paramini::ccdYoff, paramini::CoolPw, das::DOption, doas::FFTFilter, dftp::ftppwd, dftp::ftpserver, dftp::ftpuser, GrafoIMG(), optionini::hlineafter, optionini::hlinebefore, paramini::ITemp, LevelDefPix, optionini::maxlvlar, paramini::maxtexp, N_AVG, paramini::Offset, ON_OFFLINEPLOT, das::Paramini, omuthr::PCPower, omuthr::PID_kd, omuthr::PID_ki, omuthr::PID_kp, SZAMax, TOTTEXP, paramini::TPelt, and paramini::VBin.

Referenced by CONFP_AMS_SM_OFFSET(), CONFP_opt_page1(), CONFP_opt_page2(), CONFP_opt_page3(), CONFP_opt_page4(), CONFP_param_page1(), D_PlotTools(), MAPDefPix(), and MDCreateColFor_Sh().

{
    
    int c = (int) ed;
    
    switch (c)
    {

    case 1:
        {
            DAS.Paramini.ITemp = strtod( text, &text );
            break;
        }
    case 2:
        {
            DAS.Paramini.CoolPw = (int) (strtod( text, &text ) * 10);
            break;
        }
    case 3:
        {
            DAS.Paramini.TPelt = strtod( text, &text );
            break;
        }
    case 2000:
        {
            OMUTHR.PCPower = (int) (strtod( text, &text ) * 10);
            break;
        }

    case 4:
        {
            DAS.Paramini.ccdXoff = (int) strtol( text, &text, 10 );
            break;
        }
    case 5:
        {
            DAS.Paramini.ccdWx = (int) strtol( text, &text, 10 );
            break;
        }
    case 6:
        {
            DAS.Paramini.ccdYoff = (int) strtol( text, &text, 10 );
            break;
        }
    case 7:
        {
            DAS.Paramini.ccdWy = (int) strtol( text, &text, 10 );
            break;
        }
    case 8:
        {
            DAS.Paramini.VBin = (int) strtol( text, &text, 10 );
            break;
        }
/*
    case 9:
        {
            
            DAS.StepM.cop[0] = (int) strtol( text, &text, 10 );
            break;
        }
    case 10:
        {
            DAS.StepM.step[0] = (int) strtol( text, &text, 10 );
            break;
        }
    case 11:
        {
            DAS.StepM.slope[0] = (int) strtol( text, &text, 10 );
            break;
        }
    case 12:
        {
            DAS.StepM.speed[0] = (int) strtol( text, &text, 10 );
            break;
        }

    case 13:
        {
            DAS.StepM.cop[1] = (int) strtol( text, &text, 10 );
            break;
        }
    case 14:
        {
            DAS.StepM.step[1] = (int) strtol( text, &text, 10 );
            break;
        }
    case 15:
        {
            DAS.StepM.slope[1] = (int) strtol( text, &text, 10 );
            break;
        }
    case 16:
        {
            DAS.StepM.speed[1] = (int) strtol( text, &text, 10 );
            break;
        }

    case 17:
        {
            DAS.StepM.cop[2] = (int) strtol( text, &text, 10 );
            break;
        }
    case 18:
        {
            DAS.StepM.step[2] = (int) strtol( text, &text, 10 );
            break;
        }
    case 19:
        {
            DAS.StepM.slope[2] = (int) strtol( text, &text, 10 );
            break;
        }
    case 20:
        {
            DAS.StepM.speed[2] = (int) strtol( text, &text, 10 );
            break;
        }
*/
    case 111:
        {
            if(DAS.DOption.avgmode)
            {
                TOTTEXP = (int) strtol( text, &text, 10 );
            }
            else
                N_AVG = (int) strtol( text, &text, 10 );
            break;
        }
    case 120:
        {
            SZAMax = (int) strtol( text, &text, 10 );
            break;
        }
    case 130:
        {
            DAS.DOption.hlinebefore = (int) strtol( text, &text, 10 );
            break;
        }
    case 135:
        {
            DAS.DOption.hlineafter = (int) strtol( text, &text, 10 );
            break;
        }

    case 140:
        {
            LevelDefPix = (int) strtol( text, &text, 10 );
            break;
        }
    case 150:
        {
            DOAS.FFTFilter = (int) strtol( text, &text, 10 );
            GrafoIMG(ON_OFFLINEPLOT);
            break;
        }
    case 151:
        {
            DOAS.FFTFilter = (int) strtol( text, &text, 10 );
            break;
        }

    case 200:
        {
            sprintf(DFTP.ftpserver, "%s", text);
            break;
        }
    case 210:
        {
            sprintf(DFTP.ftpuser, "%s", text);
            break;
        }
    case 220:
        {
            sprintf(DFTP.ftppwd, "%s", text);
            break;
        }

// for DEVICES OFFSETS 
    case 300:
        {
            DAS.Paramini.Offset[0] = (int) strtol( text, &text, 10 );
            break;
        }
    case 301:
        {
            DAS.Paramini.Offset[1] = (int) strtol( text, &text, 10 );
            break;
        }
    case 302:
        {
            DAS.Paramini.Offset[2] = (int) strtol( text, &text, 10 );
            break;
        }
    case 303:
        {
            DAS.Paramini.Offset[3] = (int) strtol( text, &text, 10 );
            break;
        }
    case 304:
        {
            DAS.Paramini.Offset[4] = (int) strtol( text, &text, 10 );
            break;
        }
    case 123:
        {
            DAS.Paramini.maxtexp = strtod( text, &text);
            break;
        }
    /********************************************************/
    //PID Parameters
    case 500: //kp
        {
            OMUTHR.PID_kp = (float)strtod( text, &text);
        }
    case 501: //ki
        {
            OMUTHR.PID_ki = (float)strtod( text, &text);    
        }
    case 502: //kd
        {
            OMUTHR.PID_kd = (float)strtod( text, &text);        
        }

    /********************************************************/
    case 600: //Autoranging max level
        {
            DAS.DOption.maxlvlar = strtol( text, &text, 10);        
        }

        
        

    }

}

Here is the call graph for this function:

Here is the caller graph for this function:

ADTesterCB()

void ADTesterCB	(	MOBJECT	shell,
		void *	od,
		void *	ad
	)

Test Temperature AD Converter callback.

Definition at line 3576 of file DAS_Spat_ConfCBs.c.

References adtester::ADInflbl, adtester::ADpb, flag::ADPC104, flag::ADTempTest, AMS2, AMS_PWM(), FANPeltier(), adtester::lblADvalue, ids::LISTEMP, LISTEMP_TASK_TIME, MMessageDialog(), MObjectSetText(), MRefreshTimeout(), Peltier(), and Task_LIS_Temp().

Referenced by MDCreateDASConfig().

{

    int PowerOn, PowerOff,i;

    if(FLAG.ADTempTest == 0)
    {
        
        MObjectSetText(ADTESTER.ADpb, "AD_Testing");
        MObjectSetText(ADTESTER.ADInflbl, "Click AD_Test to stop ");
        if(FLAG.ADPC104 == 0)
        {
            FLAG.ADTempTest = 1;
            PowerOn = 1;
            PowerOff = LISTEMP_TASK_TIME ;
            AMS_PWM(AMS2, PowerOn, PowerOff);//Peltier Power a 0
            Peltier(0); //Peltier Off
            FANPeltier(0);
        }
        else
            MMessageDialog("ADTEST","AD Test Not possible \n Check the PC104 Connection","OK", NULL);

    }
    else if(FLAG.ADTempTest == 1)
    {
        
        MObjectSetText(ADTESTER.ADpb, "Start");
        MObjectSetText(ADTESTER.ADInflbl, "Click Start to Test  ");

        FLAG.ADTempTest = 0;

        MRefreshTimeout(&IDS.LISTEMP, LISTEMP_TASK_TIME, Task_LIS_Temp, NULL);
        for (i=0; i<16; i++)
        {
            MObjectSetText(ADTESTER.lblADvalue[i], "0.0");
        }


    }


}

Here is the call graph for this function:

Here is the caller graph for this function:

ApplyChCB()

void ApplyChCB	(	MOBJECT	shell,
		void *	od,
		void *	ad
	)

Apply changes in DAS Config callback.

Parameters

a_data

= 0 –> Apply to CCD camera = 1 –> Apply to AMS devices

Definition at line 3446 of file DAS_Spat_ConfCBs.c.

References _MAX_PATH, CCD_SetupFlg, d_fileman::CONFIGDIREQUIPMENT, gui::ConfigPanel, gui::ContrPanel, paramini::CoolPw, stepm::cop_perc, DB_InitCamera(), DB_InitMotor(), DB_KB_ButtonActive(), bil::DFILEM, d_fileman::DIRDCL, fraz2val(), das::Gui, hertz2int(), paramini::ITemp, controlpanel::lbl_Par, MObjectGetText(), MObjectSetText(), stepm::multiplier, stepm::NAMS, das::Paramini, omuthr::PCPower, perc2int(), controlpanel::power, stepm::power, controlpanel::slope, stepm::slope, configpanel::SM_multiplier, configpanel::SM_power, configpanel::SM_slope, configpanel::SM_speed, configpanel::SM_step, controlpanel::speed, stepm::speed, stepm::speed_Hz, controlpanel::step, stepm::step, stepm::step_fraz, das::StepM, paramini::TPelt, val2fraz(), and paramini::VBin.

Referenced by CONFP_param_page1(), and MDCreateDASConfig().

{
    int c = (int) ad, i;
    char str[16];
    int er, nummot = 0;
    int ans = 0, k;

//    char destination[_MAX_PATH];
//    char working_dir[_MAX_PATH];
//  char source[_MAX_PATH];
    char buf[_MAX_PATH];

    sprintf(str, "%.1lf", DAS.Paramini.ITemp);
    MObjectSetText(DAS.Gui.ContrPanel.lbl_Par[0], str);

    sprintf(str,"%.1lf%%",(double)DAS.Paramini.CoolPw / 10);
    MObjectSetText(DAS.Gui.ContrPanel.lbl_Par[1], str);

    sprintf(str,"%.1lf", DAS.Paramini.TPelt);
    MObjectSetText(DAS.Gui.ContrPanel.lbl_Par[2], str);


    sprintf(str,"%.1lf%%",(double)OMUTHR.PCPower / 10);
    MObjectSetText(DAS.Gui.ContrPanel.lbl_Par[10], str);


/*
    sprintf(str,"%d", DAS.Paramini.ccdXoff);
    MObjectSetText(DAS.Gui.ContrPanel.lbl_Par[3], str);
    
    sprintf(str,"%d", DAS.Paramini.ccdYoff);
    MObjectSetText(DAS.Gui.ContrPanel.lbl_Par[4], str);

    sprintf(str,"%d", DAS.Paramini.ccdWx);
    MObjectSetText(DAS.Gui.ContrPanel.lbl_Par[5], str);

    sprintf(str,"%d", DAS.Paramini.ccdWy);
    MObjectSetText(DAS.Gui.ContrPanel.lbl_Par[6], str);
*/

    sprintf(str, "%d", DAS.Paramini.VBin);
    MObjectSetText(DAS.Gui.ContrPanel.lbl_Par[9], str);

    
    if(CCD_SetupFlg)
    {
        CCD_SetupFlg = 0;

        //Copy camera.cfg
        sprintf(buf, "copy %s\\camera.cfg %s\\", BIL.DFILEM.DIRDCL, BIL.DFILEM.CONFIGDIREQUIPMENT);
        er = system(buf);
        //sprintf(buf, "copy %s\\dcl.cfg %s\\dcl", BIL.DFILEM.DIRDCL, BIL.DFILEM.CONFIGDIREQUIPMENT);
        //er = system(buf);

    }


// Stepper Motors Parameters
    for (i=0;i<DAS.StepM.NAMS;i++)
    {
        for(k=0;k<2;k++)
        {
        /*
        * Get user preferences from the EDIT Objects for Power SMx
        */
        //Power
        MObjectGetText(DAS.Gui.ConfigPanel.SM_power[i][k], str);
        DAS.StepM.cop_perc[i][k] = atof(str);
        DAS.StepM.power[i][k] = perc2int(0, str);
        MObjectSetText(DAS.Gui.ContrPanel.power[i][k], str);

        /*
        * Get user preferences from the EDIT Objects for Step SMx
        */
        //Step
        MObjectGetText(DAS.Gui.ConfigPanel.SM_step[i][k], str);
        DAS.StepM.step[i][k] = fraz2val(0, str);
        val2fraz(i, k, DAS.StepM.step[i][k]);
        sprintf(str, "%s", DAS.StepM.step_fraz[i][k]);
        MObjectSetText(DAS.Gui.ContrPanel.step[i][k], str);
    
        // Slope
        MObjectGetText(DAS.Gui.ConfigPanel.SM_slope[i][k], str);
        DAS.StepM.slope[i][k] = atoi(str);
        sprintf(str, "%d", DAS.StepM.slope[i][k]);
        MObjectSetText(DAS.Gui.ContrPanel.slope[i][k], str);
    
        //speed
        MObjectGetText(DAS.Gui.ConfigPanel.SM_speed[i][k], str);
        DAS.StepM.speed_Hz[i][k] = atof(str);
        DAS.StepM.speed[i][k] = hertz2int(0, str);
        MObjectSetText(DAS.Gui.ContrPanel.speed[i][k], str);

        //multiplier
        MObjectGetText(DAS.Gui.ConfigPanel.SM_multiplier[i][k], str);
        DAS.StepM.multiplier[i][k] = atof(str);

        }
    }

    if (c == 0)
    {
        er = DB_InitCamera(1);
    
    
    }
    if (c)
    {
        //Disattiva i pulsanti sulla keyboard
        DB_KB_ButtonActive(0);

        
        //er = DB_CloseCOM();
        //if(er) 
        //  ComErrors(er);


        er = DB_InitMotor(0);
        //Attiva i pulsanti sulla keyboard
        DB_KB_ButtonActive(1);


    }



}

Here is the call graph for this function:

Here is the caller graph for this function:

ApplyImgCB()

void ApplyImgCB	(	MOBJECT	shell,
		void *	od,
		void *	ad
	)

Image type Application callback Apply to the CCD buffer the selected type of image (MONO or RGB)

Definition at line 2116 of file DAS_Spat_ConfCBs.c.

References img::attrib, DI_CloseImage(), DI_OpenImage(), DI_RunHisto(), das::DOption, ccd::dx, ccd::dy, IDX, IDY, dil::Img, optionini::imgtype, ccd::kind, image::Mat, das::Paramini, Server, and paramini::VBin.

Referenced by CONFP_opt_page1().

{

//  int er;
    char buf[64];

    IDX = DC_CCD.dx;
    IDY = DC_CCD.dy/DAS.Paramini.VBin ;

    //sprintf(buf, "Marconi %s %d x %d Image",DC_CCD.name, IDX, IDY);
    sprintf(buf, "Marconi %d %d x %d Image",DC_CCD.kind , IDX, IDY);
    Server = DI_OpenImage((unsigned short)IDX, (unsigned short)IDY, (unsigned short)DAS.DOption.imgtype, 1, buf);
    DI_RunHisto();

    if(Server)
    {
        DIL.Img.Mat[Server - 1].attrib = 0;
        DI_CloseImage(Server - 1);
    }

    if(Server == 0)
    {
        DIL.Img.Mat[Server + 1].attrib = 0;
        DI_CloseImage(Server + 1);
    }
    
    
    /*
    er = DI_OpenImage(IDX, IDY, DAS.DOption.flgimgtype, 1, "NONAME");
    if(DAS.DOption.flgimgtype)
        er= DI_CloseImage(0);
    if(!DAS.DOption.flgimgtype)
        er= DI_CloseImage(1);
*/

}

Here is the call graph for this function:

Here is the caller graph for this function:

CCDSetupCB()

void CCDSetupCB	(	MOBJECT	shell,
		void *	od,
		void *	ad
	)

CCD setup Callback. Execute DCS.exe (DTA Camera Select)

Definition at line 3385 of file DAS_Spat_ConfCBs.c.

References _MAX_PATH, CCD_SetupFlg, CodeEq2Name(), d_fileman::CONFIGDIREQUIPMENT, bil::DFILEM, DI_FileExist(), paramini::EqType, d_fileman::HOMEDIRECTORY, MMessageDialog(), and das::Paramini.

Referenced by CONFP_param_page1().

{
    
    int er = 0;
    char str[_MAX_PATH];
//  char buf[_MAX_PATH];
    char buff[_MAX_PATH];

    CCD_SetupFlg = 1;
/*
    //Set path for the DCL
    sprintf(buff, "%s\\dcl\\", BIL.DFILEM.CONFIGDIREQUIPMENT );
    // Return: 1 if PATH exist, else return 0
    er = DI_PathExist(buff);
    if (er)
    {
        //Set path for the DCL
        DC_SetPathName(buff);
    }
    else
    {
        sprintf(buf,"Path '%s' deos not exist,\nPlease create and fill ", buff);
        MMessageDialog ("DAS ERROR ", buf, "OK",NULL); 
        return 1001;

    }

    sprintf(str, "%s%s", buff , "dcs.exe -f ");
*/
    



    sprintf(buff, "%s\\%s.cfg", BIL.DFILEM.CONFIGDIREQUIPMENT,CodeEq2Name(DAS.Paramini.EqType));

    //Return: 1 if file exist, else return 0
    er = DI_FileExist(buff);
    if (er)
    {
        sprintf(str, "%s\\%s -f %s", BIL.DFILEM.HOMEDIRECTORY , "dcs.exe", buff);

    }
    else
    {
        sprintf(buff,"File'%s\\%s.cfg' not found,\n\
Now 'dcs.exe' will load the standard 'camera.cfg' configuration file\n\
Set the camera parameters, copy the '%s\\dcl\\camera.cfg' file in the %s folder\n\
and rename in '%s.cfg'", BIL.DFILEM.CONFIGDIREQUIPMENT, CodeEq2Name(DAS.Paramini.EqType),
BIL.DFILEM.HOMEDIRECTORY,BIL.DFILEM.CONFIGDIREQUIPMENT,CodeEq2Name(DAS.Paramini.EqType));
        MMessageDialog ("DAS ERROR ", buff, "OK",NULL);
        sprintf(str, "%s//%s", BIL.DFILEM.HOMEDIRECTORY , "dcs.exe");

    }

    er = WinExec(str, SW_SHOW);
    

}

Here is the call graph for this function:

Here is the caller graph for this function:

CloseColPickCB()

void CloseColPickCB	(	MOBJECT	obj,
		void *	s,
		void *	v
	)

Declared but not used.

Definition at line 776 of file DAS_Spat_ConfCBs.c.

References cell_color, drawarea_bgc, MFreeCell(), MFreeColor(), MObjectShell(), MShellDestroy(), MShellUnrealize(), and p.

{
    MOBJECT p;

    MFreeColor(drawarea_bgc);
    MFreeCell(cell_color);
    p = MObjectShell(obj);

    MShellUnrealize(p);
    MShellDestroy(p);
}

Here is the call graph for this function:

CloseConfigCB()

void CloseConfigCB	(	MOBJECT	shell,
		void *	od,
		void *	ad
	)

Close DAS-Config callback close the DAS_Config window. If the testing of the ADConverter is running it is stopped.

Definition at line 2153 of file DAS_Spat_ConfCBs.c.

References adtester::ADpb, flag::ADTempTest, DPWD, adtester::lblADvalue, ids::LISTEMP, LISTEMP_TASK_TIME, MObjectSetText(), MRefreshTimeout(), MShellDestroy(), MShellUnrealize(), dpwd::OwnPwdOk, dpwd::ROwnPwdOk, and Task_LIS_Temp().

Referenced by CONFP_Options(), CONFP_param_page1(), CONFP_param_page2(), CONFP_param_page3(), CONFP_param_page4(), CONFP_param_page5(), and MDCreateDASConfig().

{
    
    MOBJECT c;
    int i;
    
    DPWD.ROwnPwdOk = 1;
    DPWD.OwnPwdOk = 1;

    
    c = (MOBJECT) ad;
    if(FLAG.ADTempTest == 1)
    {
        
        MObjectSetText(ADTESTER.ADpb, "Start");
        FLAG.ADTempTest = 0;
        MRefreshTimeout(&IDS.LISTEMP, LISTEMP_TASK_TIME, Task_LIS_Temp, NULL);
        for (i=0; i<16; i++)
                MObjectSetText(ADTESTER.lblADvalue[i], "0.0");
        


    }


    MShellUnrealize(c);
    MShellDestroy(c);
}

Here is the call graph for this function:

Here is the caller graph for this function:

CloseFontViewCB()

void CloseFontViewCB	(	MOBJECT	p,
		void *	a,
		void *	data
	)

This callback Unloads the latest loaded font and destroys the dialog.

Definition at line 1474 of file DAS_Spat_ConfCBs.c.

References FIXED_MEDIUM, font, MObjectShell(), MShellDestroy(), MShellUnrealize(), and MUnloadFont().

{
    if (font != FIXED_MEDIUM)
    MUnloadFont(font);
    font = FIXED_MEDIUM;
    p = MObjectShell(p);

    MShellUnrealize(p);
    MShellDestroy(p);
}

Here is the call graph for this function:

ColObjCB()

void ColObjCB	(	MOBJECT	o,
		void *	a,
		void *	v
	)

select the object to consider for color picking

Definition at line 413 of file DAS_Spat_ConfCBs.c.

References b_sbar, palette::DB_BG, palette::DB_BG_Albl, palette::DB_BG_lblUP, palette::DB_BG_Plbl, DB_ColorPick(), palette::DB_FG_Albl, palette::DB_FG_lblUP, palette::DB_FG_Plbl, palette::DB_Sel, palette::DB_UnSel, DOASMODE, flag::exemode, das::Flag, FlgBG, FlgFG, FlgOBJ, g_sbar, listf::lbl, MMessageDialog(), MRButtonDeactivate(), MRButtonGetActivationStatus(), MScrollBarSetPos(), OFFLINEPLOT, r_sbar, listf::rb, and listf::shell.

Referenced by ColPickBackForeGCB(), and MDCreateDASConfig().

{
//sceglie l'oggetto da considerare label, buttons.... 

    int c = (int) v;
    int er = 0;
    int r, g, b;

    er = MRButtonGetActivationStatus(o);
    if (er)
    {
        switch (c)
        {
        case 0:
            FlgOBJ=0; //Unselected Command Button   
            if(FlgBG)
            {
                r = DPAL.DB_UnSel[0];
                g = DPAL.DB_UnSel[1];
                b = DPAL.DB_UnSel[2];
            }               
            break;
        case 1:
            FlgOBJ=1; //Selected KeyCom
            if(FlgBG)
            {
                r = DPAL.DB_Sel[0];
                g = DPAL.DB_Sel[1];
                b = DPAL.DB_Sel[2];
            }               
            break;

        case 2:
            FlgOBJ=2; //Active Labels 
            if (DAS.Flag.exemode != OFFLINEPLOT && DAS.Flag.exemode != DOASMODE )
            {
                if(FlgBG)
                {
                    r = DPAL.DB_BG_Albl[0];
                    g = DPAL.DB_BG_Albl[1];
                    b = DPAL.DB_BG_Albl[2];
                }               
                if(FlgFG)
                {
                    r = DPAL.DB_FG_Albl[0];
                    g = DPAL.DB_FG_Albl[1];
                    b = DPAL.DB_FG_Albl[2];
                }               
                break;
            }
            else
            {
                if(!MMessageDialog("DAS information", "Not Available in this Execution mode", " Ok ", NULL))
                    MRButtonDeactivate(o);
                break;
            }
        case 3:
            FlgOBJ=3; //Passive Labels 
            if (DAS.Flag.exemode != OFFLINEPLOT && DAS.Flag.exemode != DOASMODE )
            {
                if(FlgBG)
                {
                    r = DPAL.DB_BG_Plbl[0];
                    g = DPAL.DB_BG_Plbl[1];
                    b = DPAL.DB_BG_Plbl[2];
                }               
                if(FlgFG)
                {
                    r = DPAL.DB_FG_Plbl[0];
                    g = DPAL.DB_FG_Plbl[1];
                    b = DPAL.DB_FG_Plbl[2];
                }               
                break;
            }
            else
            {
                if(!MMessageDialog("DAS information", "Not Available in this Execution mode", " Ok ", NULL))
                    MRButtonDeactivate(o);
                break;
            }
        case 4:
            FlgOBJ=4; //Forms Background 
            if (DAS.Flag.exemode != OFFLINEPLOT && DAS.Flag.exemode != DOASMODE )
            {
                r = DPAL.DB_BG[0];
                g = DPAL.DB_BG[1];
                b = DPAL.DB_BG[2];
//              DB_ColorPick(DAS.Gui.ContrPanel.RwFrm0);
                break;
            }
            else
            {
                DB_ColorPick(LISTF.shell);
                break;
            }
        case 5:
            FlgOBJ=5; //Kapital Labels UP 
            if (DAS.Flag.exemode != OFFLINEPLOT && DAS.Flag.exemode != DOASMODE )
            {
                if(FlgBG)
                {
                    r = DPAL.DB_BG_lblUP[0];
                    g = DPAL.DB_BG_lblUP[1];
                    b = DPAL.DB_BG_lblUP[2];
                }               
                if(FlgFG)
                {
                    r = DPAL.DB_FG_lblUP[0];
                    g = DPAL.DB_FG_lblUP[1];
                    b = DPAL.DB_FG_lblUP[2];
                }               
                break;
            }
            else
            {
                DB_ColorPick(LISTF.lbl[0]);
                break;
            }
        case 6:
            FlgOBJ=6; //Radio Buttons 
            DB_ColorPick(LISTF.rb[0]);
            break;
        }
                    
        MScrollBarSetPos(r_sbar, (long) r);
        MScrollBarSetPos(g_sbar, (long) g);
        MScrollBarSetPos(b_sbar, (long) b);
    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

ColorAssignCB()

void ColorAssignCB	(	MOBJECT	o,
		void *	o_data,
		void *	a_data
	)

Definition at line 635 of file DAS_Spat_ConfCBs.c.

References b_c, palette::DB_BG, palette::DB_BG_Albl, palette::DB_BG_lblUP, palette::DB_BG_Plbl, palette::DB_BG_RButt, palette::DB_FG_Albl, palette::DB_FG_lblUP, palette::DB_FG_Plbl, palette::DB_FG_RButt, palette::DB_Sel, palette::DB_UnSel, palette::DB_UnSelFG, FlgBG, FlgFG, FlgOBJ, g_c, das::Gui, MObjectMap(), MObjectRedraw(), MObjectUnmap(), r_c, shells::Sh_Main, and gui::Shells.

Referenced by MDCreateDASConfig().

{
    
//  int i;
    // Unselected Buttons BG
    if(FlgBG && (FlgOBJ==0))
    {
        DPAL.DB_UnSel[0] = r_c;
        DPAL.DB_UnSel[1] = g_c;
        DPAL.DB_UnSel[2] = b_c;
    }
    // Unselected Buttons FG
    if(FlgFG && (FlgOBJ==0))
    {
        DPAL.DB_UnSelFG[0] = r_c;
        DPAL.DB_UnSelFG[1] = g_c;
        DPAL.DB_UnSelFG[2] = b_c;
    }
    // Selected Buttons
    if (FlgBG && (FlgOBJ==1))
    {
        DPAL.DB_Sel[0] = r_c;
        DPAL.DB_Sel[1] = g_c;
        DPAL.DB_Sel[2] = b_c;
    }
     //Active Labels BG 
    if (FlgBG && (FlgOBJ==2))
    {
        DPAL.DB_BG_Albl[0] = r_c;
        DPAL.DB_BG_Albl[1] = g_c;
        DPAL.DB_BG_Albl[2] = b_c;
    }

     //Active Labels FG 
    if (FlgFG && (FlgOBJ==2))
    {
        DPAL.DB_FG_Albl[0] = r_c;
        DPAL.DB_FG_Albl[1] = g_c;
        DPAL.DB_FG_Albl[2] = b_c;

    }

     //Passive Labels BG 
    if (FlgBG && (FlgOBJ==3))
    {
        DPAL.DB_BG_Plbl[0] = r_c;
        DPAL.DB_BG_Plbl[1] = g_c;
        DPAL.DB_BG_Plbl[2] = b_c;
    }

     //Passive Labels FG 
    if (FlgFG && (FlgOBJ==3))
    {
        DPAL.DB_FG_Plbl[0] = r_c;
        DPAL.DB_FG_Plbl[1] = g_c;
        DPAL.DB_FG_Plbl[2] = b_c;
    }

         //Forms BG 
    if (FlgBG && (FlgOBJ==4))
    {
        DPAL.DB_BG[0] = r_c;
        DPAL.DB_BG[1] = g_c;
        DPAL.DB_BG[2] = b_c;
    }

     // Kapital Labels UP BG 
    if (FlgBG && (FlgOBJ==5))
    {
        DPAL.DB_BG_lblUP[0] = r_c;
        DPAL.DB_BG_lblUP[1] = g_c;
        DPAL.DB_BG_lblUP[2] = b_c;
    }

     // Kapital Labels UP FG 
    if (FlgFG && (FlgOBJ==5))
    {
        DPAL.DB_FG_lblUP[0] = r_c;
        DPAL.DB_FG_lblUP[1] = g_c;
        DPAL.DB_FG_lblUP[2] = b_c;
    }

     // Radio Buttons DW BG 
    if (FlgBG && (FlgOBJ==6))
    {
        DPAL.DB_BG_RButt[0] = r_c;
        DPAL.DB_BG_RButt[1] = g_c;
        DPAL.DB_BG_RButt[2] = b_c;
    }


     // Radio Buttons FG 
    if (FlgFG && (FlgOBJ==6))
    {
        DPAL.DB_FG_RButt[0] = r_c;
        DPAL.DB_FG_RButt[1] = g_c;
        DPAL.DB_FG_RButt[2] = b_c;
    }


    MObjectUnmap(DAS.Gui.Shells.Sh_Main);
    MObjectRedraw(DAS.Gui.Shells.Sh_Main);
    MObjectMap(DAS.Gui.Shells.Sh_Main);
    



}

Here is the call graph for this function:

Here is the caller graph for this function:

ColorFreeCB()

void ColorFreeCB	(	MOBJECT	o,
		void *	o_data,
		void *	a_data
	)

Declared but not used.

Definition at line 767 of file DAS_Spat_ConfCBs.c.

References cell_color, MFreeCell(), MSetCellColor(), and sel_cell.

{
    if (sel_cell != (int) cell_color)
    {
    MSetCellColor(sel_cell, 0, 0, 0);
    MFreeCell(sel_cell);
    }
}

Here is the call graph for this function:

ColorMapExposeCB()

void ColorMapExposeCB	(	MOBJECT	obj,
		MEvent *	pexp,
		void *	a_data
	)

Declared but not used.

Definition at line 803 of file DAS_Spat_ConfCBs.c.

References dil::Cfg, MDrawBox(), MDrawFilledBox(), MObjectGetHeight(), MObjectGetWidth(), cfg::NColors, sel_x, sel_y, and mtcl::white.

Referenced by ColorSaveCB().

{
    int n, hsize, wsize, i, j;

    n = (DIL.Cfg.NColors == 16 ? 4 : 16);
    wsize = MObjectGetWidth(obj) / n;
    hsize = MObjectGetHeight(obj) / n;
    for (i = 0; i < n; i++)
    for (j = 0; j < n; j++)
        MDrawFilledBox(obj, wsize * j + 1, hsize * i + 1, wsize - 2, hsize - 2, i * n + j);
    MDrawBox(obj, sel_x, sel_y, wsize, hsize, MTCL.white);
}

Here is the call graph for this function:

Here is the caller graph for this function:

ColorMapInputCB()

void ColorMapInputCB	(	MOBJECT	obj,
		MEvent *	pe,
		void *	a_data
	)

Declared but not used.

Definition at line 831 of file DAS_Spat_ConfCBs.c.

References b_sbar, dil::Cfg, D_A, drawarea_bgc, E_BUTTON_PRESS, E_KEY_PRESS, g_sbar, MEvent::key, MKeyEvent::keycode, L_A, MDrawBox(), MObjectGetHeight(), MObjectGetWidth(), MEvent::mouse, MQueryColor(), MScrollBarSetPos(), cfg::NColors, R_A, r_sbar, sel_cell, sel_x, sel_y, MEvent::type, U_A, mtcl::white, MMouseEvent::x, and MMouseEvent::y.

{
    int n, hsize, wsize;
    int r, g, b, old_x, old_y;

    n = (DIL.Cfg.NColors == 16 ? 4 : 16);
    wsize = MObjectGetWidth(obj) / n;
    hsize = MObjectGetHeight(obj) / n;
    old_x = sel_x;
    old_y = sel_y;
    if (pe->type == E_KEY_PRESS)
    {
    switch (pe->key.keycode)
    {
    case U_A:
        sel_cell -= n;
        if (sel_cell < 0)
        sel_cell += (int) DIL.Cfg.NColors;
        break;
    case D_A:
        sel_cell += n;
        if (sel_cell > (int) DIL.Cfg.NColors)
        sel_cell -= (int) DIL.Cfg.NColors;
        break;
    case R_A:
        if (++sel_cell >= (int) DIL.Cfg.NColors)
        sel_cell = 0;
        break;
    case L_A:
        if (--sel_cell < 0)
        sel_cell = (int) DIL.Cfg.NColors - 1;
        break;
    default:
        return;
    }
    sel_x = (sel_cell % n) * wsize;
    sel_y = (sel_cell / n) * hsize;
    }
    else if (pe->type == E_BUTTON_PRESS)
    {
    sel_x = (pe->mouse.x / wsize) * wsize;
    sel_y = (pe->mouse.y / hsize) * hsize;
    sel_cell = sel_x / wsize + sel_y / hsize * n;
    }
    else
    return;
    MDrawBox(obj, old_x, old_y, wsize, hsize, drawarea_bgc);
    MDrawBox(obj, sel_x, sel_y, wsize, hsize, MTCL.white);
    MQueryColor(sel_cell, &r, &g, &b);
    MScrollBarSetPos(r_sbar, (long) r);
    MScrollBarSetPos(g_sbar, (long) g);
    MScrollBarSetPos(b_sbar, (long) b);

}

Here is the call graph for this function:

ColorMapResizeCB()

void ColorMapResizeCB	(	MOBJECT	obj,
		DRAWAREA_PREF *	pref,
		void *	a_data
	)

Declared but not used.

Definition at line 816 of file DAS_Spat_ConfCBs.c.

References dil::Cfg, cfg::NColors, DRAWAREA_PREF::new_h, DRAWAREA_PREF::new_w, DRAWAREA_PREF::old_h, DRAWAREA_PREF::old_w, sel_x, and sel_y.

{
    int n, new_hsize, new_wsize, old_hsize, old_wsize;

    n = (DIL.Cfg.NColors == 16 ? 4 : 16);
    old_wsize = pref->old_w / n;
    old_hsize = pref->old_h / n;
    new_wsize = pref->new_w / n;
    new_hsize = pref->new_h / n;
    sel_x = (sel_x * new_wsize) / old_wsize;
    sel_y = (sel_y * new_hsize) / old_hsize;
    pref->new_w = new_wsize * n;
    pref->new_h = new_hsize * n;
}

ColorPickCB()

void ColorPickCB	(	MOBJECT	o,
		void *	o_data,
		void *	a_data
	)

Definition at line 386 of file DAS_Spat_ConfCBs.c.

References b_sbar, g_sbar, MObjectBackgroundColor(), MQueryColor(), MScrollBarSetPos(), p, and r_sbar.

{
    MOBJECT p = (MOBJECT) a_data;
    int r, g, b;

    MQueryColor(MObjectBackgroundColor(p), &r, &g, &b);
    MScrollBarSetPos(r_sbar, (long) r);
    MScrollBarSetPos(g_sbar, (long) g);
    MScrollBarSetPos(b_sbar, (long) b);
}

Here is the call graph for this function:

ColorSaveCB()

void ColorSaveCB	(	MOBJECT	o,
		void *	o_data,
		void *	a_data
	)

Declared but not used.

Definition at line 754 of file DAS_Spat_ConfCBs.c.

References b_c, ColorMapExposeCB(), frm3_dr1, g_c, MAllocCell(), PaletteMode, and r_c.

{
    MAllocCell(r_c, g_c, b_c);
#ifdef WINDOWS
/*
 *   Windows palette is indirect, so it is
 *   necessary to redraw rectangles with a new color
 */
    if (PaletteMode)
    ColorMapExposeCB(frm3_dr1, NULL, 0L);
#endif
}

Here is the call graph for this function:

ColPickBackForeGCB()

void ColPickBackForeGCB	(	MOBJECT	o,
		void *	a,
		void *	v
	)

select if the foreground or background color of the selected object will be picked

pick the color of the selected object

Parameters

v	0 = background color 1 = foreground color

Definition at line 167 of file DAS_Spat_ConfCBs.c.

References ColObjCB(), gui::ConfigPanel, DOASMODE, flag::exemode, False, das::Flag, FlgBG, FlgFG, das::Gui, configpanel::RBColObj, and True.

Referenced by MDCreateDASConfig().

{
//setta i flag foreground e background 
    int i;
    switch ((int) v)
    {
    case 0:
        FlgBG = True;
        FlgFG = False;
        break;
    case 1:
        FlgFG = True;
        FlgBG = False;
        break;
    }
    if (DAS.Flag.exemode == DOASMODE )
        for (i = 0;i<7; i++)
            ColObjCB(DAS.Gui.ConfigPanel.RBColObj[i], NULL, (void *) i);
    else
        for (i = 0;i<6; i++)
            ColObjCB(DAS.Gui.ConfigPanel.RBColObj[i], NULL, (void *) i);    
}

Here is the call graph for this function:

Here is the caller graph for this function:

ConfigCB()

void ConfigCB	(	MOBJECT	p,
		void *	od,
		void *	ad
	)

DAS Configuration shell creation callback.

Definition at line 2182 of file DAS_Spat_ConfCBs.c.

References MDCreateDASConfig().

{
    MDCreateDASConfig();    
}

Here is the call graph for this function:

D_UndoCB()

void D_UndoCB	(	MOBJECT	o,
		void *	a,
		void *	v
	)

Undo the previous color setting operation.

Definition at line 225 of file DAS_Spat_ConfCBs.c.

Referenced by MDCreateDASConfig().

{
//  int i;
    //  Unselected Buttons
/*
    if(FlgBG && (FlgOBJ==0))
    {
        DB_Undo2Do_Colors( DPAL.DB_UnSel, UDPAL.DB_UnSel);

        if(DAS.Flag.exemode == DOASMODE)
            DB_ColorAssign(LISTF.pb, sizeof LISTF.pb / sizeof LISTF.pb[0], DPAL.DB_UnSel);
        else
        {
            DB_ColorAssign(PBUTT.KeyB, sizeof PBUTT.KeyB / sizeof PBUTT.KeyB[0], DPAL.DB_UnSel);
            DB_ColorAssign(DAS.Gui.ContrPanel.pblamps, sizeof DAS.Gui.ContrPanel.pblamps / sizeof DAS.Gui.ContrPanel.pblamps[0], DPAL.DB_UnSel);
        }
        

    }
    if(FlgFG && (FlgOBJ==0))
    {
        DB_Undo2Do_Colors( DPAL.DB_UnSelFG, UDPAL.DB_UnSelFG);

        if(DAS.Flag.exemode == DOASMODE)
            DB_ColorAssign(LISTF.pb, sizeof LISTF.pb / sizeof LISTF.pb[0], DPAL.DB_UnSelFG);
        else
        {
            DB_ColorAssign(PBUTT.KeyB, sizeof PBUTT.KeyB / sizeof PBUTT.KeyB[0], DPAL.DB_UnSelFG);
            DB_ColorAssign(DAS.Gui.ContrPanel.pblamps, sizeof DAS.Gui.ContrPanel.pblamps / sizeof DAS.Gui.ContrPanel.pblamps[0], DPAL.DB_UnSelFG);
        }

    }
    // Selected Buttons
    if (FlgBG && (FlgOBJ==1))
    {
        DB_Undo2Do_Colors(DPAL.DB_Sel, UDPAL.DB_Sel);

        MSelectObject(PBUTT.KeyB[0]);
        MObjectSetBackgroundRGB(PBUTT.KeyB[0], DPAL.DB_Sel[0], DPAL.DB_Sel[1], DPAL.DB_Sel[2]);
    }
     //Active Labels BG 
    if (FlgBG && (FlgOBJ==2))
    {
        DB_Undo2Do_Colors(DPAL.DB_BG_Albl, UDPAL.DB_BG_Albl);

        DB_ColorAssign(DAS.Gui.ContrPanel.lbl_Par, sizeof DAS.Gui.ContrPanel.lbl_Par / sizeof DAS.Gui.ContrPanel.lbl_Par[0], DPAL.DB_BG_Albl);
        DB_ColorAssign(DAS.Gui.ContrPanel.Albl_CS, sizeof DAS.Gui.ContrPanel.Albl_CS / sizeof DAS.Gui.ContrPanel.Albl_CS[0], DPAL.DB_BG_Albl);
        DB_ColorAssign(DAS.Gui.ContrPanel.Albl_IE, sizeof DAS.Gui.ContrPanel.Albl_IE / sizeof DAS.Gui.ContrPanel.Albl_IE[0], DPAL.DB_BG_Albl);
        DB_ColorAssign(DAS.Gui.ContrPanel.Albl_LS, sizeof DAS.Gui.ContrPanel.Albl_LS / sizeof DAS.Gui.ContrPanel.Albl_LS[0], DPAL.DB_BG_Albl);
        DB_ColorAssign(DAS.Gui.ContrPanel.Albl_LT, sizeof DAS.Gui.ContrPanel.Albl_LT / sizeof DAS.Gui.ContrPanel.Albl_LT[0], DPAL.DB_BG_Albl);
        DB_ColorAssign(DAS.Gui.ContrPanel.cop, sizeof DAS.Gui.ContrPanel.cop / sizeof DAS.Gui.ContrPanel.cop[0] , DPAL.DB_BG_Albl);
        DB_ColorAssign(DAS.Gui.ContrPanel.step, sizeof DAS.Gui.ContrPanel.step / sizeof DAS.Gui.ContrPanel.step[0] , DPAL.DB_BG_Albl);
        DB_ColorAssign(DAS.Gui.ContrPanel.slope, sizeof DAS.Gui.ContrPanel.slope / sizeof DAS.Gui.ContrPanel.slope[0] , DPAL.DB_BG_Albl);
        DB_ColorAssign(DAS.Gui.ContrPanel.speed, sizeof DAS.Gui.ContrPanel.speed / sizeof DAS.Gui.ContrPanel.speed[0] , DPAL.DB_BG_Albl);
        MObjectSetBackgroundRGB(DAS.Gui.ContrPanel.Albl_Status, DPAL.DB_BG_Albl[0], DPAL.DB_BG_Albl[1], DPAL.DB_BG_Albl[2]);
        MObjectSetBackgroundRGB(DAS.Gui.ContrPanel.Albl_Script, DPAL.DB_BG_Albl[0], DPAL.DB_BG_Albl[1], DPAL.DB_BG_Albl[2]);
    }

     //Active Labels FG 
    if (FlgFG && (FlgOBJ==2))
    {

        DB_Undo2Do_Colors(DPAL.DB_FG_Albl, UDPAL.DB_FG_Albl);
        
        DB_ColorAssign(DAS.Gui.ContrPanel.lbl_Par, sizeof DAS.Gui.ContrPanel.lbl_Par / sizeof DAS.Gui.ContrPanel.lbl_Par[0], DPAL.DB_FG_Albl);
        DB_ColorAssign(DAS.Gui.ContrPanel.Albl_CS, sizeof DAS.Gui.ContrPanel.Albl_CS / sizeof DAS.Gui.ContrPanel.Albl_CS[0], DPAL.DB_FG_Albl);
        DB_ColorAssign(DAS.Gui.ContrPanel.Albl_IE, sizeof DAS.Gui.ContrPanel.Albl_IE / sizeof DAS.Gui.ContrPanel.Albl_IE[0], DPAL.DB_FG_Albl);
        DB_ColorAssign(DAS.Gui.ContrPanel.Albl_LS, sizeof DAS.Gui.ContrPanel.Albl_LS / sizeof DAS.Gui.ContrPanel.Albl_LS[0], DPAL.DB_FG_Albl);
        DB_ColorAssign(DAS.Gui.ContrPanel.Albl_LT, sizeof DAS.Gui.ContrPanel.Albl_LT / sizeof DAS.Gui.ContrPanel.Albl_LT[0], DPAL.DB_FG_Albl);
        DB_ColorAssign(DAS.Gui.ContrPanel.cop, sizeof DAS.Gui.ContrPanel.cop / sizeof DAS.Gui.ContrPanel.cop[0] , DPAL.DB_FG_Albl);
        DB_ColorAssign(DAS.Gui.ContrPanel.step, sizeof DAS.Gui.ContrPanel.step / sizeof DAS.Gui.ContrPanel.step[0] , DPAL.DB_FG_Albl);
        DB_ColorAssign(DAS.Gui.ContrPanel.slope, sizeof DAS.Gui.ContrPanel.slope / sizeof DAS.Gui.ContrPanel.slope[0] , DPAL.DB_FG_Albl);
        DB_ColorAssign(DAS.Gui.ContrPanel.speed, sizeof DAS.Gui.ContrPanel.speed / sizeof DAS.Gui.ContrPanel.speed[0] , DPAL.DB_FG_Albl);

        MObjectSetForegroundRGB(DAS.Gui.ContrPanel.Albl_Status, DPAL.DB_FG_Albl[0], DPAL.DB_FG_Albl[1], DPAL.DB_FG_Albl[2]);
        MObjectSetForegroundRGB(DAS.Gui.ContrPanel.Albl_Script, DPAL.DB_FG_Albl[0], DPAL.DB_FG_Albl[1], DPAL.DB_FG_Albl[2]);
    }

     //Passive Labels BG 
    if (FlgBG && (FlgOBJ==3))
    {
        DB_Undo2Do_Colors(DPAL.DB_BG_Plbl, UDPAL.DB_BG_Plbl);

        DB_ColorAssign(DAS.Gui.ContrPanel.lbl_NP, sizeof DAS.Gui.ContrPanel.lbl_NP / sizeof DAS.Gui.ContrPanel.lbl_NP[0], DPAL.DB_BG_Plbl);
        DB_ColorAssign(DAS.Gui.ContrPanel.Plbl_CS, sizeof DAS.Gui.ContrPanel.Plbl_CS / sizeof DAS.Gui.ContrPanel.Plbl_CS[0], DPAL.DB_BG_Plbl);
        DB_ColorAssign(DAS.Gui.ContrPanel.Plbl_IE, sizeof DAS.Gui.ContrPanel.Plbl_IE / sizeof DAS.Gui.ContrPanel.Plbl_IE[0], DPAL.DB_BG_Plbl);
        DB_ColorAssign(DAS.Gui.ContrPanel.Plbl_LS, sizeof DAS.Gui.ContrPanel.Plbl_LS / sizeof DAS.Gui.ContrPanel.Plbl_LS[0], DPAL.DB_BG_Plbl);
        DB_ColorAssign(DAS.Gui.ContrPanel.Plbl_LT, sizeof DAS.Gui.ContrPanel.Plbl_LT / sizeof DAS.Gui.ContrPanel.Plbl_LT[0], DPAL.DB_BG_Plbl);
        
        DB_ColorAssign(DAS.Gui.ContrPanel.lbl_lamps, sizeof DAS.Gui.ContrPanel.lbl_lamps / sizeof DAS.Gui.ContrPanel.lbl_lamps[0], DPAL.DB_BG_Plbl);
        DB_ColorAssign(DAS.Gui.ContrPanel.Plbl_SM, sizeof DAS.Gui.ContrPanel.Plbl_SM / sizeof DAS.Gui.ContrPanel.Plbl_SM[0], DPAL.DB_BG_Plbl);
        DB_ColorAssign(DAS.Gui.ContrPanel.lbl, sizeof DAS.Gui.ContrPanel.lbl / sizeof DAS.Gui.ContrPanel.lbl[0] , DPAL.DB_BG_Plbl);

        MObjectSetBackgroundRGB(DAS.Gui.ContrPanel.Plbl_Status, DPAL.DB_BG_Plbl[0], DPAL.DB_BG_Plbl[1], DPAL.DB_BG_Plbl[2]);
        MObjectSetBackgroundRGB(DAS.Gui.ContrPanel.Plbl_Script, DPAL.DB_BG_Plbl[0], DPAL.DB_BG_Plbl[1], DPAL.DB_BG_Plbl[2]);
    }

     //Passive Labels FG 
    if (FlgFG && (FlgOBJ==3))
    {
        DB_Undo2Do_Colors(DPAL.DB_FG_Plbl, UDPAL.DB_FG_Plbl);

        DB_ColorAssign(DAS.Gui.ContrPanel.lbl_NP, sizeof DAS.Gui.ContrPanel.lbl_NP / sizeof DAS.Gui.ContrPanel.lbl_NP[0], DPAL.DB_FG_Plbl);
        DB_ColorAssign(DAS.Gui.ContrPanel.Plbl_CS, sizeof DAS.Gui.ContrPanel.Plbl_CS / sizeof DAS.Gui.ContrPanel.Plbl_CS[0], DPAL.DB_FG_Plbl);
        DB_ColorAssign(DAS.Gui.ContrPanel.Plbl_IE, sizeof DAS.Gui.ContrPanel.Plbl_IE / sizeof DAS.Gui.ContrPanel.Plbl_IE[0], DPAL.DB_FG_Plbl);
        DB_ColorAssign(DAS.Gui.ContrPanel.Plbl_LS, sizeof DAS.Gui.ContrPanel.Plbl_LS / sizeof DAS.Gui.ContrPanel.Plbl_LS[0], DPAL.DB_FG_Plbl);
        DB_ColorAssign(DAS.Gui.ContrPanel.Plbl_LT, sizeof DAS.Gui.ContrPanel.Plbl_LT / sizeof DAS.Gui.ContrPanel.Plbl_LT[0], DPAL.DB_FG_Plbl);
        
        DB_ColorAssign(DAS.Gui.ContrPanel.lbl_lamps, sizeof DAS.Gui.ContrPanel.lbl_lamps / sizeof DAS.Gui.ContrPanel.lbl_lamps[0], DPAL.DB_FG_Plbl);
        DB_ColorAssign(DAS.Gui.ContrPanel.Plbl_SM, sizeof DAS.Gui.ContrPanel.Plbl_SM / sizeof DAS.Gui.ContrPanel.Plbl_SM[0], DPAL.DB_FG_Plbl);
        DB_ColorAssign(DAS.Gui.ContrPanel.lbl, sizeof DAS.Gui.ContrPanel.lbl / sizeof DAS.Gui.ContrPanel.lbl[0] , DPAL.DB_FG_Plbl);

        MObjectSetForegroundRGB(DAS.Gui.ContrPanel.Plbl_Status, DPAL.DB_FG_Plbl[0], DPAL.DB_FG_Plbl[1], DPAL.DB_FG_Plbl[2]);
        MObjectSetForegroundRGB(DAS.Gui.ContrPanel.Plbl_Script, DPAL.DB_FG_Plbl[0], DPAL.DB_FG_Plbl[1], DPAL.DB_FG_Plbl[2]);

    }

         //Forms BG 
    if (FlgBG && (FlgOBJ==4))
    {
        DB_Undo2Do_Colors(DPAL.DB_BG, UDPAL.DB_BG);
        MObjectUnmap(CP_Sh);
        MObjectMap(CP_Sh);
//      MObjectSetBackgroundRGB(DAS.Gui.ContrPanel.RwFrm0, DPAL.DB_BG[0], DPAL.DB_BG[1], DPAL.DB_BG[2]);
//      MObjectSetBackgroundRGB(DAS.Gui.ContrPanel.TbFrm0, DPAL.DB_BG[0], DPAL.DB_BG[1], DPAL.DB_BG[2]);
//      MObjectSetBackgroundRGB(DAS.Gui.ContrPanel.TbFrm1, DPAL.DB_BG[0], DPAL.DB_BG[1], DPAL.DB_BG[2]);
    }

     // Kapital Labels UP BG 
    if (FlgBG && (FlgOBJ==5))
    {
        DB_Undo2Do_Colors(DPAL.DB_BG_lblUP, UDPAL.DB_BG_lblUP);
        DB_ColorAssign(DAS.Gui.ContrPanel.lblK, sizeof DAS.Gui.ContrPanel.lblK / sizeof DAS.Gui.ContrPanel.lblK[0] , DPAL.DB_BG_lblUP);
    }

     // Kapital Labels UP FG 
    if (FlgFG && (FlgOBJ==5))
    {
        DB_Undo2Do_Colors(DPAL.DB_FG_lblUP, UDPAL.DB_FG_lblUP);
        DB_ColorAssign(DAS.Gui.ContrPanel.lblK, sizeof DAS.Gui.ContrPanel.lblK / sizeof DAS.Gui.ContrPanel.lblK[0] , DPAL.DB_FG_lblUP);
    }

     // Radio Button BG 
    if (FlgBG && (FlgOBJ==6))
    {
        DB_Undo2Do_Colors(DPAL.DB_BG_RButt, UDPAL.DB_BG_RButt);
        DB_ColorAssign(LISTF.rb, sizeof LISTF.rb / sizeof LISTF.rb[0] , DPAL.DB_BG_RButt);
    }


     // Radio Button FG 
    if (FlgFG && (FlgOBJ==6))
    {
        DB_Undo2Do_Colors(DPAL.DB_FG_RButt, UDPAL.DB_FG_RButt);
        DB_ColorAssign(LISTF.rb, sizeof LISTF.rb / sizeof LISTF.rb[0] , DPAL.DB_FG_RButt);
    }
*/

}

Here is the caller graph for this function:

DB_AMSposmode_CB()

void DB_AMSposmode_CB	(	MOBJECT	o,
		void *	a,
		void *	v
	)

callback selecting the positioning mode for stepper motors ( sequential or simulaneaous)

Definition at line 1234 of file DAS_Spat_ConfCBs.c.

References das::DOption, MRButtonGetActivationStatus(), and optionini::smposmode.

Referenced by CONFP_opt_page5().

{

    int er = 0;
    int c = (int) v;
    

    er = MRButtonGetActivationStatus(o);

    if(er)
    {
        switch (c)
        {
        case 0:
            DAS.DOption.smposmode = 1; //Simultaneous positioning
            break;
        case 1:
            DAS.DOption.smposmode = 0; //sequential positioning
            break;
        }
    }

}

Here is the call graph for this function:

Here is the caller graph for this function:

DB_AMSProgBar_CB()

void DB_AMSProgBar_CB	(	MOBJECT	o,
		void *	a,
		void *	v
	)

callback selecting if show or not the progress bar for motor positioning

Definition at line 1119 of file DAS_Spat_ConfCBs.c.

References optionini::amsprogbar, das::DOption, and MRButtonGetActivationStatus().

Referenced by CONFP_opt_page5().

{

    int er = 0;
    int c = (int) v;
    

    er = MRButtonGetActivationStatus(o);

    if(er)
    {
        switch (c)
        {
        case 0:
            DAS.DOption.amsprogbar = 0; //hide prog bars
            break;
        case 1:
            DAS.DOption.amsprogbar = 1; //show prog bars
            break;
        }
    }

}

Here is the call graph for this function:

Here is the caller graph for this function:

DB_CellExposeCB()

void DB_CellExposeCB	(	MOBJECT	obj,
		MEvent *	pexp,
		void *	a_data
	)

display selected Color

Definition at line 788 of file DAS_Spat_ConfCBs.c.

References cell_color, MDrawFilledBox(), MObjectGetHeight(), MObjectGetWidth(), and PaletteMode.

Referenced by MDCreateDASConfig().

{
    int hsize, wsize;

    wsize = MObjectGetWidth(obj);
    hsize = MObjectGetHeight(obj);
    if (PaletteMode)
    MDrawFilledBox(obj, 0, 0, wsize, hsize, cell_color);
}

Here is the call graph for this function:

Here is the caller graph for this function:

DB_CellResizeCB()

void DB_CellResizeCB	(	MOBJECT	obj,
		DRAWAREA_PREF *	pref,
		void *	a_data
	)

display selected Color

Definition at line 798 of file DAS_Spat_ConfCBs.c.

References DRAWAREA_PREF::new_h, and DRAWAREA_PREF::old_h.

Referenced by MDCreateDASConfig().

{
    pref->new_h = pref->old_h;
}

Here is the caller graph for this function:

DB_ChangeColorCellCB()

void DB_ChangeColorCellCB	(	MOBJECT	o,
		MVALUE	o_data,
		void *	a_data
	)

draw the object 'o' with the selected color

Definition at line 543 of file DAS_Spat_ConfCBs.c.

References b_c, b_label, cell_color, frm3_dr1, g_c, g_label, MObjectSetBackgroundRGB(), MObjectSetText(), MSetCellColor(), PaletteMode, r_c, and r_label.

Referenced by MDCreateDASConfig().

{
    char str[16];

    switch ((int) a_data)
    {
    case 0:
    r_c = (int) o_data;
    sprintf(str, "%03d", r_c);
    MObjectSetText(r_label, str);
    break;
    case 1:
    g_c = (int) o_data;
    sprintf(str, "%03d", g_c);
    MObjectSetText(g_label, str);
    break;
    case 2:
    b_c = (int) o_data;
    sprintf(str, "%03d", b_c);
    MObjectSetText(b_label, str);
    break;
    }
    if (PaletteMode)
    MSetCellColor(cell_color, r_c, g_c, b_c);
    else
    MObjectSetBackgroundRGB(frm3_dr1, r_c, g_c, b_c);
}

Here is the call graph for this function:

Here is the caller graph for this function:

DB_ColorAssign()

void DB_ColorAssign	(	MOBJECT	a[],
		int	numel,
		short	tc[]
	)

Assign to the selected object the chosen color.

Definition at line 204 of file DAS_Spat_ConfCBs.c.

References CP_Sh, FlgBG, FlgFG, MObjectSetBackgroundRGB(), MObjectSetForegroundRGB(), and MObjectSetTransparency().

{
    int i;  

    for (i=0; i < numel; i++)
        {
            if(FlgBG)
            {
                MObjectSetBackgroundRGB(a[i], tc[0], tc[1], tc[2]);
                MObjectSetTransparency(a[i],0);
            }
            if(FlgFG)
            {
                MObjectSetForegroundRGB(a[i], tc[0], tc[1], tc[2]);
                MObjectSetTransparency(a[i],0);
            }
        }

}

Here is the call graph for this function:

DB_ColorPick()

void DB_ColorPick

(

MOBJECT

o

)

Definition at line 397 of file DAS_Spat_ConfCBs.c.

References b_sbar, FlgBG, FlgFG, g_sbar, MObjectBackgroundColor(), MObjectForegroundColor(), MQueryColor(), MScrollBarSetPos(), and r_sbar.

Referenced by ColObjCB().

{
    
    int r, g, b;

    if(FlgBG)
        MQueryColor(MObjectBackgroundColor(o), &r, &g, &b);
    if(FlgFG)
        MQueryColor(MObjectForegroundColor(o), &r, &g, &b);
    
    MScrollBarSetPos(r_sbar, (long) r);
    MScrollBarSetPos(g_sbar, (long) g);
    MScrollBarSetPos(b_sbar, (long) b);
}

Here is the call graph for this function:

Here is the caller graph for this function:

DB_DispBlindPixCB()

void DB_DispBlindPixCB	(	MOBJECT	o,
		void *	id,
		void *	a_data
	)

Display Blind Pixel Callback
Set if the blind pixels will be displayed or not on the plot window.

Definition at line 3697 of file DAS_Spat_ConfCBs.c.

References flag::DispBlindPix.

Referenced by CONFP_opt_page3().

{
    int     c = (int) a_data;

    switch(c)
    {
        case 0 :
            FLAG.DispBlindPix = 0;      
            break;
        case 1:
            FLAG.DispBlindPix = 1;
            break;

    }
}

Here is the caller graph for this function:

DB_Do2Undo_Colors()

void DB_Do2Undo_Colors	(	short	docol[],
		short	undocol[]
	)

Definition at line 578 of file DAS_Spat_ConfCBs.c.

References b_c, g_c, and r_c.

{

    int i;  
        for (i = 0; i < 3;i++)
            {
                undocol[i] = docol[i];
            }

        
        docol[0] = r_c;
        docol[1] = g_c;
        docol[2] = b_c;

}

DB_Do2Undo_Fonts()

void DB_Do2Undo_Fonts	(	MTFont	dofont,
		MTFont	undofont
	)

Definition at line 1358 of file DAS_Spat_ConfCBs.c.

{

    undofont = dofont;

}

DB_FilterType_CB()

void DB_FilterType_CB	(	MOBJECT	o,
		void *	a,
		void *	v
	)

callback selecting the type of installed filter wheel module

Definition at line 1174 of file DAS_Spat_ConfCBs.c.

References das::DOption, FDOUBLE, optionini::filtertype, FPLUS, FSIMPLE, and MRButtonGetActivationStatus().

Referenced by CONFP_opt_page7().

{

    int er = 0;
    int c = (int) v;
    

    er = MRButtonGetActivationStatus(o);

    if(er)
    {
        switch (c)
        {
        case FSIMPLE:
            DAS.DOption.filtertype  = FSIMPLE; 
            break;
        case FDOUBLE:
            DAS.DOption.filtertype = FDOUBLE; 
            break;
        case FPLUS:
            DAS.DOption.filtertype = FPLUS;
            break;

        }
    }

}

Here is the call graph for this function:

Here is the caller graph for this function:

DB_FontAssign()

void DB_FontAssign	(	MOBJECT	a[],
		int	numel,
		MTFont	fnt
	)

This callback assign font to the selected object.

Definition at line 1374 of file DAS_Spat_ConfCBs.c.

References MObjectSetFont(), and True.

{
    int i;  
    for (i=0; i < numel; i++)
        {
            MObjectSetFont(a[i], fnt, True);
        }

}

Here is the call graph for this function:

DB_ImgTypeCB()

void DB_ImgTypeCB	(	MOBJECT	o,
		void *	id,
		void *	a_data
	)

Set the Image type.

Parameters

*a_data

0 = MONO 1 = RGB

Definition at line 1314 of file DAS_Spat_ConfCBs.c.

References das::DOption, and optionini::imgtype.

Referenced by CONFP_opt_page1().

{

    int     c = (int) a_data;
//  char    buf[80];

    switch(c)
    {
        case 0 :
            DAS.DOption.imgtype=0;  //Mono
            break;
        case 1:
            DAS.DOption.imgtype=1;  //RGB
            break;

    }




}

Here is the caller graph for this function:

DB_MIGE_CB()

void DB_MIGE_CB	(	MOBJECT	o,
		void *	a,
		void *	v
	)

callback selecting the operation mode for the AltAzPlatform

Definition at line 1000 of file DAS_Spat_ConfCBs.c.

References gui::ConfigPanel, das::Gui, pushbutt::KeyB, mige::linked, das::MIGE, MObjectSetSensitive(), MObjectSetUnsensitive(), MRButtonGetActivationStatus(), gui::PushButt, configpanel::rbMIGEopmode, and configpanel::rbMIGEtype.

Referenced by CONFP_opt_page5().

{

    int er = 0;
    int c = (int) v;
    

    er = MRButtonGetActivationStatus(o);

    if(er)
    {
        switch (c)
        {
        case 0:
            DAS.MIGE.linked = 0; //MIGE not Connected
            MObjectSetUnsensitive(DAS.Gui.ConfigPanel.rbMIGEtype[0]);
            MObjectSetUnsensitive(DAS.Gui.ConfigPanel.rbMIGEtype[1]);
            MObjectSetUnsensitive(DAS.Gui.ConfigPanel.rbMIGEopmode[0]);
            MObjectSetUnsensitive(DAS.Gui.ConfigPanel.rbMIGEopmode[1]);
            MObjectSetUnsensitive(DAS.Gui.ConfigPanel.rbMIGEopmode[2]);
            MObjectSetUnsensitive(DAS.Gui.PushButt.KeyB[3]);
            MObjectSetUnsensitive(DAS.Gui.PushButt.KeyB[4]);
            MObjectSetUnsensitive(DAS.Gui.PushButt.KeyB[8]);
            MObjectSetUnsensitive(DAS.Gui.PushButt.KeyB[9]);

            //MObjectSetUnsensitive(DAS.Gui.PushButt.KeyB[5]);
            break;
        case 1:
            DAS.MIGE.linked = 1; //
            MObjectSetSensitive(DAS.Gui.ConfigPanel.rbMIGEtype[0]);
            MObjectSetSensitive(DAS.Gui.ConfigPanel.rbMIGEtype[1]);
            MObjectSetSensitive(DAS.Gui.ConfigPanel.rbMIGEopmode[0]);
            MObjectSetSensitive(DAS.Gui.ConfigPanel.rbMIGEopmode[1]);
            MObjectSetSensitive(DAS.Gui.ConfigPanel.rbMIGEopmode[2]);
            MObjectSetSensitive(DAS.Gui.PushButt.KeyB[3]);
            MObjectSetSensitive(DAS.Gui.PushButt.KeyB[4]);
            MObjectSetSensitive(DAS.Gui.PushButt.KeyB[8]);
            MObjectSetSensitive(DAS.Gui.PushButt.KeyB[9]);
            break;
        }
    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

DB_MIGEopmode_CB()

void DB_MIGEopmode_CB	(	MOBJECT	o,
		void *	a,
		void *	v
	)

callback selecting the operation mode for the AltAzPlatform

Definition at line 1071 of file DAS_Spat_ConfCBs.c.

References optionini::aaopmode, DOASMODE, das::DOption, flag::exemode, das::Flag, das::Gui, pushbutt::KeyB, MObjectSetSensitive(), MObjectSetUnsensitive(), MRButtonGetActivationStatus(), and gui::PushButt.

Referenced by CONFP_opt_page5().

{

    int er = 0;
    int c = (int) v;
    

    er = MRButtonGetActivationStatus(o);

    if(er)
    {
        switch (c)
        {
        case 0:
            DAS.DOption.aaopmode = 0; //Solar Tracker
            if(DAS.Flag.exemode != DOASMODE)
            {
                MObjectSetUnsensitive(DAS.Gui.PushButt.KeyB[3]);
                MObjectSetUnsensitive(DAS.Gui.PushButt.KeyB[8]);
                MObjectSetUnsensitive(DAS.Gui.PushButt.KeyB[9]);
                //MObjectSetUnsensitive(DAS.Gui.PushButt.KeyB[4]);
            }
            break;
        case 1:
            DAS.DOption.aaopmode = 1; //Anti Solar Tracker
            if(DAS.Flag.exemode != DOASMODE)
            {
                MObjectSetUnsensitive(DAS.Gui.PushButt.KeyB[3]);
                MObjectSetUnsensitive(DAS.Gui.PushButt.KeyB[8]);
                MObjectSetUnsensitive(DAS.Gui.PushButt.KeyB[9]);
                //MObjectSetUnsensitive(DAS.Gui.PushButt.KeyB[4]);
            }
            break;
        case 2:
            DAS.DOption.aaopmode = 2; //Free Positioning
            if(DAS.Flag.exemode != DOASMODE)
            {
                MObjectSetSensitive(DAS.Gui.PushButt.KeyB[3]);
                MObjectSetSensitive(DAS.Gui.PushButt.KeyB[8]);
                MObjectSetSensitive(DAS.Gui.PushButt.KeyB[9]);
                //MObjectSetSensitive(DAS.Gui.PushButt.KeyB[4]);
            }
            break;
        }
    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

DB_MIGEType_CB()

void DB_MIGEType_CB	(	MOBJECT	o,
		void *	a,
		void *	v
	)

Definition at line 1043 of file DAS_Spat_ConfCBs.c.

References das::MIGE, MRButtonGetActivationStatus(), and mige::type.

Referenced by CONFP_opt_page5().

{

    int er = 0;
    int c = (int) v;
    

    er = MRButtonGetActivationStatus(o);

    if(er)
    {
        switch (c)
        {
        case 0:
            DAS.MIGE.type = 0; //Old and Big Platform (not used anymore)
            break;
        case 1:
            DAS.MIGE.type = 1; //ISAC Version
            break;
        case 2:
            DAS.MIGE.type = 2; //COM Version (with slip ring)
            break;
        }
    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

DB_MirrorImg_CB()

void DB_MirrorImg_CB	(	MOBJECT	o,
		void *	a,
		void *	v
	)

callback selecting the activation of the mirroring of the CCD image along the X or Y axis

Definition at line 1259 of file DAS_Spat_ConfCBs.c.

References das::DOption, optionini::mirrorimg, MRButtonGetActivationStatus(), XAX, and YAX.

Referenced by CONFP_opt_page5().

{

    int er = 0;
    int c = (int) v;
    

    er = MRButtonGetActivationStatus(o);

    if(er)
    {
        switch (c)
        {
        case 0:
            DAS.DOption.mirrorimg[XAX] = 1; //Mirror image along X Axis
            break;
        case 1:
            DAS.DOption.mirrorimg[XAX] = 0; //Do NOT mirror image along X Axis ;
            break;
        case 2:
            DAS.DOption.mirrorimg[YAX] = 1; //Mirror image along Y Axis
            break;
        case 3:
            DAS.DOption.mirrorimg[YAX] = 0; //Do NOT mirror image along Y Axis ;
            break;

        }
    }

}

Here is the call graph for this function:

Here is the caller graph for this function:

DB_PlotDisplayCB()

void DB_PlotDisplayCB	(	MOBJECT	o,
		void *	id,
		void *	a_data
	)

Select if the PLOT will be displayed after the measurement
.

Parameters

adata

= 0 –> NO = 1 –> Yes

Definition at line 3714 of file DAS_Spat_ConfCBs.c.

References das::Flag, and flag::plotW.

Referenced by CONFP_opt_page3().

{
    int     c = (int) a_data;

    switch(c)
    {
        case 0 :
            DAS.Flag.plotW = 0;     
            break;
        case 1:
            DAS.Flag.plotW = 1;
            break;

    }
}

Here is the caller graph for this function:

DB_PlotYAxisCB()

void DB_PlotYAxisCB	(	MOBJECT	o,
		void *	id,
		void *	a_data
	)

Select the Y axis Unit mode
.

Parameters

adata

= 0 –> Full Range = 1 –> Min/Max

Definition at line 3678 of file DAS_Spat_ConfCBs.c.

References flag::plotYRange.

Referenced by CONFP_opt_page3().

{
    int     c = (int) a_data;

    switch(c)
    {
        case 0 :
            FLAG.plotYRange = 0;        
            break;
        case 1:
            FLAG.plotYRange = 1;
            break;

    }



}

Here is the caller graph for this function:

DB_RadDrkSourceCB()

void DB_RadDrkSourceCB	(	MOBJECT	o,
		void *	a,
		void *	v
	)

Set the dark source.

Parameters

*a_data

0 = Blind Pixels only 1 = Full frame

Definition at line 1290 of file DAS_Spat_ConfCBs.c.

References optionini::darksource, das::DOption, and MRButtonGetActivationStatus().

Referenced by CONFP_opt_page2().

{
    int er = 0;
    int c = (int) v;
    

    er = MRButtonGetActivationStatus(o);

    if(er)
    {
        switch (c)
        {
        case 0:
            DAS.DOption.darksource = 0; 
            break;
        case 1:
            DAS.DOption.darksource = 1; 
            break;

        }
    }

}

Here is the call graph for this function:

Here is the caller graph for this function:

DB_RadioAvgModeCB()

void DB_RadioAvgModeCB	(	MOBJECT	o,
		void *	id,
		void *	a_data
	)

Set the Averaging mode flag.

Parameters

*a_data

0 = Fixed number of measurements 1 = Fixed tot exposure time

Definition at line 904 of file DAS_Spat_ConfCBs.c.

References optionini::avgmode, gui::ConfigPanel, das::DOption, das::Gui, configpanel::lblAvg, MObjectSetText(), N_AVG, configpanel::n_avg, and TOTTEXP.

Referenced by CONFP_opt_page1().

{
    int     c = (int) a_data;
    char    buf[80];

    switch(c)
    {
        case 0 :
            DAS.DOption.avgmode=0;      
            sprintf(buf,"%d",N_AVG);
            MObjectSetText(DAS.Gui.ConfigPanel.lblAvg, "Repeat measure for:   ");
            MObjectSetText(DAS.Gui.ConfigPanel.n_avg, buf);

            break;
        case 1:
            DAS.DOption.avgmode=1;  
            sprintf(buf, "%d", TOTTEXP);
            MObjectSetText(DAS.Gui.ConfigPanel.lblAvg, "TOT Exposure Time [s]:");
            MObjectSetText(DAS.Gui.ConfigPanel.n_avg, buf);

            break;

    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

DB_RadioDarkCB()

void DB_RadioDarkCB	(	MOBJECT	o,
		void *	id,
		void *	a_data
	)

Set the dark removing from the measurements.

Parameters

*a_data

0 = DO NOT remove dark 1 = Remove dark

Definition at line 972 of file DAS_Spat_ConfCBs.c.

References configpanel::BPDark, gui::ConfigPanel, optionini::darkremove, das::DOption, configpanel::FFDark, das::Gui, MObjectSetSensitive(), and MObjectSetUnsensitive().

Referenced by CONFP_opt_page2().

{
    int     c = (int) a_data;
//  char    buf[80];

    switch(c)
    {
        case 0 :
            DAS.DOption.darkremove=0;   
            MObjectSetUnsensitive(DAS.Gui.ConfigPanel.FFDark);
            MObjectSetUnsensitive(DAS.Gui.ConfigPanel.BPDark);
                
            break;
        case 1:
            DAS.DOption.darkremove=1;
            MObjectSetSensitive(DAS.Gui.ConfigPanel.FFDark);
            MObjectSetSensitive(DAS.Gui.ConfigPanel.BPDark);

/*          if (DAS.DOption.flgdarksource)  
                MRButtonActivate(DAS.Gui.ConfigPanel.FFDark);
            else
                MRButtonActivate(DAS.Gui.ConfigPanel.BPDark);
*/          break;

    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

DB_RadioFNSelCB()

void DB_RadioFNSelCB	(	MOBJECT	o,
		void *	id,
		void *	a_data
	)

Set the file name mode.

Parameters

*a_data

0 = Free choice 1 = Automatic

Definition at line 1336 of file DAS_Spat_ConfCBs.c.

References das::DOption, and optionini::filename.

Referenced by CONFP_opt_page1().

{

    int     c = (int) a_data;
//  char    buf[80];

    switch(c)
    {
        case 0 :
            DAS.DOption.filename=0; //free
            break;
        case 1:
            DAS.DOption.filename=1; //Automatico
            break;

    }

}

Here is the caller graph for this function:

DB_RadioModeSelCB()

void DB_RadioModeSelCB	(	MOBJECT	o,
		void *	id,
		void *	a_data
	)

Set the saving mode.

Parameters

*a_data

0 = ASCII data files 1 = BINARY data file

Definition at line 955 of file DAS_Spat_ConfCBs.c.

References das::DOption, and optionini::savingmode.

Referenced by CONFP_opt_page1().

{
    int     c = (int) a_data;
//  char    buf[80];

    switch(c)
    {
        case 0 :
            DAS.DOption.savingmode=0;       
            break;
        case 1:
            DAS.DOption.savingmode=1;   
            break;

    }
}

Here is the caller graph for this function:

DB_RadioPixCorrCB()

void DB_RadioPixCorrCB	(	MOBJECT	o,
		void *	id,
		void *	a_data
	)

Set the image Correction flag.

Parameters

*a_data

0 = disable defective pixel correction 1 = enable defective pixel correction

Definition at line 931 of file DAS_Spat_ConfCBs.c.

References gui::ConfigPanel, optionini::DEFPIXFILENAME, das::DOption, das::Gui, configpanel::lblCorrPixF, MObjectSetSensitive(), MObjectSetText(), MObjectSetUnsensitive(), configpanel::pbBrowseCorrPixF, and optionini::pixcorr.

Referenced by CONFP_opt_page1().

{
    int     c = (int) a_data;
//  char    buf[80];

    switch(c)
    {
        case 0 :
            DAS.DOption.pixcorr=0; //Pixel correction disabled
            MObjectSetUnsensitive(DAS.Gui.ConfigPanel.lblCorrPixF);
            MObjectSetUnsensitive(DAS.Gui.ConfigPanel.pbBrowseCorrPixF);
            
            break;
        case 1:
            DAS.DOption.pixcorr=1;  //Pixel correction ENABLED
            MObjectSetSensitive(DAS.Gui.ConfigPanel.lblCorrPixF);
            MObjectSetText(DAS.Gui.ConfigPanel.lblCorrPixF, DAS.DOption.DEFPIXFILENAME);
            MObjectSetSensitive(DAS.Gui.ConfigPanel.pbBrowseCorrPixF);
            break;

    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

DB_SelOutModeCB()

void DB_SelOutModeCB	(	MOBJECT	o,
		void *	id,
		void *	a_data
	)

Select the Output for the Temperature AD Converter
.

Parameters

adata

= 0 –> Volts = 1 –> Celsius degree

Definition at line 3622 of file DAS_Spat_ConfCBs.c.

References adtester::OutputMode.

Referenced by MDCreateDASConfig().

{
    int     c = (int) a_data;
//  char    buf[80];

    switch(c)
    {
        case 0 :
            ADTESTER.OutputMode = 0;        
            break;
        case 1:
            ADTESTER.OutputMode = 1;
            break;

    }
}

Here is the caller graph for this function:

DB_SetCCDTargetTempCB()

void DB_SetCCDTargetTempCB	(	MOBJECT	o,
		void *	id,
		void *	a_data
	)

Select the CCD temperature mode
.

Parameters

adata

= 0 –> FIXED Temperateure = 1 –> SZA Driven Temperature

Definition at line 3642 of file DAS_Spat_ConfCBs.c.

References flag::settempvar.

Referenced by CONFP_opt_page2().

{
    int     c = (int) a_data;

    switch(c)
    {
        case 0 :
            FLAG.settempvar = 0;        
            break;
        case 1:
            FLAG.settempvar = 1;
            break;
    }
}

Here is the caller graph for this function:

DB_SetXUnitsCB()

void DB_SetXUnitsCB	(	MOBJECT	o,
		void *	id,
		void *	a_data
	)

Select the X axis Unit mode
.

Parameters

adata

= 0 –> Pixel = 1 –> Wavelength (Angstrom) = 2 –> Wavelength (nm)

Definition at line 3659 of file DAS_Spat_ConfCBs.c.

References flag::Wl.

Referenced by CONFP_opt_page3().

{
    int     c = (int) a_data;

    switch(c)
    {
        case 0 :
            FLAG.Wl = 0;        
            break;
        case 1:
            FLAG.Wl = 1;
            break;
        case 2:
            FLAG.Wl = 2;
            break;

    }
}

Here is the caller graph for this function:

DB_Shutter_CB()

void DB_Shutter_CB	(	MOBJECT	o,
		void *	a,
		void *	v
	)

callback selecting if the shutter is installed or not

Definition at line 1204 of file DAS_Spat_ConfCBs.c.

References gui::ConfigPanel, das::DOption, optionini::emshutter, das::Gui, MObjectSetSensitive(), MObjectSetUnsensitive(), MRButtonGetActivationStatus(), and configpanel::rbSHUTType.

Referenced by CONFP_opt_page7().

{

    int er = 0;
    int c = (int) v;
    

    er = MRButtonGetActivationStatus(o);

    if(er)
    {
        switch (c)
        {
        case 0:
            DAS.DOption.emshutter = 0; //Shutter not Installed
                MObjectSetUnsensitive(DAS.Gui.ConfigPanel.rbSHUTType[0]);
                MObjectSetUnsensitive(DAS.Gui.ConfigPanel.rbSHUTType[1]);
                MObjectSetUnsensitive(DAS.Gui.ConfigPanel.rbSHUTType[2]);
            break;
        case 1:
            DAS.DOption.emshutter = 1; //Shutter installed
                MObjectSetSensitive(DAS.Gui.ConfigPanel.rbSHUTType[0]);
                MObjectSetSensitive(DAS.Gui.ConfigPanel.rbSHUTType[1]);
                MObjectSetSensitive(DAS.Gui.ConfigPanel.rbSHUTType[2]);
            break;
        }
    }

}

Here is the call graph for this function:

Here is the caller graph for this function:

DB_ShutterType_CB()

void DB_ShutterType_CB	(	MOBJECT	o,
		void *	a,
		void *	v
	)

callback selecting the type of installed shutter

Definition at line 1145 of file DAS_Spat_ConfCBs.c.

References das::DOption, MRButtonGetActivationStatus(), ROTSHUT, optionini::shuttertype, TORQUEM, and VS25.

Referenced by CONFP_opt_page7().

{

    int er = 0;
    int c = (int) v;
    

    er = MRButtonGetActivationStatus(o);

    if(er)
    {
        switch (c)
        {
        case VS25:
            DAS.DOption.shuttertype  = VS25; 
            break;
        case ROTSHUT:
            DAS.DOption.shuttertype = ROTSHUT; 
            break;
        case TORQUEM:
            DAS.DOption.shuttertype = TORQUEM;
            break;

        }
    }

}

Here is the call graph for this function:

Here is the caller graph for this function:

DB_TestF()

void DB_TestF

(

void

)

Definition at line 1425 of file DAS_Spat_ConfCBs.c.

References bold, gui::ConfigPanel, e_fname, e_fsize, FIXED_MEDIUM, font, configpanel::frm4_dr1, das::Gui, italic, MBeep(), MLoadFont(), MObjectGetText(), MObjectRedraw(), MUnloadFont(), and newfont.

Referenced by SetBoldCB(), SetItalicCB(), and TestFontCB().

{
    MTFont newfont;
  int size;
  char family[32], buff[8];
/*
 * Get user preferences from the EDIT Objects
 */
  MObjectGetText (e_fname, family);
  MObjectGetText (e_fsize, buff);
  size = atoi (buff);
  newfont = MLoadFont (family, size, bold, italic);
/*
 * The function returns FIXED_MEDIUM on failure
 */
  if (newfont != FIXED_MEDIUM)
  {
    if (font != FIXED_MEDIUM)
      MUnloadFont (font);
    font = newfont;
    MObjectRedraw (DAS.Gui.ConfigPanel.frm4_dr1);
  }
  else
    MBeep ();


}

Here is the call graph for this function:

Here is the caller graph for this function:

DB_Undo2Do_Colors()

void DB_Undo2Do_Colors	(	short	undocol[],
		short	docol[]
	)

Assign to the DO_Color structure the Color Values of the UNDO_Color Structure.

Assign to the UNDO_Color structure the Color Values of the DO_Color Structure.

Definition at line 189 of file DAS_Spat_ConfCBs.c.

References b_c, g_c, and r_c.

{
    int i;  
        for (i = 0; i < 3;i++)
            {
                undocol[i] = docol[i];
            }

        
        docol[0] = r_c;
        docol[1] = g_c;
        docol[2] = b_c;

}

DB_Undo2Do_Fonts()

void DB_Undo2Do_Fonts	(	MTFont	undofont,
		MTFont	dofont
	)

Definition at line 1365 of file DAS_Spat_ConfCBs.c.

References undofont.

{

    dofont = undofont; 

}

DB_VMRsfCB()

void DB_VMRsfCB	(	MOBJECT	o,
		void *	id,
		void *	a_data
	)

Set the flag for modification or reload of DAS configuration files
Set the VMRsf (View Modify Re-load system files) flag.

Parameters

*a_data

= 0 –> FLAG.VMRsf = 0 –> view/modify files = 1 –> FLAG.VMRsf = 1 –> re-load files

Definition at line 4184 of file DAS_Spat_ConfCBs.c.

References flag::VMRsf.

Referenced by CONFP_opt_page2().

{

    int c = (int) a_data;
    switch (c)
        {
            case 0:
                FLAG.VMRsf = 0;
                break;
            case 1:
                FLAG.VMRsf = 1;
                break;

        }

}

Here is the caller graph for this function:

DrawAreaExpFontCB()

void DrawAreaExpFontCB	(	MOBJECT	obj,
		MEvent *	pe,
		void *	data
	)

This callback draws strings using the selected font.

Definition at line 1615 of file DAS_Spat_ConfCBs.c.

References mtcl::black, CENTER_ALIGN, font, MDrawText(), MObjectGetHeight(), and MObjectGetWidth().

Referenced by MDCreateDASConfig().

{
    MDrawText(obj,
          0, 0, MObjectGetWidth(obj), MObjectGetHeight(obj)/2,
          "AaBbCcDdEeFfGgHhIiJjKkLl",
          font, MTCL.black, CENTER_ALIGN);
    MDrawText(obj,
       0, MObjectGetHeight(obj) / 2, MObjectGetWidth(obj), MObjectGetHeight(obj) / 2,
          "MmOoPpQqRrSsTtUuVvWwXxYyZz",
          font, MTCL.black, CENTER_ALIGN);
}

Here is the call graph for this function:

Here is the caller graph for this function:

EquipCode2Name()

char * EquipCode2Name	(	int	eqcode,
		char *	src,
		char *	dest
	)

translate the Equipment Code in the Equipment Name

Parameters

int	eqcode = /ref eqtype
char	*src = source string (buffer) (can be an empty string: "")
char	*dest = destination string (buffer) defined in the calling code (i.e.: dest[32] = {'\0'})

Returns

dest

Definition at line 3163 of file DAS_Spat_ConfCBs.c.

References GASCODNG1, GASCODNG2, GASCODNG3, GASCODNG4, LIS_, SPATRAM, SPATRAM2, SPATRAM3, SPATRAMPLUS, and TROPOGAS.

{

    char str[32];

    switch (eqcode)
    {
        case TROPOGAS:
            sprintf(str,"TROPOGAS");
            break;
        case SPATRAM:
            sprintf(str,"SPATRAM");
            break;
        case LIS_:
            sprintf(str,"LIS");
            break;
        case SPATRAMPLUS:
            sprintf(str,"SPATRAMPLUS");
            break;
        case GASCODNG1:
            sprintf(str,"GASCODNG1");
            break;
        case GASCODNG2:
            sprintf(str,"GASCODNG2");
            break;
        case GASCODNG3:
            sprintf(str,"GASCODNG3");
            break;
        case GASCODNG4:
            sprintf(str,"GASCODNG4");
            break;
        case SPATRAM2:
            sprintf(str,"SPATRAM2");
            break;
        case SPATRAM3:
            sprintf(str,"SPATRAM3");
            break;

        default:
            sprintf(str,"UNKNOWN");
            break;
    }

    strcat(dest,str);
    return dest;

 }

FontOBJSelCB()

void FontOBJSelCB	(	MOBJECT	obj,
		void *	a,
		void *	v
	)

This callback select the object for applying font.

Definition at line 1385 of file DAS_Spat_ConfCBs.c.

References FlgOBJ.

Referenced by MDCreateDASConfig().

{
//sceglie l'oggetto da considerare label, buttons.... 

    switch ((int) v)
    {
    case 0:
        FlgOBJ=0; //Unselected KeyCom
        break;
    case 1:
        FlgOBJ=1; //Selected KeyCom
        break;
    case 2:
        FlgOBJ=2; //Active Labels 
        break;
    case 3:
        FlgOBJ=3; //Passive Labels 
        break;
    case 4:
        FlgOBJ=4; //Forms Background 
        break;
    case 5:
        FlgOBJ=5; //Kapital Labels UP 
        break;
    case 6:
        FlgOBJ=6; //Kapital Labels DW 
        break;
    }    
}

Here is the caller graph for this function:

fraz2val()

int fraz2val	(	int	mod,
		char *	val
	)

ratio value to decimal value
opposite than listval2fraz or val2fraz

Parameters

mod	NOT USED (0)
val	sring indicating the ratio

Definition at line 2435 of file DAS_Spat_ConfCBs.c.

Referenced by ApplyChCB(), and WriteAMSCB().

{

    int b = 0;

    if(strcmp( val, "  1/2") == 0)
        b = 0;
    if(strcmp( val, "  1/4") == 0)
        b = 1;
    if(strcmp( val, "  1/5") == 0)
        b = 2;
    if(strcmp( val, "  1/8") == 0)
        b = 3;
    if(strcmp( val, " 1/10") == 0)
        b = 4;
    if(strcmp( val, " 1/16") == 0)
        b = 5;
    if(strcmp( val, " 1/25") == 0)
        b = 6;
    if(strcmp( val, " 1/32") == 0)
        b = 7;
    if(strcmp( val, " 1/50") == 0)
        b = 8;
    if(strcmp( val, " 1/64") == 0)
        b = 9;
    if(strcmp( val, "1/125") == 0)
        b = 10;
    if(strcmp( val, "1/128") == 0)
        b = 11;
    if(strcmp( val, "1/250") == 0)
        b = 12;
    if(strcmp( val, "1/256") == 0)
        b = 13;

    return b;



}

Here is the caller graph for this function:

GetDefPix()

int GetDefPix

(

int

mod

)

Maps the defective pixel.

Parameters

mod	0 –> UNDER exposed pixels 1 –> OVER exposed pixels

Returns

0

Definition at line 3755 of file DAS_Spat_ConfCBs.c.

References _MAX_PATH, AutoRange(), d_fileman::CONFIGDIREQUIPMENT, D_Saving(), date::da_day, date::da_mon, date::da_year, DB_GetCCD(), bil::DFILEM, bil::DPLOT, GetDateTime(), IDX, IDY, img::Imat, d_view::ImatGraf, dil::Img, LevelDefPix, image::Mat, MMessageDialog(), print2file(), QjLamp(), SD_Mirror(), Server, TExp, time::ti_hour, and time::ti_min.

Referenced by MAPDefPixCB().

{


    FILE    *fs;
    char    str[80];
    char    buff[_MAX_PATH];
    int i, t, j;
    unsigned int mx;
    unsigned short temp, *matdefpix;
    struct time adesso;
    struct date oggi;
    struct tm today;
    int NumOverExP = 0;
    int NumUnderExP = 0;


    GetDateTime(&oggi, &adesso, &today);
    //gettime(&adesso);
    //getdate(&oggi);

    
    if (mod ==1)
    {
        sprintf(buff, "%s\\OverExpPix.dat", BIL.DFILEM.CONFIGDIREQUIPMENT);

        fs = fopen(buff, "w");
        if(fs == NULL) return 1;

        sprintf(str, "DREM #######################################################\n");
        fprintf(fs,str,NULL);
        sprintf(str, "DREM #       OVER EXPOSED DEFECTIVE PIXELS:                #\n");
        fprintf(fs,str);
        sprintf(str, "DREM #       by DanBo %02u/%02u/%d at %02u:%02u:%02u       #\n", oggi.da_day,oggi.da_mon,oggi.da_year, adesso.ti_hour, adesso.ti_min,adesso.ti_min);
        fprintf(fs,str);
        sprintf(str, "DREM #######################################################\n");
        fprintf(fs,str,NULL);
        fclose(fs);
        

    }
    if (mod == 0)
    {
        sprintf(buff, "%s\\UnderExpPix.dat", BIL.DFILEM.CONFIGDIREQUIPMENT);

        fs = fopen(buff, "w");
        if(fs == NULL) return 1;

        sprintf(str, "DREM #######################################################\n");
        fprintf(fs,str,NULL);
        sprintf(str, "DREM #       UNDER EXPOSED DEFECTIVE PIXELS:               #\n");
        fprintf(fs,str);
        sprintf(str, "DREM #       by DanBo %02u/%02u/%d at %02u:%02u:%02u       #\n", oggi.da_day,oggi.da_mon,oggi.da_year, adesso.ti_hour, adesso.ti_min,adesso.ti_min);
        fprintf(fs,str);
        sprintf(str, "DREM #######################################################\n");
        fprintf(fs,str,NULL);

        fclose(fs);
    
    }
    if (mod == 2)
    {
        sprintf(buff, "%s\\OverExpPix5.dat", BIL.DFILEM.CONFIGDIREQUIPMENT);

        fs = fopen(buff, "w");
        if(fs == NULL) return 1;

        sprintf(str, "DREM #######################################################\n");
        fprintf(fs,str,NULL);
        sprintf(str, "DREM #       OVER EXPOSED DEFECTIVE PIXELS:                #\n");
        fprintf(fs,str);
        sprintf(str, "DREM #       by DanBo %02u/%02u/%d at %02u:%02u:%02u       #\n", oggi.da_day,oggi.da_mon,oggi.da_year, adesso.ti_hour, adesso.ti_min,adesso.ti_min);
        fprintf(fs,str);
        sprintf(str, "DREM #######################################################\n");
        fprintf(fs,str,NULL);
        fclose(fs);
        

    }


    if (IDX != 0)
    {
        mx = (unsigned long) IDX * (unsigned long) IDY;
        BIL.DPLOT.ImatGraf = (unsigned short *) calloc( mx, sizeof(unsigned short));

        mx = (unsigned long) IDX * (unsigned long) IDY;
        matdefpix = (unsigned short *) calloc( mx, sizeof(unsigned short));
    
    }
    else
    {
        MMessageDialog("ALERT", "CCD Not Initialized" , "Ok", NULL);
        return 1;
        
    }

    if (mod == 1)
    {
        TExp = 0;
        for (i= 0; i<3; i++)
            DB_GetCCD(0);
    }
    if (mod == 0)
    {
        TExp = 0;
        DB_GetCCD(0);
        QjLamp(1);
        SD_Mirror(2);
        AutoRange(0);
        DB_GetCCD(1);
    }
    
    if (mod == 2)
    {
        TExp = 5;
        for (i= 0; i<3; i++)
            DB_GetCCD(0);
    }


    for(t = 0 ; t < IDY ; t++)
    {
        for(j = 0; j < IDX; j++)
        {
            if(DIL.Img.Mat[Server].Imat[t * IDX + j] > LevelDefPix)
            {
                NumOverExP++;   
                //NumUnderExP++;
            }
            else
            {
                NumUnderExP++;
                //NumOverExP++;
            }

        }
    }

        fs = fopen(buff, "a");
        if(fs == NULL) return 1;


        if (mod==1 || mod==2)
        {

            sprintf(str, "DREM Start of pixel section\n");
            fprintf(fs,str);
            sprintf(str, "PIX\n");
            fprintf(fs,str);
            sprintf(str, "DREM Number of items of pixel correction\n");
            fprintf(fs,str);
            sprintf(str, "PITM %d\n", NumOverExP);
            fprintf(fs,str);
        }

        if (mod==0)
        {

            sprintf(str, "DREM Start of pixel section\n");
            fprintf(fs,str);
            sprintf(str, "PIX\n");
            fprintf(fs,str);
            sprintf(str, "DREM Number of items of pixel correction\n");
            fprintf(fs,str);
            sprintf(str, "PITM %d\n", NumUnderExP);
            fprintf(fs,str);
        }

    for(t = 0 ; t < IDY ; t++)
    {
        for(j = 0; j < IDX; j++)
        {

            
            if (mod==1 || mod==2)
            {
                if(DIL.Img.Mat[Server].Imat[t * IDX + j] >= LevelDefPix)
                {
                    temp = 100;
                    matdefpix[t * IDX + j]  = temp;
                    print2file(fs, j, t,DIL.Img.Mat[Server].Imat[t * IDX + j]);
                }
            }

            if (mod==0)
            {
                if(DIL.Img.Mat[Server].Imat[t * IDX + j] < LevelDefPix)
                {
                    temp = 100;
                    matdefpix[t * IDX + j]  = temp;
                    print2file(fs, j, t,DIL.Img.Mat[Server].Imat[t * IDX + j]);
                }
            }
            BIL.DPLOT.ImatGraf[t * IDX + j] = temp;

        }
    }
/*
            if(DIL.Img.Mat[Server].Imat[t * IDX + j] < LevelDefPix)
            {
                temp = 100;
                matdefpix[t * IDX + j]  = temp;
                if (mod==1 || mod==2)
                {

                }
                else
                {
                    print2file(fs, j, t,DIL.Img.Mat[Server].Imat[t * IDX + j]);
                }

            }
            if(DIL.Img.Mat[Server].Imat[t * IDX + j] >= LevelDefPix)
            {
                temp =40000;
                matdefpix[t * IDX + j]  = temp;
                if (mod==1 || mod==2)
                {
                    print2file(fs, j, t,DIL.Img.Mat[Server].Imat[t * IDX + j]);
                }
                else
                {
                    
                }
                
            }
            BIL.DPLOT.ImatGraf[t * IDX + j] = temp;
        }
    }
*/
            sprintf(str, "DEND\n");
        fprintf(fs,str);

    fclose(fs);

    D_Saving(); //Save the measured image

    for(t = 0 ; t < IDY ; t++)
    {
        for(j = 0; j < IDX; j++)
        {
            DIL.Img.Mat[Server].Imat[t * IDX + j]  = matdefpix[t * IDX + j];
        }
    }

    D_Saving(); //Save the image of defective pixels

    
    
    free(matdefpix);

    return 0;
}

Here is the call graph for this function:

Here is the caller graph for this function:

hertz2int()

int hertz2int	(	int	mod,
		char *	string
	)

translate the Hertz speed in AMS digit unit.

Parameters

mod	–> int not used (0)
*string	–> char containing the Hertz speed

Returns

c –> digital unit

Definition at line 2226 of file DAS_Spat_ConfCBs.c.

Referenced by ApplyChCB(), and WriteAMSCB().

{
    int c;
    
    c = (int) (((atof(string)*1000) - 125.0) / 125.0) ;
    
    return c;
}

Here is the caller graph for this function:

int2hertz()

double int2hertz	(	int	mod,
		int	k
	)

Definition at line 2213 of file DAS_Spat_ConfCBs.c.

Referenced by AssignParam(), and CONFP_AMS_TabSingMotor().

{
    double c;
    
    c = (125 * ((double) k + 1.0)) / 1000 ;
    
    return c;
}

Here is the caller graph for this function:

int2perc()

double int2perc	(	int	mod,
		int	k
	)

translate the AMS digit unit in text.
The power assigned to the motor trough the AMS, is translated in text

Parameters

mod	–> int not used (0)
k	–> int containing the decimal value

Returns

c –> percentage

Definition at line 2202 of file DAS_Spat_ConfCBs.c.

Referenced by AssignParam(), and CONFP_AMS_TabSingMotor().

{
    double c;
    
    c = (1.0 - (76.0 - (double) k ) / 76.0) * 100.0;
    return c;
}

Here is the caller graph for this function:

listval2fraz()

void listval2fraz	(	int	mod,
		int	val
	)

Decimal value to ratio value
The decimal value indicating the fractioning of the step is translated in ratio (i.e. 0 –> 1/2 = 400 s/r, 1–> 1/4 =800 s/r)

Parameters

mod	NOT USED (0)
val	steps

Definition at line 2236 of file DAS_Spat_ConfCBs.c.

References lfraz.

Referenced by CONFP_AMS_TabSingMotor().

{
    
    
    int c = (int) val;
    
    switch (c)
    {
    case 0:
        {
            sprintf(lfraz, "  1/2");
            break;
        }
    case 1:
        {
            sprintf(lfraz, "  1/4");
            
            break;
        }
    case 2:
        {
            sprintf(lfraz, "  1/5");
            
            break;
        }
    case 3:
        {
            sprintf(lfraz, "  1/8");
        
            break;
        }
    case 4:
        {
            sprintf(lfraz, " 1/10");
            
            break;
        }
    case 5:
        {
            sprintf(lfraz, " 1/16");
            
            break;
        }
    case 6:
        {
            sprintf(lfraz, " 1/25");
            
            break;
        }
    case 7:
        {
            sprintf(lfraz, " 1/32");
            
            break;
        }
    case 8:
        {
            sprintf(lfraz, " 1/50");
        
            break;
        }
    case 9:
        {
            
            sprintf(lfraz, " 1/64");
            break;
        }
    case 10:
        {
            sprintf(lfraz, "1/125");
            
            break;
        }
    case 11:
        {
            sprintf(lfraz, "1/128");
            ;
            break;
        }
    case 12:
        {
            sprintf(lfraz, "1/250");
            
            break;
        }
    case 13:
        {
            sprintf(lfraz, "1/256");
        
            break;
        }

    }

}

Here is the caller graph for this function:

LoadFontCB()

void LoadFontCB	(	MOBJECT	obj,
		void *	a,
		void *	data
	)

This callback tries to load the specified font.

Definition at line 1503 of file DAS_Spat_ConfCBs.c.

Referenced by MDCreateDASConfig().

{
/*
    MTFont newfont;
    int size;
//  int i;
    char family[32], buff[8];
/*
 * Get user preferences from the EDIT Objects
 *
    MObjectGetText(e_fname, family);
    MObjectGetText(e_fsize, buff);
    size = atoi(buff);
    newfont = MLoadFont(family, size, bold, italic);
/*
 * Apply the selected fonts to the selected object
 *
    // KeyCom Unselected
    if(FlgOBJ==0)
    {
        DB_Do2Undo_Fonts( newfont, undofont);
        DB_FontAssign(PBUTT.KeyB, sizeof PBUTT.KeyB / sizeof PBUTT.KeyB[0], newfont);

    }
    // KeyCom Selected
    if (FlgOBJ==1)
    {
        DB_Do2Undo_Fonts( newfont, undofont);           
        MObjectSetFont(PBUTT.KeyB[0], newfont, True);
    }
     //Active Labels 
    if (FlgOBJ==2)
    {
        DB_Do2Undo_Fonts( newfont, undofont);
        DB_FontAssign(DAS.Gui.ContrPanel.lbl_Par, sizeof DAS.Gui.ContrPanel.lbl_Par / sizeof DAS.Gui.ContrPanel.lbl_Par[0], newfont);
        DB_FontAssign(DAS.Gui.ContrPanel.Albl_CS, sizeof DAS.Gui.ContrPanel.Albl_CS / sizeof DAS.Gui.ContrPanel.Albl_CS[0], newfont);
        DB_FontAssign(DAS.Gui.ContrPanel.Albl_IE, sizeof DAS.Gui.ContrPanel.Albl_IE / sizeof DAS.Gui.ContrPanel.Albl_IE[0], newfont);
        DB_FontAssign(DAS.Gui.ContrPanel.Albl_LS, sizeof DAS.Gui.ContrPanel.Albl_LS / sizeof DAS.Gui.ContrPanel.Albl_LS[0], newfont);
        DB_FontAssign(DAS.Gui.ContrPanel.Albl_LT, sizeof DAS.Gui.ContrPanel.Albl_LT / sizeof DAS.Gui.ContrPanel.Albl_LT[0], newfont);
        DB_FontAssign(DAS.Gui.ContrPanel.cop, sizeof DAS.Gui.ContrPanel.cop / sizeof DAS.Gui.ContrPanel.cop[0] , newfont);
        DB_FontAssign(DAS.Gui.ContrPanel.step, sizeof DAS.Gui.ContrPanel.step / sizeof DAS.Gui.ContrPanel.step[0] , newfont);
        DB_FontAssign(DAS.Gui.ContrPanel.slope, sizeof DAS.Gui.ContrPanel.slope / sizeof DAS.Gui.ContrPanel.slope[0] , newfont);
        DB_FontAssign(DAS.Gui.ContrPanel.speed, sizeof DAS.Gui.ContrPanel.speed / sizeof DAS.Gui.ContrPanel.speed[0] , newfont);
        MObjectSetFont(DAS.Gui.ContrPanel.Albl_Status, newfont, True);
        MObjectSetFont(DAS.Gui.ContrPanel.Albl_Script, newfont, True);

    }

     //Passive Labels BG 
    if (FlgOBJ==3)
    {
        DB_Do2Undo_Fonts( newfont, undofont);
        DB_FontAssign(DAS.Gui.ContrPanel.lbl_NP, sizeof DAS.Gui.ContrPanel.lbl_NP / sizeof DAS.Gui.ContrPanel.lbl_NP[0], newfont);
        DB_FontAssign(DAS.Gui.ContrPanel.Plbl_CS, sizeof DAS.Gui.ContrPanel.Plbl_CS / sizeof DAS.Gui.ContrPanel.Plbl_CS[0], newfont);
        DB_FontAssign(DAS.Gui.ContrPanel.Plbl_IE, sizeof DAS.Gui.ContrPanel.Plbl_IE / sizeof DAS.Gui.ContrPanel.Plbl_IE[0], newfont);
        DB_FontAssign(DAS.Gui.ContrPanel.Plbl_LS, sizeof DAS.Gui.ContrPanel.Plbl_LS / sizeof DAS.Gui.ContrPanel.Plbl_LS[0], newfont);
        DB_FontAssign(DAS.Gui.ContrPanel.Plbl_LT, sizeof DAS.Gui.ContrPanel.Plbl_LT / sizeof DAS.Gui.ContrPanel.Plbl_LT[0], newfont);

        DB_FontAssign(DAS.Gui.ContrPanel.lbl_lamps, sizeof DAS.Gui.ContrPanel.lbl_lamps / sizeof DAS.Gui.ContrPanel.lbl_lamps[0], newfont);
        DB_FontAssign(DAS.Gui.ContrPanel.Plbl_SM, sizeof DAS.Gui.ContrPanel.Plbl_SM / sizeof DAS.Gui.ContrPanel.Plbl_SM[0], newfont);
        DB_FontAssign(DAS.Gui.ContrPanel.lbl, sizeof DAS.Gui.ContrPanel.lbl / sizeof DAS.Gui.ContrPanel.lbl[0] , newfont);

        MObjectSetFont(DAS.Gui.ContrPanel.Plbl_Status, newfont, True);
        MObjectSetFont(DAS.Gui.ContrPanel.Plbl_Script, newfont, True);


    }




     // Kapital Labels UP BG 
    if (FlgOBJ==4)
    {
        DB_Do2Undo_Fonts( newfont, undofont);
        DB_FontAssign(DAS.Gui.ContrPanel.lblK, sizeof DAS.Gui.ContrPanel.lblK / sizeof DAS.Gui.ContrPanel.lblK[0], newfont);

    }


     // Kapital Labels DW BG 
    if (FlgOBJ==5)
    {
        DB_Do2Undo_Fonts( newfont, undofont);
        DB_FontAssign(DAS.Gui.ContrPanel.lblK_DW, sizeof DAS.Gui.ContrPanel.lblK_DW / sizeof DAS.Gui.ContrPanel.lblK_DW[0], newfont);

    }





/**************************************************************/
/*
 * The function returns FIXED_MEDIUM on failure
 
    if (newfont != FIXED_MEDIUM)
    {
//  if (font != FIXED_MEDIUM)
//      MUnloadFont(font);
//  font = newfont;
    MObjectRedraw(DAS.Gui.ConfigPanel.frm4_dr1);
    }
    else
    MBeep();

*/
}

Here is the caller graph for this function:

LoadPaletteCB()

int LoadPaletteCB	(	MOBJECT	o,
		void *	o_data,
		void *	a_data
	)

Callback for LoadTestPalette.

Definition at line 595 of file DAS_Spat_ConfCBs.c.

References _MAX_PATH, FB_PREFS::allow_dir_create, FB_PREFS::allow_dir_delete, FB_PREFS::allow_dir_rename, FB_PREFS::bg_image_file, FB_PREFS::button_font, FB_PREFS::change_cwd, d_fileman::DBFILENAME, bil::DFILEM, False, FB_PREFS::font, HELV_SMALL, d_fileman::HOMEDIRECTORY, LoadTestPalette(), MFileBrowseExt(), MGetCurrentDirectory(), FB_PREFS::transparent_tree, and True.

Referenced by MDCreateDASConfig().

{

    char str[_MAX_PATH] ;
    char fname[128], dirname[128];
    int er;

  FB_PREFS fbp;
  strcpy (dirname, MGetCurrentDirectory ());
  fname[0] = '\0';
    memset (&fbp, 0, sizeof (fbp));
 
    fbp.change_cwd = True;
    fbp.allow_dir_create = True;
    fbp.allow_dir_rename = True;
    fbp.allow_dir_delete = True;
    fbp.transparent_tree = False;
    fbp.font = HELV_SMALL;
    fbp.button_font = HELV_SMALL;
    //Set Img file
    sprintf(str, "%s\\%s", BIL.DFILEM.HOMEDIRECTORY, "sys\\Tile2.bmp" );
    fbp.bg_image_file =str;
    
    
    er = MFileBrowseExt ("Select File for Plotting", "*.MAP", fname, dirname, &fbp);
    sprintf(BIL.DFILEM.DBFILENAME,"%s%s",dirname, fname);

    //BIL.DFILEM.DBFILENAME[0] = 0;

    //MDCreateFM_Shell(FOPEN, FMAP);  //Open File, MAP ext.

    if(BIL.DFILEM.DBFILENAME[0] == 0)
        return 1;

    LoadTestPalette(BIL.DFILEM.DBFILENAME); 
    return 0;
}

Here is the call graph for this function:

Here is the caller graph for this function:

MAPDefPix()

void MAPDefPix

(

int

mod

)

create the Under/Over exposed pixels window
At the pression of the button in DAS_Config the appropriate shell (For the creation of the Under or Over exposed pixel map) will be created.

Parameters

mod	= 0 –> Under Exposed pixels = 1 –> Over Exposed pixels

Definition at line 4036 of file DAS_Spat_ConfCBs.c.

References ActEditCB(), CENTER_ALIGN, False, FIXED_SMALL, lbl, LEFT_ALIGN, MAPDefPixCB(), MCreateClippedEdit(), MCreateLabel(), MCreatePButton(), MCreateRowForm(), MCreateShell(), MCreateTableForm(), MDQuitCB(), MEditSetActCallback(), MEditSetValCallback(), MLabelSetAlignment(), MObjectAlign(), MObjectSetBackgroundRGB(), MObjectSetCompositeWidth(), MObjectSetForegroundRGB(), MObjectSetResize(), MObjectSetTransparency(), MPButtonSetCallback(), MShellRealize(), MShellSetWMCloseCallback(), p, TOP_ALIGN, True, and ValidateCB().

Referenced by UnderOverPixCB().

{

    MOBJECT sh, rowf, lbl,lbl1,lbl2, tb, level, pb;
    char str[80];
    int *p, k;

    sh = MCreateShell("MAP DEFECTIVE PIXELS", 0);
//  MObjectSetCompositeWidth(sh, 670);
//  MObjectSetCompositeHeight(sh, 483);

    rowf = MCreateRowForm(sh);
    MObjectSetBackgroundRGB(rowf, 112, 128, 112);
    MObjectSetResize(rowf, True, True);
//  MObjectSetCompositeWidth(rowf, 357);
    MObjectAlign(rowf, CENTER_ALIGN, TOP_ALIGN);
    
    if(mod==1)
        sprintf(str, "This procedure allows for the mapping of the\n OVER exposed pixels of the CCD sensor");

    if(mod==0)
        sprintf(str, "This procedure allows for the mapping of the\n UNDER exposed pixels of the CCD sensor");

    if(mod==2)
        sprintf(str, "This procedure allows for the mapping of the\n OVER exposed pixels of the CCD sensor");
    
    lbl = MCreateLabel(rowf, str, FIXED_SMALL);
    MObjectSetResize(lbl, True, True);
    MObjectSetForegroundRGB(lbl, 255, 255, 255);
    MObjectSetBackgroundRGB(lbl, 96, 132, 152);
    MObjectSetTransparency(lbl, 0);

    if(mod==1)
        sprintf(str, "3 Flat Measurements (Texp = 0) will be porformed\n in order to identify the defective pixels");

    if(mod==0)
        sprintf(str, "3 Measurements of QJ lamp will be porformed\n in order to identify the defective pixels");
    
    if(mod==2)
        sprintf(str, "3 Flat Measurements (Texp = 5s) will be porformed\n in order to identify the defective pixels");


    lbl1 = MCreateLabel(rowf, str, FIXED_SMALL);
    MObjectSetResize(lbl1, True, True);
    MObjectSetForegroundRGB(lbl1, 255, 255, 255);
    MObjectSetBackgroundRGB(lbl1, 96, 132, 152);
    MObjectSetTransparency(lbl1, 0);


    if(mod==1)
        sprintf(str, " You have to set the maximum level in\norder to consider the pixel as good");

    if(mod==0)
        sprintf(str, " You have to set the minimum level in\norder to consider the pixel as good");

    if(mod==2)
        sprintf(str, " You have to set the maximum level in\norder to consider the pixel as good");

    lbl2 = MCreateLabel(rowf, str, FIXED_SMALL);
    MObjectSetForegroundRGB(lbl2, 255, 255, 255);
    MObjectSetBackgroundRGB(lbl2, 96, 132, 152);
    MObjectSetTransparency(lbl2, 0);



/**************************************/
    tb = MCreateTableForm(rowf, 3);
    MObjectSetBackgroundRGB(tb, 56, 112, 112);
    MObjectSetResize(tb, False, False);
//  MObjectSetCompositeWidth(tb, 347);
        
    if(mod==1)
        sprintf(str, "Pix with values higher than");

    if(mod==0)
        sprintf(str, "Pix with values lower than");

    if(mod==2)
        sprintf(str, "Pix with values higher than");

    lbl = MCreateLabel(tb, str, FIXED_SMALL);
    MLabelSetAlignment(lbl, LEFT_ALIGN);
    MObjectSetForegroundRGB(lbl, 255, 255, 255);
    MObjectSetTransparency(lbl, 0);
    MObjectSetResize(lbl, False, False);
    MObjectAlign(lbl, LEFT_ALIGN, TOP_ALIGN);
    
    level = MCreateClippedEdit(tb, "  ", 10, 5, FIXED_SMALL);
    MObjectSetForegroundRGB(level, 255, 255, 255);
    MObjectSetBackgroundRGB(level, 40, 96, 72);
//  MObjectSetCompositeWidth(level, 35);
    MObjectAlign(level, LEFT_ALIGN, TOP_ALIGN);
    k = 140;
    p = (void *) k;
    MEditSetValCallback(level, ValidateCB, p);
    MEditSetActCallback(level, ActEditCB, p);   

    lbl1 = MCreateLabel(tb, "will be marked as defective", FIXED_SMALL);
    MLabelSetAlignment(lbl1, LEFT_ALIGN);
    MObjectSetForegroundRGB(lbl1, 255, 255, 255);
    MObjectSetTransparency(lbl1, 0);
    MObjectSetResize(lbl1, False, False);
    MObjectAlign(lbl1, LEFT_ALIGN, TOP_ALIGN);

    tb = MCreateTableForm(rowf, 2);
    MObjectSetBackgroundRGB(tb, 56, 112, 112);
    MObjectSetResize(tb, False, False);
    
    
    pb = MCreatePButton(tb ,"Execute", FIXED_SMALL);
    MPButtonSetCallback(pb, MAPDefPixCB, (void *) mod);
    MObjectSetBackgroundRGB(pb, 224, 224, 176);
    MObjectSetCompositeWidth(pb, 100);
/*
    pb = MCreatePButton(tb, "Close", FIXED_SMALL);
    MPButtonSetCallback(pb, MDQuitCB, (void *) 0);
    MObjectSetBackgroundRGB(pb, 224, 224, 176);
    MObjectSetCompositeWidth(pb, 100);
*/

/************************************/
    MShellRealize(sh);
    MShellSetWMCloseCallback(sh, MDQuitCB, 0L);
}

Here is the call graph for this function:

Here is the caller graph for this function:

MAPDefPixCB()

void MAPDefPixCB	(	MOBJECT	o,
		void *	id,
		void *	a_data
	)

GetDefPix(mod) Callback At the pression of the 'Execute' button in the appropriate shell the GetDefPix procedure will be executed.

Parameters

a_data

= 0 –> Under Exposed pixels = 1 –> Over Exposed pixels

Definition at line 4010 of file DAS_Spat_ConfCBs.c.

References GetDefPix().

Referenced by MAPDefPix().

{

    int c = (int) a_data;

    GetDefPix(c);
/*  switch (c)
    {
        case 0:
            GetDefPix(0);
            break;
        case 1:
            GetDefPix(1);
            break;
        case 2:
            GetDefPix(2);
            break;

    }
*/
}

Here is the call graph for this function:

Here is the caller graph for this function:

ModifyConfFileCB()

void ModifyConfFileCB	(	MOBJECT	o,
		void *	id,
		void *	a_data
	)

Modification DAS Configuration files Callback
Set if the blind pixels will be displayed or not on the plot window.

Parameters

*a_data_

= 0 –> edit selected configuration file = 1 –> re-load selected configuration file

Definition at line 4203 of file DAS_Spat_ConfCBs.c.

References d_fileman::CONFIGDIRCOMMON, d_fileman::CONFIGDIREQUIPMENT, bil::DFILEM, d_fileman::HOMEDIRECTORY, LoadDasSysCol(), LoadDB_Options(), MObjectGetText(), and flag::VMRsf.

Referenced by CONFP_opt_page2().

{
    char buff[80];
    char str[MAX_PATH];
    int c = (int) a_data, er;

    if(FLAG.VMRsf == 0)
    {
        switch (c)
        {
        case 0:
        case 1:
        case 2:
        case 3:
        case 4:
        case 6:
        case 8:
            MObjectGetText(o, buff);
            sprintf(str,"%s %s\\%s","MEDIT.EXE", BIL.DFILEM.CONFIGDIREQUIPMENT, buff);
            er = WinExec(str, SW_SHOW);
            //If you want you can use the DED Library
            //In my opinion MEDIT is better
            //sprintf(str,"%s\\Config\\%s", BIL.DFILEM.HOMEDIRECTORY,buff);
            //DED(str);
            break;
        case 5:
            sprintf(str,"%s %s\\Config\\%s","MEDIT.EXE", BIL.DFILEM.HOMEDIRECTORY,"NoName.txt");
            er = WinExec(str, SW_SHOW);
            //sprintf(str,"%s\\%s", BIL.DFILEM.HOMEDIRECTORY,"NoName.txt");
            //DED(str);
            break;
        case 7:
            MObjectGetText(o, buff);
            sprintf(str,"%s %s\\%s","MEDIT.EXE", BIL.DFILEM.CONFIGDIRCOMMON , buff);
            er = WinExec(str, SW_SHOW);
            //If you want you can use the DED Library
            //In my opinion MEDIT is better
            //sprintf(str,"%s\\Config\\%s", BIL.DFILEM.HOMEDIRECTORY,buff);
            //DED(str);
            break;

        }
    }
    else if(FLAG.VMRsf == 1)
    {
        switch (c)
        {
        case 0:
            break;
        case 1:
            LoadDasSysCol();
//          MObjectRedraw(CP_Sh);
//          MObjectRedraw(LIS.Sh_KeyB);
            break;
        case 2:
            LoadDB_Options();
            break;
        case 3:
            break;
        case 4:
            break;
        case 5:
            sprintf(str,"%s %s\\Config\\%s","MEDIT.EXE", BIL.DFILEM.HOMEDIRECTORY,"NoName.txt");
            er = WinExec(str, SW_SHOW);
            //sprintf(str,"%s\\%s", BIL.DFILEM.HOMEDIRECTORY,"NoName.txt");
            //DED(str);
            break;
        }
    }

}

Here is the call graph for this function:

Here is the caller graph for this function:

NovaTypeCB()

void NovaTypeCB	(	MOBJECT	p,
		void *	od,
		void *	ad
	)

Callback for NOVA selection.

Definition at line 60 of file DAS_Spat_ConfCBs.c.

References nova::DigIn, nova::DigOut, MRButtonGetActivationStatus(), das::Nova, NOVA6612G2, NOVA7892, NOVA945GSE, and nova::type.

Referenced by CONFP_AMS_NOVA().

{
    int     c = (int) ad, er;
//  char buf[80];

    er = MRButtonGetActivationStatus(p);
    if (er)
    {
        switch(c)
        {
        case NOVA7892:
            DAS.Nova.type = NOVA7892;
            DAS.Nova.DigOut = 0;
            DAS.Nova.DigIn = 0;
            break;
        case NOVA6612G2:
            DAS.Nova.type = NOVA6612G2;
            DAS.Nova.DigOut = 0;
            break;
        case NOVA945GSE:
            DAS.Nova.type = NOVA945GSE;
            DAS.Nova.DigOut = 15;
            DAS.Nova.DigIn = 15;
            break;
        }
    }

    //WriteHardwareiniCB();
    //For checking
    //sprintf(buf,"Nova Type=%d", novatype);
    //MMessageDialog("Info", buf, "OK", NULL);
}

Here is the call graph for this function:

Here is the caller graph for this function:

PB_H_CB()

void PB_H_CB	(	MOBJECT	p,
		void *	od,
		void *	ad
	)

Quick Help Callback.

Definition at line 3363 of file DAS_Spat_ConfCBs.c.

References MMessageDialog().

Referenced by CONFP_param_page1().

{
    
    int     c = (int) ad;
    char buf[1024];

    switch(c)
    {
        case 0:
            sprintf(buf,"In this text box the user can specify \nthe Maximum Exposure Time (MEXT) \
(s) that will be used in the AutoRange() Procedure.\n The Maximum time allowed \
is 999s.\n If the MEXT is set to 0.0, the Autoranging procedure will ignore the \n\
limitations and the calculated exposure time will be used.");
                MMessageDialog("DAS Quick Help:", buf, "ok", NULL);
            break;
        case 2:
            break;

    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

perc2int()

int perc2int	(	int	mod,
		char *	string
	)

translate the percent power in AMS digit unit.
The percent power assigned to the motor trough the AMS , is translated in digital unit (i.e. 50% –> 38)

translate the AMS digit unit in hertz speed.

Parameters

mod	–> int not used (0)
*string	–> char containing the percent power

Returns

c –> digital unit

Parameters

mod	–> int not used (0)
string	–> char containing the

Returns

c –> speed (khz)

Definition at line 2191 of file DAS_Spat_ConfCBs.c.

Referenced by ApplyChCB(), and WriteAMSCB().

{
    int c;
    
    c = (int) (atof(string) * 76.0 / 100.0);
    return c;
}

Here is the caller graph for this function:

print2file()

void print2file	(	FILE *	ff,
		int	x,
		int	y,
		unsigned int	m
	)

Print to file the defective pixel.

Parameters

*ff	Pointer to the buffer file
x	Image horizontal dimension
y	Image vertical dimension
m	image buffer

Definition at line 3734 of file DAS_Spat_ConfCBs.c.

Referenced by GetDefPix().

{
    
    char    str[80];


    //sprintf(str, "x, y, val: %d %d %u\n", x, y, m);
    //sprintf(str, "%d %d %u 1 1 0 0\n", x, y, m);
    sprintf(str, "%d %d 1 1 0 0\n", x, y);

    fprintf(ff,str);



}

Here is the caller graph for this function:

ScreenInfoCB()

void ScreenInfoCB	(	MOBJECT	o,
		void *	s,
		void *	v
	)

Definition at line 886 of file DAS_Spat_ConfCBs.c.

References MGetNColors(), MGetNPlanes(), MGetScreenHeight(), MGetScreenWidth(), and MMessageDialog().

{
    char buff[256];

    sprintf(buff, "Width: %d\nHeight: %d\nColors: %ld\nPlanes: %d",
        MGetScreenWidth(),
        MGetScreenHeight(),
        MGetNColors(),
        MGetNPlanes());
    MMessageDialog("Screen Information", buff, " Ok ", NULL);
}

Here is the call graph for this function:

SetBoldCB()

void SetBoldCB	(	MOBJECT	obj,
		MVALUE	a,
		void *	data
	)

This callback toggles the Bold attribute.

Definition at line 1455 of file DAS_Spat_ConfCBs.c.

References bold, and DB_TestF().

Referenced by MDCreateDASConfig().

{
    bold = (int) a;
    DB_TestF();
}

Here is the call graph for this function:

Here is the caller graph for this function:

SetItalicCB()

void SetItalicCB	(	MOBJECT	obj,
		MVALUE	a,
		void *	data
	)

This callback toggles the Italic attribute.

Definition at line 1464 of file DAS_Spat_ConfCBs.c.

References DB_TestF(), and italic.

Referenced by MDCreateDASConfig().

{
    italic = (int) a;
    DB_TestF();
}

Here is the call graph for this function:

Here is the caller graph for this function:

TestFontCB()

void TestFontCB	(	MOBJECT	obj,
		void *	a,
		void *	data
	)

This callback tries to load the specified font.

Definition at line 1489 of file DAS_Spat_ConfCBs.c.

References DB_TestF().

Referenced by MDCreateDASConfig().

{

    DB_TestF();
    

}

Here is the call graph for this function:

Here is the caller graph for this function:

TextColorAssignCB()

void TextColorAssignCB	(	MOBJECT	o,
		MVALUE	o_data,
		void *	a_data
	)

Definition at line 744 of file DAS_Spat_ConfCBs.c.

References mtcl::black, cell_label, label_fgc, MObjectBackgroundColor(), MObjectSetColor(), and mtcl::white.

{
    if (o_data)
    {
    label_fgc = (a_data ? MTCL.white : MTCL.black);
    MObjectSetColor(cell_label, MObjectBackgroundColor(cell_label), label_fgc);
    }
}

Here is the call graph for this function:

UnderOverPixCB()

void UnderOverPixCB	(	MOBJECT	o,
		void *	id,
		void *	a_data
	)

Under/Over exposed pixels Callback
At the pression of the button in DAS_Config the appropriate shell (For the creation of the Under or Over exposed pixel map - with the MAPDefPix() function) will be created.

Parameters

a_data

= 0 –> Under Exposed pixels = 1 –> Over Exposed pixels

Definition at line 4162 of file DAS_Spat_ConfCBs.c.

References MAPDefPix().

Referenced by CONFP_opt_page1().

{

    int c = (int) a_data;

    MAPDefPix(c);
/*  switch (c)
        {
            case 0:
                MAPDefPix(0);
                break;
            case 1:
                MAPDefPix(1);
                break;
            case 2:
                MAPDefPix(2);
                break;


        }
*/
}

Here is the call graph for this function:

Here is the caller graph for this function:

UndoFCB()

void UndoFCB	(	MOBJECT	obj,
		void *	a,
		void *	v
	)

This callback UnDo the font choice (Not implemented yet)

Definition at line 1421 of file DAS_Spat_ConfCBs.c.

Referenced by MDCreateDASConfig().

{
    
}

Here is the caller graph for this function:

val2fraz()

void val2fraz	(	int	id,
		int	sn,
		int	val
	)

Decimal value to ratio value
Similar to listval2fraz The decimal value indicating the fractioning of the step is translated in ratio (i.e. 0 –> 1/2 = 400 s/r, 1–> 1/4 =800 s/r)

Parameters

id	NOT USED (0)
sn	NOT USED (0)
val	steps

Definition at line 2333 of file DAS_Spat_ConfCBs.c.

References stepm::step_fraz, and das::StepM.

Referenced by ApplyChCB(), AssignParam(), and WriteAMSCB().

{
    
    char xx[10];
    int c = (int) val;
    
    switch (c)
    {
    case 0:
        {
            sprintf(xx, "  1/2");
            break;
        }
    case 1:
        {
            sprintf(xx, "  1/4");
            
            break;
        }
    case 2:
        {
            sprintf(xx, "  1/5");
            
            break;
        }
    case 3:
        {
            sprintf(xx, "  1/8");
        
            break;
        }
    case 4:
        {
            sprintf(xx, " 1/10");
            
            break;
        }
    case 5:
        {
            sprintf(xx, " 1/16");
            
            break;
        }
    case 6:
        {
            sprintf(xx, " 1/25");
            
            break;
        }
    case 7:
        {
            sprintf(xx, " 1/32");
            
            break;
        }
    case 8:
        {
            sprintf(xx, " 1/50");
        
            break;
        }
    case 9:
        {
            
            sprintf(xx, " 1/64");
            break;
        }
    case 10:
        {
            sprintf(xx, "1/125");
            
            break;
        }
    case 11:
        {
            sprintf(xx, "1/128");
            ;
            break;
        }
    case 12:
        {
            sprintf(xx, "1/250");
            
            break;
        }
    case 13:
        {
            sprintf(xx, "1/256");
        
            break;
        }

    }

    
    for(c = 0; c < (int) strlen(xx); c++)
                DAS.StepM.step_fraz[id][sn][c] = xx[c];
        


}

Here is the caller graph for this function:

ValidateCB()

void ValidateCB	(	MOBJECT	edit,
		EDIT_VAL *	ev,
		void *	ii
	)

Text Validation callback Validation callback for the text typed in different text box.

Definition at line 1632 of file DAS_Spat_ConfCBs.c.

References paramini::ccdWx, paramini::ccdWy, paramini::ccdXoff, paramini::ccdYoff, paramini::CoolPw, das::DOption, ccd::dx, ccd::dy, False, EDIT_VAL::focus_leave, paramini::ITemp, optionini::maxlvlar, paramini::maxtexp, MMessageDialog(), das::Paramini, omuthr::PCPower, EDIT_VAL::text, paramini::TPelt, and paramini::VBin.

Referenced by CONFP_AMS_SM_OFFSET(), CONFP_opt_page1(), CONFP_opt_page2(), CONFP_opt_page3(), CONFP_param_page1(), D_PlotTools(), MAPDefPix(), and MDCreateColFor_Sh().

{
    int c = (int) ii;
//  int x,y;
//  div_t div_result;

    switch (c)
    {
    case 1:
        {
            DAS.Paramini.ITemp = strtod( ev->text, &ev->text );
            if (DAS.Paramini.ITemp < -40 || DAS.Paramini.ITemp > 30)
            {
                ev->focus_leave = False; 
                
            }
        break;
        }
    case 2:
        {
            DAS.Paramini.CoolPw = (int) (strtod(ev->text, &ev->text ) * 10);
            if (DAS.Paramini.CoolPw < 0 || DAS.Paramini.CoolPw > 1000)
            {
                ev->focus_leave = False; 
            }
        break;
        }

    case 3:
        {
            DAS.Paramini.TPelt = strtod( ev->text, &ev->text );
            if (DAS.Paramini.TPelt < 0 || DAS.Paramini.TPelt > 30)
            {
                ev->focus_leave = False; 
            }
        break;
        }
    case 2000:
        {
            OMUTHR.PCPower = (int) (strtod(ev->text, &ev->text ) * 10);
            if (OMUTHR.PCPower < 0 || OMUTHR.PCPower > 1000)
            {
                ev->focus_leave = False; 
            }
        break;
        }

    case 4:
        {
            
            DAS.Paramini.ccdXoff = (int) strtol( ev->text, &ev->text, 10 );
            if (DAS.Paramini.ccdXoff < 0 || DAS.Paramini.ccdXoff > DC_CCD.dx)
            {
                ev->focus_leave = False; 
            }
        break;
        }
    case 5:
        {
            DAS.Paramini.ccdWx = (int) strtol( ev->text, &ev->text, 10 );
            if (DAS.Paramini.ccdWx < 0 || DAS.Paramini.ccdWx > DC_CCD.dx)
            {
                ev->focus_leave = False; 
            }
        break;
        }
    case 6:
        {
            
            DAS.Paramini.ccdYoff = (int) strtol( ev->text, &ev->text, 10 );
            if (DAS.Paramini.ccdYoff < 0 || DAS.Paramini.ccdYoff > DC_CCD.dy)
            {
                ev->focus_leave = False; 
            }
        break;
        }
    case 7:
        {
            DAS.Paramini.ccdWy = (int) strtol( ev->text, &ev->text, 10 );
            if (DAS.Paramini.ccdWy < 0 || DAS.Paramini.ccdWy > DC_CCD.dy)
            {
                ev->focus_leave = False; 
            }
        break;
        }

    case 8:
        {
            DAS.Paramini.VBin = (int) strtol( ev->text, &ev->text, 10 );
//          x = DAS.Paramini.ccdWy - DAS.Paramini.ccdYoff;
//          y = DAS.Paramini.VBin;
//          div_result = div( x, y );
//          if (div_result.rem)
//              ev->focus_leave = False; 
        break;
        }
// SM1
/*  case 9:
        {
            DAS.StepM.cop[0] = (int) strtol( ev->text, &ev->text, 10 );
            if (DAS.StepM.cop[0] < 0 || DAS.StepM.cop[0] > 100)
            {
                ev->focus_leave = False; 
            }
        break;
        }
    case 10:
        {
            DAS.StepM.step[0] = (int) strtol( ev->text, &ev->text, 10 );
            if (DAS.StepM.step[0] < 0 || DAS.StepM.step[0] > 13)
            {
                ev->focus_leave = False; 
            }
        break;
        }
    case 11:
        {
            DAS.StepM.slope[0] = (int) strtol( ev->text, &ev->text, 10 );
            if (DAS.StepM.slope[0] < 0 || DAS.StepM.slope[0] > 255)
            {
                ev->focus_leave = False; 
            }
        break;
        }
    case 12:
        {
            DAS.StepM.speed[0] = (int) strtol( ev->text, &ev->text, 10 );
            if (DAS.StepM.speed[0] < 1 || DAS.StepM.speed[0] > 50000)
            {
                ev->focus_leave = False; 
            }
        break;
        }
// SM2
    case 13:
        {
            DAS.StepM.cop[1] = (int) strtol( ev->text, &ev->text, 10 );
            if (DAS.StepM.cop[1] < 0 || DAS.StepM.cop[1] > 100)
            {
                ev->focus_leave = False; 
            }
        break;
        }
    case 14:
        {
            DAS.StepM.step[1] = (int) strtol( ev->text, &ev->text, 10 );
            if (DAS.StepM.step[1] < 0 || DAS.StepM.step[1] > 13)
            {
                ev->focus_leave = False; 
            }
        break;
        }
    case 15:
        {
            DAS.StepM.slope[1] = (int) strtol( ev->text, &ev->text, 10 );
            if (DAS.StepM.slope[1] < 0 || DAS.StepM.slope[1] > 255)
            {
                ev->focus_leave = False; 
            }
        break;
        }
    case 16:
        {
            DAS.StepM.speed[1] = (int) strtol( ev->text, &ev->text, 10 );
            if (DAS.StepM.speed[1] < 1 || DAS.StepM.speed[1] > 50000)
            {
                ev->focus_leave = False; 
            }
        break;
        }
// SM3
    case 17:
        {
            DAS.StepM.cop[2] = (int) strtol( ev->text, &ev->text, 10 );
            if (DAS.StepM.cop[2] < 0 || DAS.StepM.cop[2] > 100)
            {
                ev->focus_leave = False; 
            }
        break;
        }
    case 18:
        {
            DAS.StepM.step[2] = (int) strtol( ev->text, &ev->text, 10 );
            if (DAS.StepM.step[2] < 0 || DAS.StepM.step[2] > 13)
            {
                ev->focus_leave = False; 
            }
        break;
        }
    case 19:
        {
            DAS.StepM.slope[2] = (int) strtol( ev->text, &ev->text, 10 );
            if (DAS.StepM.slope[2] < 0 || DAS.StepM.slope[2] > 255)
            {
                ev->focus_leave = False; 
            }
        break;
        }
    case 20:
        {
            DAS.StepM.speed[2] = (int) strtol( ev->text, &ev->text, 10 );
            if (DAS.StepM.speed[2] < 1 || DAS.StepM.speed[2] > 50000)
            {
                ev->focus_leave = False; 
            }
        break;
        }

    
    case 111:
        {

        break;
        }
*/
    case 123:
        {
            DAS.Paramini.maxtexp = strtod( ev->text, &ev->text );
            if (DAS.Paramini.maxtexp < 0 || DAS.Paramini.maxtexp > 1000)
            {
                ev->focus_leave = False; 
            }
        break;
        }

    case 600:
        {
            DAS.DOption.maxlvlar = strtol( ev->text, &ev->text, 10 );
            if(DAS.DOption.maxlvlar < 5000 || DAS.DOption.maxlvlar > 63000)
            {
                ev->focus_leave = False;
                MMessageDialog("DAS information", "Value Outside Limits" , "OK", NULL);
                
            }
        break;
        }

    
    }



}

Here is the call graph for this function:

Here is the caller graph for this function:

WriteAMSCB()

int WriteAMSCB	(	MOBJECT	shell,
		void *	od,
		void *	ad
	)

Write AMS.ini file
.

Returns

0 –> operation succefully performed; 1 –>problems in writing file

Definition at line 2834 of file DAS_Spat_ConfCBs.c.

References _MAX_PATH, d_fileman::CONFIGDIREQUIPMENT, gui::ConfigPanel, gui::ContrPanel, stepm::cop_perc, date::da_day, date::da_mon, date::da_year, bil::DFILEM, fraz2val(), GetDateTime(), das::Gui, hertz2int(), stepm::hometype, MMessageDialog(), MObjectGetText(), MObjectSetText(), stepm::multiplier, stepm::NAMS, paramini::Offset, das::Paramini, perc2int(), controlpanel::power, stepm::power, controlpanel::slope, stepm::slope, configpanel::SM_multiplier, configpanel::SM_power, configpanel::SM_slope, configpanel::SM_speed, configpanel::SM_step, controlpanel::speed, stepm::speed, stepm::speed_Hz, controlpanel::step, stepm::step, stepm::step_fraz, das::StepM, time::ti_hour, time::ti_min, and val2fraz().

Referenced by MDCreateDASConfig().

{
    FILE    *fs;
    char    str[80];
    char    buf[16];
    struct time adesso;
    struct date oggi;
    struct tm today;
    int c,i, k, t;
    char buff[_MAX_PATH];


    sprintf(buff,"%s\\AMS.INI", BIL.DFILEM.CONFIGDIREQUIPMENT);
    fs = fopen(buff, "w");

    GetDateTime(&oggi, &adesso, &today);
    //gettime(&adesso);
    //getdate(&oggi);


    if(fs == NULL)
    {
        MMessageDialog("DAS information", "Problems in opening file", " Ok ", NULL);
        return 1;   
    }



    sprintf(str, "###############################################\n");
    fprintf(fs,str);
    sprintf(str, "#                  AMS.INI                  #\n");
    fprintf(fs,str);
    sprintf(str, "#    Main configuration file for AMS Devices  #\n");
    fprintf(fs,str);
    sprintf(str, "###############################################\n");
    fprintf(fs,str);
    sprintf(str, "# ------------------------------------------- #\n");
    fprintf(fs,str);
    sprintf(str, "#       by DanBo %02u/%02u/%d at %02u:%02u:%02u       #\n", oggi.da_day,oggi.da_mon,oggi.da_year, adesso.ti_hour, adesso.ti_min,adesso.ti_min);
    fprintf(fs,str);
    sprintf(str, "# ------------------------------------------- #\n");
    fprintf(fs,str);


    
    for (i=0;i<DAS.StepM.NAMS;i++)
    {
        for(k=0;k<2;k++)
        {
        /*
        * Get user preferences from the EDIT Objects for Power SMx
        */
        //Power
        MObjectGetText(DAS.Gui.ConfigPanel.SM_power[i][k], str);
        DAS.StepM.cop_perc[i][k] = atof(str);
        DAS.StepM.power[i][k] = perc2int(0, str);
        MObjectSetText(DAS.Gui.ContrPanel.power[i][k], str);

        /*
        * Get user preferences from the EDIT Objects for Step SMx
        */
        //Step
        MObjectGetText(DAS.Gui.ConfigPanel.SM_step[i][k], str);
        DAS.StepM.step[i][k] = fraz2val(0, str);
        val2fraz(i, k, DAS.StepM.step[i][k]);
        sprintf(str, "%s", DAS.StepM.step_fraz[i][k]);
        MObjectSetText(DAS.Gui.ContrPanel.step[i][k], str);
    
        // Slope
        MObjectGetText(DAS.Gui.ConfigPanel.SM_slope[i][k], str);
        DAS.StepM.slope[i][k] = atoi(str);
        sprintf(str, "%d", DAS.StepM.slope[i][k]);
        MObjectSetText(DAS.Gui.ContrPanel.slope[i][k], str);
    
        //speed
        MObjectGetText(DAS.Gui.ConfigPanel.SM_speed[i][k], str);
        DAS.StepM.speed_Hz[i][k] = atof(str);
        DAS.StepM.speed[i][k] = hertz2int(0, str);
        MObjectSetText(DAS.Gui.ContrPanel.speed[i][k], str);

        //multiplier
        MObjectGetText(DAS.Gui.ConfigPanel.SM_multiplier[i][k], str);
        DAS.StepM.multiplier[i][k] = atof(str);

        }
    }


    sprintf(str, "# Number of AMS                                # \n");
    fprintf(fs,str);

    sprintf(str, "%d\n", DAS.StepM.NAMS); 
    fprintf(fs,str);
    

/*  
    //SM
    for (i=0;i<(DAS.StepM.NAMS*2);i++)
    {
        sprintf(buf,"SM%d", i+1);

        switch (i)
        {
            case 0:
                sprintf(str, "# Input Mirror Stepper Motor - %s            #\n", buf);
                break;
            case 1:
                sprintf(str, "# Grating Stepper Motor - %s                 #\n", buf);
                break;
            case 2:
                sprintf(str, "# Filter Wheel Stepper Motor - %s            #\n", buf);
                break;
            case 3:
                sprintf(str, "# Not Connected Stepper Motor - %s           #\n", buf);
                break;
            case 4:
                sprintf(str, "# Zenith Axis  Stepper Motor - %s            #\n", buf);
                break;
            case 5:
                sprintf(str, "# Azimuth Axis Stepper Motor - %s            #\n", buf);
                break;

        }

        fprintf(fs,str);
    }
*/
    for (i=0;i<DAS.StepM.NAMS;i++)
    {
        for (k=0;k<2;k++)
        {
            
            t=2*i+k;
            sprintf(buf,"SM%d", t+1);
            switch (t)
            {
                case 0:
                    sprintf(str, "# Input Mirror Stepper Motor - %s            #\n", buf);
                    fprintf(fs,str);
                    break;
                case 1:
                    sprintf(str, "# Grating Stepper Motor - %s                 #\n", buf);
                    fprintf(fs,str);
                    break;
                case 2:
                    sprintf(str, "# Filter Wheel Stepper Motor - %s            #\n", buf);
                    fprintf(fs,str);
                    break;
                case 3:
                    sprintf(str, "# Not Connected Stepper Motor - %s           #\n", buf);
                    fprintf(fs,str);
                    break;
                case 4:
                    sprintf(str, "# Zenith Axis  Stepper Motor - %s            #\n", buf);
                    fprintf(fs,str);
                    break;
                case 5:
                    sprintf(str, "# Azimuth Axis Stepper Motor - %s            #\n", buf);
                    fprintf(fs,str);
                    break;
            }
            
            sprintf(str, "# %s Power (0 = 0A - 76 = 1.52A)             #\n", buf);
            fprintf(fs,str);
            sprintf(str,"%d\n", DAS.StepM.power[i][k]);
            fprintf(fs,str);
            sprintf(str, "# %s Step (0=400s/r, 1=800s/r,2=1000/sr)     #\n", buf);
            fprintf(fs,str);
            sprintf(str,"%d\n", DAS.StepM.step[i][k]);
            fprintf(fs,str);
            sprintf(str, "# %s Slope (0 - 255)                         #\n", buf);
            fprintf(fs,str);
            sprintf(str,"%d\n", DAS.StepM.slope[i][k]);
            fprintf(fs,str);
            sprintf(str, "# %s Speed Hz (PS = 125*(n+1), n=0,1..255)   #\n", buf);
            fprintf(fs,str);
            sprintf(str,"%d\n", DAS.StepM.speed[i][k]);
            fprintf(fs,str);
            sprintf(str, "# %s  Multiplier                             #\n", buf);
            fprintf(fs,str);
            sprintf(str,"%.1f\n", DAS.StepM.multiplier[i][k]);
            fprintf(fs,str);


        }
    }

    
    sprintf(str, "# OFFSETS                                     #\n");
    fprintf(fs,str);
    sprintf(str, "# HMir, Mir0, Mir1, Mir2, Mir3, Mir4, Grat, FW#\n");
    fprintf(fs,str);
    for(c = 0; c < 9; c++)
    {
        sprintf(str,"%d ", DAS.Paramini.Offset[c]);
        fprintf(fs,str);
    }

    sprintf(str, "\nHome Type Mode for Steppers                 #\n");
    fprintf(fs,str);
    
    sprintf(str, "SM1 SM2 SM3 SM4 SM5 SM6                       #\n");
    fprintf(fs,str);

    for(c = 0; c < DAS.StepM.NAMS; c++)
    {
        for(k = 0; k < 2; k++)
        {
            sprintf(str,"%d ", DAS.StepM.hometype[c][k]);
            //sprintf(str,"%d ", 2);
            fprintf(fs,str);
        }

    }

    sprintf(str, "\n###############################################\n");
    fprintf(fs,str);

    fclose(fs);

    sprintf(buff,"The current parameters has been saved in '%s\\AMS.INI' file", BIL.DFILEM.CONFIGDIREQUIPMENT);
    MMessageDialog("DAS information", buff, " Ok ", NULL);

    return 0;


}

Here is the call graph for this function:

Here is the caller graph for this function:

WriteColorsCB()

int WriteColorsCB	(	MOBJECT	o,
		void *	a,
		void *	v
	)

Write selected color in DASSysColor.INI.

Definition at line 98 of file DAS_Spat_ConfCBs.c.

References _MAX_PATH, d_fileman::CONFIGDIREQUIPMENT, palette::DB_BG, palette::DB_BG_Albl, palette::DB_BG_lblUP, palette::DB_BG_Plbl, palette::DB_BG_RButt, palette::DB_FG_Albl, palette::DB_FG_lblUP, palette::DB_FG_Plbl, palette::DB_FG_RButt, palette::DB_Sel, palette::DB_UnSel, palette::DB_UnSelFG, bil::DFILEM, and MMessageDialog().

Referenced by MDCreateDASConfig().

{
    FILE    *fs;
    char str[80];
    char buff[_MAX_PATH];

    sprintf(buff,"%s\\DASSysColor.INI", BIL.DFILEM.CONFIGDIREQUIPMENT);
    fs = fopen(buff, "w");

    //  if(fs == NULL) return 2;
    
    fprintf(fs, "%s\n", "###########################################");
    fprintf(fs, "%s\n", "#           DAS Default Color             #");
    fprintf(fs, "%s\n", "#              by DanBo                   #");
    fprintf(fs, "%s\n", "###########################################");
    fprintf(fs, "%s\n", "# All these values can be modified, but   #");
    fprintf(fs, "%s\n", "# DO NOT Exchange the order               #");
    fprintf(fs, "%s\n", "###########################################");
    

    fprintf(fs, "%s\n", "# Selected Buttons  BG                    #");
    fprintf(fs, "%d %d %d\n", DPAL.DB_Sel[0], DPAL.DB_Sel[1], DPAL.DB_Sel[2]);

    fprintf(fs, "%s\n", "# Unselected Buttons BG                   #");
    fprintf(fs, "%d %d %d\n", DPAL.DB_UnSel[0], DPAL.DB_UnSel[1], DPAL.DB_UnSel[2]);

    fprintf(fs, "%s\n", "# UnSelected Buttons  FG                  #");
    fprintf(fs, "%d %d %d\n", DPAL.DB_UnSelFG[0], DPAL.DB_UnSelFG[1], DPAL.DB_UnSelFG[2]);

    fprintf(fs, "%s\n", "# Forms and shell Background              #");
    fprintf(fs, "%d %d %d\n", DPAL.DB_BG[0],DPAL.DB_BG[1],DPAL.DB_BG[2]);

    fprintf(fs, "%s\n", "# ACTIVE Labels Background                #");
    fprintf(fs, "%d %d %d\n", DPAL.DB_BG_Albl[0],DPAL.DB_BG_Albl[1],DPAL.DB_BG_Albl[2]);

    fprintf(fs, "%s\n", "# ACTIVE Labels Foreground                #");
    fprintf(fs, "%d %d %d\n", DPAL.DB_FG_Albl[0],DPAL.DB_FG_Albl[1],DPAL.DB_FG_Albl[2]);

    fprintf(fs, "%s\n", "# PASSIVE Labels Background               #");
    fprintf(fs, "%d %d %d\n", DPAL.DB_BG_Plbl[0],DPAL.DB_BG_Plbl[1],DPAL.DB_BG_Plbl[2]);

    fprintf(fs, "%s\n", "# PASSIVE Labels Foreground               #");
    fprintf(fs, "%d %d %d\n", DPAL.DB_FG_Plbl[0],DPAL.DB_FG_Plbl[1],DPAL.DB_FG_Plbl[2]);

    fprintf(fs, "%s\n", "# Capital Letters Labels Color UP BG      #");
    fprintf(fs, "%d %d %d\n", DPAL.DB_BG_lblUP[0],DPAL.DB_BG_lblUP[1],DPAL.DB_BG_lblUP[2]);
    
    fprintf(fs, "%s\n", "# Capital Letters Labels Color UP FG      #");
    fprintf(fs, "%d %d %d\n", DPAL.DB_FG_lblUP[0],DPAL.DB_FG_lblUP[1],DPAL.DB_FG_lblUP[2]);
    
    fprintf(fs, "%s\n", "# Radio Button BG      #");
    fprintf(fs, "%d %d %d\n", DPAL.DB_BG_RButt[0],DPAL.DB_BG_RButt[1],DPAL.DB_BG_RButt[2]);

    fprintf(fs, "%s\n", "# Radio Button FG      #");
    fprintf(fs, "%d %d %d\n", DPAL.DB_FG_RButt[0],DPAL.DB_FG_RButt[1],DPAL.DB_FG_RButt[2]);

    fprintf(fs, "%s\n", "###########################################");

    fclose(fs);


    sprintf(str,"The colors have been saved in 'CONFIG\\DASSysColor.INI' file");
    MMessageDialog("DAS information", str, " Ok ", NULL);
    

    return 0;

}

Here is the call graph for this function:

Here is the caller graph for this function:

WriteEquipini()

int WriteEquipini

(

void

)

Write equipment.ini file
.

Returns

0 –> operation succefully performed; 1 –>problems in writing file

Definition at line 3111 of file DAS_Spat_ConfCBs.c.

References _MAX_PATH, d_fileman::CONFIGDIRCOMMON, bil::DFILEM, paramini::EqType, MMessageDialog(), and das::Paramini.

Referenced by DB_EqTypeCB(), and DB_EqTypePlotCB().

{

    FILE    *fs;
    char    str[80];
//  char    buf[16];
    char    buff[_MAX_PATH];
//  int c,i;

    sprintf(buff,"%s\\Equipment.ini", BIL.DFILEM.CONFIGDIRCOMMON);
    fs = fopen(buff, "w");
    if(fs == NULL)
    {
        MMessageDialog("DAS information", "Problems in opening file", " Ok ", NULL);
        return 1;   
    }
    

    sprintf(str, "###############################################\n");
    fprintf(fs,str);
    sprintf(str, "#                  Equipment.INI              #\n");
    fprintf(fs,str);
    sprintf(str, "# Configuration file setting equipment type   #\n");
    fprintf(fs,str);
    sprintf(str, "###############################################\n");
    fprintf(fs,str);
    sprintf(str, "# 0 = SPATRAM, 1 = TROPOGAS, 2 = LIS          #\n");
    fprintf(fs,str);
    sprintf(str, "# 3 = SPATRAMPLUS, 4 = GASCODNG1, 5=GASCOD/OA #\n");
    fprintf(fs,str);
    sprintf(str, "# 6 = GASCODNG2, 7 = GASCODNG3, 8 = GASCODNG4 #\n");  
    fprintf(fs,str);
    sprintf(str, "# 9 = SPATRAM2,                               #\n");  
    fprintf(fs,str);
    sprintf(str, "###############################################\n"); 
    fprintf(fs,str);

    

    sprintf(str, "%d\n", DAS.Paramini.EqType); // Instrument Type(0 = SPATRAM, 1 = TROPOGAS, 2 = LIS, 3 = SPATRAMPLUS, 4 = GASCODNG1)
    fprintf(fs,str);
    
    fclose(fs);

//  sprintf(buff,"The selected instrument has been saved in '%s\\Equipment.ini' file\n ", BIL.DFILEM.CONFIGDIRCOMMON);
//  MMessageDialog("DAS information", buff, " Ok ", NULL);


    return 0;

}

Here is the call graph for this function:

Here is the caller graph for this function:

WriteFontCB()

void WriteFontCB	(	MOBJECT	obj,
		void *	a,
		void *	v
	)

This callback write on file the selected font (Not implemented yet)

Definition at line 1416 of file DAS_Spat_ConfCBs.c.

References MMessageDialog().

Referenced by MDCreateDASConfig().

{
    MMessageDialog("DAS information", "The procedure is not yet implemented!!", " Ok ", NULL);  
}

Here is the call graph for this function:

Here is the caller graph for this function:

WriteHardwareiniCB()

int WriteHardwareiniCB	(	MOBJECT	shell,
		void *	od,
		void *	ad
	)

Write hardware.ini file
.

Returns

0 –> operation succefully performed; 1 –>problems in writing file

Definition at line 3064 of file DAS_Spat_ConfCBs.c.

References _MAX_PATH, d_fileman::CONFIGDIREQUIPMENT, bil::DFILEM, MMessageDialog(), das::Nova, and nova::type.

Referenced by CONFP_AMS_NOVA().

{

    FILE    *fs;
    char    str[80];
//  char    buf[16];
    char    buff[_MAX_PATH];
//  int c,i;

    sprintf(buff,"%s\\Hardware.ini", BIL.DFILEM.CONFIGDIREQUIPMENT );
    fs = fopen(buff, "w");
    if(fs == NULL)
    {
        MMessageDialog("DAS information", "Problems in opening file", " Ok ", NULL);
        return 1;   
    }
    

    sprintf(str, "###############################################\n");
    fprintf(fs,str);
    sprintf(str, "#                  Hardware .INI              #\n");
    fprintf(fs,str);
    sprintf(str, "###############################################\n");
    fprintf(fs,str);
    sprintf(str, "#  Type of motherboard installed              #\n");
    fprintf(fs,str);
    sprintf(str, "# 0 = NOVA7892; 1 = NOVA6612; 2 = NOVA945GSE  #\n");
    fprintf(fs,str);
    sprintf(str, "###############################################\n"); 
    fprintf(fs,str);

    

    sprintf(str, "%d\n", DAS.Nova.type ); 
    fprintf(fs,str);
    
    fclose(fs);

    sprintf(buff,"The selected instrument has been saved in '%s\\Hardware.ini' file\n ", BIL.DFILEM.CONFIGDIREQUIPMENT);
    MMessageDialog("DAS information", buff, " Ok ", NULL);


    return 0;

}

Here is the call graph for this function:

Here is the caller graph for this function:

WriteOptioniniCB()

int WriteOptioniniCB	(	MOBJECT	shell,
		void *	od,
		void *	ad
	)

Write Options.ini file
.

Returns

0 –> operation succefully performed; 1 –>problems in writing file

Definition at line 2541 of file DAS_Spat_ConfCBs.c.

References _MAX_PATH, optionini::aaopmode, optionini::amsprogbar, optionini::avgautor, optionini::avgmode, d_fileman::CONFIGDIREQUIPMENT, date::da_day, date::da_mon, date::da_year, optionini::darkremove, optionini::darksource, optionini::DEFPIXFILENAME, flag::DeltaSZA, dsza::DeltaSZA, bil::DFILEM, flag::DispBlindPix, das::DOption, optionini::emshutter, optionini::filename, optionini::filtertype, das::Flag, optionini::ftpbackup, GetDateTime(), optionini::hlineafter, optionini::hlinebefore, optionini::imgtype, mige::linked, optionini::maxlvlar, dsza::MaxSZA, optionini::measmode, das::MIGE, dsza::MinSZA, optionini::mirrorimg, MMessageDialog(), N_AVG, omuthr::PID_kd, omuthr::PID_ki, omuthr::PID_kp, optionini::pixcorr, flag::plotW, flag::plotYRange, optionini::refertemp, optionini::resetEnabled, optionini::resetFreq, optionini::resetType, optionini::savingmode, flag::settempvar, optionini::shuttertype, optionini::smposmode, SZADelta, SZAMax, time::ti_hour, time::ti_min, TOTTEXP, omuthr::TRType, mige::type, flag::Wl, XAX, and YAX.

Referenced by CONFP_Options(), CONFP_param_page4(), and CONFP_param_page5().

{
    
    

    FILE    *fs;
    char    str[_MAX_PATH];
    struct time adesso;
    struct date oggi;
    char buff[_MAX_PATH];
    struct tm today;
    sprintf(buff,"%s\\OPTIONS.INI", BIL.DFILEM.CONFIGDIREQUIPMENT);
    fs = fopen(buff, "w");

    GetDateTime(&oggi, &adesso, &today);
    //gettime(&adesso);
    //getdate(&oggi);

/*********************************/

    
    if(fs == NULL)
    {
        MMessageDialog("DAS information", "Problems in opening file", " Ok ", NULL);
        return 1;   
    }

    sprintf(str, "####################################################\n");
    fprintf(fs,str);
    sprintf(str, "#     Configuration file for OPTIONS Setting.      #\n");
    fprintf(fs,str);
    sprintf(str, "#         by DanBo %02u/%02u/%d at %02u:%02u:%02u          #\n", oggi.da_day,oggi.da_mon,oggi.da_year, adesso.ti_hour, adesso.ti_min,adesso.ti_min);
    fprintf(fs,str);    
    sprintf(str, "####################################################\n");
    fprintf(fs,str);
    sprintf(str, "# All these flags can be modified on line          #\n");
    fprintf(fs,str);
    sprintf(str, "# in the CONFIG --> OPTION tabs                    #\n");
    fprintf(fs,str);
    sprintf(str, "#--------------------------------------------------#\n");
    fprintf(fs,str);
    sprintf(str, "# Please DO NOT change the order of the parameters #\n");
    fprintf(fs,str);
    sprintf(str, "#--------------------------------------------------#\n");
    fprintf(fs,str);
    sprintf(str, "# Saving Mode: 0 = ASCII, 1 = Binary               #\n");
    fprintf(fs,str);    
    sprintf(str, "%d\n", DAS.DOption.savingmode);
    fprintf(fs,str);
    sprintf(str, "# File Names:0 = free, 1 = automatic file names    #\n");
    fprintf(fs,str);    
    sprintf(str, "%d\n", DAS.DOption.filename);
    fprintf(fs,str);
    sprintf(str, "# Image Type:0=Mono, 1 = RGB                       #\n");
    fprintf(fs,str);    
    sprintf(str, "%d\n", DAS.DOption.imgtype);
    fprintf(fs,str);

    sprintf(str, "# CCD Pix Correction: 0=NOT Corrected, 1=Corrected #\n");
    fprintf(fs,str);    
    sprintf(str, "%d\n", DAS.DOption.pixcorr);
    fprintf(fs,str);

    sprintf(str, "# File Name for CCD Pix Correction                 #\n");
    fprintf(fs,str);    
    sprintf(str, "%s\n", DAS.DOption.DEFPIXFILENAME);
    fprintf(fs,str);

    sprintf(str, "# Measuring Mode:0 = Single, 1 = Averaged          #\n");
    fprintf(fs,str);    
    sprintf(str, "%d\n", DAS.DOption.measmode);
    fprintf(fs,str);

    sprintf(str, "# Averaging Mode:0 = fixed number, 1 = fixed time  #\n");
    fprintf(fs,str);    
    sprintf(str, "%d\n", DAS.DOption.avgmode);
    fprintf(fs,str);

    sprintf(str, "# Avg Mode fixed Number of measurements            #\n");
    fprintf(fs,str);    
    sprintf(str, "%d\n", N_AVG);
    fprintf(fs,str);

    sprintf(str, "# Avg Mode fixed Time Exposure [sec]               #\n");
    fprintf(fs,str);    
    sprintf(str, "%d\n", TOTTEXP);
    fprintf(fs,str);
    sprintf(str, "# Remove Dark?: 0 = No, 1 = Yes                    #\n");
    fprintf(fs,str);    
    sprintf(str, "%d\n", DAS.DOption.darkremove);
    fprintf(fs,str);
    sprintf(str, "# Dark source: 0 = Blind Pixels, 1 = Full Frame    #\n");
    fprintf(fs,str);    
    sprintf(str, "%d\n", DAS.DOption.darksource);
    fprintf(fs,str);
    sprintf(str, "# CCD Temp: 0 = Fixed, 1 = variation vs SZA        #\n");
    fprintf(fs,str);    
    sprintf(str, "%d\n", FLAG.settempvar);
    fprintf(fs,str);


    sprintf(str, "# Plot X Scale: 0 = Pixel #, 1 = Wl[A], 2 = wl[nm] #\n");
    fprintf(fs,str);    
    sprintf(str, "%d\n", FLAG.Wl);
    fprintf(fs,str);
    sprintf(str, "# Plot display: 0 = NO,  1 = Yes                   #\n");
    fprintf(fs,str);    
    sprintf(str, "%d\n", DAS.Flag.plotW);
    fprintf(fs,str);
    sprintf(str, "# Plot Y Scale: 0 = FullRange(0-65535), 1 = min/max#\n");
    fprintf(fs,str);    
    sprintf(str, "%d\n", FLAG.plotYRange);
    fprintf(fs,str);
    sprintf(str, "# Measurements performed for SZA <= SZAMax         #\n");
    fprintf(fs,str);    
    sprintf(str, "%d\n", SZAMax);
    fprintf(fs,str);


    sprintf(str, "# Hidden Lines in Plot-Before and after Cent. line #\n");
    fprintf(fs,str);    
    sprintf(str, "%d\n", DAS.DOption.hlinebefore);
    fprintf(fs,str);
    sprintf(str, "%d\n", DAS.DOption.hlineafter);
    fprintf(fs,str);

    sprintf(str, "# Display Blind Pixel: 0 = NO, 1 = Yes             #\n");
    fprintf(fs,str);
    
    sprintf(str, "%d\n", FLAG.DispBlindPix);
    fprintf(fs,str);

    sprintf(str, "# Perform FTP Back-UP: 0 = NO, 1 = Yes             #\n");
    fprintf(fs,str);
    
    sprintf(str, "%d\n", DAS.DOption.ftpbackup);
    fprintf(fs,str);

    sprintf(str, "# Reference temperature for OMU Thermo-Regulation: #\n");
    fprintf(fs,str);
    sprintf(str, "# 0 = AVG Internal Peltier; 1 = Optic; 2 = Grating #\n");
    fprintf(fs,str);

    sprintf(str, "%d\n", DAS.DOption.refertemp);
    fprintf(fs,str);

    sprintf(str, "# OMU Thermo-Regulation mode:                      #\n");
    fprintf(fs,str);
    sprintf(str, "# 0 = Cold Only; 1 = Heat only; 2 = Cold/Heat      #\n");
    fprintf(fs,str);
    sprintf(str, "%d\n", OMUTHR.TRType);
    fprintf(fs,str);
    
    sprintf(str, "# Mirroring CCD Image along X                      #\n");
    fprintf(fs,str);
    sprintf(str, "# 0 = NO Mirroring; 1 = Mirror image               #\n");
    fprintf(fs,str);
    sprintf(str, "%d\n", DAS.DOption.mirrorimg[XAX]);
    fprintf(fs,str);

    sprintf(str, "# Mirroring CCD Image along Y                      #\n");
    fprintf(fs,str);
    sprintf(str, "# 0 = NO Mirroring; 1 = Mirror image               #\n");
    fprintf(fs,str);
    sprintf(str, "%d\n", DAS.DOption.mirrorimg[YAX]);
    fprintf(fs,str);

    sprintf(str, "# AMS Option - Stepper motor Positioning mode      #\n");
    fprintf(fs,str);
    sprintf(str, "# 0 = Sequential; 1 = Simultaneous                 #\n");
    fprintf(fs,str);
    sprintf(str, "%d\n", DAS.DOption.smposmode);
    fprintf(fs,str);

    sprintf(str, "# AMS Option -      Progressive bar                #\n");
    fprintf(fs,str);
    sprintf(str, "# 0 = DO NOT show ; 1 = Show                       #\n");
    fprintf(fs,str);
    sprintf(str, "%d\n", DAS.DOption.amsprogbar);
    fprintf(fs,str);


    sprintf(str,"# Autorange before Average                         #\n");
    fprintf(fs,str);
    sprintf(str,"# 0 = NO Autoranging, 1 = Autoranging              #\n");
    fprintf(fs,str);
    sprintf(str, "%d\n", DAS.DOption.avgautor);
    fprintf(fs,str);

    sprintf(str,"# MIGE Platform connection                         #\n");
    fprintf(fs,str);
    sprintf(str,"# 0 = NOT Connected, 1 = Connected                 #\n");
    fprintf(fs,str);
    sprintf(str, "%d\n", DAS.MIGE.linked);
    fprintf(fs,str);

    sprintf(str,"# MIGE Platform Type                               #\n");
    fprintf(fs,str);
    sprintf(str,"# 0 = AltAz V 0.5, 1 = MIGE V. 3                   #\n");
    fprintf(fs,str);
    sprintf(str, "%d\n", DAS.MIGE.type);
    fprintf(fs,str);


    sprintf(str,"# MIGE Platform operating mode                     #\n");
    fprintf(fs,str);
    sprintf(str,"# 0 = Sun Track, 1 = AntiSunTrack, 2 = FreePos     #\n");
    fprintf(fs,str);
    sprintf(str, "%d\n", DAS.DOption.aaopmode);
    fprintf(fs,str);

    sprintf(str,"# EMShutter                                        #\n");
    fprintf(fs,str);
    sprintf(str,"# 0 = NOT installed, 1 = Installed                 #\n");
    fprintf(fs,str);
    sprintf(str, "%d\n", DAS.DOption.emshutter);
    fprintf(fs,str);

    sprintf(str,"# Shutter Type                                     #\n");
    fprintf(fs,str);
    sprintf(str,"# 0 = VS25, 1 = ROTSHUT, 2 = TORQUEM               #\n");
    fprintf(fs,str);
    sprintf(str, "%d\n", DAS.DOption.shuttertype);
    fprintf(fs,str);



    sprintf(str,"# Measurements driven by SZA                       #\n");
    fprintf(fs,str);
    sprintf(str,"# Format: a, b, c, d where:                        #\n");
    fprintf(fs,str);
    sprintf(str,"# a = Flag; 0 = NOT Active, 1 = Active             #\n");
    fprintf(fs,str);
    sprintf(str,"# b = DeltaSZA, value of Delta SZA (x.x deg)       #\n");
    fprintf(fs,str);
    sprintf(str,"# c = MinSZA, value of Min SZA (xx deg)            #\n");
    fprintf(fs,str);
    sprintf(str,"# d = MaxSZA, value of Max SZA (xx deg)            #\n");
    fprintf(fs,str);
    sprintf(str, "%d %.2lf %.2lf %.2lf\n", DAS.Flag.DeltaSZA, SZADelta.DeltaSZA, SZADelta.MinSZA, SZADelta.MaxSZA);
    fprintf(fs,str);


    sprintf(str,"# Filter Wheel type                                #\n");
    fprintf(fs,str);
    sprintf(str,"# 0=simple, 1= double, 2= simple +TorqueM          #\n");
    fprintf(fs,str);
    sprintf(str, "%d\n", DAS.DOption.filtertype);
    fprintf(fs,str);

    sprintf(str,"#PID Parameters                                    #\n");
    fprintf(fs,str);
    sprintf(str,"#PID_kp PID_ki PID_kd                              #\n");
    fprintf(fs,str);
    sprintf(str, "%.3f %.3f %.3f\n", OMUTHR.PID_kp, OMUTHR.PID_ki, OMUTHR.PID_kd);
    fprintf(fs,str);
    
    //RESET PARAMETERS
    sprintf(str,"#DAS/Windows Reset: Enabled = 1, Disabled = 0      #\n");
    fprintf(fs,str);
    sprintf(str, "%d\n", DAS.DOption.resetEnabled);
    fprintf(fs,str);
    //RESET Type
    sprintf(str,"#Reset Type: Hourly = 0, Daily= 1                  #\n");
    fprintf(fs,str);
    sprintf(str, "%d\n", DAS.DOption.resetType);
    fprintf(fs,str);
    //RESET Frequency
    sprintf(str,"#Reset frequency: Hourly=1 to 23, Daily=1 to 365      #\n");
    fprintf(fs,str);
    sprintf(str, "%d\n", DAS.DOption.resetFreq);
    fprintf(fs,str);

    //AUTORANGING MAX VALUE
    sprintf(str,"#AUTORANGING MAX VALUE ( < 63000                     #\n");
    fprintf(fs,str);
    sprintf(str, "%d\n", DAS.DOption.maxlvlar);
    fprintf(fs,str);


    sprintf(str, "####################################################\n");
    fprintf(fs,str);    

    fclose(fs);
    
    sprintf(str,"The current options has been saved in '%s\\OPTIONS.INI' file",  BIL.DFILEM.CONFIGDIREQUIPMENT);
    MMessageDialog("DAS information", str, " Ok ", NULL);

    return 0;


}

Here is the call graph for this function:

Here is the caller graph for this function:

WriteParaminiCB()

int WriteParaminiCB	(	MOBJECT	shell,
		void *	od,
		void *	ad
	)

Write Param.ini file
.

Returns

0 –> operation succefully performed; 1 –>problems in writing file

Definition at line 3212 of file DAS_Spat_ConfCBs.c.

References _MAX_PATH, CCD_SetupFlg, paramini::ccdWx, paramini::ccdWy, paramini::ccdXoff, paramini::ccdYoff, CodeEq2Name(), d_fileman::CONFIGDIREQUIPMENT, gui::ContrPanel, paramini::CoolPw, date::da_day, date::da_mon, date::da_year, bil::DFILEM, d_fileman::DIRDCL, DOASMODE, paramini::EqType, flag::exemode, das::Flag, GetDateTime(), das::Gui, paramini::ITemp, controlpanel::lbl_Par, paramini::maxtexp, MMessageDialog(), MObjectSetText(), das::Paramini, omuthr::PCPower, time::ti_hour, time::ti_min, paramini::TPelt, and paramini::VBin.

Referenced by CONFP_param_page1().

{
    
    //MMessageDialog("DAS information", "The procedure is not yet implemented!!", " Ok ", NULL);

    FILE    *fs;
    char    str[_MAX_PATH];
    char    buf[_MAX_PATH];
    struct time adesso;
    struct date oggi;
    struct tm today;
    int er;
    char    buff[_MAX_PATH];

//  char streqtype[32]= {'\0'};

    GetDateTime(&oggi, &adesso, &today);
    //gettime(&adesso);
    //getdate(&oggi);


    sprintf(buff,"%s\\Param.ini", BIL.DFILEM.CONFIGDIREQUIPMENT);


    fs = fopen(buff, "w");
    if(fs == NULL)
    {
        MMessageDialog("DAS information", "Problems in opening file", " Ok ", NULL);
        return 1;   
    }

    
    //sprintf(buff, "%s",EquipCode2Name(DAS.Paramini.EqType, "", streqtype ));


    sprintf(str, "###############################################\n");
    fprintf(fs,str);
    sprintf(str, "#                  Param.INI                  #\n");
    fprintf(fs,str);
//  sprintf(str, "#    Main configuration file for %s     #\n", EquipCode2Name(DAS.Paramini.EqType, "", streqtype ));
    sprintf(str, "#    Main configuration file for %s     #\n", CodeEq2Name(DAS.Paramini.EqType));
    fprintf(fs,str);
    sprintf(str, "#                  equipment                  #\n");
    fprintf(fs,str);
    sprintf(str, "###############################################\n");
    fprintf(fs,str);
    sprintf(str, "# ------------------------------------------- #\n");
    fprintf(fs,str);
    sprintf(str, "#       by DanBo %02u/%02u/%d at %02u:%02u:%02u       #\n", oggi.da_day,oggi.da_mon,oggi.da_year, adesso.ti_hour, adesso.ti_min,adesso.ti_min);
    fprintf(fs,str);
    sprintf(str, "# ------------------------------------------- #\n");
    fprintf(fs,str);

    sprintf(str, "# CCD Temp (°C) ----------------------------- #\n");
    fprintf(fs,str);
    sprintf(str, "%.1lf\n",DAS.Paramini.ITemp);
    fprintf(fs,str);
    sprintf(str, "# CCD Peltier Init Power X 10 (150 = %.1lf%%)  #\n",(double) 15);
    fprintf(fs,str);
    sprintf(str, "%d\n",DAS.Paramini.CoolPw);
    fprintf(fs,str);
    sprintf(str, "# Optical Unit Target Temperature ------------#\n");
    fprintf(fs,str);
    sprintf(str, "%.1lf\n",DAS.Paramini.TPelt);
    fprintf(fs,str);

    sprintf(str, "# OMU Peltier Init Power X 10 (500 = %.1lf%%)  #\n",(double) 50);
    fprintf(fs,str);

    sprintf(str, "%d\n", OMUTHR.PCPower);
    fprintf(fs,str);

    sprintf(str, "# CCD Window (xstart ys xend ye) -------------#\n");
    fprintf(fs,str);
    sprintf(str,"%d %d %d %d\n", DAS.Paramini.ccdXoff, DAS.Paramini.ccdYoff, DAS.Paramini.ccdWx, DAS.Paramini.ccdWy);
    fprintf(fs,str);
    sprintf(str, "# Vertical Binning ---------------------------#\n");
    fprintf(fs,str);
    sprintf(str,"%d\n", DAS.Paramini.VBin);
    fprintf(fs,str);

    sprintf(str, "# Max Exposure Time s (=0 --> free exposure)  #\n");
    fprintf(fs,str);
    sprintf(str,"%.1lf\n", DAS.Paramini.maxtexp);
    fprintf(fs,str);


    sprintf(str, "###############################################\n");
    fprintf(fs,str);

    fclose(fs);

    if(CCD_SetupFlg)
    {
        CCD_SetupFlg = 0;

        
//      sprintf(buff, "%s\\%s.cfg", BIL.DFILEM.CONFIGDIREQUIPMENT, CodeEq2Name(DAS.Paramini.EqType));

        //Copy camera.cfg and rename in 'equipment'.cfg
        sprintf(buf, "copy %s\\camera.cfg %s", BIL.DFILEM.DIRDCL, BIL.DFILEM.CONFIGDIREQUIPMENT);
        er = system(buf);
        sprintf(buf, "ren %s\\camera.cfg %s.cfg", BIL.DFILEM.CONFIGDIREQUIPMENT, CodeEq2Name(DAS.Paramini.EqType));
        er = system(buf);

        sprintf(str,"The current parameters has been saved in '%s\\Param.ini' file\n The %s\\camera.cfg file was copied in %s folder and renamed as %s.cfg'.", 
            BIL.DFILEM.DIRDCL,
            BIL.DFILEM.CONFIGDIREQUIPMENT, 
            BIL.DFILEM.CONFIGDIREQUIPMENT,CodeEq2Name(DAS.Paramini.EqType));
        MMessageDialog("DAS information", str, " Ok ", NULL);

    }
    else
    {
        sprintf(str,"The current parameters has been saved in '%s\\Param.ini' file", BIL.DFILEM.CONFIGDIREQUIPMENT);
        MMessageDialog("DAS information", str, " Ok ", NULL);

    }



    //CCD and OMU Parameters    
    if(DAS.Flag.exemode != DOASMODE )
    {
    sprintf(str, "%.1lf", DAS.Paramini.ITemp);
    MObjectSetText(DAS.Gui.ContrPanel.lbl_Par[0], str);
    sprintf(str,"%.1lf%%",(double)DAS.Paramini.CoolPw / 10);
    MObjectSetText(DAS.Gui.ContrPanel.lbl_Par[1], str);
    sprintf(str,"%.1lf", DAS.Paramini.TPelt);
    MObjectSetText(DAS.Gui.ContrPanel.lbl_Par[2], str);
    sprintf(str,"%d", DAS.Paramini.ccdXoff);
    MObjectSetText(DAS.Gui.ContrPanel.lbl_Par[5], str);
    sprintf(str,"%d", DAS.Paramini.ccdYoff);
    MObjectSetText(DAS.Gui.ContrPanel.lbl_Par[6], str);
    sprintf(str,"%d", DAS.Paramini.ccdWx);
    MObjectSetText(DAS.Gui.ContrPanel.lbl_Par[7], str);
    sprintf(str,"%d", DAS.Paramini.ccdWy);
    MObjectSetText(DAS.Gui.ContrPanel.lbl_Par[8], str);
    sprintf(str, "%d", DAS.Paramini.VBin);
    MObjectSetText(DAS.Gui.ContrPanel.lbl_Par[9], str);
    }

    return 0;



}

Here is the call graph for this function:

Here is the caller graph for this function:

WritewlstepiniCB()

int WritewlstepiniCB	(	MOBJECT	shell,
		void *	od,
		void *	ad
	)

Write wlstep.ini file
.

Returns

0 –> operation succefully performed; 1 –>problems in writing file

Definition at line 2476 of file DAS_Spat_ConfCBs.c.

References _MAX_PATH, d_fileman::CONFIGDIREQUIPMENT, date::da_day, date::da_mon, date::da_year, bil::DFILEM, GetDateTime(), MMessageDialog(), time::ti_hour, time::ti_min, wav, and wl.

Referenced by CONFP_param_page2().

{
    
    

    FILE    *fc;
    char    str[160];
    struct time adesso;
    struct date oggi;
    char buff[_MAX_PATH];
    int i, nitem = 18;
    struct tm today;

    GetDateTime(&oggi, &adesso, &today);
    //gettime(&adesso);
    //getdate(&oggi);


    sprintf(buff,"%s\\WlStep.ini", BIL.DFILEM.CONFIGDIREQUIPMENT);
    fc = fopen(buff, "w");


    if(fc == NULL)
    {
        MMessageDialog("DAS information", "Problems in opening file", " Ok ", NULL);
        return 1;   
    }




    sprintf(str, "####################################################\n");
    fprintf(fc,str);
    sprintf(str, "#                      WLSTEP.INI                  #\n");
    fprintf(fc,str);
    sprintf(str, "#              Wavelengths <--> Steps              #\n");
    fprintf(fc,str);
    sprintf(str, "####################################################\n");
    fprintf(fc,str);
    sprintf(str, "# ------------------------------------------------ #\n");
    fprintf(fc,str);
    sprintf(str, "#         by DanBo %02u/%02u/%d at %02u:%02u:%02u          #\n", oggi.da_day,oggi.da_mon,oggi.da_year, adesso.ti_hour, adesso.ti_min,adesso.ti_min);
    fprintf(fc,str);    
    sprintf(str, "# ------------------------------------------------ #\n");
    fprintf(fc,str);
    sprintf(str, "%d\n", nitem);
    fprintf(fc,str);
    for (i=0;i<nitem;i++)
    {
        sprintf(str, "%d %d\n", wl[i], wav[i]);
        fprintf(fc,str);
    }


    fclose(fc);
    
    sprintf(str,"The current setting for Wavelength and stepper steps \n has been saved in '%s' file", buff);
    MMessageDialog("DAS information", str, " Ok ", NULL);

    return 0;



}

Here is the call graph for this function:

Here is the caller graph for this function:

Variable Documentation

ADTESTER

adtester ADTESTER

Definition at line 42 of file DAS_Spat_ConfCBs.c.

BIL

bil BIL

Definition at line 49 of file DAS_Spat_ConfCBs.c.

cc

ccd cc

Definition at line 26 of file DAS_Spat_ConfCBs.c.

Cfg

config Cfg

Definition at line 37 of file DAS_Spat_ConfCBs.c.

CP_Sh

MOBJECT CP_Sh

Definition at line 85 of file CreateForms.c.

Referenced by DB_ColorAssign(), and MDCreate_CP().

DAS

das DAS

Definition at line 50 of file DAS_Spat_ConfCBs.c.

DC_CCD

ccd DC_CCD

Definition at line 35 of file DAS_Spat_ConfCBs.c.

DC_HP

ptf DC_HP

Definition at line 36 of file DAS_Spat_ConfCBs.c.

DFTP

dftp DFTP

Definition at line 45 of file DAS_Spat_ConfCBs.c.

DIL

dil DIL

Definition at line 43 of file DAS_Spat_ConfCBs.c.

DOAS

doas DOAS

Definition at line 47 of file DAS_Spat_ConfCBs.c.

DPAL

palette DPAL

Definition at line 33 of file DAS_Spat_ConfCBs.c.

dsccb

DSCCB dsccb

Definition at line 39 of file DAS_Spat_ConfCBs.c.

DXL

DXL_par DXL

Definition at line 27 of file DAS_Spat_ConfCBs.c.

FLAG

flag FLAG

Definition at line 38 of file DAS_Spat_ConfCBs.c.

IDS

ids IDS

ID tasks.

Definition at line 41 of file DAS_Spat_ConfCBs.c.

LISTF

listf LISTF

Definition at line 32 of file DAS_Spat_ConfCBs.c.

MTCL

mtcl MTCL

MTColor.

Definition at line 44 of file DAS_Spat_ConfCBs.c.

OMUTHR

omuthr OMUTHR

Definition at line 52 of file DAS_Spat_ConfCBs.c.

PARAM

paramini PARAM

Definition at line 30 of file DAS_Spat_ConfCBs.c.

Port

unsigned char Port = 0

Definition at line 3730 of file DAS_Spat_ConfCBs.c.

Referenced by CameraObject::UsedPort().

UDPAL

undopal UDPAL

Definition at line 28 of file DAS_Spat_ConfCBs.c.

undofont

int undofont = 15

Definition at line 1499 of file DAS_Spat_ConfCBs.c.

Referenced by DB_Undo2Do_Fonts().