IF #Trig THEN
   #Result := 0.0;
   
END_IF;

// Data reset
IF #Reset_Data THEN
   
    FOR #Buffer_number := 10 TO 1 BY -1 DO
        #Buffer[#Buffer_number] := 0;
    END_FOR;
       
    #Reset_Data := false;
END_IF;

// Data copy 
IF #Trig  THEN
   
    "DB1".OUT:= #Buffer[10];
    FOR #Buffer_Copy_number  := 9 TO 1 BY -1 DO
        #Buffer[ #Buffer_Copy_number+1] :=  #Buffer[ #Buffer_Copy_number];
        ;
    END_FOR;
    #Buffer[1] := "DB1".IN;
  
  
    FOR #Buffer_number := 1 TO 10 DO
        #Result := #Buffer[#Buffer_number] + #Result;
      
    END_FOR;
   
    #Result := #Result / 10.0;
    #Trig := false;
END_IF;