#macro limit_zero2one(_value) #local limited = _value - floor(_value); #if (limited < 0) #local limited = limited + 1.0; #end limited #end #declare precalc = function (_value) {_value - floor(_value)} #declare Limit_zero2one = function (_value) {select (precalc (_value), precalc (_value) + 1, precalc (_value), precalc (_value) )} #local Seed = seed (123); #for (N, 0, 10) #local N2 = rand (Seed) * N + rand (Seed); #debug concat( " Initial value = ", str(N2, 0, 3), " Function result = ", str(Limit_zero2one (N2), 0, 3), "\n") #end #debug "\n" #for (N, 0, 10) #local N2 = rand (Seed) * N + rand (Seed); #debug concat( " Initial value = ", str(N2, 0, 3), " Function result = ", str(mod (N2, 1), 0, 3), "\n") #end #debug "\n" #error "No objects in scene."