Int - отбросить дробную часть
Понадобилась функция, отбрасывающая дробную часть в числе и возвращающая целое.
' Отбрасывает дробную часть. Возвращает целое FUNC Int(result)
if 0+result < 0
result = Ceil(Result)
else
result = Floor(result)
end if
END FUNC