Gonzongo: Here's my QP2 Dahl scan, for what it's worth:
//Dahl crossing 0 by Brooke //mov(c,days,simp) - ref(mov(c,days,simp),-15)
output="dahl.lst"; input="portfoli.lst";
DaysToLoad = 250;
float a, b, c, d, dahl, prevdahl;
a := movavg(0,50,cl) ; b := movavg(-15,50,cl) ; c := movavg(-1,50,cl) ; d := movavg(-16,50,cl) ;
dahl := (a-b); prevdahl := (c-d);
if dahl>0 and prevdahl<0 then println Symbol , "," , " dahl:", dahl , "," ," Close:", Close(0) , "," , " Vol:", vol(0) , " , " , " PE:", PE , " , " , " QRS:", QRS(0) , "," , " Sharesfloat:", Sharesfloat , "," , description; endif; //println symbol,", ",description,", ",close(0),"," dahl; //endif; |