KDJ和MACD二合一奇特功效幅圖指標公式源碼

作者：大智慧來源：cxh99.com 發布時間：2017年05月24日

相關標簽:大智慧指標 macd kdj 、 macd kdj二合一指標、大智慧macd指標源碼、 kdj疊加macd指標源碼、 macd背離源碼大智慧、大智慧變色macd源碼、 kdj與macd同圖指標、 macd+kdj二合一公式、大智慧kdj成交量源碼、大智慧macd頂背離指標、 macd背離指標大智慧、 macd kdj金叉共振指標、 macd指標與kdj指標、 kdj和macd組合指標、 kdj+macd指標公式、

把KDJ和MACD來個二合一發生奇特功效幅圖大智慧源碼下面大智慧軟件的源碼

原理解析：
DRAWGBKLAST(1,STRIP(自定色,自定色,0)) 0,DOTLINE 80,DOTLINE RSV賦值:(收盤價-9日內最低價的最低值)/(9日內最高價的最高值-9日內最低價的最低值)*100 輸出K:RSV的3日[1日權重]移動平均,COLORFF9900 輸出D:K的3日[1日權重]移動平均,COLOR00FF00,線寬為1 輸出J:3*K-2*D,COLOR00FFFF,線寬為1,LAYER0 PARTLINE(D,D<1日前的D,自定色,D>1日前的D,自定色),PRECIS1,線寬為2 FILLRGN(D,J,D>1日前的D,自定色),LAYER5 FILLRGN(D,J,D<1日前的D,自定色),LAYER5 SJ賦值:((2*收盤價+最高價+最低價)/4-5日內最低價的最低值)/(5日內最高價的最高值-5日內最低價的最低值)*100的2日加權移動平均 ZJ賦值:0.618*1日前的SJ+0.382*SJ的2日加權移動平均 MR賦值:SJ上穿ZJ AND SJ<30 MC賦值:ZJ上穿SJ AND SJ>70 AA8賦值:100*收盤價-1日前的收盤價的8日指數移動平均的5日指數移動平均/收盤價-1日前的收盤價的絕對值的8日指數移動平均的5日指數移動平均買賦值:2日內AA8的最低值=8日內AA8的最低值 AND 統計2日中滿足AA8<0的天數 AND AA8上穿AA8的2日加權移動平均當滿足條件MR時,在J位置書寫文字,COLOR00FFFF,LAYER0 當滿足條件買的5日過濾時,在J位置書寫文字,COLOR00FFFF,LAYER2 賣賦值:2日內AA8的最高值=8日內AA8的最高值 AND 統計2日中滿足AA8>0的天數 AND AA8的2日加權移動平均上穿AA8 當滿足條件MC時,在J位置書寫文字,COLOR00FF00,LAYER0 當滿足條件賣的5日過濾時,在J位置書寫文字,COLOR00FF00,LAYER2 DIFF賦值:收盤價的12日加權移動平均-收盤價的26日加權移動平均 DEA賦值:DIFF的9日加權移動平均輸出平滑異同平均:2*(DIFF-DEA),PRECIS2,線寬為0 Q賦值:120 SZ賦值:MACD>1日前的MACD 當滿足條件SZ時,在0和MACD*1*Q位置之間畫柱狀線,寬度為1.2,0不為0則畫空心柱.,COLOR0000CC 當滿足條件SZ時,在0和MACD*0.9*Q位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR0000EE 當滿足條件SZ時,在0和MACD*0.8*Q位置之間畫柱狀線,寬度為2.5,0不為0則畫空心柱.,COLOR0011FF 當滿足條件SZ時,在0和MACD*0.7*Q位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR0033FF 當滿足條件SZ時,在0和MACD*0.6*Q位置之間畫柱狀線,寬度為3.3,0不為0則畫空心柱.,COLOR0055FF 當滿足條件SZ時,在0和MACD*0.5*Q位置之間畫柱狀線,寬度為3.6,0不為0則畫空心柱.,COLOR0077FF 當滿足條件SZ時,在0和MACD*0.4*Q位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR0099FF 當滿足條件SZ時,在0和MACD*0.3*Q位置之間畫柱狀線,寬度為4.3,0不為0則畫空心柱.,COLOR00BBFF 當滿足條件SZ時,在0和MACD*0.2*Q位置之間畫柱狀線,寬度為4.7,0不為0則畫空心柱.,COLOR00DDFF 當滿足條件SZ時,在0和MACD*0.1*Q位置之間畫柱狀線,寬度為5.1,0不為0則畫空心柱.,COLOR00FFFF XD賦值:MACD<1日前的MACD 當滿足條件XD時,在0和MACD*1*Q位置之間畫柱狀線,寬度為1.2,0不為0則畫空心柱.,COLORFF0000 當滿足條件XD時,在0和MACD*0.9*Q位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLORFF2211 當滿足條件XD時,在0和MACD*0.8*Q位置之間畫柱狀線,寬度為2.5,0不為0則畫空心柱.,COLORFF3311 當滿足條件XD時,在0和MACD*0.7*Q位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFF5511 當滿足條件XD時,在0和MACD*0.6*Q位置之間畫柱狀線,寬度為3.3,0不為0則畫空心柱.,COLORFF7733 當滿足條件XD時,在0和MACD*0.5*Q位置之間畫柱狀線,寬度為3.6,0不為0則畫空心柱.,COLORFF8833 當滿足條件XD時,在0和MACD*0.4*Q位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR999933 當滿足條件XD時,在0和MACD*0.3*Q位置之間畫柱狀線,寬度為4.3,0不為0則畫空心柱.,COLOR77BB00 當滿足條件XD時,在0和MACD*0.2*Q位置之間畫柱狀線,寬度為4.7,0不為0則畫空心柱.,COLOR88DD00 當滿足條件XD時,在0和MACD*0.1*Q位置之間畫柱狀線,寬度為5.1,0不為0則畫空心柱.,COLOR00FF00

源碼：

DRAWGBKLAST(1,STRIP(RGB(0,0,80),RGB(0,20,20),0)); ;0,DOTLINE;80,DOTLINE;
{---kdj(9.3.3)----}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:SMA(RSV,3,1),ColorFF9900;
D:SMA(K,3,1),Color00FF00,LINETHICK1;
J:3*K-2*D,Color00FFFF,LINETHICK1,LAYER0;
PARTLINE(D,D<REF(D,1),rgb(0,255,0),D>REF(D,1),rgb(255,0,0)),PRECIS1,linethick2;
FILLRGN(D,J,D>REF(D,1),RGB(60,0,60)),LAYER5;
FILLRGN(D,J,D<REF(D,1),RGB(60,80,60)),LAYER5;{高拋低吸}
SJ:=WMA(((2*C+H+L)/4-LLV(L,5))/(HHV(H,5)-LLV(L,5))*100,2);
ZJ:=WMA(0.618*REF(SJ,1)+0.382*SJ,2);
MR:=CROSS(SJ,ZJ) AND SJ<30;
MC:=CROSS(ZJ,SJ) AND SJ>70;
AA8:=100*EMA(EMA(C-REF(C,1),8),5)/EMA(EMA(ABS(C-REF(C,1)),8),5);
買:=LLV(AA8,2)=LLV(AA8,8) AND COUNT(AA8<0,2) AND CROSS(AA8,WMA(AA8,2));
DRAWTEXT(MR ,J,'↖加倉1,'),COLOR00FFFF,LAYER0;;
DRAWTEXT(FILTER(買,5),J,'↖加倉 2.'),COLOR00FFff,LAYER2;;賣:=HHV(AA8,2)=HHV(AA8,8) AND COUNT(AA8>0,2) AND CROSS(WMA(AA8,2),AA8);
DRAWTEXT(MC,J,'↙減倉1,'),COLOR00FF00,LAYER0;;;
DRAWTEXT(FILTER(賣,5),J,'↙減倉 2'),COLOR00ff00,LAYER2;;;{----MACD(26.12.9)----EMA---}
{DIFF:=(EMA(CLOSE,12) - EMA(CLOSE,26));
DEA:=EMA(DIFF,9);
MACD:2*(DIFF-DEA),PRECIS2,LINETHICK0;}
{----MACD(26.12.9)----WMA----}
DIFF:=WMA(CLOSE,12)-WMA(CLOSE,26);
DEA:=WMA(DIFF,9);
MACD:2*(DIFF-DEA),PRECIS2,LINETHICK0;;
Q:=120;
SZ:=MACD>REF(MACD,1);
STICKLINE(SZ,0,MACD*1*Q,1.2,0),COLOR0000CC;
STICKLINE(SZ,0,MACD*0.9*Q,2,0),COLOR0000EE;
STICKLINE(SZ,0,MACD*0.8*Q,2.5,0),COLOR0011FF;
STICKLINE(SZ,0,MACD*0.7*Q,3,0),COLOR0033FF;
STICKLINE(SZ,0,MACD*0.6*Q,3.3,0),COLOR0055FF;
STICKLINE(SZ,0,MACD*0.5*Q,3.6,0),COLOR0077FF;
STICKLINE(SZ,0,MACD*0.4*Q,4,0),COLOR0099FF;
STICKLINE(SZ,0,MACD*0.3*Q,4.3,0),COLOR00BBFF;
STICKLINE(SZ,0,MACD*0.2*Q,4.7,0),COLOR00DDFF;
STICKLINE(SZ,0,MACD*0.1*Q,5.1,0),COLOR00FFFF;
XD:=MACD<REF(MACD,1);
STICKLINE(XD,0,MACD*1*Q,1.2,0),COLORFF0000;
STICKLINE(XD,0,MACD*0.9*Q,2,0),COLORFF2211;
STICKLINE(XD,0,MACD*0.8*Q,2.5,0),COLORFF3311;
STICKLINE(XD,0,MACD*0.7*Q,3,0),COLORFF5511;
STICKLINE(XD,0,MACD*0.6*Q,3.3,0),COLORFF7733;
STICKLINE(XD,0,MACD*0.5*Q,3.6,0),COLORFF8833;
STICKLINE(XD,0,MACD*0.4*Q,4,0),COLOR999933;
STICKLINE(XD,0,MACD*0.3*Q,4.3,0),COLOR77BB00;
STICKLINE(XD,0,MACD*0.2*Q,4.7,0),COLOR88DD00;
STICKLINE(XD,0,MACD*0.1*Q,5.1,0),COLOR00FF00;
DRAWGBK(SZ,STRIP(RGB(0,0,255),RGB(60,0,60),0)); {------};CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.tumamayizhan.com',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
DRAWTEXTREL(10 ,10 ,'指標公式');

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