[通达信画线指标]CDP支撑压力线 免费源码分享

NN:=BARSLAST(HOUR<REF(HOUR,1) )+1;

H1:=IF(PERIOD>=5,REF(H,1),REF(HHV(HIGH,NN),NN));

L1:=IF(PERIOD>=5,REF(L,1),REF(LLV(LOW,NN),NN));

C1:=IF(PERIOD>=5,REF(C,1),VALUEWHEN(HOUR<REF(HOUR,1),REF(C,1)));

PIVOT:=(H1+L1+C1)/3; 

R1:=2*PIVOT-L1; 

S1:=2*PIVOT-H1; 

R2:=PIVOT+(R1-S1); 

S2:=PIVOT-(R1-S1); 

R3:=H1+2*(PIVOT-L1); 

S3:=L1-2*(H1-PIVOT); 

HR1:REFDATE(R1,DATE),COLORGREEN,DOTLINE;

HR2:REFDATE(R2,DATE),COLORGREEN,DOTLINE;

HR3:REFDATE(R3,DATE),COLORGREEN,DOTLINE;

ZPIVOT:REFDATE(PIVOT,DATE),COLORYELLOW,DOTLINE;

LS1:REFDATE(S1,DATE),COLORRED,DOTLINE;

LS2:REFDATE(S2,DATE),COLORRED,DOTLINE;

LS3:REFDATE(S3,DATE),COLORRED,DOTLINE;

TT4:=(CURRBARSCOUNT=34);

DRAWTEXT(TT4 AND HR1,HR1,’—压力1—‘),COLORGREEN;

DRAWTEXT(TT4 AND HR2,HR2,’—压力2—‘),COLORGREEN;

DRAWTEXT(TT4 AND HR3,HR3,’—压力3—‘),COLORGREEN;

DRAWTEXT(TT4 AND ZPIVOT,ZPIVOT,’—多空线—‘),COLORYELLOW;

DRAWTEXT(TT4 AND LS1,LS1,’—支撑1—‘),COLORRED;

DRAWTEXT(TT4 AND LS2,LS2,’—支撑2—‘),COLORRED;

DRAWTEXT(TT4 AND LS3,LS3,’—支撑3—‘),COLORRED;

{更多内容关注公共号：量化爱好者之家 }

DRAWTEXT(CURRBARSCOUNT=1,HR1,CON2STR(HR1,2)),COLORGREEN;

DRAWTEXT(CURRBARSCOUNT=1,HR2,CON2STR(HR2,2)),COLORGREEN;

DRAWTEXT(CURRBARSCOUNT=1,HR3,CON2STR(HR3,2)),COLORGREEN;

DRAWTEXT(CURRBARSCOUNT=1,ZPIVOT,CON2STR(ZPIVOT,2)),COLORYELLOW;

DRAWTEXT(CURRBARSCOUNT=1,LS1,CON2STR(LS1,2)),COLORRED;

DRAWTEXT(CURRBARSCOUNT=1,LS2,CON2STR(LS2,2)),COLORRED;

DRAWTEXT(CURRBARSCOUNT=1,LS3,CON2STR(LS3,2)),COLORRED;