老师 麻烦修改一下错误 (文华财经WH6赢顺V6.7)

投资者咨询:老师 麻烦修改一下错误 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-8-21 14:50
 

DIF1:=EMA(CLOSE,12) - EMA(CLOSE,26);

DEA1:=EMA(DIF1,9);

MACD1:=2*(DIF1-DEA1),STICK;

MACD2:=EMA(MACD1,3);

STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,3.2,0),COLOR000055;

STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,2.7,0),COLOR000077;

STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,2.1,0),COLOR000099;

STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,1.5,0),COLOR0000BB;

STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,0.9,0),COLOR0000DD;

STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,0.3,0),COLOR0000FF;

STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,3.2,0),COLOR555555;

STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,2.7,0),COLOR777777;

STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,2.1,0),COLOR999999;

STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,1.5,0),COLORBBBBBB;

STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,0.9,0),COLORDDDDDD;

STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,0.3,0),COLORFFFFFF;

STICKLINE(MACD1<MACD2,0,MACD1,3.2,0),COLORB20000;

STICKLINE(MACD1<MACD2,0,MACD1,2.7,0),COLOREC0000;

STICKLINE(MACD1<MACD2,0,MACD1,2.1,0),COLORFF4600;

STICKLINE(MACD1<MACD2,0,MACD1,1.5,0),COLORFF6300;

STICKLINE(MACD1<MACD2,0,MACD1,0.9,0),COLORFF8B00;

STICKLINE(MACD1<MACD2,0,MACD1,0.3,0),COLORFFAB00;

STICKLINE(MACD1>=0 OR MACD1<=0,0,0,50,1),COLORWHITE;

DIF:DIF1,COLOR33FF33,LINETHICK1;

DEA:DEA1,COLORYELLOW,LINETHICK1;

MACD:MACD1,NODRAW,COLORMAGENTA;

VAR1:=HHV(DEA,53);

VAR2:=LLV(DEA,55);

VAR3:=DEA-(DIF-DEA);

UP:IF(DIF>VAR1 AND DEA=VAR1,MAX(LLV(VAR1,10),VAR3),VAR1),COLORBB0000,LINETHICK2;

DN:IF(DIF<VAR2 AND DEA=VAR2,MIN(HHV(VAR2,10),VAR3),VAR2),COLORAA00AA,LINETHICK2;

DIF,COLORGREEN;

DEA,COLORGREEN;

零上金叉买:0,COLORBLUE,CROSSDOT,LINETHICK1;

IF(DIF>DEA,DIF,DRAWNULL),COLORRED,LINETHICK1;

IF(DEA>REF(DEA,1),DEA,DRAWNULL),COLORMAGENTA;

DRAWICON(CROSS(DIF,DEA),DEA,1);

DRAWICON(CROSS(DEA,DIF),DEA,2);

LOWV:=LLV(LOW,3);

HIGHV:=HHV(HIGH,3);

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

K:=SMA(RSV,3,1);

D:=SMA(K,3,1);

J:=3*K-2*D;

STICKLINE(MACD<REF(MACD,1)AND CROSS(K,J),0,MACD,2,0),COLORGREEN;

STICKLINE(MACD>REF(MACD,1)AND CROSS(J,K),0,MACD,2,0),COLORRED;

M1 := EMA( CLOSE, 9 );

M2 := EMA( CLOSE, 18 );

MD :  M1 - M2, COLORWHITE, LINETHICK2;

MM := EMA( MD, 3 );

吸 : IF( MD >= MM AND MD <  0, MD, DRAWNULL ), COLORLIRED, LINETHICK2;

拉 : IF( MD >= MM AND MD >= 0, MD, DRAWNULL ), COLORRED,   LINETHICK2;

派 : IF( MD <  MM AND MD >= 0, MD, DRAWNULL ), COLORGREEN, LINETHICK2;

落 : IF( MD <  MM AND MD <  0, MD, DRAWNULL ), COLORWHITE, LINETHICK2;

技术人员回复
日期:2018-8-21 14:56
参考:


 
DIF1:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA1:=EMA(DIF1,9);
MACD1:=2*(DIF1-DEA1),STICK;
MACD2:=EMA(MACD1,3);
STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,3.2,0),COLOR000055;
STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,2.7,0),COLOR000077;
STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,2.1,0),COLOR000099;
STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,1.5,0),COLOR0000BB;
STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,0.9,0),COLOR0000DD;
STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,0.3,0),COLOR0000FF;
STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,3.2,0),COLOR555555;
STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,2.7,0),COLOR777777;
STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,2.1,0),COLOR999999;
STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,1.5,0),COLORBBBBBB;
STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,0.9,0),COLORDDDDDD;
STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,0.3,0),COLORFFFFFF;
STICKLINE(MACD1<MACD2,0,MACD1,3.2,0),COLORB20000;
STICKLINE(MACD1<MACD2,0,MACD1,2.7,0),COLOREC0000;
STICKLINE(MACD1<MACD2,0,MACD1,2.1,0),COLORFF4600;
STICKLINE(MACD1<MACD2,0,MACD1,1.5,0),COLORFF6300;
STICKLINE(MACD1<MACD2,0,MACD1,0.9,0),COLORFF8B00;
STICKLINE(MACD1<MACD2,0,MACD1,0.3,0),COLORFFAB00;
STICKLINE(MACD1>=0 OR MACD1<=0,0,0,50,1),COLORWHITE;
DIF:DIF1,COLOR33FF33,LINETHICK1;
DEA:DEA1,COLORYELLOW,LINETHICK1;
MACD:MACD1,NODRAW,COLORMAGENTA;
VAR1:=HHV(DEA,53);
VAR2:=LLV(DEA,55);
VAR3:=DEA-(DIF-DEA);
UP:IF(DIF>VAR1 AND DEA=VAR1,MAX(LLV(VAR1,10),VAR3),VAR1),COLORBB0000,LINETHICK2;
DN:IF(DIF<VAR2 AND DEA=VAR2,MIN(HHV(VAR2,10),VAR3),VAR2),COLORAA00AA,LINETHICK2;
DIF,COLORGREEN;
DEA,COLORGREEN;
零上金叉买:0,COLORBLUE,CROSSDOT,LINETHICK1;
IF(DIF>DEA,DIF,NULL),COLORRED,LINETHICK1;
IF(DEA>REF(DEA,1),DEA,NULL),COLORMAGENTA;
DRAWICON(CROSS(DIF,DEA),DEA,1);
DRAWICON(CROSS(DEA,DIF),DEA,2);
LOWV:=LLV(LOW,3);
HIGHV:=HHV(HIGH,3);
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
STICKLINE1(MACD1<REF(MACD1,1) AND CROSS(K,J),0,MACD,2,0),COLORGREEN;
STICKLINE1(MACD1>REF(MACD1,1) AND CROSS(J,K),0,MACD,2,0),COLORRED;
M1 := EMA( CLOSE, 9 );
M2 := EMA( CLOSE, 18 );
MD :  M1 - M2, COLORWHITE, LINETHICK2;
MM := EMA( MD, 3 );
吸 : IF( MD >= MM AND MD <  0, MD, NULL ), COLORRED, LINETHICK2;
拉 : IF( MD >= MM AND MD >= 0, MD, NULL ), COLORRED,   LINETHICK2;
派 : IF( MD <  MM AND MD >= 0, MD, NULL ), COLORGREEN, LINETHICK2;
落 : IF( MD <  MM AND MD <  0, MD, NULL ), COLORWHITE, LINETHICK2;