Hey Andy,
Thought you and others might be interested in the latest scans I coded. QP can't test for SAR, but by chaining two scans you can get a list of stocks that are a 7 in DNS. Sorry but I haven't figured out how to scan if it just today became a seven or if it has been a seven for weeks. You'll have to look at them in something else, but for those like me who don't have scanning abilities in their other TA software this is a start.
DNS_6.SCN
----------------------------------------------------------
Float A0,A1,A2,A3,A4,A5,A6,A7,A8
Allgroup
wMovavg(0,5,cl)>wMovavg(0,13,cl)
// 5 day WMA is greater than the 13 day WMA
wMovavg(0,13,cl)>wMovavg(0,40,cl)
// 13 day WMA is greater than the 40 day WMA
Movavg(0,50,cl)-Movavg(-15,50,cl)>0
// 50 day MA is greater than the 50 day MA 15 days ago
OBV(0)>Movavg(0,40,OBV)
// OBV greater than its 40 day simple moving average
Vol(0)>Movavg(0,120,Vol)
// Vol greater than 120 day simple moving average
A8:=(wMovavg(-8,8,cl)-wMovavg(-8,17,cl))*1
// Multiplied to make a weighted MA per info on e-analytics
A7:=(wMovavg(-7,8,cl)-wMovavg(-7,17,cl))*2
// Multiplied to make a weighted MA per info on e-analytics
A6:=(wMovavg(-6,8,cl)-wMovavg(-6,17,cl))*3
// Multiplied to make a weighted MA per info on e-analytics
A5:=(wMovavg(-5,8,cl)-wMovavg(-5,17,cl))*4
// Multiplied to make a weighted MA per info on e-analytics
A4:=(wMovavg(-4,8,cl)-wMovavg(-4,17,cl))*5
// Multiplied to make a weighted MA per info on e-analytics
A3:=(wMovavg(-3,8,cl)-wMovavg(-3,17,cl))*6
// Multiplied to make a weighted MA per info on e-analytics
A2:=(wMovavg(-2,8,cl)-wMovavg(-2,17,cl))*7
// Multiplied to make a weighted MA per info on e-analytics
A1:=(wMovavg(-1,8,cl)-wMovavg(-1,17,cl))*8
// Multiplied to make a weighted MA per info on e-analytics
A0:=(wMovavg(0,8,cl)-wMovavg(0,17,cl))*9
// Multiplied to make a weighted MA per info on e-analytics
wMovavg(0,8,cl)-wMovavg(0,17,cl)>(A0+A1+A2+A3+A4+A5+A6+A7+A8)/45
// Divided by 45 for weighted moving average
OUTPUT = "DNS_6.LST"
Then follow that scan with:
DNS_7.SCN
--------------------------------------------------------------
INPUT = "DNS_6.LST"
ANYGROUP
wMovavg(0,3,ROC) >=-6
ROC(0)>0
// If((Mov(ROC(C,12,%),3,E)>=-6 OR ROC(C,12,%)>0),1,0)+1,0)
OUTPUT="DNS_7.LST"
TTFN,
Chris |
