RosettaCodeData/Task/Fibonacci-sequence/MAXScript/fibonacci-sequence-1.max

fn fibIter n =
(
    if n < 2 then
    (
        n
    )
    else
    (
        fib = 1
        fibPrev = 1
        for num in 3 to n do
        (
            temp = fib
            fib += fibPrev
            fibPrev = temp
        )
        fib
    )
)