m1:=5;
m2:=35;
m3:=135;
VOLUME:=VOL;
量:vol,VOLSTICK;
启:MA(VOLUME,m1),colorwhite,LINETHICK2;
m20:MA(VOLUME,20),colorgreen;
洗:MA(VOLUME,m2),COLORYELLOW,LINETHICK2;
异:MA(VOLUME,m3),COLORRED,LINETHICK2;
{股价多头排列}
Tjq:=ma(c,20)>ref(ma(c,20),1) and ma(c,60)>ref(ma(c,60),1) and ma(c,120)>ref(ma(c,120),1) and ma(c,20)> ma(c,60) and ma(c,60)> ma(c,120) and ma(c,10)> ma(c,20) and ma(c,5)> ma(c,10) and c> ma(c,5);
{成交量异常1}
Tjq1:=ma(vol,35)<ref(ma(vol,35),1) or ma(vol,20)<ref(ma(vol,20),1);
{ 5日内大成交量阴线数量}
dysl:=count(v>ma(vol,35) and c<ref(c,1),5);
{ 5日内大成交量阳线数量}
dhsl:=count(v>ma(vol,35) and c>ref(c,1),5);
{ 10日内大成交量阴线数量}
Dysl2:=count(v>ma(vol,35) and c<ref(c,1),10);
{ 10日内大成交量阳线数量}
Dhsl2:=count(v>ma(vol,35) and c>ref(c,1),10);
{成交量异常2}
Tjq2:=Dysl>dhsl or dysl2>dhsl2;
Tjqq:=tjq and tjq1 and tjq2;
Drawicon(tjqq,0.95*hhv(vol,40),3);
Drawtext(tjqq,0.95*hhv(vol,40),'顶'),colorcyan,linethick3;
爱查股 网 w ww.aichagu.com