Hi Doug, talking to yourself again I see. <ggg>
Here's a starter to get the creative juices flowing. When many of us were on Prodigy's Money Talk TA boards, posters would try to interpret other's scans into the QP format. Kerry and John haven't yet found their way over to SI yet, but maybe someone will talk them over here. Incidentally, Prodigy's board was once excellent, but most of the TAers have left and many are now here on SI.
For the following, you need QP version 1.1.
//Kerry Loudermilk's interpretation of John Bird Sr.'s Birdwatch. Run this 1st, then birdwatc
//enter this one as xbird.scn
Allgroup
(MovAvg(0,5,cl)-MovAvg(0,13,cl))>0 //Today 5 day MovAvgless todays 13 day Mov Avg > 0
Vol(0)>(MovAvg(0,20,Vol)*1.4) //Today Vol is > 140% ofthe 20 day MovAvg Volume
Close(0)>MovAvg (0,4,cl) //Today Close is > 4 day MovAvgClose
MovAvg (0,5,cl)>MovAvg (0,13,cl) //Todays 5 day MovAvgClose > 13 day MovAvg Close
MovAvg (0,13,cl)>MovAvg (0,25,cl) //Todays 13 day MovAvgClose > 25 day MovAvg Close
Close (0) < 25
//My modification...price < 25
Vol(0)>75
//Volume greater than 7500
Output = "xbird.lst"
--------------------------
//enter this one as birdwatc.scn
Anygroup
Input = "xbird.lst"
(MovAvg(-1,5,cl)-MovAvg(-1,13,cl))<0 //Yesterdays 5 day MovAvg less yesterdays 13 day MovAvg<0
(MovAvg(-1,5,cl)-MovAvg(-1,13,cl))=0 //Yesterdays 5 day MovAvg less yesterdays 13 day MovAvg=0
Output = "birdwatc.lst" |
