langatator/examples/fibo.ltor

# print the 20 first fibonacci numbers
set n to 20
set a to 0
set b to 1
print_number(a)
set i to 0
while i < (n-1) do
    set _a to a
    set a to a+b
    set b to _a
    print_number(a)
    set i to i+1
end