天德上宝专用MACD重心买卖副图指标 源码 贴图

{日MACD}
 VOL1:=6;
 VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL);
 OBV1:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0);
 OBV2:=EMA(OBV1,3)-MA(OBV1,9);
 OBV3:=EMA(IF(OBV2>0,OBV2,0),3);
 MAC3:=MA(C,3);
 SHORT:=11;LONG:=21;MID:=7;
 DIF:EMA(CLOSE,SHORT)-EMA(CLOSE,LONG)COLORWHITE;
 DEA:EMA(DIF,MID)COLORYELLOW;
 MACD:(DIF-DEA)*2,NODRAW;
 STICKLINE(OBV3>REF(OBV3,1) AND MAC3>REF(MAC3,1),0,MACD,0.1,0),COLORRED;
吸:=XLPL.NOTEXT吸;
拉:=XLPL.NOTEXT拉;
派:=XLPL.NOTEXT派;
落:=XLPL.NOTEXT落;
STICKLINE(吸,0,MACD,0.1,0),COLORRED;
 STICKLINE(拉,0,MACD,0.1,0),COLORRED;
 STICKLINE(派,0,MACD,0,0),COLORGREEN;
 STICKLINE(落,0,MACD,0,0),COLORGREEN;
主力买1:IF(DIF>REF(DIF,1),DIF,DRAWNULL),COLORRED;
主力买2:IF(DIF

 {资金博弈今日持仓}
超B:=L2_AMO(0,2)/10000.0;
大B:=L2_AMO(1,2)/10000.0;
中B:=L2_AMO(2,2)/10000.0;
小B:=L2_AMO(3,2)/10000.0;
超S:=L2_AMO(0,3)/10000.0;
大S:=L2_AMO(1,3)/10000.0;
中S:=L2_AMO(2,3)/10000.0;
小S:=L2_AMO(3,3)/10000.0;
 TESTSKIP(NOT(超B OR 大B OR 中B OR 小B OR 超S OR 大S OR 中S OR 小S)!=0);
总流入比:=(超B+大B+中B+小B)/(超B+大B+中B+小B+超S+大S+中S+小S)*100,NODRAW,COLORWHITE;
大单流入:=(超B+大B)/(超B+大B+超S+大S)*100,NODRAW,COLORWHITE;
大单流入限制:=IF((超B+大B+超S+大S)=0,0,大单流入);
成交总量:=(超B+大B+中B+小B+超S+大S+中S+小S),NODRAW,COLORWHITE;
机构参与度:=(超B+超S+大B+大S)/成交总量*100,NODRAW,COLORWHITE;
主买A:=ACTINVOL,COLORRED,NODRAW;
主卖A:=ACTOUTVOL,COLORGREEN,NODRAW;
主买C:=主买A*100/(主买A+主卖A),NODRAW,COLORRED;
 {资金}
DRAWTEXT_FIX(1,0.2,0,0.01,STRCAT(STRCAT('资金流入比: ',CON2STR(总流入比,2)),' ％')),COLORWHITE;
 DRAWTEXT_FIX(1,0.4,0,0.01,STRCAT(STRCAT('大单流入比: ',CON2STR(大单流入限制,2)),' ％买')),COLORWHITE;
 DRAWTEXT_FIX(1,0.6,0,0.01,STRCAT(STRCAT('机构参与度: ',CON2STR(机构参与度,2)),' ％')),COLORWHITE;
 DRAWTEXT_FIX(1,0.8,0,0.01,STRCAT(STRCAT('主动买卖比: ',CON2STR(主买C,2)),' ％')),COLORWHITE;

 {------------------------------------------------------------------}
 {重心}
A1:=(CLOSE*2+HIGH+LOW)/4;
 A2:=EMA(A1,13)-EMA(A1,3