相關標簽:

?

｛面積MACD公式｝注：調整參數可以自行更改，主要作用是放大或縮小MACD面積倍數，效果是一樣的。

input.:調整參數(20,0.0001,1000);

p:=26;s:=12;m:=9;
DIFF:EMA(c,s) - EMA(c,p);
DEA:EMA(DIFF,m);
MACD:2*(DIFF-DEA),COLORSTICK;
BV:=SUM(MACD/調整參數,0);
BA:=IF(MAX(BV,REF(BV,2))<REF(BV,1) OR MIN(BV,REF(BV,2))>REF(BV,1),1,0);
BC:=BARSLAST(BA)+1;
SMACD:=BV-REF(BV,BC);

CXH3:=if(macd>0,HHV(abs(macd),bc),LLV(macd,bc));
CXH4:=(macd)/20;{圖形比例縮小1/20,可修改}
CXH5:=SMACD*100;

drawnumber(ref(CXH4,1)>0 and CXH4<=0 ,ref(CXH3,1),ref(CXH5,1),0){,pxup100},COLORGREEN;{http://www.kzuj.com.cn}
drawnumber(ref(CXH4,1)<0 and CXH4>=0 ,ref(CXH3,1),ref(abs(CXH5),1),0),{pxdn40,}colorff00ff;
drawnumber(islastbar and CXH4<0,ref(CXH3,1),abs(CXH5),0),align2,colorff00ff{,pxup40};
drawnumber(islastbar and CXH4>0,ref(CXH3,1),CXH5,0),align2,colorgreen{,pxdn100};

M1:=REF(MACD,1);
STICKLINE(macd>0 and macd<=m1,0,macd,3,0),coloryellow;
STICKLINE(macd<0 and macd>=m1,0,macd,3,0),colorwhite;
{DRAWICON(macd<0 and ref(macd,1)>macd and l>ref(l,1) and c>o,macd,10);}
{DRAWICON(ref(macd,2)>0 and ref(macd,1)<0.01 and macd>0.01,macd,10);}
{DRAWICON(diff>ref(diff,1) and macd<0 and c>=o and l<ref(l,1),macd,12);}
{DRAWICON(macd<0 and ref(macd,1)<macd and l<ref(l,1) and c>o,macd,10);}
日線MACD:"macd.macd#day",LINETHICK0,COLORFF0099;
三十分MACD:"MACD.MACD#MIN30",colorred,linethick0;
十五分MACD:"MACD.MACD#MIN15",linethick0;
五分MACD:"MACD.MACD#MIN5",colorff00ff,linethick0;
jc := dea-diff;
綠柱面積:IF (MACD<0,SUM(MACD,BARSLAST(jc<0)),0),linethick0,colorblue;
紅柱面積:IF (MACD>0,SUM(MACD,BARSLAST(jc>0)),0),linethick0,colorred;

LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
e:=CROSS(83,RSI);
DRAWICON(e,macd,10);
日RSI:"引用RSI.RSI#day",colorff00ff,linethick0;
六十分RSI:"引用RSI.RSI#MIN60",colorff00ff,linethick0;
三十分RSI:"引用RSI.RSI#MIN30",colorff00ff,linethick0;
十五分RSI:"引用RSI.RSI#MIN15",colorff00ff,linethick0;
五分RSI:"引用RSI.RSI#MIN5",colorff00ff,linethick0;
DRAWICON(CROSS(83,日RSI),macd,1);
STICKLINE(CROSS(83,日RSI),diff,0,6,0),Colorred;
DRAWICON(CROSS(83,六十分RSI),macd,2);
DRAWICON(CROSS(83,三十分RSI),diff,3);
DRAWICON(CROSS(83,十五分RSI),-macd,4);
DRAWICON(CROSS(83,五分RSI),macd,6);

日WR:"引用WR.WR#day",colorff00ff,linethick0;
六十分WR:"引用WR.WR#MIN60",colorff00ff,linethick0;
三十分WR:"引用WR.WR#MIN30",colorff00ff,linethick0;
十五分WR:"引用WR.WR#MIN15",colorff00ff,linethick0;
五分WR:"引用WR.WR#MIN5",colorff00ff,linethick0;
PARTLINE(日WR<=1,diff),colorred,LINETHICK5;
PARTLINE(六十分wr<=1,dea),colorgreen,LINETHICK4;
PARTLINE(三十分wr<=1,diff),colorff00ff,LINETHICK3;
PARTLINE(十五分wr<=1,dea),colorgreen,LINETHICK2;
DRAWICON(五分wr<=1,macd,12);



下面二個是面積公式引用的公式，公式名一定要對。

1、公式名稱｛引用RSI｝

LC:=REF(CLOSE,1);
RSI:SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100,linethick0;
e:CROSS(83,RSI);

2、公式名稱{引用WR}

WR:(C-llv(L,5))/(hhv(H,5)-llv(L,5))*100;

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?