以下是通達信競價強度、強度評分、主力持倉聚合排序指標 源碼（無源碼的請下載附件導入）
通達信競價強度、強度評分、主力持倉聚合排序指標 源碼
{條件限定}
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));
