Kevin , here is my Morning Star Scan.
input="Your List.lst"; Output="0 Morning Star.lst";
ProcessMS = "d:\meta\Morning Star\",VMS;
integer bar, N, X, MinPr; float Y; //% variable N:= -90; //define N days to look back X:= .25; //define $ amount of gap Y:= .01; //define % of gap For bar = -1 to N step -1 Do
If Downgap(bar) > X and Downgap(bar)/Low(bar-1)> Y and Close(bar)> 5 and Upgap(bar+1) > X and Close(bar+1)> Open(bar+1) then
println symbol,",",Close(0):0:2,",",High(bar)-Low(bar-1):0:2,",",date(bar),",",Downgap(bar)/Low(bar-1)*100:0:1,",",vol(bar); endif; next bar; |