[xkor]

а у меня проще:
d:=(Now-lastLocUpd)*SecsPerDay;
r:=speed*d*MovementSpeedMultiplier;