分时图主图叠加MACD指标

本人再发一.
依然开源,

我说的分时图主图的MACD,不是副图,所以你保存公式的时候一定要存为主图叠加啊.
这么做的好处是不用按F5了,坏处就是看图有点晕.

这公式我去了很多不必要的东西. 简单就是美嘛.
均价:SUM(V*C,0)/SUM(V,0),COLORGREEN,LINETHICK1;
IF(均价<=REF(均价,1),均价,DRAWNULL),COLORGREEN,LINETHICK3;
IF(均价>=REF(均价,1),均价,DRAWNULL),COLORYELLOW,LINETHICK3;

时间:=TIME=100000;
N:=BARSLAST(时间);
CS1:CONST(IF(N,MAX(REF(HHV(H,0),N),DYNAINFO(4)),HHV(H,0))),DOTLINE,COLOR00FFFF;
CS2:CONST(IF(N,MIN(REF(LLV(L,0),N),DYNAINFO(4)),LLV(L,0))),DOTLINE,COLOR00FFFF;

DRAWNUMBER(CURRBARSCOUNT=2,CS1,CS1),COLORYELLOW,LINETHICK3;

 
{分时MACD}
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD:=2*(DIF-DEA);
X:=CONST(HHV(ABS(C-DYNAINFO(3)),FROMOPEN))/CONST(HHV(ABS(DIF),FROMOPEN))*0.6;
DI:DIF*X+DYNAINFO(3),COLORGRAY;
DE:DEA*X+DYNAINFO(3),COLOR7700AA;
MAC:=MACD*X;
STICKLINE(MAC>0,DYNAINFO( 3),MAC+DYNAINFO( 3),0,1),COLORRED;
STICKLINE(MAC<0,DYNAINFO( 3),MAC+DYNAINFO( 3),0,1),COLORCYAN;

{板块概念}

H1:=MAX(DYNAINFO(3),DYNAINFO(5));
L1:=MIN(DYNAINFO(3),DYNAINFO(6));
P1:=H1-L1;
阻力:=L1+P1*7/8,COLORGREEN;
支撑:=L1+P1*0.5/8,COLORMAGENTA;

最新:CLOSE,LINETHICK1,COLORWHITE;
AA:=SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C));
BB:=BETWEEN(C/AA,C+H,C-H);

DXJP:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,21)-LLV(LOW,34))*100;
FSZX:=(EMA(DXJP,3)-50)*2,COLORGRAY;
GHYJKU:=BETWEEN((DCLOSE)/(SUM(AMOUNT,BARSCOUNT((DCLOSE)))/SUM(VOL*100,BARSCOUNT((DCLOSE)))),1.05,0.95);
VBNH:=IF(GHYJKU=0,MA((DCLOSE),BARSCOUNT((DCLOSE))),(SUM(AMOUNT,BARSCOUNT((DCLOSE)))/SUM(VOL*100,BARSCOUNT((DCLOSE)))));

绝对卖:=EMA(C,240)*1.05 ;
波段卖:=EMA(C,240)*1.03 ;
波段买:=EMA(C,240)*0.99 ;
绝对买:=EMA(C,240)*0.98 ;
高风险紫色:=C>=绝对卖,NODRAW,COLORMAGENTA;
IF(C>=绝对卖,C,DRAWNULL),COLORMAGENTA,LINETHICK2;
IF(C<=绝对买,C,DRAWNULL),COLORRED,LINETHICK2;

{小鱼买卖}
A1:=MA(CLOSE,20);
A2:=A1+(2*(STD(CLOSE,20)));
A3:=A1-(2*(STD(CLOSE,20)));
若愚:=(CLOSE-A3)/(A2-A3),COLORWHITE;
若愚1:=MA(若愚,6);
IF(若愚>1,C,DRAWNULL),COLORMAGENTA,LINETHICK1;
IF(若愚<0,C,DRAWNULL),COLORRED,LINETHICK1;