qb64-include/max.bm

6 lines
151 B
Text
Raw Normal View History

2022-09-19 01:27:48 +02:00
$if Max = undefined then
$let Max = defined
2022-03-18 18:33:58 +01:00
FUNCTION Max (num1, num2)
Max = ((num1 > num2) * -num1) + ((num2 >= num1) * -num2)
2022-09-19 01:27:48 +02:00
END FUNCTION
$end if