Question

请高手，文华指标改成通达信指标。只有49个？请给我写信，回信留题目gxvip168@126.com，高分悬赏，谢谢

VAR6:=(2*CLOSE+HIGH+OPEN+LOW)/5;

VAR7:=LLV(LOW,12);

VAR8:=HHV(HIGH,20);

VAR9:=EMA((VAR6-VAR7)/(VAR8-VAR7)*100,13);

VARA:=EMA(0.667*REF(VAR9,1)+0.333*VAR9,2);

SARLINE:=ABS(SAR(3,0.01,0.1));

TR:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),6);

HD:=HIGH-REF(HIGH,1);

LD:=REF(LOW,1)-LOW;

DMP:=SUM(IFELSE(HD>0 && HD>LD,HD,0),6);

DMM:=SUM(IFELSE(LD>0 && LD>HD,LD,0),6);

PDI:=DMP*100/TR,COLORWHITE;

MDI:=DMM*100/TR,COLORYELLOW;

ADX:=MA(ABS(MDI-PDI)/(MDI+PDI)*100,14),COLORRED;

ADXR:=(ADX+REF(ADX,14))/2,COLORGREEN;

MA10:=EMA(CLOSE,11);

MA1:=MA(CLOSE,5);

VAR9>VARA&&CLOSE>=SARLINE&&MA10>REF(MA10,1)&&ADX>30&&CLOSE>REF(OPEN,1)&&CLOSE>REF(OPEN,2)&&CLOSE>REF(CLOSE,1)&&CLOSE>REF(CLOSE,2)&&CLOSE>MA1&&CLOSE>OPEN,BPK;

VAR9<=VARA&&CLOSE<SARLINE&&MA10<REF(MA10,1)&&ADX<80&&CLOSE<REF(OPEN,1)&&CLOSE<REF(OPEN,2)&&CLOSE<REF(CLOSE,1)&&CLOSE<REF(CLOSE,2)&&CLOSE<MA1&&CLOSE<OPEN,SPK;

AUTOFILTER;

VAR2:=(CLOSE+HIGH+LOW)/3;

VAR3:=EMA(VAR2,13);

VAR4:=REF(VAR3,1);

STICKLINE(VAR3>VAR4,VAR3,VAR4,COLORMAGENTA,1);

STICKLINE(VAR3<VAR4,VAR3,VAR4,COLORBLUE,1);

AA2:=EMA(C,5) > EMA(C,20);

BB2:=EMA(C,5) < EMA(C,20);

CC:= EMA(C,5) > EMA(C,10);

CC1:=EMA(C,5) < EMA(C,10);

DD:=CLOSE<OPEN;

DRAWLINE(AA2,H,AA2,CLOSE,COLORRED);

DRAWLINE(AA2,OPEN,AA2,L,COLORRED);

STICKLINE(AA2,O,C,4,1),COLORRED;

STICKLINE(AA2 AND DD,O,C,4,0),COLORRED;

DRAWLINE(BB2,OPEN,BB2,L,COLORGREEN);

DRAWLINE(BB2,HIGH,BB2,C,COLORGREEN);

STICKLINE(BB2,O,C,4,1),COLORGREEN;

STICKLINE(BB2 AND DD,O,C,4,0),COLORGREEN;

DRAWLINE(BB2 AND CC,OPEN,BB2 AND CC,L,COLORWHITE);

DRAWLINE(BB2 AND CC,CLOSE,BB2 AND CC,H,COLORWHITE);

STICKLINE(BB2 AND CC,O,C,4,1),COLORWHITE;

STICKLINE(BB2 AND CC AND DD,O,C,4,0),COLORWHITE;

DRAWLINE(AA2 AND CC1,H,AA2 AND CC1,C,COLORWHITE);

DRAWLINE(AA2 AND CC1,L,AA2 AND CC1,O,COLORWHITE);

STICKLINE(AA2 AND CC1,O,C,4,1),COLORWHITE;

STICKLINE(AA2 AND CC1 AND ISDOWN,O,C,4,0),COLORWHITE;

AA11:=(EMA(EMA(HIGH,15),15)-EMA(EMA(LOW,15),15))*1+EMA(EMA(HIGH,15),15);

BB11:=EMA(EMA(LOW,15),15)-(EMA(EMA(HIGH,15),15)-EMA(EMA(LOW,15),15));

TR1:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));//真实波幅

ATR:=MA(TR1,26); //求26个周期内真实波幅的简单移动平均

DRAWLINE(C>AA11+1.5*ATR,H,C>AA11+1.5*ATR,C,COLOR00D2EA);

DRAWLINE(C>AA11+1.5*ATR,O,C>AA11+1.5*ATR,L,COLOR00D2EA),COLOR00D2EA;

STICKLINE(C>AA11+1.5*ATR,O,C,4,1),COLOR00D2EA;

STICKLINE(C>AA11+1.5*ATR AND ISDOWN,O,C,4,0),COLOR00D2EA;

DRAWLINE(C<BB11-1.5*ATR,H,C<BB11-1.5*ATR,C,COLOR808080);

DRAWLINE(C<BB11-1.5*ATR,O,C<BB11-1.5*ATR,L,COLOR808080);

STICKLINE(C<BB11-1.5*ATR AND ISUP,O,C,4,1),COLOR808080;

STICKLINE(C<BB11-1.5*ATR AND ISDOWN,O,C,4,0),COLOR808080;

SETEXPIREDATE('20170530');

Answer 1

这个也行啊？很贵的，等你收到信这个信都长毛了。