% fibonaci.m
%A script to calculate Fibonacci numbers
%first described by Leonardo of Pisa
f=[1 1]; n=1;
while f(n) + f(n+1) <100
  f(n+2)=f(n)+f(n+1)
  n
  n=n+1;
end

%f
%x=0:0.02:1;
%hndl=plot(x,humps(x));
x=0:0.02:20;
hndl=plot(x,sin(x));
set(hndl,'Color','cyan')
text(.05,.9,'%fibscript.m');
title('My fib');