MACD,KDJ,RSI三合一底背離指標 通達信公式源碼(附圖)

市場成本:DMA(AMOUNT/V/100,V/CAPITAL),COLORRED;
DRAWICON(CROSS(C,市場成本),L-0.20,1);{1號圖標顯示紅臉}
{PARTLINE(市場成本,市場成本>REF(市場成本,1),RGB(255,0,0),NOT(市場成本<REF(市場成本,1)),RGB(0,0,255),1,RGB(0,0,255)),LINETHICK2;}
J1:MA(C,7),COLORWHITE;
J2:MA(C,21),COLORYELLOW;
DIFF:=EMA(CLOSE,12) – EMA(CLOSE,26);
DEA:=EMA(DIFF,9);

A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));

B1:=REF(C,A1+1)>C ANDREF(DIFF,A1+1)<DIFF AND CROSS(DIFF,DEA);

A2:=BARSLAST(REF(CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),1));

B2:=REF(C,A2+1)>C ANDREF("KDJ.K"(9,3,3),A2+1)<"KDJ.K"(9,3,3) ANDCROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3));

A3:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1));

B3:=REF(C,A3+1)>C AND
REF("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24)AND
CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24));

DRAWICON(B1>0,L-0.20,5);

DRAWTEXT(B1,L-0.30,'MACD底背'),COLORWHITE;

DRAWICON(B2>0,L-0.20,4);

DRAWTEXT(B2,L-0.30,'KDJ底背'),COLORFF00FF;

DRAWICON(B3>0,L-0.20,3);

DRAWTEXT(B3,L-0.30,'RSI底背'),COLORYELLOW;

DRAWICON(CROSS(DIFF,DEA) ANDCROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),L-0.20,6);

DRAWTEXT(CROSS(DIFF,DEA) ANDCROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),L-0.30,'金叉共振'),COLOR0099FF;

MACD,KDJ,RSI三合一底背離指標 通達信公式源碼(附圖),拾荒網

Leave a Comment

發佈留言必須填寫的電子郵件地址不會公開。 必填欄位標示為 *