Leica tps1100 Reference Manual page 169

GeoCOM Reference Manual
CSV_GetDateTime(Datime);
dstart_time=Datime.Time.Minute*60+
// starts the rapid tracking dist. measurement program
TMC_QuickDist(HzVAng, dSlopeDist);
bExit=FALSE;
nNoMeasurements=0;
do
{
dLastHzAng=HzVAng.dHz;
Result=TMC_QuickDist(HzVAng, dSlopeDist);
switch(Result)
{
// distance- and angles- data available
case TMC_ACCURACY_GUARANTEE:
TPS1100 - Version 1.05
Theodolite Measurement and Calculation - TMC
Datime.Time.Second;
// perform a forced incline measurement
// caution: the calculation at zero rad is
// not consider
dhz_angle_diff=fabs(dLastHzAng-
if(dhz_angle_diff<MAX_DIFFERENCE)
{// instrument is in static period
CSV_GetDateTime(Datime);
dact_time=Datime.Time.Minute*60+
if(dact_time-dstart_time > STATIC_TIME)
{// static mode exceeding 3-4 sec
}
}
else
{// instrument is not in static period
CSV_GetDateTime(Datime);
dstart_time=Datime.Time.Minute*60+
// ANG switches, the
// distance must be
// cleared
HzVAng.dHz);
Datime.Time.Second;
TMC_GetAngle(TMC_MEA_INC,
TMC_GetAngle(TMC_MEA_INC,
AngleDummy);
AngleDummy);
16-21