Map range: Difference between revisions

Content added Content deleted
Line 1,088: Line 1,088:
=={{header|Craft Basic}}==
=={{header|Craft Basic}}==
<syntaxhighlight lang="basic">define a1 = 0, b1 = 0, a2 = 0, b2 = 0
<syntaxhighlight lang="basic">define a1 = 0, b1 = 0, a2 = 0, b2 = 0
define fn (maprange) as b1 + ( s - a1 ) * ( b2 - b1 ) / ( a2 - a1 )


for i = 0 to 10
for i = 0 to 10
Line 1,098: Line 1,097:
let b2 = 0
let b2 = 0


print i, " : ", (maprange)
print i, " : ", b1 + ( s - a1 ) * ( b2 - b1 ) / ( a2 - a1 )


next i
next i