万箭穿心副图，源码分享

VAR1:=(CLOSE-LLV(LOW,9));

VAR2:=(HHV(HIGH,9)-LLV(LOW,9));

VAR3:=VAR1/VAR2*100;

VAR4:=SMA(VAR3,2,1);

VAR5:=SMA(VAR4,2,1);

VAR6:=3*VAR4-2*VAR5;

VAR7:=CROSS(VAR6,0);

VAR8:=(EMA(CLOSE,15)-EMA(CLOSE,26));

VAR16:=EMA(VAR8,5);

MACD:2*(VAR8-VAR16),COLORSTICK;

DIF2:4*VAR8-3*VAR16,COLORFF00FF;

VAR17:=EMA(DIF2,1);

VAR19:=MACD<0 AND MACD>REF(MACD,1) AND REF(MACD,1)<REF(MACD,2) AND REF(MACD,2)<REF(MACD,3) AND REF(MACD,3)<REF(MACD,4);

IF(C>VAR17,VAR17,DRAWNULL),COLOR0000F0,LINETHICK3;

IF(VAR17<=REF(VAR17,1),VAR17,DRAWNULL),COLOR00E600,LINETHICK3;

STICKLINE(VAR19,1,MACD,2,0),COLORFF00FF;

分界线:0,COLORFF00FF;

DRAWICON(VAR19,1.5,1);

DRAWICON(VAR7 AND VAR19,1.2,1);

DRAWTEXT(VAR7 AND VAR19,1.3,'←万箭穿心'),COLOR00FFFF;

STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,1.8,0),COLOR000055;

STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,1.1,0),COLOR000099;

STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,0.6,0),COLOR0000BB;

STICKLINE(MACD<=REF(MACD,1) AND MACD>0,0,MACD,1.8,0),COLOR40FF00;

STICKLINE(MACD<=REF(MACD,1) AND MACD>0,0,MACD,1.1,0),COLOR40FF00;

STICKLINE(MACD<=REF(MACD,1) AND MACD>0,0,MACD,0.6,0),COLOR40FF00;

STICKLINE(MACD>REF(MACD,1) AND MACD<0,0,MACD,1.8,0),COLOR000055;

STICKLINE(MACD>REF(MACD,1) AND MACD<0,0,MACD,1.1,0),COLOR000099;

STICKLINE(MACD>REF(MACD,1) AND MACD<0,0,MACD,0.6,0),COLOR0000BB;

STICKLINE(MACD<=REF(MACD,1) AND MACD<0,0,MACD,1.8,0),COLOR40FF00;

STICKLINE(MACD<=REF(MACD,1) AND MACD<0,0,MACD,1.1,0),COLOR40FF00;

STICKLINE(MACD<=REF(MACD,1) AND MACD<0,0,MACD,0.6,0),COLOR40FF00;