【Codesys】DINT类型环形计数处理，计数到2的64次方

最近有遇到编码器计数的计数处理，抓取编码器锁存的数值只能在DINT类型范围内，是从-2147483648到2147483647数值，但是现场会有正向多圈的情况。此时需要记录这个数的位置值。就需要记录多圈计数下，圈数的处理。

PROGRAM FB_DintCirAcc
VAR
currentCount : DINT; // 当前计数器的值,DINT类型的范围是从-2147483648到2147483647
circle1 : ULINT := 0; // 经过的极限值圈数
   circle2 : ULINT := 0; // 经过的一次16位最大值的圈数
maxThreshold : DINT := 2147470000; // 接近最大值的阈值
minThreshold : DINT := -2147470000; // 接近最小值的阈值
   ZeroThreshold : DINT := -10000; // 接近零值的阈值
approachingMax : BOOL := FALSE; // 标志位，表示是否接近最大值
approachingMin : BOOL := FALSE; // 标志位，表示是否接近最小值
   approachingZero : BOOL := FALSE; // 标志位，表示是否接近零值
   LastCount:DINT;//记录上一周的计数。
   bInit:BOOL:=TRUE; //初始化
   bCountStrat:BOOL;   //模拟开始周期计数
   EncoderPos:LREAL;//编码器位置
   CalcPos:LREAL;//计数值累加位置
   ulCurrentCount:ULINT;//累加计数值
   DiffData:DINT;//负向累加差值
   UlCirData:ULINT;//负向时圈数值
END_VAR

//模拟先给最大值，跑到第一圈的最大值
IF bInit THEN
   currentCount:=2147400000;
   Encoder.diEncoderPosition:=currentCount;
   bInit:=FALSE;
END_IF
// 假设currentCount在每个周期更新
IF bCountStrat THEN
   currentCount := currentCount+10000;
   Encoder.diEncoderPosition:=currentCount;
END_IF

// 检测是否接近最大值或最小值
IF (currentCount > maxThreshold) AND NOT approachingMax THEN
// 开始接近最大值
approachingMax := TRUE;
ELSIF currentCount>0 AND (currentCount <= maxThreshold) AND approachingMax THEN
// 不再接近最大值
approachingMax := FALSE;
END_IF
// 检测是否接近最大值或最小值
IF (currentCount < minThreshold) AND NOT approachingMin THEN
// 开始接近最小值
approachingMin := TRUE;
ELSIF currentCount<0 AND (currentCount >= minThreshold) AND approachingMin THEN
// 不再接近最小值
approachingMin := FALSE;
END_IF
// 检测负值累加是否接近0值。
IF (currentCount < ZeroThreshold)
   AND (currentCount>(ZeroThreshold*2))
   AND NOT approachingZero THEN
// 开始接近最小值
approachingZero := TRUE;
END_IF

// 检测是否从接近最大值过渡到接近最小值，累加一次计数
IF approachingMax AND approachingMin THEN
// 从最大值过渡到最小值，计为一圈
circle1 := circle1 + 1;
   circle2   := circle2 + 1;
approachingMax := FALSE; // 重置接近最大值的标志
approachingMin := FALSE; // 重置接近最小值的标志
END_IF
// 检测是否从接近0值，累加一次计数
IF approachingZero AND currentCount>0 THEN
   circle2   := circle2 + 1;
   approachingZero:=FALSE;
END_IF
Encoder.iTurn;
IF circle1 = 0 THEN
   ulCurrentCount:=(currentCount);
ELSE
   IF currentCount>0 THEN
       ulCurrentCount:=(circle2*2147483647)+DINT_TO_ULINT(currentCount);
   ELSE
       IF circle1=1 THEN
           DiffData:=ABS((2147483647-currentCount));
           UlCirData:=(circle1*2147483647);
           ulCurrentCount:=DINT_TO_ULINT(DiffData)+UlCirData;
       ELSIF circle1>1 THEN
           DiffData:=ABS((2147483647-currentCount));
           UlCirData:=(((circle1*2)-1)*2147483647);
           ulCurrentCount:=DINT_TO_ULINT(DiffData)+UlCirData;
       END_IF
   END_IF
END_IF
EncoderPos:=Encoder.fActPosition;
CalcPos:=(ulCurrentCount*97.456)/10000;