Germany | Finland | Saint Petersburg | Drive

Between()

Опубликовано в QPILE

Булева функция, проверяющая нахождение значения в требуемых пределах. Например, она используется для проверки попадания времени в требуемый период.

' Возвращает 1, если WHAT между или равно BORDER1 и BORDER2, иначе 0

FUNC Between(result,b_border1,b_border2)
if b_border1 <= result AND result <= b_border2
         result = 1
else
         result = 0
end if
END FUNC

 

При использовании препроцессора M4 функцию выгодно исполнить в виде макроса:

define(`Between',`($2 <= $1 and $2 <= $3)')

Добавить комментарий