文章
文章用户商铺文档快讯有问必答话题

指标共振变色编写 (文华财经)

投资者咨询：指标共振变色编写 (文华财经)
来源:文华财经  日期:2020-11-13 14:06
 老师好   以指标1为主线，把指标2加入指标1中，用指标2辅助限制指标1单独变色，
            当指标1红色并且指标2红色时指标1显示红色。当指标1绿色并且指标2绿色时指标1显示绿色，
            指标1指标2不同色时，指标1延续前面共震颜色不变。


指标1/
//N:=57;
//M:=0;
//CL:=1;
//HI:=0;
//K1:=30;
//K2:=50;
S:=IFELSE(CL,CLOSE,IFELSE(HI,HIGH,LOW)),LINETHICK3;
Z:=IFELSE(M,ZIGZAG(S,N,M),ZIGZAG(S,N,M)),LINETHICK3;
P:=PEAK(S,N,1,M);
PB:=PEAKBARS(S,N,1,M);
T:=TROUGH(S,N,1,M);
TB:=TROUGHBARS(S,N,1,M);
CHA:=IFELSE(PB<TB,P-IFELSE(PB,LLV(S,PB),P),IFELSE(TB,HHV(S,TB),T)-T);
N1:=IFELSE(M&&PB<TB,100*CHA/P,IFELSE(M&&PB>TB,100*CHA/T,CHA));
TPTJ:=(CROSS(N1,N)&&PB<TB)||(PB>TB&&TB=0&&NOT(ISLASTBAR)&&BARSLAST(CROSS(N1,N)&&PB<TB)>PB);
TTTJ:=(CROSS(N1,N)&&PB>TB)||(PB<TB&&PB=0&&NOT(ISLASTBAR)&&BARSLAST(CROSS(N1,N)&&PB>TB)>TB);
FILLRGN1(Z>=REF(Z,1),K1,K2),COLORMAGENTA;
FILLRGN1(Z<REF(Z,1),K1,K2),COLORGREEN;
DRAWTEXT(REFX(ISLASTBAR,6),(K1+K2)/2,'长距高低修正前后缺失1分ok'),COLORBLACK,VALIGN1,FONTSIZE15;
REFLINE:0,100;

指标2/
MA1:=MA(OPEN,1);
MA2:=MA(CLOSE,1);
C1:=BARSLAST(CROSS(MA1>REF(MA1,1)&&MA2>REF(MA2,1),0.5));
C2:=BARSLAST(CROSS(MA1<REF(MA1,1)&&MA2<REF(MA2,1),0.5));
DRAWCOLORLINE(C1<C2,(MA1+MA2)/2,COLORMAGENTA,COLORGREEN);

 
技术人员回复
日期:2020-11-13 14:08
参考：

//指标1/
N:=57;
M:=0;
CL:=1;
HI:=0;
K1:=30;
K2:=50;
S:=IFELSE(CL,CLOSE,IFELSE(HI,HIGH,LOW)),LINETHICK3;
Z:=IFELSE(M,ZIGZAG(S,N,M),ZIGZAG(S,N,M)),LINETHICK3;
P:=PEAK(S,N,1,M);
PB:=PEAKBARS(S,N,1,M);
T:=TROUGH(S,N,1,M);
TB:=TROUGHBARS(S,N,1,M);
CHA:=IFELSE(PB<TB,P-IFELSE(PB,LLV(S,PB),P),IFELSE(TB,HHV(S,TB),T)-T);
N1:=IFELSE(M&&PB<TB,100*CHA/P,IFELSE(M&&PB>TB,100*CHA/T,CHA));
TPTJ:=(CROSS(N1,N)&&PB<TB)||(PB>TB&&TB=0&&NOT(ISLASTBAR)&&BARSLAST(CROSS(N1,N)&&PB<TB)>PB);
TTTJ:=(CROSS(N1,N)&&PB>TB)||(PB<TB&&PB=0&&NOT(ISLASTBAR)&&BARSLAST(CROSS(N1,N)&&PB>TB)>TB);

MA1:=MA(OPEN,1);
MA2:=MA(CLOSE,1);
C1:=BARSLAST(CROSS(MA1>REF(MA1,1)&&MA2>REF(MA2,1),0.5));
C2:=BARSLAST(CROSS(MA1<REF(MA1,1)&&MA2<REF(MA2,1),0.5));

FILLRGN1(BARSLAST(C1<C2&&Z>=REF(Z,1))<BARSLAST(Z<REF(Z,1)&&C1>=C2),K1,K2),COLORMAGENTA;
FILLRGN1(BARSLAST(C1<C2&&Z>=REF(Z,1))>BARSLAST(Z<REF(Z,1)&&C1>=C2),K1,K2),COLORGREEN;






DRAWTEXT(REFX(ISLASTBAR,6),(K1+K2)/2,'长距高低修正前后缺失1分OK'),COLORBLACK,VALIGN1,FONTSIZE15;
REFLINE:0,100;