alias fib {
  ; Where to begin/end
  ; var %start = $iif($2 isnum,$1,1),%end = $iif($2 isnum,$2)
  var %n = 1,%str = 1,%current = 1,%previous = 1
  while (%n < $$1) {
    var %new = $calc(%current + %previous),%str = %str %new
    inc %n
    var %previous = %current,%current = %new
  }
  return %str
}
