通达信支撑压力+加仓逃顶主图选股指标公式源码

通达信支撑压力+加仓逃顶主图选股指标公式源码

源码正文：

N250:=250{XG51};
PT250:=CONst(HHVBARS(V,N250)){XG51};
T250:IF(CURRBARSCOUNT<=N250,CONST(IF(PT250=0,C,REF(C,PT250))),DRAWNULL),COLOR990000,LINETHICK2{XG51};
IF(CURRBARSCOUNT=PT250+1,T250*1.01,DRAWNULL),CIRCLEDOT,COLORBLUE,LINETHICK1{XG51};
DRAWTEXT(CURRBARSCOUNT=N250,T250,'250'),COLOR990000{XG51};
N120:=120{XG51};
PT120:=CONST(HHVBARS(V,N120)){XG51};
T120:IF(CURRBARSCOUNT<=N120,CONST(IF(PT120=0,C,REF(C,PT120))),DRAWNULL),COLORAAAA00,LINETHICK2{XG51};
IF(CURRBARSCOUNT=PT120+1,T120,DRAWNULL),CIRCLEDOT,COLORBLUE,LINETHICK1{XG51};
DRAWTEXT(CURRBARSCOUNT=N120,T120,'120'),COLORAAAA00{XG51};
N60:=60{XG51};
PT60:=CONST(HHVBARS(V,N60)){XG51};
T60:IF(CURRBARSCOUNT<=N60,CONST(IF(PT60=0,C,REF(C,PT60))),DRAWNULL),COLOR00BB00,LINETHICK2{XG51};
IF(CURRBARSCOUNT=PT60+1,T60,DRAWNULL),CIRCLEDOT,COLORBLUE,LINETHICK1{XG51};
DRAWTEXT(CURRBARSCOUNT=N60,T60,'60'),COLOR00BB00{XG51};
N30:=30{XG51};
PT30:=CONST(HHVBARS(V,N30)){XG51};
T30:IF(CURRBARSCOUNT<=N30,CONST(IF(PT30=0,C,REF(C,PT30))),DRAWNULL),COLOR0000CC,LINETHICK2{XG51};
IF(CURRBARSCOUNT=PT30+1,T30,DRAWNULL)CIRCLEDOT,COLORBLUE,LINETHICK1{XG51};
DRAWTEXT(CURRBARSCOUNT=N30,T30,'30'),COLOR0000CC{XG51};
N20:=20{XG51};
PT20:=CONST(HHVBARS(V,N20)){XG51};
T20:IF(CURRBARSCOUNT<=N20,CONST(IF(PT20=0,C,REF(C,PT20))),DRAWNULL),COLORDD00DD,LINETHICK2{XG51};
IF(CURRBARSCOUNT=PT20+1,T20,DRAWNULL),CIRCLEDOT,COLORBLUE,LINETHICK1{XG51};
DRAWTEXT(CURRBARSCOUNT=N20,T20,'20'),COLORDD00DD{XG51};
N10:=10{XG51};
PT10:=CONST(HHVBARS(V,N10)){XG51};
T10:IF(CURRBARSCOUNT<=N10,CONST(IF(PT10=0,C,REF(C,PT10))),DRAWNULL),COLOR00EEEE,LINETHICK2{XG51};
IF(CURRBARSCOUNT=PT10+1,T10,DRAWNULL)CIRCLEDOT,COLORBLUE,LINETHICK1{XG51};
DRAWTEXT(CURRBARSCOUNT=N10,T10,'10'),COLOR00EEEE{XG51};
N5:=5{XG51};
PT5:=CONST(HHVBARS(V,N5)){XG51};
T5:IF(CURRBARSCOUNT<=N5,CONST(IF(PT5=0,C,REF(C,PT5))),DRAWNULL),COLORFFFFFF,LINETHICK2{XG51};
IF(CURRBARSCOUNT=PT5+1,T5,DRAWNULL),CIRCLEDOT,COLORBLUE,LINETHICK1{XG51};
DRAWTEXT(CURRBARSCOUNT=N5,T5,'5'),COLORFFFFFF{XG51};
DRAWKLINE(H,O,L,C){XG51};
VAR3:=(C+H+O+L)/4{XG51};
买入:=xma(VAR3,32)*(1-100/1000){XG51};
低吸线:买入,COLORFF937F,LINETHICK2{XG51};
卖出:=Xma(VAR3,20)*(1+80/1000){XG51};
高抛线:卖出,COLORRED,LINETHICK2{XG51};
MA1:=MA(VAR3,3){XG51};
DRAWICON(CROSS(买入,LOW),LOW*0.95,11){XG51};
DRAWICON(CROSS(HIGH,卖出),HIGH*1.02,12){XG51};
G:=5{XG51};
AAB:=REF(H,G)=HHV(H,2*G+1); AAB1:=REF(L,G)=LLV(L,2*G+1){XG51};
QYB:=BacKSET(AAB,G+1); QYB1:=BACKSET(AAB1,G+1){XG51};
CCB:=FILTER(QYB,G) AND H=HHV(H,G+1); CCB1:=FILTER(QYB1,G) AND L=LLV(L,G+1){XG51};
DDDB:=BArslAST(CCB); DDB1:=BARSLAST(CCB1){XG51};
GDTSB:=IF(CCB,CURRBARSCOUNT,0); DDTSB:=IF(CCB1,CURRBARSCOUNT,0){XG51};
DINGBUTSB:=IF(DDDB,REF(GDTSB,DDDB),GDTSB); DDTSB1:=IF(DDB1,REF(DDTSB,DDB1),DDTSB){XG51};
GDCSB1:=CONST(DINGBUTSB); DDCSB1:=CONST(DDTSB1){XG51};
GDCS13:=CONST(REF(HIGH,GDCSB1-1)); DDCS13:=CONST(REF(L,DDCSB1-1)){XG51};
DINGBUTSB1:=REF(DINGBUTSB,DDDB+1); DDTSB2:=REF(DDTSB1,DDB1+1){XG51};
GDCSB2:=CONST(DINGBUTSB1); DDCSB2:=CONST(DDTSB2){XG51};
GDCS23:=CONST(REF(HIGH,DINGBUTSB1-1)); DDCS23:=CONST(REF(L,DDTSB2-1)){XG51};
XG1:=BACKSET(ISLASTBAR,GDCSB1); XD1:=BACKSET(ISLASTBAR,DDCSB1){XG51};
XG2:=BACKSET(ISLASTBAR,DINGBUTSB1); XD2:=BACKSET(ISLASTBAR,DDTSB2){XG51};
XDD:=IF(DDCS13<=DDCS23,XD1,XD2){XG51};
M:=INTPART(3*G/5){XG51};
AAAA:=REF(H,M)=HHV(H,2*M+1){XG51};
QYY:=BACKSET(AAAA,M+1){XG51};
CCC:=FILTER(QYY,M) AND H=HHV(H,M+1){XG51};
DDDD:=BARSLAST(CCC),NODRAW{XG51};
GDTSS:=IF(CCC,CURRBARSCOUNT,0){XG51};
DINGBUTSS:=IF(DDDD,REF(GDTSS,DDDD),GDTSS){XG51};
GDCS11:=CONST(DINGBUTSS){XG51};
DINGBUTS11:=REF(DINGBUTSS,DDDD+1){XG51};
GDCS22:=CONST(DINGBUTS11){XG51};
AA11:=REF(L,M)=LLV(L,2*M+1){XG51};
QY11:=BACKSET(AA11,M+1){XG51};
CC11:=FILTER(QY11,M) AND L=LLV(L,M+1){XG51};
DD11:=BARSLAST(CC11){XG51};
DDTSS:=IF(CC11,CURRBARSCOUNT,0){XG51};
DDTS11:=IF(DD11,REF(DDTSS,DD11),DDTSS){XG51};
DDCS11:=CONST(DDTS11){XG51};
DDTS22:=REF(DDTS11,DD11+1){XG51};
DDCS22:=CONST(DDTS22){XG51};
HH1:= REF(H,GDCSB1-1),NODRAW{XG51};
HH2:= REF(H,GDCSB2-1),NODRAW{XG51};
HH11:= REF(H,GDCS11-1),NODRAW{XG51};
HH22:= REF(H,GDCS22-1),NODRAW{XG51};
GHH1:=MAX(MAX(REF(H,GDCSB1-1),REF(H,GDCSB2-1)),MAX(REF(H,GDCS11-1),REF(H,GDCS22-1))),NODRAW{XG51};
DLL1:=MIN(MIN(REF(L,DDCSB1-1),REF(L,DDCSB2-1)),MIN(REF(L,DDCS11-1),REF(L,DDCS22-1))),NODRAW{XG51};
GHH:=MAX(GHH1,HHV(H,10)){XG51};
DLL:=MIN(DLL1,LLV(L,10)){XG51};
DX1:=(REF(H,GDCSB1-1)-REF(H,GDCSB2-1))/(GDCSB2-GDCSB1),NODRAW{XG51};
DX2:=(REF(H,GDCS11-1)-REF(H,GDCS22-1))/(GDCS22-GDCS11),NODRAW{XG51};
GGAA:=DX1>0 AND (REF(H,(GDCSB1-1))+DX1*GDCSB1)>GHH*1.05,NODRAW{XG51};
GGAB:=DX1<0 AND (REF(H,(GDCSB1-1))+DX1*GDCSB1)<DLL*0.95,NODRAW{XG51};
ddx1:=IF(GGAA OR GGAB,0,1),NODRAW{XG51};
GGBA:=DX2>0 AND (REF(H,(GDCS11-1))+DX2*GDCS11)>GHH*1.05,NODRAW{XG51};
GGBB:=DX2<0 AND (REF(H,(GDCS11-1))+DX2*GDCS11)<DLL*0.95,NODRAW{XG51};
DDDX1:=IF(GGBA OR GGBB,0,1),NODRAW{XG51};
LX1:=(REF(L,DDCSB1-1)-REF(L,DDCSB2-1))/(DDCSB2-DDCSB1),NODRAW{XG51};
LX2:=(REF(L,DDCS11-1)-REF(L,DDCS22-1))/(DDCS22-DDCS11),NODRAW{XG51};
DDAA:=LX1<0 AND (REF(L,(DDCSB1-1))+LX1*DDCSB1)<DLL*0.95,NODRAW{XG51};
DDAB:=LX1>0 AND (REF(L,(DDCSB1-1))+LX1*DDCSB1)>GHH*1.05,NODRAW{XG51};
LLX1:=IF(DDAA OR DDAB,0,1){XG51};
DDBA:=LX2<0 AND (REF(L,(DDCS11-1))+LX2*DDCS11)<DLL*0.95,NODRAW{XG51};
DDBB:=LX2>0 AND (REF(L,(DDCS11-1))+LX2*DDCS11)>GHH*1.05,NODRAW{XG51};
LLLX1:=IF(DDBA OR DDBB,0,1),NODRAW{XG51};
高压力:DRAWLINE(CURRBARSCOUNT=GDCSB2,H,CURRBARSCOUNT=GDCSB1,H,DDX1),COLORABFF46,LINETHICK1{XG51};
低支撑:DRAWLINE(CURRBARSCOUNT=DDCSB2,L,CURRBARSCOUNT=DDCSB1,L,LLX1),COLORABFF46,LINETHICK1{XG51};
DRAWLINE(CURRBARSCOUNT=GDCS22 ,H,CURRBARSCOUNT=GDCS11,H,DDDX1),COLORWHITE,LINETHICK1{XG51};
DRAWLINE(CURRBARSCOUNT=DDCS22 ,L,CURRBARSCOUNT=DDCS11,L,LLLX1),COLORWHITE,LINETHICK1{XG51};
STICKLINE(C/REF(C,1)>1.095,C,O,2,0),COLORBLUE{XG51};
difF:=ema(CLOSE,12)-EMA(CLOSE,26){XG51};
DEA:=EMA(DIFF,9){XG51};
A1:=BARSLAST(REF(CROSS(DEA,DIFF),1)){XG51};
A2:=BARSLAST(REF(CROSS(DIFF,DEA),1)){XG51};
VAR1:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20{XG51};
HONGJU:=IF(VAR1>0,VAR1,0){XG51};
GaoPAO:=CROSS(DIFF,DEA) AND HONGJU>=40{XG51};
DRAWICON(GAOPAO,HIGH*1.01,6){XG51};
DRAWTEXT(GAOPAO,HIGH*1.02,'顶背'),COLORCYAN{XG51};
LLVV:=LLV(LOW,5){XG51};
DIXI:=CROSS(DEA,DIFF) AND REF(DEA,A1+1)>0 AND DEA<0{XG51};
DRAWICON(DIXI,LOW*0.90,38){XG51};
DRAWTEXT(DIXI,LOW*0.90,'波段低吸'),COLORBLUE{XG51};
MA20:=MA(CLOSE,20){XG51};
M0:=MA(CLOSE,5){XG51};
M10:=MA(CLOSE,12){XG51};
M1:=MA(CLOSE,20){XG51};
M30:=MA(CLOSE,30){XG51};
M2:=MA(CLOSE,60){XG51};
M3:=MA(CLOSE,240){XG51};
M4:=MA(CLOSE,120){XG51};
M41:=MA(CLOSE,41){XG51};
TJ2:=MA(CLOSE,3)<M2{XG51};
VAR2:=(CLOSE*2+HIGH+LOW)/4{XG51};
SK:=EMA(VAR2,13)-EMA(VAR2,73){XG51};
SD:=EMA(SK,2){XG51};
短线:=CROSS(SK,SD) AND SK<0.05 AND (vol/MA(VOL,5)>2 OR CLOSE/REF(CLOSE,1)>0.035 AND CLOSE>EMA(CLOSE,17)){XG51};
CY:=BARSLAST(短线){XG51};
macd双底:=REF(LOW,A2+1)<CLOSE AND CROSS(DIFF,DEA){XG51};
介入:=COUNT(短线,4)=1 AND COUNT(MACD双底,1)=1 AND CLOSE/MA(CLOSE,56)*1000>980 AND CLOSE>OPEN AND VOL>=MA(VOL,5) AND DIFF>=-0.1{XG51};
DRAWTEXT(介入,LOW*0.92,'起涨点'),COLORWHITE{XG51};
DRAWICON(介入,LOW*0.92,1){XG51};
反向顶背:=REF(CLOSE,A2+1)>CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF){XG51};
逃顶:=CROSS(SD,SK) AND SK>0.2 AND VOL/MA(VOL,5)<2{XG51};
逃顶成立:=COUNT(逃顶,4)=1 AND COUNT(反向顶背,1)=1{XG51};
DRAWICON(逃顶成立,HIGH*1.01,15){XG51};
DRAWTEXT(逃顶成立,HIGH*1.01,'逃顶'),COLORCYAN{XG51};
N1G:=CLOSE/REF(CLOSE,1)>=1.097 AND HIGH=CLOSE AND NOT(OPEN=HIGH){XG51};
A1G:=BARSLAST(N1G){XG51};
A2G:=LLV(LOW,A1G-1)>REF(LOW,A1G) AND CLOSE/REF(OPEN,A1G)>1 AND CLOSE/REF(OPEN,A1G)<=1.04{XG51};
XGGG:=FILTER(A2G,3) AND A1G>=4 AND A1G<=20{XG51};
DRAWICON(XGGG,LOW*0.96,41){XG51};
DRAWTEXT(XGGG,LOW*0.96,'涨停秘笈'),COLORBLUE{XG51};
XPP1:=CROSS(DEA,DIFF) AND CLOSE>MA20 AND MA20>REF(MA20,1) AND DIFF>REF(DIFF,A2+1){XG51};
DRAWICON(XPP1,LOW*0.96,3){XG51};
DRAWTEXT(XPP1,LOW*0.96,'强势洗盘'),COLORRED{XG51};
LC:=REF(CLOSE,1){XG51};
rsi:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(Abs((CLOSE - LC)),3,1)) * 100){XG51};
FF:=EMA(CLOSE,3){XG51};
MA15:=EMA(CLOSE,21){XG51};
DRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),'底背离'),COLORRED{XG51};
DRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),'顶背离'),COLORA6E500{XG51};
VAR1111:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3){XG51};
VAR2222:=CROSS(VAR1111,0.9){XG51};
VAR3333:=BACKSET(REF(LOW,2)=LLV(LOW,5),3){XG51};
VAR4444:=CROSS(VAR3333,0.9){XG51};
压力:= REF(HIGH,BARSLAST(VAR2222)){XG51};
STICKLINE(CLOSE,REF(HIGH,BARSLAST(VAR2222)),REF(HIGH,BARSLAST(VAR2222)),0.5,1),COLOREA91B5,LINETHICK3{XG51};
支撑3:= REF(LOW,BARSLAST(VAR4444)){XG51};
STICKLINE(CLOSE,REF(LOW,BARSLAST(VAR4444)),REF(LOW,BARSLAST(VAR4444)),0.5,1),COLOR00B4FF,LINETHICK3{XG51};
PH:=TROUGHBARS(2,5,1){XG51};
LL:=HHV(H,PH){XG51};
TJ1:=LL=HIGH AND LL<REF(LL,1){XG51};
支撑:IF(BARSLAST(TJ1),
REF(LOW,BARSLAST(TJ1)),DRAWNULL),COLORFF55BB{XG51};
DRAWTEXT(ISLASTBAR,支撑,'支撑'),COLORFF55BB{XG51};
多:=EMA(C,3){XG51};
空:=EMA(C,5){XG51};
均衡:=EMA(空,5){XG51};
VARF1:=COUNT(CROSS(多,均衡),2)=1{XG51};
VARF2:=COUNT(CROSS(空,均衡),2)=1{XG51};
ZAI:=FILTER(VARF1 AND VARF2,2){XG51};
DRAWTEXT(ZAI,均衡,'主升&uarr;'),COLORBLUE{X_G*5!1_C_N_{};