Unixgeek, Sean; Here's a simple scan that I've managed to convert, except that it lists multiple hits on the same stock. The scan lists stocks with high volume for two out of three days.
R1 Version
loop(0,-4)
AllGroup
Comment="3x avg volume today and yesterday"
issuetype = common
min(0,-1,vol) > 750
vol(0) > 3*avgvol(-3,-15)
vol(-1) > 3*avgvol(-4,-16)
AllGroup
Comment="3x avg volume today and day before yesterday"
issuetype = common
min(0,-2,vol) > 750
vol(0) > 3*avgvol(-3,-15)
vol(-2) > 3*avgvol(-4,-16)
In R2, I think it translates to
output = "highvol.lst";
issuetype common;
integer i;
for i = -4 to 0;
do
if min(i,i-1,vol) > 75000 and
vol(i) > 3*avgvol(i-3,i-15) and //today and yesterday
vol(i-1) > 3*avgvol(i-4,i-16) or
min(i,i-2,vol) > 75000 and
vol(i) > 3*avgvol(i-3,i-15) and //today and day before yesterday
vol(i-2) > 3*avgvol(i-5,i-17)
then
println symbol;
endif
next i;
There may be some minor typos, but this scan works except for the multiple listings of the same stocks. I'm not embarrassed to say that it took me about 6 hours to convert this one scan, and I can't for the life of me understand why Gary Lyben felt I should have to do this just to remain a customer. |
