The following code will check the Fibonaccian behavior of a stock/index in the past.
// The Fibonaccian behavior, by D. Tsokakis, Nov 2006
n=Param("n",6,3,20,1);// Calibrate the Zig percentage
Var1=C;
z=Zig(Var1,n);
PeakCondition=PeakBars(Var1,n)==0;
p1=ValueWhen(PeakCondition,Var1,1)...