通达信竞价强度、强度评分、主力持仓聚合排序指标 源码

以下是通达信竞价强度、强度评分、主力持仓聚合排序指标 源码（无源码的请下载附件导入）

通达信竞价强度、强度评分、主力持仓聚合排序指标 源码

{条件限定}
ZRZT:=REF(C/REF(C,1)>=1.095,1) AND C>0 AND NOT(EVERY(C=O,BARSCOUNT(C)));
QTP&DZ:=OPEN>2.5 AND OPEN<50 ;
QST:=IF(NAMELIKE('S'),0,1);
Q688:=NOT(CODELIKE('688'));
Q300:=NOT(CODELIKE('3'));
QXX:=IF(NAMELIKE('*'),0,1);
QDG:=CAPITAL/1000000 <10;
QXG:=IF(NAMELIKE('N'),0,1);
QCXG:=FINANCE(42) > 60;
BRYB:=COUNT(C/REF(C,1)>1.0976 AND H=C ,100) > 0;
ZBRYB:=REF(BRYB,1);
F3LB:=COUNT(C/REF(C,1)>1.098 AND H=C,3)<3 ;
ZF3LB:=REF(F3LB,1);

{黄金分割线1}
N:=120;
K:=BARSLAST(CURRBARSCOUNT=N);
GD:=CONST(IF(ISLASTBAR=1,HHV(H,K),0));{高点}
DD:=CONST(IF(ISLASTBAR=1,LLV(L,K),0));{低点}
KJ:=GD-DD;
JSW:=DD+KJ*0.618;
JW:=REF(CLOSE,1)<JSW;

TJXD:=ZRZT AND QTP&DZ AND QST AND Q688 AND Q300 AND QXX AND QDG AND QXG AND QCXG AND ZBRYB AND ZF3LB AND JW;

{黄金分割线2}
N1:=120;
K2:=BARSLAST(CURRBARSCOUNT=N1);
GD3:=CONST(IF(ISLASTBAR=1,HHV(H,K2),0));{高点}
DD3:=CONST(IF(ISLASTBAR=1,LLV(L,K2),0));{低点}
KJ4:=GD3-DD3;
JSW5:=DD3+KJ4*0.319;
JW6:=REF(CLOSE,1)>JSW5;

TJXD1:=ZRZT AND QTP&DZ AND QST AND Q688 AND Q300 AND QXX AND QDG AND QXG AND QCXG AND JW6;

{竞价数值}
开幅:(OPEN/REF(CLOSE,1)-1)*100;
开盘量:=DYNAINFO(15)/OPEN/100;
开盘换手:开盘量/CAPITAL*100;
开量比:开盘量/REF(MA(VOL,5),1)*240;
昨量:=REF(VOL,1);
竞价额万:DYNAINFO(15)/10000;
竞额占比:DYNAINFO(15)/(FINANCE(46)*OPEN)*100 ;
承接强度:开盘量/昨量*1;
竞价强度:开量比*开盘换手*开幅*1;

安全票:开幅<8.65 AND 开幅>2 AND 开量比>20 AND 开量比<100 AND 开盘换手>0.3 AND 竞价强度>50 AND 承接强度>0.05 AND 竞价额万>800 AND 竞额占比>0.3 AND TJXD;

赌龙头:开幅<8.65 AND 开幅>2 AND 开量比>30 AND 开盘换手>0.5 AND 竞价强度>80 AND 承接强度>0.1 AND 竞价额万>1400 AND 竞额占比>0.6 AND TJXD1;

超短强度:ATAN((MA(C,5)/REF(MA(C,5),1)-1)*100)*57.3;

短期强度:ATAN((MA(C,13)/REF(MA(C,13),1)-1)*100)*57.3;

中期强度:ATAN((MA(C,20)/REF(MA(C,20),1)-1)*100)*57.3;

强度评分:超短强度/50+短期强度/40+中期强度/21;

R1:=STRCAT(HYBLOCK,' ');
R2:=STRCAT(R1,STRCAT(GNBLOCK,' '));

走强线:EMA(COST(99),181),COLORYELLOW,LINETHICK2;
主力持仓:EMA(100*(CLOSE- LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3),COLORFF00FF;
主力筹码集中度:WINNER(C)*100,COLORRED;

行业&概念:DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(R2,0));