Leica tps1100 Reference Manual page 197

GeoCOM Reference Manual
RC_SHUT_DOWN
RC_IVRESULT
See Also
TMC_GetCoordinate
TMC_IfDataAzeCorrError
TMC_IfDataIncCorrError
Example
RC_TYPE
TMC_ANG_SWITCH
SYSTIME
TMC_INCLINE_PRG ePrgm;
BOOLE
Double
TMC_GetAngSwitch(SwCorr);
SwCorr.eInclineCorr=ON;
SwCorr.eStandAxisCorr=ON;
SwCorr.eCollimationCorr=ON; // corrections.
SwCorr.eTiltAxisCorr=ON;
TMC_DoMeasure(TMC_CLEAR); // clear distance first
TMC_SetAngSwitch(SwCorr); // before you can set the
TMC_DoMeasure(TMC_RTRK_DIST);// execute rapid
WaitTime=500;// set max. wait time 500 [ms]
eProg=TMC_AUTO_INC;// set automatically incline prgm
bExit=FALSE;
do
{
Result=TMC_GetSimpleCoord(WaitTime, dCoordE,
switch(Result)
{
case RC_OK:
case TMC_NO_FULL_CORRECTION:
case TMC_ACCURACY_GUARANTEE:
TPS1100 - Version 1.05
Theodolite Measurement and Calculation - TMC
System power off through customer
No distance existing, co-ordinates are not
valid and set to 0.
Execute a distance measurement first.
Result;
SwCorr;
WaitTime;
bExit;
dCoordE,dCoordN,dCoordH;
// measure rate will
// be reduced with
// angle and incline
// ANG switches, the
// distance must be
// cleared
dCoordN, dCoordH,eProg);
// tracking
// measurement
16-49