Terse is good, Craig ;)
Gets complicated if, for example, you want to print each date
that BBB was true using Sean's flag method. -Bob
---------------------------
output="Bbbloop.lst";
ProcessMS = "c:\meta\bbbloop",MSDATA;
integer i, flag, first, last;
first:=-50; last:=0; flag:=0;
For i = first to last do
if Close(i) > Min(i-1,i-5,cl)*1.05 and
Close(i) > Max(i-1,i-260,cl)*.85 and
Vol(i) >= AvgVol(i,-65) and
AvgVol(i,-130) >= 30000 and
Vol(i) >= 30000 and
QRS(i) > 80 then
if flag = 0 then
print symbol, date(i);
flag:= 1;
else
print ",", date(i);
endif;
endif;
next i;
if flag = 1 then
println;
endif;
|
