Leica TPS1200 Series Reference Manual page 116

GeoCOM Reference Manual
12.4.3 EDM_SetEglIntensity – changing the intensity of the electronic guide light
EDM_SetEglIntensity............................................................................................................................................................................................................................................................................ ............................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................ 1059
1059 ................................................................................................................................................................................................................................................................EDM_SetEglInt ensity
C-Declaration
EDM_SetEglIntensity (EDM_EGLINTENSITY_TYPE
VB-Declaration
VB_EDM_SetEglIntensity (ByVal eIntensity As
ASCII-Request
%R1Q,1059:eIntensity [long]
ASCII-Response
%R1P,0,0:RC
Remarks
Changes the intensity of the Electronic Guide Light.
Parameters
intensity
Return-Code Names and Return-Code Values
GRC_OK
GRC_SYSBUSY
GRC_EDM_DEV_NOT_INSTALLED
GRC_EDM_INVALID_COMMAND
See Also
EDM_GetEglIntensity ()
Example
RC-TYPE rc;
EDM_EGLINTENSITY_TYPE eIntensity, eNewIntensity;
// Get actual EGL intensity
rc = EDM_GetEglIntensity(eIntensity);
if (rc == GRC_OK)
{
// switch EGL intensity one level up
switch (eIntensity)
{
case EDM_EGLINTENSITY_OFF:
eIntensityNew = EDM_EGLINTENSITY_LOW; break;
case EDM_EGLINTENSITY_LOW:
eIntensityNew = EDM_EGLINTENSITY_MID; break;
case EDM_EGLINTENSITY_MID:
eIntensityNew = EDM_EGLINTENSITY_HIGH;break;
case EDM_EGLINTENSITY_HIGH:
break; // Allready highest intensity
default:
eIntensityNew = EDM_EGLINTENSITY_LOW;
}
//Set new EGL intensity
rc = SetEglIntensity(eIntensityNew);
// Handle errors
}
Leica TPS1200 – Version 1.50
eIntensity)
Long)
In EDM_EGLINTEN_OFF
EDM_EGLINTEN_LOW
EDM_EGLINTEN_MID
EDM_EGLINTEN_HIGH
0 Execution successful.
13 EDM already busy
778 Electronic Guide Light not implemented
770 When an invalid intensity is entered
Electronic Distance Measurement – EDM
116