【原】大智慧量价波段指标公式源码编程思路破译

编程思路破译

OBV赋值:如果收盘价>1日前的收盘价,返回成交量(手),否则返回如果收盘价<1日前的收盘价,返回-成交量(手),否则返回0的历史累和

DIFF赋值:OBV的12日指数移动平均-OBV的26日指数移动平均

BBDIFF赋值:DIFF-1日前的DIFF

DEA赋值:DIFF的9日指数移动平均

BBDEA赋值:DEA-1日前的DEA

MACD赋值:2*(DIFF-DEA)

PARTLINE(收盘价,0),画白色

PARTLINE(DIFF,DIFF>=1日前的DIFF AND DEA>1日前的DEA),线宽为4,COLOR0089FF

FILLRGN(DIFF,DEA,DIFF>DEA),COLOR0089FF

PARTLINE(DIFF,DIFF<1日前的DIFF AND DEA<1日前的DEA),线宽为4,画蓝色

FILLRGN(DEA,DIFF,DIFF<DEA),画蓝色

PARTLINE(DIFF,DIFF>=1日前的DIFF AND DEA<1日前的DEA),线宽为4,COLOR00C500

PARTLINE(DIFF,DIFF<1日前的DIFF AND DEA>1日前的DEA),线宽为4,画黄色

当满足条件MACD>1日前的MACDANDMACD>0时,在0和MACD位置之间画柱状线,宽度为2,0不为0则画空心柱.,画红色

当满足条件MACD<1日前的MACDANDMACD>0时,在0和MACD位置之间画柱状线,宽度为2,0不为0则画空心柱.,画黄色

当满足条件MACD<1日前的MACDANDMACD<0时,在0和MACD位置之间画柱状线,宽度为2,0不为0则画空心柱.,画青色

当满足条件MACD>1日前的MACDANDMACD<0时,在0和MACD位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR0099FF

PARTLINE(收盘价,2*(DEA-DIFF)),线宽为2,画深灰色

程序源码

OBV:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0)),0);

DIFF:=EMA(OBV,12)-EMA(OBV,26);

BBDIFF:=DIFF-REF(DIFF,1);

DEA:=EMA(DIFF,9);

BBDEA:=DEA-REF(DEA,1);

MACD:=2*(DIFF-DEA);

PARTLINE(C,0),COLORWHITE;

PARTLINE(DIFF,DIFF>=REF(DIFF,1) AND DEA>REF(DEA,1)),LINETHICK4,COLOR0089FF;

FILLRGN(DIFF,DEA,DIFF>DEA),COLOR0089FF;

PARTLINE(DIFF,DIFF<REF(DIFF,1) AND DEA<REF(DEA,1)),LINETHICK4,COLORBLUE;

FILLRGN(DEA,DIFF,DIFF<DEA),COLORBLUE;

PARTLINE(DIFF,DIFF>=REF(DIFF,1) AND DEA<REF(DEA,1)),LINETHICK4,COLOR00C500;

PARTLINE(DIFF,DIFF<REF(DIFF,1) AND DEA>REF(DEA,1)),LINETHICK4,COLORYELLOW;

STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,2,0),COLORRED;

STICKLINE(MACD<REF(MACD,1) AND MACD>0,0,MACD,2,0),COLORYELLOW;

STICKLINE(MACD<REF(MACD,1) AND MACD<0,0,MACD,2,0),COLORCYAN;

STICKLINE(MACD>REF(MACD,1) AND MACD<0,0,MACD,2,0),COLOR0099FF;

PARTLINE(C,2*(DEA-DIFF)),LINETHICK2,COLORGRAY;