通达信十个指标整合主图选股指标公式源码

通达信十个指标整合主图选股指标公式源码

源码正文：

E13:expma(C,13),COLORCYAN{XG51};
M8:ma(C,8){XG51};
M21:MA(C,21){XG51};
M233:MA(C,233){XG51};
E10:EXPMA(C,10),COLORWHITE{XG51};
ZZT:=C/REF(C,1)>1.095 AND C=H{XG51};
ZA:=BArslAstCOUNT(ZZT){XG51};
ZT:=BARSLAST(crOSS(ZA=3,0.5)){XG51};
ZLL:=REF(L,(ZT+2)){XG51};
ZTJ:=C<ZLL{XG51};
ZAA:=COUNT(ZTJ,ZT+1)=1 AND ZTJ{XG51};
ZTA:=BARSLAST(ZAA){XG51};
ZLT:=BARSLAST(L=LLV(L,ZTA+1)){XG51};
ZTJ1:=CROSS(C,E10){XG51};
ZXG:=COUNT(ZTJ1,ZLT+1)=1 AND ZTJ1 AND TOTALBARSCOUNT>200{XG51};
STICKLINE(ZXG,C,O,2,0),COLORBLUE{XG51};
DRAWTEXT(ZXG,L*0.95,'起轿'),COLORBLUE{XG51};
HA:=M8/M21*100{XG51};
HTJ:=BARSLASTCOUNT(RANGE(HA,99.9,100.3)){XG51};
HHB:=MAX(C,O)/MIN(C,O)*100-100{XG51};
HTJ1:=BARSLASTCOUNT(HHB<2){XG51};
HZF:=(HHV(H,5)-LLV(L,5))/LLV(L,5)*100{XG51};
HDZF:=(H-L)/REF(C,1)*100{XG51};
HTJ2:=COUNT(MIN(C,O)/L>1.03,5)=0{XG51};
HTJ3:=COUNT(H<REF(L,1),5)=0{XG51};
HTJ4:=C>M233{XG51};
HXG:=HTJ>4 AND HTJ1>4 AND HZF<10 AND HTJ2 AND HTJ3 AND HTJ4{XG51};
STICKLINE(CROSS(HXG,0.5),C,O,2,0),COLORMAGENTA{XG51};
STICKLINE(CROSS(HXG,0.5),H,L,2,0),COLORMAGENTA{XG51};
DRAWTEXT(CROSS(HXG,0.5),L*0.95,'绽放'),COLORBLUE{XG51};
ZF:=(C-REF(C,1))/REF(C,1)*100{XG51};
TJ:=EVERY(RANGE(ZF,-2.22,2.55),15){XG51};
TJ1:=C>O AND C/REF(C,1)>1.03{XG51};
TJ2:=COUNT(E13>=REF(E13,1),15){XG51};
JD:=(ATAN((E13/REF(E13,15)-1)*100)*180/3.1415926){XG51};
A:=IF(MIN(C,O)>E13,MAX(C,O)/E13*100-100,IF(MAX(C,O)<E13,E13/MIN(C,O),E13)){XG51};
B:=MAX(C,O)/MIN(C,O)*100-100{XG51};
LL:=LLV(A,15){XG51};
HH:=HHV(A,15){XG51};
HB:=COUNT(BB>3,15)<2{XG51};
XG:=REF(TJ,1) AND TJ1 AND TJ2>13 AND JD>72 AND REF(LL,1)<1.37 AND REF(HH,1)<11.15{XG51};
STICKLINE(XG,C,O,2,0),COLORCYAN{XG51};
DRAWTEXT(XG,L*0.95,'上树'),COLORBLUE{XG51};
WT:=BARSLAST(WEEKOFYEAR!=REF(WEEKOFYEAR,1)){XG51};
C1:=REF(C,WT+1){XG51};
C2:=REF(C1,WT+1){XG51};
C3:=REF(C2,WT+1){XG51};
C4:=REF(C3,WT+1){XG51};
C5:=REF(C4,WT+1){XG51};
C6:=REF(C5,WT+1){XG51};
C7:=REF(C6,WT+1){XG51};
C8:=REF(C7,WT+1){XG51};
C9:=REF(C8,WT+1){XG51};
WM10:=(C+C1+C2+C3+C4+C5+C6+C7+C8+C9)/10{XG51};
E20:=EXPMA(C,20){XG51};
E120:=EXPMA(C,120){XG51};
E250:=EXPMA(C,250){XG51};
WA:=macd.dif{XG51};
WB:=MacD.DEA{XG51};
WT1:=BARSLAST(CROSS(WA,WB)){XG51};
WST:=BARSLAST(CROSS(WB,WA)){XG51};
WZF:=(HHV(H,110)-LLV(L,110))/LLV(L,110)*100{XG51};
WTJ:=EVERY(V>REF(V,1),2){XG51};
WHH:=MAX(MAX(E20,E120),E250){XG51};
WLL:=MIN(MIN(E20,E120),E250){XG51};
WNH:=WHH/WLL*100-100{XG51};
WTJ1:=EVERY(WNH<40,25){XG51};
WZZF:=(C-REF(C,10))/REF(C,10)*100 {XG51};
WTJA:=C>WM10{XG51};
WXG:=WT1=0 AND WA<REF(WA,WST) AND WB<REF(WB,WST) AND WZF<70 AND WTJ AND WTJ1 AND WZZF<1.4 AND WTJA{XG51};
STICKLINE(WXG,C,O,2,0),COLORBLUE{XG51};
STICKLINE(WXG,H,L,0,0),COLORBLUE{XG51};
DRAWTEXT(WXG,H*1.02,'周线走好'),COLORBLUE{XG51};
M5:=MA(C,5){XG51};
M10:=MA(C,10){XG51};
M15:=MA(C,15){XG51};
FTJ:=M5>REF(M5,1) AND M10>REF(M10,1) AND M15>=REF(M15,10){XG51};
FT:=BARSLAST(CROSS(FTJ,0.5)){XG51};
FTT:=BARSLAST(WEEKOFYEAR!=REF(WEEKOFYEAR,1)){XG51};
FHH:=MAX(MAX(M5,M10),M15){XG51};
FLL:=MIN(MIN(M5,M10),M15){XG51};
FNH:=FHH/FLL*100-100{XG51};
FZZF:=(C-REF(C,FTT+1))/REF(C,FTT+1)*100{XG51};
FZZF1:=REF(FZZF,FTT+1){XG51};
FTJ2:=CROSS(FZZF>20,0.5) OR CROSS(FZZF1>20,0.5){XG51};
FJD:=(ATAN((M5/REF(M5,1)-1)*100)*180/3.1415926){XG51};
FTJA:=FZZF1>0 AND FZZF1>0 {XG51};
FDT:=M10/M15*100-100>1 AND H/MAX(C,O)<1.03{XG51};
FBL:=MIN(C,O)/M5{XG51};
FBL5:=M5/M10*100-100{XG51};
FXG:=FTJ2 AND C=HHV(C,5) AND BETWEEN(FT,0,5)AND FTJA AND FNH<12 AND FDT AND FBL<1.045  AND FBL5<7.2 AND FJD<77.5{XG51};
STICKLINE(CROSS(FXG,0.5),C,O,1.8,0),COLORLIMAGENTA{XG51};
STICKLINE(CROSS(FXG,0.5),H,L,0,0),COLORLIMAGENTA{XG51};
DRAWTEXT(CROSS(FXG,0.5),L*0.98,'周线翻红'),COLORBLUE{XG51};
DTJ:=O>REF(H,1) AND C<O AND O/C<C/L AND V>REF(V,1){XG51};
DTT:=BARSLAST(REF(ZA>1,1) AND DTJ){XG51};
DXG:=COUNT(CROSS(C,REF(H,DTT)),DTT+1)=1 AND CROSS(C,REF(H,DTT)){XG51};
STICKLINE(DTT>=0,REF(H,DTT),REF(H,DTT),6,0),COLORWHITE{XG51};
DRAWTEXT(DTT=0,REF(H,DTT)*1.02,'清茶'),COLORBLUE{XG51};
DRAWICON(DXG,L*0.95,7){XG51};
QT:=BARSLAST(C>REF(C,1)*1.095 AND C=H){XG51};
QTJ:=(C-REF(C,QT+1))/REF(C,QT+1)*100{XG51};
QTJ1:=EVERY(C<O,QT){XG51};
QTJ2:=COUNT(REF(C,1)/C>1.09,QT)>0 AND REF(C,1)/C>1.09{XG51};
QA:=QTJ>-1 AND QTJ1 AND QTJ2{XG51};
QTA:=BARSLAST(QA){XG51};
QHH:=REF(H,QTA){XG51};
QTJ3:=EVERY(MAX(C,O)<QHH,QTA){XG51};
QTJ4:=MIN(C,O)<QHH AND MAX(C,O)>QHH AND COUNT(MIN(C,O)<QHH AND MAX(C,O)>QHH,QTA)=1{XG51};
QTJ5:=REF(QTJ3,1) AND QTA<69 AND IF(C<O,O/QHH>1.007,C>O) AND IF(C<O,REF(C,1)/C<1.06,C>O);
QXG:=QTJ4 AND QTJ5{XG51};
STICKLINE(QTA>=0,REF(H,QTA),REF(H,QTA),6,0),COLORYELLOW{XG51};
DRAWICON(QXG=1,L*0.95,1){XG51};
DRAWTEXT(QTA=0,H*1.02,STRCAT(STRCAT('阴线最高价:',VAR2STR(REF(H,QTA),2)),'元'))COLORBLUE{XG51};
DIF:=MACD.DIF{XG51};
H300:=HHVBARS(DIF,300){XG51};
IA:=boll.UB{XG51};
IT:=BARSLAST(CROSS(IA>=REF(IA,1),0.5)){XG51};
E25:=EXPMA(C,25){XG51};
IZF:=EVERY(RANGE(C/REF(C,1),0.97,1.05),IT+1){XG51};
IZFF:=(HHV(H,IT+1)-LLV(L,IT+1))/LLV(L,IT+1)*100{XG51};
ITJ:=EVERY(MAX(C,O)/IA<1.02 ,IT+1){XG51};
IXL:=(ATAN((E25/REF(E25,IT)-1)*100)*180/3.1415926){XG51};
ITJ1:=CROSS(DIF>=REF(DIF,H300),0.5) AND IZFF<17 AND IZF AND ITJ{XG51};
ITJ2:=MIN(C,O)/E25>1.04{XG51};
IXG:=ITJ1 AND IXL>75{XG51};
STICKLINE(IXG,C,O,2,0),COLORLICYAN{XG51};
STICKLINE(IXG,H,L,0,0),COLORLICYAN{XG51};
DRAWICON(IXG,H*1.01,15){XG51};
LT8:=LLVBARS(L,60){XG51};
LTT8:=BARSLAST(CURRBARSCOUNT=CONST(LT8)+1){XG51};
HT8:=FINDHIGHBARS(H,LT8+1,60,1){XG51};
A8:DRAWLINE(CURRBARSCOUNT=CONST(HT8)+1,H,ISLASTBAR,REF(H,HT8),0),COLORBLUE,LINETHICK2{XG51};
TT8:=BARSLAST(CURRBARSCOUNT=CONST(HT8)+1){XG51};
AA8:=CROSS(C,CONST(A8)){XG51};
TJ8:=COUNT(AA8,TT8+1)=1 AND AA8{XG51};
TJ18:=COUNT(V<MA(V,277),TT8+1) {XG51};
BL8:=TJ18/(TT8+1)*100{XG51};
XG8:=TJ8 AND TT8>40 AND BL8>70{XG51};
XGT8:=BARSLAST(CURRBARSCOUNT=CONST(BARSLAST(XG8))+1){XG51};
ZH8:=REF(H,TT8){XG51};
YL8:=REF(L,LTT8){XG51};
XC8:=REF(C,XGT8){XG51};
YZ8:=(XC8-YL8)/YL8*100{XG51};
ZBL8:=YZ8/REF(LTT8,XGT8){XG51};
XGA8:=XG8 AND ZBL8<2.95{XG51};
DRAWLINE(TT8=0,H,LTT8=0,L,0),COLORWHITE{XG51};
DRAWLINE(LTT8=0,L,XGT8=0,L,0),COLORWHITE{XG51};
DRAWICON(XGA8,L*0.95,9){XG51};
SNH:=E120/E250*100-100{XG51};
STA:=EVERY(SNH<3 AND E120>E250,20){XG51};
STB:=CROSS(E20,MAX(E120,E250)){XG51};
STC:=MIN(C,O)/E20<1.08{XG51};
SXG:=STB AND STA AND STC;
STICKLINE(SXG,C,O,2,0),COLORMAGENTA{XG51};
DRAWICON(SXG,L*0.95,15){X*G-5_1*C*N*{};