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

[求助]请老师帮助 (文华财经WH6赢顺V6.7)

投资者咨询：[求助]请老师帮助 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2019-5-9 20:40
 老师好   请把第2个指标代入第一个指标，依据同向同色共振，编为新的变色指标。
              要求同向同色共振向上显红色，同向同色共振向下显绿色，
              不同向不同色共振保持左侧颜色不变。
1/  
N1:=5;
A:=SETTLE;
T:500,DOT,COLORWHITE;
B:0,DOT,COLORWHITE;
MK:10,DOT,COLORWHITE;
X:REFX1(BARSLAST(A>REF(A,N1))<BARSLAST(A<REF(A,N1)),1),NODRAW; 
Y:REFX1(BARSLAST(A>REF(A,N1))>BARSLAST(A<REF(A,N1)),N1),NODRAW;
Y1:REFX1(BACKSET(X&&REF(Y,N1),2),N1),NODRAW;
X1:REFX1(BACKSET(Y&&REF(X,N1),2),N1),NODRAW;
FILLRGN1(Y,B,MK),COLORGREEN;
FILLRGN1(X||Y1,B,MK),COLORRED;
FILLRGN1((Y||X1)&&NOT(Y1),B,MK),COLORGREEN;
FILLRGN1(NOT((Y||X1)&&NOT(Y1)),B,MK),COLORRED;

2/   
AA:=FORCAST(REF(CLOSE,0.5),10);
DRAWCOLORLINE(AA>=REF(AA,1),AA,COLORRED,COLORGREEN),LINETHICK7;

技术人员回复
日期:2019-5-9 20:49
参考：

AA:=FORCAST(REF(CLOSE,0.5),10);
//DRAWCOLORLINE(AA>=REF(AA,1),AA,COLORRED,COLORGREEN),LINETHICK7;

N1:=5;
A:=SETTLE;
T:=500,DOT,COLORWHITE;
B:0,DOT,COLORWHITE;
MK:10,DOT,COLORWHITE;
X:REFX1(BARSLAST(A>REF(A,N1))<BARSLAST(A<REF(A,N1)),1),NODRAW; 
Y:REFX1(BARSLAST(A>REF(A,N1))>BARSLAST(A<REF(A,N1)),N1),NODRAW;
Y1:REFX1(BACKSET(X&&REF(Y,N1),2),N1),NODRAW;
X1:REFX1(BACKSET(Y&&REF(X,N1),2),N1),NODRAW;
NN1:=BARSLAST(Y)+1;
NN2:=BARSLAST(X||Y1)+1;
M1:=BARSLAST(CROSS(AA>=REF(AA,1)&&NN1>NN2,0.5))+1;
M2:=BARSLAST(CROSS(AA<REF(AA,1)&&NN1<NN2,0.5))+1;

FILLRGN1(M1>M2,B,MK),COLORGREEN;
FILLRGN1(M1<M2,B,MK),COLORRED;

投资者咨询：[求助]请老师帮助 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2019-5-9 20:40
 谢谢老师    请看截图，
       上图A是新编指标。中图是原指标1，,下图是原指标2，
       根据同向同色共振  B图  C图 变色不对，请修正。


图片点击可在新窗口打开查看
技术人员回复
日期:2019-5-10 10:25
参考：

N1:=5;
A:=SETTLE;
T:=500,DOT,COLORWHITE;
B:=0,DOT,COLORWHITE;
MK:=10,DOT,COLORWHITE;
AA:=FORCAST(REF(CLOSE,0.5),10);
X:REFX1(BARSLAST(A>REF(A,N1))<BARSLAST(A<REF(A,N1)),1),NODRAW; 
Y:REFX1(BARSLAST(A>REF(A,N1))>BARSLAST(A<REF(A,N1)),N1),NODRAW;
Y1:REFX1(BACKSET(X&&REF(Y,N1),2),N1),NODRAW;
X1:REFX1(BACKSET(Y&&REF(X,N1),2),N1),NODRAW;
U1:=(Y||X1)&&NOT(Y1)&&AA<REF(AA,1);
U2:=NOT((Y||X1)&&NOT(Y1))&&AA>=REF(AA,1);
FILLRGN1(BARSLAST(U1)<BARSLAST(U2),B,MK),COLORGREEN;
FILLRGN1(BARSLAST(U1)>BARSLAST(U2),B,MK),COLORRED;