编程思路: 输出REFLINE:0 DIFF赋值:收盘价的3日指数移动平均-收盘价的8日指数移动平均 DEA赋值:DIFF的3日指数移动平均 MACD赋值:2*(DIFF-DEA) X1赋值:DIFF的5日指数移动平均*5 X2赋值:((收盘价的3日指数移动平均-收盘价的8日指数移动平均))*5 输出X3:如果X2>0,返回X2,否则返回0,POINTDOT,画红色 输出X4:如果X2<0,返回X2,否则返回0,POINTDOT,画绿色 当满足条件X2>0时,在0和X2位置之间画柱状线,宽度为2.4,0不为0则画空心柱.,COLOR000099 当满足条件X2>0时,在0和X2位置之间画柱状线,宽度为2.0,0不为0则画空心柱.,COLOR0000AA 当满足条件X2>0时,在0和X2位置之间画柱状线,宽度为1.6,0不为0则画空心柱.,COLOR0000CC 当满足条件X2>0时,在0和X2位置之间画柱状线,宽度为1.2,0不为0则画空心柱.,COLOR0000DD 当满足条件X2>0时,在0和X2位置之间画柱状线,宽度为0.8,0不为0则画空心柱.,COLOR0000EE 当满足条件X2>0时,在0和X2位置之间画柱状线,宽度为0.4,0不为0则画空心柱.,COLOR0000FF 当满足条件X2>0ANDX2<X1ANDX2<1日前的X2时,在0和X2位置之间画柱状线,宽度为2.4,0不为0则画空心柱.,COLORFFBF00 当满足条件X2<0时,在0和X2位置之间画柱状线,宽度为2.4,0不为0则画空心柱.,COLOR007700 当满足条件X2<0时,在0和X2位置之间画柱状线,宽度为2.0,0不为0则画空心柱.,COLOR009900 当满足条件X2<0时,在0和X2位置之间画柱状线,宽度为1.6,0不为0则画空心柱.,COLOR00CC00 当满足条件X2<0时,在0和X2位置之间画柱状线,宽度为1.2,0不为0则画空心柱.,COLOR00DD00 当满足条件X2<0时,在0和X2位置之间画柱状线,宽度为0.8,0不为0则画空心柱.,COLOR00FF00 当满足条件X2<0时,在0和X2位置之间画柱状线,宽度为0.4,0不为0则画空心柱.,COLOR00FF00 当满足条件X2<0ANDX2>X1ANDX2>1日前的X2时,在0和X2位置之间画柱状线,宽度为2.4,0不为0则画空心柱.,COLOR990099 当满足条件X2<0ANDX2>X1ANDX2>1日前的X2时,在0和X2位置之间画柱状线,宽度为2.0,0不为0则画空心柱.,COLORAA00AA 当满足条件X2<0ANDX2>X1ANDX2>1日前的X2时,在0和X2位置之间画柱状线,宽度为1.6,0不为0则画空心柱.,COLORCC00CC 当满足条件X2<0ANDX2>X1ANDX2>1日前的X2时,在0和X2位置之间画柱状线,宽度为1.2,0不为0则画空心柱.,COLORDD00DD 当满足条件X2<0ANDX2>X1ANDX2>1日前的X2时,在0和X2位置之间画柱状线,宽度为0.8,0不为0则画空心柱.,COLOREE00EE 当满足条件X2<0ANDX2>X1ANDX2>1日前的X2时,在0和X2位置之间画柱状线,宽度为0.4,0不为0则画空心柱.,COLORFF00FF 输出资金动能2:X2,画红色,线宽为2 输出资金动能1:X1,画黄色,线宽为2 当满足条件(资金动能2上穿资金动能1AND资金动能1<-0.25)时,在资金动能1位置画1号图标 输出资金买点:资金动能2上穿资金动能1 AND 资金动能1<-0.25,线宽为2,COLOR0088FF 当满足条件收阳线时,在横轴0.01纵轴0.01位置书写文字,画白色 当满足条件(资金动能1上穿资金动能2AND资金动能2>0.25)时,在资金动能2位置画2号图标 VA赋值:如果收盘价>1日前的收盘价,返回成交量(手),否则返回-成交量(手) OBV1赋值:如果收盘价=1日前的收盘价,返回0,否则返回VA的历史累和 OBV2赋值:OBV1的3日指数移动平均-OBV1的9日简单移动平均 OBV3赋值:如果OBV2>0,返回OBV2,否则返回0的3日指数移动平均 MAC3赋值:收盘价的3日简单移动平均 SHORT赋值:12 LONG赋值:26 MID赋值:9 输出DIF:收盘价的SHORT日指数移动平均-收盘价的LONG日指数移动平均,NODRAW 当满足条件OBV3>1日前的OBV3ANDMAC3>1日前的MAC3时,在0和X2位置之间画柱状线,宽度为0.4,0不为0则画空心柱.,COLOR00D8FF 输出资金量能:OBV3>1日前的OBV3 AND MAC3>1日前的MAC3,画红色,NODRAW 公式源码: {资金量能副图} REFLINE:0; DIFF:=EMA(CLOSE,3)-EMA(CLOSE,8); DEA:=EMA(DIFF,3); MACD:=2*(DIFF-DEA); X1:=EMA(DIFF,5)*5; X2:=((EMA(CLOSE,3)-EMA(CLOSE,8)))*5; X3:IF(X2>0,X2,0),POINTDOT,COLORRED; X4:IF(X2<0,X2,0),POINTDOT,COLORGREEN; {红色} STICKLINE(X2>0,0,X2,2.4,0),COLOR000099; STICKLINE(X2>0,0,X2,2.0,0),COLOR0000AA; STICKLINE(X2>0,0,X2,1.6,0),COLOR0000CC; STICKLINE(X2>0,0,X2,1.2,0),COLOR0000DD; STICKLINE(X2>0,0,X2,0.8,0),COLOR0000EE; STICKLINE(X2>0,0,X2,0.4,0),COLOR0000FF; {青色} STICKLINE(X2>0 AND X2<X1 AND X2<REF(X2,1),0,X2,2.4,0),COLORFFBF00; {绿色} STICKLINE(X2<0,0,X2,2.4,0),COLOR007700; STICKLINE(X2<0,0,X2,2.0,0),COLOR009900; STICKLINE(X2<0,0,X2,1.6,0),COLOR00CC00; STICKLINE(X2<0,0,X2,1.2,0),COLOR00DD00; STICKLINE(X2<0,0,X2,0.8,0),COLOR00FF00; STICKLINE(X2<0,0,X2,0.4,0),COLOR00FF00; {紫色} STICKLINE(X2<0 AND X2>X1 AND X2>REF(X2,1),0,X2,2.4,0),COLOR990099; STICKLINE(X2<0 AND X2>X1 AND X2>REF(X2,1),0,X2,2.0,0),COLORAA00AA; STICKLINE(X2<0 AND X2>X1 AND X2>REF(X2,1),0,X2,1.6,0),COLORCC00CC; STICKLINE(X2<0 AND X2>X1 AND X2>REF(X2,1),0,X2,1.2,0),COLORDD00DD; STICKLINE(X2<0 AND X2>X1 AND X2>REF(X2,1),0,X2,0.8,0),COLOREE00EE; STICKLINE(X2<0 AND X2>X1 AND X2>REF(X2,1),0,X2,0.4,0),COLORFF00FF; 资金动能2:X2,COLORRED,LINETHICK2; 资金动能1:X1,COLORYELLOW,LINETHICK2; DRAWICON((CROSS(资金动能2,资金动能1) AND 资金动能1<-0.25),资金动能1,1); 资金买点:CROSS(资金动能2,资金动能1) AND 资金动能1<-0.25,LINETHICK2,COLOR0088FF;DRAWTEXT_FIX(C>O,0.01,0.01,0,' WWW.GSZX.COM.CN'),COLORWHITE; DRAWICON((CROSS(资金动能1,资金动能2) AND 资金动能2>0.25),资金动能2,2); 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:=12; LONG:=26; MID:=9; DIF:EMA(CLOSE,SHORT)-EMA(CLOSE,LONG),NODRAW; STICKLINE(OBV3>REF(OBV3,1) AND MAC3>REF(MAC3,1),0,X2,0.4,0),COLOR00D8FF; 资金量能:OBV3>REF(OBV3,1) AND MAC3>REF(MAC3,1),COLORRED,NODRAW; |
|
来自: 新用户68515599 > 《macd资金量能》