{公式介绍
由MACD改良而来,当零轴下出现黄柱时,表示止跌见底。
出现钱袋红柱牛启动时为买入信号,当两个信号之间出现红色虚线,表示信号之间产生背离,通常预示着更大级别的牛市启动}
{副图公式源码如下}
DIFF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIFF,9);
MACD:(DIFF-DEA)*2,COLORSTICK;
ZBGS31:=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);
STICKLINE(ZBGS31,0,MACD,0.3,0),COLORYELLOW;
ZBGS32:=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);
ZBGS33:=DEA-DIFF;{乐淘公式网http://www.ZBGS3.com}
ZBGS34:=IF(MACD<0,SUM(MACD,BARSLAST(ZBGS33<0)),0);
ZBGS35:=LLV(LOW,BARSLAST(ZBGS33<0));
ZBGS36:=HHV(HIGH,BARSLAST(ZBGS33>0));
ZBGS37:=IF(MACD<0,BARSLAST(CROSS(DIFF,DEA)),0);
ZBGS38:=REF(ZBGS34,ZBGS37+1);
ZBGS39:=REF(ZBGS35,ZBGS37+1);
ZBGS310:=IF(ZBGS34<0 AND ABS(ZBGS34)<ABS(ZBGS38),1,0);
ZBGS311:=MACD<0 AND REF(MACD,1)<0 AND CLOSE<ZBGS39 AND ABS(ZBGS34)<ABS(ZBGS38) AND ABS(MACD)<ABS(REF(MACD,1));
ZBGS312:=IF(CROSS(DIFF,DEA),REF(ZBGS310,1),0);
ZBGS313:=IF(DIFF>REF(DIFF,1),REF(ZBGS310,1),0) AND DIFF<0 AND DEA<0;
ZBGS314:=BARSLAST(REF(CROSS(DIFF,DEA),1))*1;
ZBGS315:=REF(CLOSE,ZBGS314+1)>CLOSE AND DIFF>REF(DIFF,ZBGS314+1) AND CROSS(DIFF,DEA)*1;
DRAWLINE(ZBGS314=0,DEA-0.02,ZBGS315,DEA-0.02,0)*1,DOTLINE,COLORRED;
牛启动:=FILTER(ZBGS313,10);
ZBGS317:=FILTER(ZBGS313,10);
ZBGS318:=牛启动 AND ZBGS317;
STICKLINE(ZBGS318,(-0.08),DIFF,2,0),COLORMAGENTA;
STICKLINE(牛启动,0,MACD,1,0),COLORLIMAGENTA;
DRAWTEXT(牛启动,0+0.01,'牛启动'),COLORYELLOW;
DRAWICON(牛启动,0,9);
{选股公式源码如下}
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD:=(DIFF-DEA)*2;
ZBGS31:=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);
ZBGS32:=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);
ZBGS33:=DEA-DIFF;
ZBGS34:=IF(MACD<0,SUM(MACD,BARSLAST(ZBGS33<0)),0);
ZBGS35:=LLV(LOW,BARSLAST(ZBGS33<0));
ZBGS36:=HHV(HIGH,BARSLAST(ZBGS33>0));
ZBGS37:=IF(MACD<0,BARSLAST(CROSS(DIFF,DEA)),0);
ZBGS38:=REF(ZBGS34,ZBGS37+1);
ZBGS310:=IF(ZBGS34<0 AND ABS(ZBGS34)<ABS(ZBGS38),1,0);
ZBGS313:=IF(DIFF>REF(DIFF,1),REF(ZBGS310,1),0) AND DIFF<0 AND DEA<0;
XG:FILTER(ZBGS313,10);