qb64-include/truncate.bm

$if Truncate = undefined then
$let Truncate = defined
Function Truncate~%% (value&)
    Truncate~%% = (value& > 0) * (((value& < 256) * value&) + ((value& > 255) * 255))
End Function
$end if
precompile checks 2022-09-19 01:27:48 +02:00			`$if Truncate = undefined then`
			`$let Truncate = defined`
Update truncate.bm 2022-05-18 08:36:00 +02:00			`Function Truncate~%% (value&)`
			`Truncate~%% = (value& > 0) * (((value& < 256) * value&) + ((value& > 255) * 255))`
			`End Function`
precompile checks 2022-09-19 01:27:48 +02:00			`$end if`