[通达信指标]智慧趋势线 自动画线公式

{友情提示：该指标含有未来函数}

HHHZ1:=CONST(REF(HHV(H,150),3));

LLLZ1:=CONST(REF(LLV(L,150),3));

NN:=100;

N:=9;

LC:=REF(C,1);

QC:=REF(C,2);

AA:=REF(H,N)=HHV(H,2*N+1);

AA1:=REF(L,N)=LLV(L,2*N+1);

QY:=BACKSET(AA,N+1);

QY1:=BACKSET(AA1,N+1);

CC:=FILTER(QY,N) AND H=HHV(H,N+1);

CC1:=FILTER(QY1,N) AND L=LLV(L,N+1);

DDD:=BARSLAST(CC); 

DD1:=BARSLAST(CC1);

GDTS:=IF(CC,CURRBARSCOUNT,0);

DDTS:=IF(CC1,CURRBARSCOUNT,0);

UTS:=IF(DDD,REF(GDTS,DDD),GDTS);

DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);

GDCS1:=CONST(UTS);

DDCS1:=CONST(DDTS1);

GDCS13:=CONST(REF(H,GDCS1-1));

DDCS13:=CONST(REF(L,DDCS1-1));

SS1:=REF(UTS,DDD+1);

TS2:=REF(DDTS1,DD1+1);

GDCS2:=CONST(SS1);

DDCS2:=CONST(TS2);

M:=INTPART(3*N/5);

AAA:=REF(H,M)=HHV(H,2*M+1);

QYY:=BACKSET(AAA,M+1);

CCC:=FILTER(QYY,M) AND H=HHV(H,M+1);

DDDD:=BARSLAST(CCC),NODRAW;

GDTSS:=IF(CCC,CURRBARSCOUNT,0);

TSS:=IF(DDDD,REF(GDTSS,DDDD),GDTSS);

GDCS11:=CONST(TSS);

TS11:=REF(TSS,DDDD+1);

GDCS22:=CONST(TS11);

AA11:=REF(L,M)=LLV(L,2*M+1);

QY11:=BACKSET(AA11,M+1);

CC11:=FILTER(QY11,M) AND L=LLV(L,M+1);

DD11:=BARSLAST(CC11);

DDTSS:=IF(CC11,CURRBARSCOUNT,0);

DDTS11:=IF(DD11,REF(DDTSS,DD11),DDTSS);

DDCS11:=CONST(DDTS11);

DDTS22:=REF(DDTS11,DD11+1);

DDCS22:=CONST(DDTS22);

ZGD:=HHV(H,60)*1.01.00;

ZGD2:=CONST(ZGD);

TDY1:=DRAWLINE(CURRBARSCOUNT=GDCS22,H,CURRBARSCOUNT=GDCS11,H,1),COLORRED,LINETHICK1;

TDY2:=DRAWLINE(CURRBARSCOUNT=DDCS22,L,CURRBARSCOUNT=DDCS11,L,1) COLORRED,LINETHICK1;

TDY3:=DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1) ,COLORBLUE,LINETHICK1;

TDY4:=DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1),COLORBLUE,LINETHICK1;

TDY5:=CONST(HHV(H,NN));

TDY6:=CONST(LLV(L,NN));

TDY7:=(C-MA(C,34))/MA(C,34)*100<-14,COLORBBBBBB,NODRAW;

JH:=SMA(MAX(C-REF(C,1),0),6,1)/SMA(ABS(C-REF(C,1)),6,1)*100;

SZ:=FILTER(CROSS(JH,35),13);

SX:=FILTER(CROSS(JH,30),7);

SQ:=FILTER(CROSS(71,JH),74);

SD:=FILTER(CROSS(80,JH),74);

CCL:=REF(HHV(C,120),1);

DD:=REF(LLV(C,120),1);

WW:=100*(C-DD)/(CCL-DD);

EE:=AMOUNT;

FF:=(EMA(EE,5)/REF(EMA(EE,5),5));

TDY8:=IF(CAPITAL<1,SZ,SX),COLOR22FFFF,NODRAW;

TDY9:=FILTER(O<REF(L,1) AND C>O AND V>REF(V,1),13),COLORFF88FF,NODRAW;

TDY10:=FILTER((FF>=2 AND WW<35 AND BARSCOUNT(C)>30 OR (FF>=2 AND WW<100) AND BARSCOUNT(C)<50),90),COLOR0000AA,NODRAW;

TDY11:=IF(CAPITAL<1,SQ,SD),COLOR00CC00,NODRAW;

TDY12:=C>REF(C,1),COLOR0099FF,NODRAW;

TDY13:=C<REF(C,1),COLORFFAA00,NODRAW;

TDY14:=C=REF(C,1),COLOR999999,NODRAW;

STICKLINE(TDY12,H,L,0,0),COLOR0099FF;

STICKLINE(TDY12,C,O,1.5,0),COLOR0099FF;

STICKLINE(TDY13,H,L,0,0),COLORFF9900;

STICKLINE(TDY13,C,O,1.5,0),COLORFF9900;

STICKLINE(TDY14,H,L,0,0),COLOR999999;

STICKLINE(TDY14,C,O,1.5,0),COLOR999999;

STICKLINE(TDY10,H,L,0,0),COLOR0000CC;

STICKLINE(TDY10,C,O,1.5,0),COLOR0000CC;

STICKLINE(TDY9,H,L,0,0), COLORFF88FF;

STICKLINE(TDY9,C,O,1.5,0),COLORFF88FF;

STICKLINE(TDY8,H,L,0,0),COLOR22FFFF;

STICKLINE(TDY8,C,O,1.5,0),COLOR22FFFF;

STICKLINE(TDY11,H,L,0,0),COLOR00CC00;

STICKLINE(TDY11,C,O,1.5,0),COLOR00CC00;

QUSHIX:=3*SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,5,1)-2*SMA(SMA((C-LLV(L,27))/

(HHV(H,27)-LLV(L,27))*100,5,1),3,1),COLORBCBC00,NODRAW;

ZZ:=QUSHIX>REF(QUSHIX,1);

QWX1:=HHV(C,30);

QWX2:=LLV(C,30);

QWX3:=CONST((QWX1+QWX2)/2);

QWX4:=ABS((2*C+H+L)/4-MA(C,20))/MA(C,20);

QWX5:=CONST((1-7/100)*(DMA(C,QWX4)));

QWX6:=CONST((1+7/100)*(DMA(C,QWX4)));

IF(BARSLAST(CURRBARSCOUNT=12),QWX6,DRAWNULL),COLORFF9D3C,LINETHICK1,CIRCLEDOT;

IF(BARSLAST(CURRBARSCOUNT=12),QWX5,DRAWNULL),COLORFF00FF,LINETHICK1,CIRCLEDOT;

RSI5:=(SMA(MAX((C-LC),0),5,1)/SMA(ABS((C-LC)),5,1))*100;

TR1:=SUM(MAX(MAX((H-L),ABS(H-REF(C,1))),ABS(L-REF(C,1))),10);

HD:=H-REF(H,1);

LD:=REF(L,1)-L;

DMP:=SUM(IF((HD>0 AND HD>LD),HD,0),10);

DMM:=SUM(IF((LD>0 AND LD>HD),LD,0),10);

PDI:=DMP*100/TR1;

MDI:=DMM*100/TR1;

ADX:=MA((ABS((MDI-PDI)/(MDI+PDI))*100),5);

AV:=RSI5+ADX;

DXR:=(ADX+REF(ADX,5)/2)+RSI5;

WR10:=(100*(HHV(H,10)-C))/(HHV(H,10)-LLV(L,10));

NEWVOL:=RSI5-WR10;

DDF1:=AV+NEWVOL;

J:=”KDJ.J”;

X:=LLV(J,2)=LLV(J,8);

DDF2:=(CROSS(J,3));

DDF3:=CROSS(DDF1,0);

RSIA:=(SMA(MAX(C-LC,0),6,1)/SMA(ABS(C-LC),6,1)*100)/100;

WR:=-100*(HHV(H,14)-C)/(HHV(H,14)-LLV(L,14));

DDF4:=((0-WR)-100)/100,;

DDF5:=1-(DDF4/RSI);

DDF6:=MA(DDF5,2);

DDF7:=MA(DDF5,4);

DDF8:=DDF5>MA(DDF5,3)*1.3;

DDF9:=REF(DDF5,1)<REF(DDF5,2) AND DDF5>REF(DDF5,1) AND REF(DDF5,1)<1.06;

SS:=COUNT(DDF9,4)>0 OR COUNT(DDF8,4)>0;

DDF10:=CROSS(DDF6,DDF7) AND SS,COLOR0088FF;

CYC13:=0.01*EXPMA(AMOUNT,13)/EXPMA(V,13);

CYS:=(C-CYC13)/CYC13*100;

DDF11:=IF(“ZXNH.ZXNH”=1 AND CYS<=-2,0.6,0);

DDF12:=DDF10&&DDF11;

DDF13:=(HHV(H,21)-C)/(HHV(H,21)-LLV(L,21))*100-10;

DDF14:=(C-LLV(L,21))/(HHV(H,21)-LLV(L,21))*100;

DDF15:=SMA(DDF14,13,8);

DDF16:=CEILING(SMA(DDF15,13,8));

DDF17:=SMA(DDF13,21,8);

DDF18:=DDF16-DDF17,COLORFFFFFF;

RC1:=REF((L+O+C+H)/4,1);

RC2:=SMA(ABS(L-RC1),13,1)/SMA(MAX(LOW-RC1,0),10,1);

RC3:=EMA(RC2,10);

RC4:=LLV(L,33);

RC5:=EMA(IF(L<=RC4,RC3,0),3),;

DDF19:=IF(RC5>REF(RC5,1),RC5,0);

DDF20:=IF(RC5<REF(RC5,1),RC5,0),;

DDF21:=FILTER(REF(DDF18,1)<-70 AND DDF18>REF(DDF18,1) AND (DDF19 OR DDF20),3);

X3:=(2*C+L+H)/4;

DDF22:=EMA(X3,55)*0.84,;

DDF23:=(C-MA(C,5))/MA(C,5)*100,NODRAW;

DDF24:=FILTER(L<DDF22 AND REF(DDF23,1)<-5 AND DDF23>REF(DDF23,1),3);

DDF25:=7*SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*30,4,1)

-3*SMA(SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*30,4,1),3,1)

-SMA(SMA(SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*30,4,1),3,1),2,1);

DDF26:=78.89;

DDF27:=CROSS(DDF26,DDF25);

DDF28:=CROSS(DDF25,5);

ZF:=((C-REF(C,1))/REF(C,1))*100;

HSL:=(V/CAPITAL)*100;

KK:=ZF/HSL,COLOR6000FF;

KK5:=MA(KK,5),COLORFFAA00;

LL:=LLV(KK,34);

DDF29:=CROSS(KK,KK5)&&REF(KK,1)<=LL&&ZZ,;

DDF30:=(REF(EVERY(C<O,2),1) AND C>O);

VAR1N:=MA(C,5),;

VAR2N:=MA(C,10);

VAR3N:=(VAR1N-C)/C>3/100;

VAR4N:=(VAR2N-VAR1N)/VAR1N>0.03;

VAR5N:=LLV(C,30)=LLV(C,120);

DDF31:=VAR3N AND VAR4N AND VAR5N;

DDF32:=BARSLAST(DDF31)<=2 AND DDF30,COLORFF8800,NODRAW;

A:=REF(C,1);

RSIK:=SMA(MAX(C-A,0),6,1)/SMA(ABS(C-A),6,1)*100;

A4:=RSIA<20;

ZZF:=(C/REF(C,1)-1)*100;

DDF33:=IF(BETWEEN(A4,0,5) AND L<=REF(C,A4)AND ZZF<=-5 ,20,0),COLORFF0000,LINETHICK2;

CD:= C>=O AND REF(DDF33 ,1)=20 AND REF(RSI,1)<20 ;

DDF34:=C>O AND REF(DDF33 ,1)=20 AND REF(RSI,1)<20;

IF(DDF34,L*1.005,DRAWNULL)COLOR55FF55,CIRCLEDOT,LINETHICK5;

IF(DDF3,L*0.995,DRAWNULL)COLORFF88FF,CIRCLEDOT,LINETHICK4;

IF(DDF21,L*0.99,DRAWNULL)COLORFFFF00,CIRCLEDOT,LINETHICK4;

IF(DDF12,L*0.985,DRAWNULL)COLOR0088FF,CIRCLEDOT,LINETHICK4;

IF(DDF24,L*0.98,DRAWNULL)COLORFFFFFF,CIRCLEDOT,LINETHICK4;

IF(DDF29,L*0.975,DRAWNULL)COLOR0000FF,CIRCLEDOT,LINETHICK4;

IF(DDF28,L*0.97,DRAWNULL)COLOR00FFFF,CIRCLEDOT,LINETHICK4;

IF(DDF32,L*0.965,DRAWNULL)COLORFF00FF,CIRCLEDOT,LINETHICK4;

B01:=IF(DDF3,1,0);

B02:=IF(DDF21,1,0);

B03:=IF(DDF12,1,0);

B04:=IF(DDF24,1,0);

B05:=IF(DDF29,1,0);

B06:=IF(DDF28,1,0);

B07:=IF(DDF32,1,0);

B08:=IF(DDF34,1,0);

DDF35:=B01+B02+B03+B04+B05+B06+B07+B08,COLOR00FFFF,NODRAW;

DRAWICON(DDF35>=4,H*1.008,34);

DDF36:EMA(C,13),COLOR32E01F,LINETHICK3;

DDF37:IF(DDF36>REF(DDF36,1),DDF36,DRAWNULL),COLOR460CF3,LINETHICK3;

IF(BETWEEN(TDY1,TDY5,TDY6),TDY1,DRAWNULL),COLOR00CCFF,LINETHICK1;

IF(BETWEEN(TDY2,TDY5,TDY6),TDY2,DRAWNULL),COLOR00CCFF,LINETHICK1;

IF(BETWEEN(TDY3,TDY5,TDY6),TDY3,DRAWNULL),COLORCCCCCC,LINETHICK1;

IF(BETWEEN(TDY4,TDY5,TDY6),TDY4,DRAWNULL),COLORCCCCCC,LINETHICK1;

DDF38:=(MA(C,3)+MA(C,6)+MA(C,12)+MA(C,24))/4,COLORFFFFFF;

VAR326:=IF(C AND MA(VOL,5)/240 AND C>LC*1.0 AND C,88,0);

VAR327:=IF(C/LC>1.050 AND VOL/CAPITAL*100<10 AND C<17 AND H/C<1.010 AND VAR326>0, 91, 0);

DRAWTEXT(VAR327>90,L*0.993,’↖杀庄’),COLOR00FFFF;

RSI:=(SMA(MAX((C-LC),0),3,1)/SMA(ABS((C-LC)),3,1))*100;

FFF:=EMA(C,3);

MA15:=EMA(C,21);

DDF39:=CROSS(88,RSI);

DRAWTEXT(CROSS(FFF,MA15),L,’←底背’),COLORFF88FF;

CCI:=”CCI”;

CCI3:=MA(CCI,3);

CCI7:=MA(CCI,7);

DDF40:=CROSS(CCI3,CCI) AND (CCI>130);

STICKLINE(DDF40,H*1.005,H*1.01,4,0),COLOR00CC00;

STICKLINE(DDF27,H*1.01,H*1.015,4,0),COLORFFFFFF;

DDF41:=(DDF40 AND DDF39),COLOR0000FF;

STICKLINE(DDF41,H*1.016,H*1.025,4,0),COLOR0000FF;

DRAWTEXT(DDF41,H*1.028,’空仓’),COLORFFFFFF;

DRAWICON(DDF39,H*1.016,8);

DRAWTEXT(DDF39,H*1.02,’←顶背’),COLOR98FF75;