Map range: Difference between revisions

Line 1,090:
define fn (maprange) as b1 + ( s - a1 ) * ( b2 - b1 ) / ( a2 - a1 )
 
letfor i = i0 +to 110
do
 
let s = i
Line 1,100:
print i, " : ", (maprange)
 
next i
let i = i + 1
 
loop i < 11
 
end</syntaxhighlight>
305

edits