请教编程达人,帮忙写个MACD柱背离(绿柱即可)的选股公式,感谢!!!
条件:左边绿柱堆大,右边绿柱堆小(右边的绿柱已完成);左边绿柱对应有股价大于右边绿柱对应的股价。如图:
已有MACD面积公式(飞狐)如下:
{PP变色MACD}
{参数设置开始:
大智慧 }
{INPUT:short(12, 0, 300), long(26, 0, 300), mid(9, 0, 300);}
short:=12; long:=26; mid:=9;
{参数设置结束}
DIF : EMA(CLOSE,short) - EMA(CLOSE,long);
DEA : EMA(DIF,mid);
MACD : 2*(DIF-DEA), COLO
RSTICK;
{面积计算}
绿柱面积:IF (MACD<0,SUM(MACD,BARSLAST(MACD>0)) * 100,0),linethick0,colorblue;
红柱面积:IF (MACD>0,SUM(MACD,BARSLAST(MACD<0)) * 100,0),linethick0,colorred;
红显示:=CROSS(DEA, DIF);
绿显示:=CROSS(DIF, DEA);
drawnumber(红显示, DEA*1.03, REF(红柱面积, 1), 0),colorred, pxup30;
drawnumber(绿显示, DEA*0.97, REF(绿柱面积, 1), 0), colorgreen, pxdn20;
{DRAWTEXT(红显示, DEA*1.03, NUMTOSTR(REF(红柱面积, 1), 0)), colorred, pxup20;}
{DRAWTEXT(绿显示, DEA*0.97, NUMTOSTR(REF(绿柱面积, 1), 0)), colorgreen, pxdn20;}
{当前面积}
drawnumber(BARSTATUS=2 and macd>0, -macd*0.03, REF(红柱面积, 1), 0),coloryellow, pxdn30;
drawnumber(BARSTATUS=2 and macd<=0, -macd*0.03, REF(绿柱面积, 1), 0), COLORFFCC66, pxup30;
{DRAWTEXT(BARSTATUS=2 and macd>0, -macd*0.03, NUMTOSTR(红柱面积, 0)), coloryellow;}
{DRAWTEXT(BARSTATUS=2 and macd<=0, -macd*0.03, NUMTOSTR(绿柱面积, 0)), COLORFFCC66;}
多空线: 0, colorwhite, linedot;
{MACDMA:MA(MACD,5), linethick2,colorblue;}
stickline(MACD<0 and MACD>=REF(MACD, 1), 0, macd, 0, 0), COLORFFCC66;
stickline(MACD<0 and MACD<REF(MACD, 1), 0, macd, 0, 0), COLORGREEN;
stickline(MACD>=0 and MACD>REF(MACD, 1), 0, macd, 0, 0), COLORRed;
stickline(MACD>=0 and MACD<=REF(MACD, 1), 0, macd, 0, 0), COLORYellow;
partline(dif>=ref(dif,1),dif), colorred;