我常用的選股策略系列之13~各方勢力一湧而上的股票

value1=GetField("關鍵券商買賣超張數","D");

value2=GetField("地緣券商買賣超張數","D");

value3=GetField("綜合前十大券商買賣超張數","D");

value4=GetField("外資買賣超","D");

value5=GetField("投信買賣超","D");

value6=GetField("自營商自行買賣買賣超","D");

value7=GetField("主力買賣超張數","D");

value8=value1+value2+value3+value4+value5+value6+value7;

//這些各方勢力買超合計的張數

value9=value8/volume*100;

//合計佔成交量的比重

var:count(0);

condition1=false;

count=0;

if value1>0 then count=count+1;

if value2>0 then count=count+1;

if value3>0 then count=count+1;

if value4>0 then count=count+1;

if value5>0 then count=count+1;

if value6>0 then count=count+1;

if value7>0 then count=count+1;

if volume>2000

//成交量大於2000張

and count>=6

//七項至少六項是買超

and value9>60

//合計買超張數佔成交量達六成以上

then condition1=true;

if barslast(condition1)=0

//最近一期符合上述條件

then ret=1;

outputfield(1,count,0,"符合條件數");