То ли лыжи не едут, то ли лыжи не едут.

[min@y™]

буквы типа Delphi, на мой взгляд, не особо критичны

Да, я оба языка знаю.

напрягает оператор >>=

x >>=y t эквивалентно x := x shr y.

[min@y™]

в это не нужно верить, это нужно знать.

Ну проверь в дебаггере или/и в маткаде.

[min@y™]

Гифка рисуется некорректно.



Скриншот лучше.


Отсечки щас рисуются статически, а хотелка - чтобы они двигались синхронно эпюрам. Типа как в старом диспетчере задач.

[evg_m]

Продолжительность каждой отсечки = t мсек.

равномерные отсечки ?!
i:=trunc(сt/t)
(за время сt измеряемое от 0 прошло i импульсов длины t)

[min@y™]

равномерные отсечки ?!

да.

i:=trunc(сt/t)
(за время сt измеряемое от 0 прошло i импульсов длины t)

похоже на правду.
В конечном итоге хотелось бы вывести формулу вот этого:

[JUDAS]

ct - t*trunc(сt/t)

[min@y™]

ct - t*trunc(сt/t)

Это типа вон тот кусочек времени?

[JUDAS]

ну типа того.
я так считаю остаток от секунд когда перевожу радианы в секунды (геодезия) =)