麻烦老师,把通达信BKD主图指标加载到文华,谢谢。 (文华财经WH6赢顺V6.7)

投资者咨询:麻烦老师,把通达信BKD主图指标加载到文华,谢谢。 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-6-14 17:59
 {BKD主图}

{N:=31}

J5:MA(C,5),COLORRED,LINETHICK1;

Z5:=REF(MA(C,5),1);

IF(J5>=Z5,J5,DRAWNULL),COLORWHITE,LINETHICK1;

IF(J5<Z5,J5,DRAWNULL),COLORGRAY ,LINETHICK1;

J250:MA(C,250),COLORRED,LINETHICK2;

Z250:=REF(MA(C,250),1);

IF(J250>=Z250,J250,DRAWNULL),COLOR0000FF,LINETHICK2;

IF(J250<Z250,J250,DRAWNULL),COLORBLUE,LINETHICK2;

MA1:=MA(CLOSE,7);

MA2:=MA(CLOSE,13);

MA3:=MA(CLOSE,34);

MA4:=MA(CLOSE,50);

VAR3:=LLV(HIGH,240);

VAR4:=100*(CLOSE-VAR3)/VAR3;

VAR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;

VAR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;

VAR7:=0;

VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;

VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;

VAR10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);

VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);

VAR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);

VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);

VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);

VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);

VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);

VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);

VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);

VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150);

买1:=VAR10;

买2:=(VAR11+VAR13+VAR15+VAR17);

卖1:=(VAR12+VAR14+VAR16+VAR18);

B:=IF(买1>0 OR 买2>0,LOW*0.99,DRAWNULL),CROSSDOT,LINETHICK3,COLORYELLOW;

DRAWTEXT(买1>0 OR 买2>0,LOW*0.99,'买入'),COLORRED;

S:=IF(卖1>0,HIGH*1.01,DRAWNULL),CROSSDOT,LINETHICK3,COLORGREEN;

DRAWTEXT(卖1>0,HIGH*1.02,'卖出'),COLORGREEN;

VAR100:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20))));

VAR200:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20))));

VAR300:=(100 - MA(((100 * (HHV(HIGH,5) - CLOSE)) / (HHV(HIGH,5) - LLV(LOW,5))),34));

BOLL:MA(CLOSE,N),COLORBROWN;

UB:BOLL+2*STD(CLOSE,N),LINETHICK1,COLORYELLOW;

LB:BOLL-2*STD(CLOSE,N),LINETHICK1,COLORMAGENTA;

DRAWICON(CURRBARSCOUNT=N,H*1.03,14);

DRAWICON(CURRBARSCOUNT=250,H*1.03,25);

上升:IF(BOLL>REF(BOLL,1),BOLL,DRAWNULL),LINETHICK3,COLORRED;

下降:IF(BOLL<=REF(BOLL,1),BOLL,DRAWNULL),LINETHICK3,COLORGREEN;

技术人员回复
日期:2018-6-14 18:14
 参考:

N:=31;
J5:MA(C,5),COLORRED,LINETHICK1;
Z5:=REF(MA(C,5),1);
IF(J5>=Z5,J5,NULL),COLORWHITE,LINETHICK1;
IF(J5<Z5,J5,NULL),COLORGRAY ,LINETHICK1;
J250:MA(C,250),COLORRED,LINETHICK2;
Z250:=REF(MA(C,250),1);
IF(J250>=Z250,J250,NULL),COLOR0000FF,LINETHICK2;
IF(J250<Z250,J250,NULL),COLORBLUE,LINETHICK2;
MA1:=MA(CLOSE,7);
MA2:=MA(CLOSE,13);
MA3:=MA(CLOSE,34);
MA4:=MA(CLOSE,50);
VAR3:=LLV(HIGH,240);
VAR4:=100*(CLOSE-VAR3)/VAR3;
VAR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;
VAR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;
VAR7:=0;
VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;
VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;
VAR10:=IF(TROUGHBARS(3,16,1,1)=0 &&HIGH>L&&REF(ZIGZAG(C,6,1),1)<=REF(ZIGZAG(C,6,1),2)&&REF(ZIGZAG(C,6,1),2)<=REF(ZIGZAG(C,6,1),3),1,0);
VAR12:=ZIGZAG(C,6,1)<REF(ZIGZAG(C,6,1),1) AND REF(ZIGZAG(C,6,1),1)>=REF(ZIGZAG(C,6,1),2) AND REF(ZIGZAG(C,6,1),2)>=REF(ZIGZAG(C,6,1),3);
VAR13:=ZIGZAG(C,22,1)>REF(ZIGZAG(C,22,1),1) AND REF(ZIGZAG(C,22,1),1)<=REF(ZIGZAG(C,22,1),2) AND REF(ZIGZAG(C,22,1),2)<=REF(ZIGZAG(C,22,1),3);
VAR14:=ZIGZAG(C,22,1)<REF(ZIGZAG(C,22,1),1) AND REF(ZIGZAG(C,22,1),1)>=REF(ZIGZAG(C,22,1),2) AND REF(ZIGZAG(C,22,1),2)>=REF(ZIGZAG(C,22,1),3);
VAR15:=ZIGZAG(C,51,1)>REF(ZIGZAG(C,51,1),1) AND REF(ZIGZAG(C,51,1),1)<=REF(ZIGZAG(C,51,1),2) AND REF(ZIGZAG(C,51,1),2)<=REF(ZIGZAG(C,51,1),3);
VAR16:=ZIGZAG(C,51,1)<REF(ZIGZAG(C,51,1),1) AND REF(ZIGZAG(C,51,1),1)>=REF(ZIGZAG(C,51,1),2) AND REF(ZIGZAG(C,51,1),2)>=REF(ZIGZAG(C,51,1),3);
VAR17:=ZIGZAG(C,72,1)>REF(ZIGZAG(C,72,1),1) && REF(ZIGZAG(C,72,1),1)<=REF(ZIGZAG(C,72,1),2) &&REF(ZIGZAG(C,72,1),2)<=REF(ZIGZAG(C,72,1),3);
VAR18:=ZIGZAG(C,72,1)<REF(ZIGZAG(C,72,1),1) AND REF(ZIGZAG(C,72,1),1)>=REF(ZIGZAG(C,72,1),2) AND REF(ZIGZAG(C,72,1),2)>=REF(ZIGZAG(C,72,1),3);
VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150);
买1:=VAR10;
//买2:=(VAR11+VAR13+VAR15+VAR17);
卖1:=(VAR12+VAR14+VAR16+VAR18);
//B:=IF(买1>0 OR 买2>0,LOW*0.99,DRAWNULL),CROSSDOT,LINETHICK3,COLORYELLOW;
//DRAWTEXT(买1>0 OR 买2>0,LOW*0.99,'买入'),COLORRED;
S:=IF(卖1>0,HIGH*1.01,NULL),CROSSDOT,LINETHICK3,COLORGREEN;
DRAWTEXT(卖1>0,HIGH*1.02,'卖出'),COLORGREEN;
VAR100:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20))));
VAR200:=(100 - ((90 * (HHV(HIGH,20) - CLOSE)) / (HHV(HIGH,20) - LLV(LOW,20))));
VAR300:=(100 - MA(((100 * (HHV(HIGH,5) - CLOSE)) / (HHV(HIGH,5) - LLV(LOW,5))),34));
BOLL1:MA(CLOSE,N),COLORCYAN;
UB:BOLL1+2*STD(CLOSE,N),LINETHICK1,COLORYELLOW;
LB:BOLL1-2*STD(CLOSE,N),LINETHICK1,COLORMAGENTA;
CURRBARSCOUNT:=DATACOUNT-BARPOS;
DRAWICON(CURRBARSCOUNT=N,H*1.03,14);
DRAWICON(CURRBARSCOUNT=250,H*1.03,25);
上升:IF(BOLL1>REF(BOLL1,1),BOLL1,NULL),LINETHICK3,COLORRED;
下降:IF(BOLL1<=REF(BOLL1,1),BOLL1,NULL),LINETHICK3,COLORGREEN;