求老师帮改成文华的指标 (文华财经WH6赢顺V6.7)

投资者咨询:求老师帮改成文华的指标 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-8-13 11:06
  DIFF:(EMA(CLOSE,10) - EMA(CLOSE,30))*20,COLORWHITE,LINETHICK1;
DEA:EMA(DIFF,9),COLORYELLOW,LINETHICK2;
MACD:2*(DIFF-DEA), COLORSTICK;
MACD1:2*(DIFF-DEA),COLORFFFFFF,LINETHICK1;
MACD2:SMA(MACD1,0,3),COLORFFFF00,LINETHICK0;
STICKLINE(MACD1>MACD2 AND MACD1>0,0,MACD1,2,0),COLORRED;
STICKLINE(MACD1>MACD2 AND MACD1<0,0,MACD1,2,0),COLORGREEN;
STICKLINE(MACD1<MACD2,0,MACD1,1,0),COLOR40FF00;
S1:=MACD<0;
S2:=(MACD>=0);
S3:=BARSLAST(CROSS(DIFF,DEA));
S4:=REF(S3,S3+1);
S5:=DEA>REF(DEA,S4);
S6:=DEA;
上成立:=CROSS(DIFF,DEA) AND S5;
下成立:=CROSS(DIFF,DEA) AND S6;
L1:=(EMA(CLOSE,3) - EMA(CLOSE,13));
L2:=EMA(L1,9);
L3:=BARSLAST(CROSS(L1,L2));
L4:=REF(L3,L3+1);
L5:=L2;
变盘:CROSS(L1,L2) AND L5,LINETHICK0,COLORD6FF9C;
STICKLINE(变盘,0,0,5,1),COLORRED;
距今:BARSLAST(CROSS(DIFF,DEA)),LINETHICK0;
L6:=BARSCOUNT(CLOSE);
DRAWTEXT(CROSS(L1,L2),DIFF,'买'),COLORRED;
DRAWTEXT(CROSS(L2,L1),DIFF,'卖'),COLORGREEN;
REF(DEA,S3),POINTDOT,COLORGREEN,LINETHICK2;
IF(L1>L2,REF(DEA,S3),0),POINTDOT,LINETHICK5,COLORRED;
IF(MACD<0,REF(DEA,S3),0),POINTDOT,LINETHICK5,COLORGREEN;
LS:=IF(DIFF>DEA AND DIFF>0,1,0);
扬:IF(REF(LS=0,1) AND LS=1,0.1,0);
XG1:CROSS(MACD1,MACD2) AND MACD1<0,LINETHICK0;
XG2:CROSS(DIFF,DEA),LINETHICK0;
M1:=MACD>REF(MACD,1) AND DIFF<DEA;
短:M1 AND COUNT(M1,10)=1 AND C>MA(C,55) AND COUNT(MACD<0,5)>=5,LINETHICK0;
DRAWTEXT(短,MACD,'短'),COLORBLUE;
{QDIF:IF(DEA,DIF,0),COLORRED,LINETHICK3;}

QDIF:DIFF,COLORRED,LINETHICK2; D:=BACKSET(DIFF<REF(DIFF,1),2);

{RDIF:IF(D ,DIF,0),COLOR33FF33,LINETHICK3;}

PARTLINE(D,DIFF),COLOR33FF33,LINETHICK3;

多转空:=((((LLV(MACD,4)>0) AND (MACD<REF(MACD,1))) AND (REF(MACD,1)>REF(MACD,2))) AND (REF(MACD,2)>REF(MACD,3)));

空转多:=((((HHV(MACD,4)<0) AND (MACD>REF(MACD,1))) AND (REF(MACD,1)<REF(MACD,2))) AND (REF(MACD,2)<REF(MACD,3)));

DRAWICON(多转空,MACD*1.002,5);

DRAWICON(空转多,MACD*0.998,4);

{DRAWGBK(1,COLORRGB(0,0,30),COLORRGB(0,0,100),1);}

A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));

B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)<DIFF AND CROSS(DIFF,DEA);

DRAWTEXT(IF(B1>0,1,0),DEA,'底');

C1:=BARSLAST(REF(CROSS(DEA,DIFF),1));

D1:=REF(C,C1+1)<C AND REF(DIFF,C1+1)>DIFF AND CROSS(DEA,DIFF);

DRAWTEXT(IF(D1>0,1,0),DEA,'顶');

技术人员回复
日期:2018-8-13 11:13
不同软件对函数的处理略有不同,加载效果略有差异是正常的,参考: 

DIFF:(EMA(CLOSE,10) - EMA(CLOSE,30))*20,COLORWHITE,LINETHICK1;
DEA:EMA(DIFF,9),COLORYELLOW,LINETHICK2;
MACD:2*(DIFF-DEA), COLORSTICK;
MACD1:2*(DIFF-DEA),COLORFFFFFF,LINETHICK1;
MACD2:SMA(MACD1,0,3),COLORFFFF00,LINETHICK1;
STICKLINE1(MACD1>MACD2 AND MACD1>0,0,MACD1,2,0),COLORRED;
STICKLINE1(MACD1>MACD2 AND MACD1<0,0,MACD1,2,0),COLORGREEN;
STICKLINE1(MACD1<MACD2,0,MACD1,1,0),COLOR40FF00;
S1:=MACD<0;
S2:=(MACD>=0);
S3:=BARSLAST(CROSS(DIFF,DEA));
S4:=REF(S3,S3+1);
S5:=DEA>REF(DEA,S4);
S6:=DEA;
上成立:=CROSS(DIFF,DEA) AND S5;
下成立:=CROSS(DIFF,DEA) AND S6;
L1:=(EMA(CLOSE,3) - EMA(CLOSE,13));
L2:=EMA(L1,9);
L3:=BARSLAST(CROSS(L1,L2));
L4:=REF(L3,L3+1);
L5:=L2;
变盘:CROSS(L1,L2) AND L5,LINETHICK1,COLORD6FF9C;
STICKLINE1(变盘,0,0,5,1),COLORRED;
距今:BARSLAST(CROSS(DIFF,DEA)),LINETHICK1;
L6:=BARSCOUNT(CLOSE);
DRAWTEXT(CROSS(L1,L2),DIFF,'买'),COLORRED;
DRAWTEXT(CROSS(L2,L1),DIFF,'卖'),COLORGREEN;
REF(DEA,S3),POINTDOT,COLORGREEN,LINETHICK2;
IF(L1>L2,REF(DEA,S3),0),POINTDOT,LINETHICK5,COLORRED;
IF(MACD<0,REF(DEA,S3),0),POINTDOT,LINETHICK5,COLORGREEN;
LS:=IF(DIFF>DEA AND DIFF>0,1,0);
扬:IF(REF(LS=0,1) AND LS=1,0.1,0);
XG1:CROSS(MACD1,MACD2) AND MACD1<0,LINETHICK1;
XG2:CROSS(DIFF,DEA),LINETHICK1;
M1:=MACD>REF(MACD,1) AND DIFF<DEA;
短:M1 AND COUNT(M1,10)=1 AND C>MA(C,55) AND COUNT(MACD<0,5)>=5,LINETHICK1;
DRAWTEXT(短,MACD,'短'),COLORBLUE;


QDIF:DIFF,COLORRED,LINETHICK2; 
D:=BACKSET(DIFF<REF(DIFF,1),2);

PARTLINE(D,DIFF,COLOR33FF33),LINETHICK3;

多转空:=((((LLV(MACD,4)>0) AND (MACD<REF(MACD,1))) AND (REF(MACD,1)>REF(MACD,2))) AND (REF(MACD,2)>REF(MACD,3)));

空转多:=((((HHV(MACD,4)<0) AND (MACD>REF(MACD,1))) AND (REF(MACD,1)<REF(MACD,2))) AND (REF(MACD,2)<REF(MACD,3)));

DRAWICON(多转空,MACD*1.002,5);

DRAWICON(空转多,MACD*0.998,4);

A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));

B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)<DIFF AND CROSS(DIFF,DEA);

DRAWTEXT(IF(B1>0,1,0),DEA,'底');

C1:=BARSLAST(REF(CROSS(DEA,DIFF),1));

D1:=REF(C,C1+1)<C AND REF(DIFF,C1+1)>DIFF AND CROSS(DEA,DIFF);

DRAWTEXT(IF(D1>0,1,0),DEA,'顶');