通达信股性评测系统未加密选股指标公式源码

通达信股性评测系统未加密选股指标公式源码

源码正文：

P:=250{XG51};
DRAWTEXT_FIX(CLOSE>0,0.79,0.00,0,'┏━━┳━━━━┳━━━┳━━━┳━━━┳━━━┓')COLORCYAN{XG51};
DRAWTEXT_FIX(CLOSE>0,0.79,0.05,0,'┃股性┃最高连板┃涨停数┃开板数┃跌停数┃封板率┃')COLORCYAN{XG51};
DRAWTEXT_FIX(CLOSE>0,0.79,0.10,0,'┣━━╋━━━━╋━━━╋━━━╋━━━╋━━━┫')COLORCYAN{XG51};
DRAWTEXT_FIX(CLOSE>0,0.79,0.15,0,'┃ ┃ ┃ ┃ ┃ ┃ ┃')COLORCYAN{XG51};
DRAWTEXT_FIX(CLOSE>0,0.79,0.20,0,'┣━━┻━━━━┻━━━╋━━━┻━━━┻━━━┫')COLORCYAN{XG51};
DRAWTEXT_FIX(CLOSE>0,0.79,0.25,0,'┃ 涨停次日平均 ┃ 开板次日平均 ┃')COLORCYAN{XG51};
DRAWTEXT_FIX(CLOSE>0,0.79,0.30,0,'┣━━┳━━┳━━┳━━╋━━┳━━┳━━┳━━┫')COLORCYAN{XG51};
DRAWTEXT_FIX(CLOSE>0,0.79,0.35,0,'┃ 开 ┃ 低 ┃ 高 ┃ 收 ┃ 开 ┃ 低 ┃ 高 ┃ 收 ┃')COLORCYAN{XG51};
DRAWTEXT_FIX(CLOSE>0,0.79,0.40,0,'┣━━╋━━╋━━╋━━╋━━╋━━╋━━╋━━┫')COLORCYAN{XG51};
DRAWTEXT_FIX(CLOSE>0,0.79,0.45,0,'┃ ┃ ┃ ┃ ┃ ┃ ┃ ┃ ┃')COLORCYAN{XG51};
DRAWTEXT_FIX(CLOSE>0,0.79,0.50,0,'┗━━┻━━┻━━┻━━┻━━┻━━┻━━┻━━┛')COLORCYAN{XG51};
DRAWTEXT_FIX(CLOSE>0,0.79,0.58,0,' ①★统计周期★【 交易日】')COLORBLUE{XG51};
DRAWTEXT_FIX(CLOSE>0,0.79,0.68,0,' ②统计数据剔除未开板的一字板')COLORBLUE{XG51};
DRAWNUMBER_FIX(C>0,0.863,0.58,0,P),COLORWHITE{XG51};
DRAWTEXT_FIX(C>0,0.986,0.15,0,'%'),COLORWHITE{XG51};
涨停价:=ZTPRICE(REF(CLOSE,1),0.1){XG51};
跌停价:=DTPRICE(REF(CLOSE,1),0.1){XG51};
开板:=((HIGH>=涨停价) AND (CLOSE<涨停价)){XG51};
涨停数:=COUNT((C>=涨停价) AND L!=C,P) NODRAW{XG51};
开板数:=COUNT(开板,P) NODRAW{XG51};
跌停数:=COUNT(C<=跌停价,P) NODRAW{XG51};
封板率:=(1-(开板数/(涨停数+开板数)))*100{XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.87,0.15,0,涨停数),COLORWHITE{XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.905,0.15,0,开板数),COLORWHITE{XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.94,0.15,0,跌停数),COLORWHITE{XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.97,0.15,0,封板率),COLORWHITE{XG51};
涨停次日收:=IF(REF(C>=涨停价 AND L!=C,1), C/REF(C,1)-1,0){XG51};
TTJ:=IF(涨停次日收,1,0){XG51};
TTJ1:=SUM(涨停次日收,P){XG51};
TTJ2:=SUM(TTJ,P){XG51};
次日平均涨幅收:=TTJ1/TTJ2*100 NODRAW{XG51};
DRAWNUMBER_FIX(次日平均涨幅收>0 AND CURRBARSCOUNT=1,0.876,0.45,0,次日平均涨幅收),COLORWHITE{XG51};
DRAWNUMBER_FIX(次日平均涨幅收<=0 AND CURRBARSCOUNT=1,0.876,0.45,0,次日平均涨幅收),COLORCYAN{XG51};
涨停次日开:=IF(REF(C>=涨停价 AND L!=C,1), O/REF(C,1)-1,0){XG51};
TTJ3:=IF(涨停次日开,1,0){XG51};
TTJ4:=SUM(涨停次日开,P){XG51};
TTJ5:=SUM(TTJ3,P){XG51};
次日平均涨幅开:=TTJ4/TTJ5*100 NODRAW{XG51};
DRAWNUMBER_FIX(次日平均涨幅开>0 AND CURRBARSCOUNT=1,0.80,0.45,0,次日平均涨幅开),COLORWHITE{XG51};
DRAWNUMBER_FIX(次日平均涨幅开<=0 AND CURRBARSCOUNT=1,0.80,0.45,0,次日平均涨幅开),COLORCYAN{XG51};
涨停次日低:=IF(REF(C>=涨停价 AND L!=C,1), L/REF(C,1)-1,0){XG51};
TTJ6:=IF(涨停次日低,1,0){XG51};
TTJ7:=SUM(涨停次日低,P){XG51};
TTJ8:=SUM(TTJ6,P){XG51};
次日平均涨幅低:=TTJ7/TTJ8*100 NODRAW{XG51};
DRAWNUMBER_FIX(次日平均涨幅低>0 AND CURRBARSCOUNT=1,0.828,0.45,0,次日平均涨幅低),COLORWHITE{XG51};
DRAWNUMBER_FIX(次日平均涨幅低<=0 AND CURRBARSCOUNT=1,0.828,0.45,0,次日平均涨幅低),COLORCYAN{XG51};
涨停次日高:=IF(REF(C>=涨停价 AND L!=C,1), H/REF(C,1)-1,0){XG51};
TTJ9:=IF(涨停次日高,1,0){XG51};
TTJ10:=SUM(涨停次日高,P){XG51};
TTJ11:=SUM(TTJ9,P){XG51};
次日平均涨幅高:=TTJ10/TTJ11*100 NODRAW{XG51};
DRAWNUMBER_FIX(次日平均涨幅高>0 AND CURRBARSCOUNT=1,0.854,0.45,0,次日平均涨幅高),COLORWHITE{XG51};
DRAWNUMBER_FIX(次日平均涨幅高<=0 AND CURRBARSCOUNT=1,0.854,0.45,0,次日平均涨幅高),COLORCYAN{XG51};
开板次日开:=IF(REF(开板,1) AND L!=C, O/REF(C,1)-1,0){XG51};
TTTJ:=IF(开板次日开,1,0){XG51};
TTTJ1:=SUM(开板次日开,P){XG51};
TTTJ2:=SUM(TTTJ,P){XG51};
开板次日平均开:=TTTJ1/TTTJ2*100 NODRAW{XG51};
DRAWNUMBER_FIX(开板次日平均开>0 AND CURRBARSCOUNT=1,0.899,0.45,0,开板次日平均开),COLORWHITE{XG51};
DRAWNUMBER_FIX(开板次日平均开<=0 AND CURRBARSCOUNT=1,0.899,0.45,0,开板次日平均开),COLORCYAN{XG51};
开板次日低:=IF(REF(开板,1) AND L!=C, L/REF(C,1)-1,0){XG51};
TTTJ3:=IF(开板次日低,1,0){XG51};
TTTJ4:=SUM(开板次日低,P){XG51};
TTTJ5:=SUM(TTTJ3,P){XG51};
开板次日平均低:=TTTJ4/TTTJ5*100 NODRAW{XG51};
DRAWNUMBER_FIX(开板次日平均低>0 AND CURRBARSCOUNT=1,0.925,0.45,0,开板次日平均低),COLORWHITE{XG51};
DRAWNUMBER_FIX(开板次日平均低<=0 AND CURRBARSCOUNT=1,0.925,0.45,0,开板次日平均低),COLORCYAN{XG51};
开板次日高:=IF(REF(开板,1) AND L!=C, H/REF(C,1)-1,0){XG51};
TTTJ6:=IF(开板次日高,1,0){XG51};
TTTJ7:=SUM(开板次日高,P){XG51};
TTTJ8:=SUM(TTTJ6,P){XG51};
开板次日平均高:=TTTJ7/TTTJ8*100 NODRAW{XG51};
DRAWNUMBER_FIX(开板次日平均高>0 AND CURRBARSCOUNT=1,0.955,0.45,0,开板次日平均高),COLORWHITE{XG51};
DRAWNUMBER_FIX(开板次日平均高<=0 AND CURRBARSCOUNT=1,0.955,0.45,0,开板次日平均高),COLORCYAN{XG51};
开板次日收:=IF(REF(开板,1) AND L!=C, C/REF(C,1)-1,0){XG51};
TTTJ9:=IF(开板次日收,1,0){XG51};
TTTJ10:=SUM(开板次日收,P){XG51};
TTTJ11:=SUM(TTTJ9,P){XG51};
开板次日平均收:=TTTJ10/TTTJ11*100 NODRAW{XG51};
DRAWNUMBER_FIX(开板次日平均收>0 AND CURRBARSCOUNT=1,0.975,0.45,0,开板次日平均收),COLORWHITE{XG51};
DRAWNUMBER_FIX(开板次日平均收<=0 AND CURRBARSCOUNT=1,0.975,0.45,0,开板次日平均收),COLORCYAN{XG51};
涨停:=C>=涨停价 AND L!=C{XG51};
最高连板:=HHV(BArslAst(NOT(涨停)),P){XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.837,0.15,0,最高连板),COLORWHITE{XG51};
股性分数:=最高连板*3+涨停数*2+开板数-跌停数+封板率{XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.795,0.15,0,股性分数),COLORWHITE{X*G_5=1*C*N*{};

通达信波段线主图未加密选股指标公式源码

源码正文：

N:=20;N1:=7;N2:=79{XG51};
ma7:MA(C,7),COLORLIMAGENTA,LINETHICK2{XG51};
MA89:MA(C,89),COLORYELLOW,LINETHICK2{XG51};
VAR1:=(2*CLOSE+HIGH+LOW+OPEN)/5{XG51};
A1:=(ema(VAR1,3)+EMA(VAR1,6)+EMA(VAR1,12)+EMA(VAR1,24))/4{XG51};
A2:=EMA(A1,2){XG51};
A3:=EMA(A2,2){XG51};
A4:=EMA(A3,2){XG51};
A5:=EMA(A4,2){XG51};
A6:=EMA(A5,2){XG51};
A7:=EMA(A6,2){XG51};
IF(A1>REF(A1,1),A1,DRAWNULL),COLORWHITE{XG51};
IF(A1<REF(A1,1),A1,DRAWNULL),COLORCYAN{XG51};
IF(A2>REF(A2,1),A2,DRAWNULL),COLORWHITE{XG51};
IF(A2<REF(A2,1),A2,DRAWNULL),COLORCYAN{XG51};
IF(A3>REF(A3,1),A3,DRAWNULL),COLORWHITE{XG51};
IF(A3<REF(A3,1),A3,DRAWNULL),COLORCYAN{XG51};
IF(A4>REF(A4,1),A4,DRAWNULL),COLORWHITE{XG51};
IF(A4<REF(A4,1),A4,DRAWNULL),COLORCYAN{XG51};
IF(A5>REF(A5,1),A5,DRAWNULL),COLORWHITE{XG51};
IF(A5<REF(A5,1),A5,DRAWNULL),COLORCYAN{XG51};
IF(A6>REF(A6,1),A6,DRAWNULL),COLORWHITE{XG51};
IF(A6<REF(A6,1),A6,DRAWNULL),COLORCYAN{XG51};
IF(A7>REF(A7,1),A7,DRAWNULL),COLORWHITE{XG51};
IF(A7<REF(A7,1),A7,DRAWNULL),COLORCYAN{XG51};
压力:HHV(MA((L+H+C)/3,5),60),COLORGREEN,LINETHICK2{XG51};
JJ:=(CLOSE+HIGH+LOW)/3{XG51};
A:=EMA(JJ,10){XG51};
B:=REF(A,1){XG51};
DRAWICON(REF(A<B,1) AND A>B,L*0.98,1){XG51};
M3:=EMA(CLOSE,3){XG51};
M8:=EMA(CLOSE,8){XG51};
M13:=EMA(M8,13){XG51};
M55:=EMA(M8,55){XG51};
VAR1B:=EMA(M13,55){XG51};
M81:=EMA(M55,81){XG51};
M6:=EMA(VAR1B,144), COLORWHITE,LINETHICK2{XG51};
VAR2B:=(REF(HIGH,1)+REF(LOW,1))/2{XG51};
VAR3B:=MA(CLOSE,N)+2*stD(CLOSE,N){XG51};
DRAWICON(crOSS(VAR2B,VAR3B),HIGH+0.1,2){XG51};
VAR4B:=REF(CLOSE,1){XG51};
VAR5B:=SMA(MAX(CLOSE-VAR4B,0),N1,1)/SMA(Abs(CLOSE-VAR4B),N1,1)*100{XG51};
VAR6B:=CROSS(N2,VAR5B){XG51};
VAR7B:=FILTER(VAR6B,4){XG51};
DRAWICON(VAR7B,HIGH+0.1,2){XG51};
ZTJZ:=IF(REF(C,1)*1.1-C<0.01 ,1,0){XG51};
STICKLINE(ZTJZ AND COUNT(ZTJZ,13)>=1,C,O,1,0),COLORBLUE{XG51};
DRAWTEXT(ZTJZ AND COUNT(ZTJZ,13)>=1,H*1.015,''),COLORBLUE,LINETHICK1{XG51};
DRAWTEXT(ZTJZ AND COUNT(ZTJZ,13)>=1,H*1.028,''),COLORBLUE{XG51};
YZFZ:=4{XG51};
YBLZ:=1.90{XG51};
DYKX:=C>O*(1+YZFZ/100) AND vol>REF(VOL,1)*YBLZ{XG51};
LS0:=BArslAST(DYKX){XG51};
BPJZ:=REF(L,LS0){XG51};
DRAWTEXT(DYKX,L-L*0.02,'阳'),COLOR00FFFF{XG51};
WZX1:=BPJZ *0.998{XG51};
WZX2:=BPJZ *0.98{XG51};
LS11:=IF(1,LS0=1,DYKX){XG51};
LS21:=IF(1,LLV(L,1)>REF(L,1),1){XG51};
DYBP:=LS11 AND LS21{XG51};
STICKLINE(DYBP,WZX1,BPJZ,4,0),COLORLIMAGENTA{XG51};
DRAWTEXT(DYBP,WZX2,'1'),COLORCYAN{XG51};
LS12:=IF(2,LS0=2,DYKX){XG51};
LS22:=IF(2,LLV(L,2)>REF(L,2),1){XG51};
DYBP2:=LS12 AND LS22{XG51};
STICKLINE(DYBP2,WZX1,BPJZ,4,0),COLORLIMAGENTA{XG51};
DRAWTEXT(DYBP2,WZX2,'2'),COLORCYAN{XG51};
LS13:=IF(3,LS0=3,DYKX){XG51};
LS23:=IF(3,LLV(L,3)>REF(L,3),1){XG51};
DYBP3:=LS13 AND LS23{XG51};
STICKLINE(DYBP3,WZX1,BPJZ,4,0),COLORLIMAGENTA{XG51};
DRAWTEXT(DYBP3,WZX2,'3'),COLORCYAN{XG51};
LS14:=IF(4,LS0=4,DYKX){XG51};
LS24:=IF(4,LLV(L,4)>REF(L,4),1){XG51};
DYBP4:=LS14 AND LS24{XG51};
STICKLINE(DYBP4,WZX1,BPJZ,4,0),COLORLIMAGENTA{XG51};
DRAWTEXT(DYBP4,WZX2,'4'),COLORCYAN{XG51};
LS15:=IF(5,LS0=5,DYKX){XG51};
LS25:=IF(5,LLV(L,5)>REF(L,5),1){XG51};
DYBP5:=LS15 AND LS25{XG51};
STICKLINE(DYBP5,WZX1,BPJZ,4,0),COLORLIMAGENTA{XG51};
DRAWTEXT(DYBP5,WZX2,'5'),COLORCYAN{XG51};
LS16:=IF(6,LS0=6,DYKX){XG51};
LS26:=IF(6,LLV(L,6)>REF(L,6),1){XG51};
DYBP6:=LS16 AND LS26{XG51};
STICKLINE(DYBP6,WZX1,BPJZ,4,0),COLORLIMAGENTA{XG51};
DRAWTEXT(DYBP6,WZX2,'6'),COLORCYAN{XG51};
LS17:=IF(7,LS0=7,DYKX){XG51};
LS27:=IF(7,LLV(L,7)>REF(L,7),1){XG51};
DYBP7:=LS17 AND LS27{XG51};
STICKLINE(DYBP7,WZX1,BPJZ,4,0),COLORLIMAGENTA{XG51};
DRAWTEXT(DYBP7,WZX2,'7'),COLORCYAN{XG51};
LS18:=IF(8,LS0=8,DYKX){XG51};
LS28:=IF(8,LLV(L,8)>REF(L,8),1){XG51};
DYBP8:=LS18 AND LS28{XG51};
STICKLINE(DYBP8,WZX1,BPJZ,4,0),COLORLIMAGENTA{XG51};
DRAWTEXT(DYBP8,WZX2,'8'),COLORCYAN{XG51};
LS19:=IF(9,LS0=9,DYKX){XG51};
LS29:=IF(9,LLV(L,9)>REF(L,9),1){XG51};
DYBP9:=LS19 AND LS29{XG51};
STICKLINE(DYBP9,WZX1,BPJZ,4,0),COLORLIMAGENTA{XG51};
DRAWTEXT(DYBP9,WZX2,'9'),COLORCYAN{XG51};
LS110:=IF(10,LS0=10,DYKX){XG51};
LS210:=IF(10,LLV(L,10)>REF(L,10),1){XG51};
DYBP10:=LS110 AND LS210{XG51};
STICKLINE(DYBP10,WZX1,BPJZ,4,0),COLORLIMAGENTA{XG51};
DRAWTEXT(DYBP10,WZX2,'10'),COLORCYAN{XG51};
dif:=EMA(CLOSE,8)-EMA(CLOSE,13){XG51};
DEA:=EMA(DIF,6){XG51};
TCmacd:=2*(DIF-DEA){XG51};
GD1:=EVERY(DIF>REF(DIF,1),BARSLASTCOUNT(DIF>DEA))AND DIF>DEA{XG51};
GD2:=EVERY(TCMacD>REF(TCMACD,1),BARSLASTCOUNT(DIF>DEA))AND DIF>DEA{XG51};
GD:=MAX(GD1,GD2){XG51};
GDWZ1:=REF(MAX(C,O),BARSLAST(GD1)+1){XG51};
GDWZ2:=REF(MAX(C,O),BARSLAST(GD2)+1){XG51};
GDWZ:=IF(GDWZ2>=GDWZ1,GDWZ2,GDWZ1){XG51};
AA:=HHV(IF(C>O,C,MAX(C,O)),BARSLASTCOUNT(GDWZ)+1)=HHV(IF(C>O,C,MAX(C,O)),BARSLASTCOUNT(bbi>REF(BBI,1)AND C>BBI)){XG51};
AA1:=REF(CLOSE,1){XG51};
压力2:DRAWLINE(BARSLAST(AA)=0,IF(C>O,C,MAX(C,O)),BARSNEXT(AA),REF(IF(C>O,C,MAX(C,O)),BARSLAST(AA)),1),DOTLINE,COLORBLUE{XG51};
LD1:=EVERY(DIF<REF(DIF,1),BARSLASTCOUNT(DIF<DEA))AND DIF<DEA{XG51};
LD2:=EVERY(TCMACD<REF(TCMACD,1),BARSLASTCOUNT(DIF<DEA))AND DIF<DEA{XG51};
LD:=MIN(LD1,LD2){XG51};
DDWZ1:=REF(MIN(C,O),BARSLAST(LD1)+1){XG51};
DDWZ2:=REF(MIN(C,O),BARSLAST(LD2)+1){XG51};
DDWZ:=IF(DDWZ2<=DDWZ1,DDWZ1,DDWZ2){XG51};
BB:=LLV(IF(C<O,C,MIN(C,O)),BARSLASTCOUNT(LD)+1)=LLV(IF(C<O,C,MIN(C,O)),BARSLASTCOUNT(DIF<REF(DIF,1) AND BBI<REF(BBI,1)}AND L<BBI)){XG51};
ZCWZ:DRAWLINE(BARSLAST(BB)=0,IF(C<O,C,MIN(C,O)),BARSNEXT(BB),REF(IF(C<O,C,MIN(C,O)),BARSLAST(BB)),1),DOTLINE,COLORCYAN{XG51};
DRAWNUMBER(ISLASTBAR,HHV(C,5)*0.95*1.015,HHV(C,5)*0.95),COLORRED{XG51};
STICKLINE(ISLASTBAR,HHV(C,5)*0.95-0.01,HHV(C,5)*0.95,50,0),COLORRED{XG51};
DRAWTEXT(ISLASTBAR,HHV(C,5)*0.95*0.99,'止损价位'),COLORRED{XG51};
MA60:=MA(C,60){XG51};
GLV60:=(C-MA60)/MA60*100{XG51};
DRAWTEXT_FIX(1,0.05,0.1,0,STRCAT('乖离率: ',CON2STR(GLV60,2))),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.15,0.1,0,STRCAT(DYBLOCK,STRCAT('--',STRCAT(HYBLOCK,STRCAT('--',GNBLOCK))))),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.05,0.15,0,STRCAT('市盈率:',CON2STR(DYNAINFO(39),2))),COLORWHITE{XG51};
DRAWTEXT_FIX(1,0.15,0.15,0,STRCAT('市净率:',CON2STR(C/FINANCE(34),2))),COLORWHITE{X_G~5^1_C_N_{};