Round_To_Step() - Округление до ближайшего шага цены
Сестричка функций Floor_To_Step() и Ceil_To_Step(). Округляет до ближайшего кратного шагу.
' Округление до ближайшего кратного шагу
FUNC Round_To_Step(result,rts_step)
if 0+rts_step == 0
result = Round(result)
else
result = Round(result / rts_step) * rts_step
end if
END FUNC
Вариант с использованием препроцессора M4:
define(`Round_To_Step',`(Round(`$1' / `$2') * `$2')')