修改，謝謝。
作者：文華財經 來源：cxh99.com 發布時間：2023年11月02日
-
咨詢內容：
老師，請幫我僅保留MACD? KDJ? RSI 頂底背離的顯示，其它的都不要。
??? A:=MA(CLOSE,17)+ABS(MA(CLOSE,17)-REF(MA(CLOSE,17),1));?B:=MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1);?分水嶺:IF(MA(CLOSE,17)<B,B,MA(CLOSE,17)),COLORFF00FF,LINETHICK2;?操作線:分水嶺-(EMA(C,3)-分水嶺),COLOR00FFFF,LINETHICK2;?PM:MA(C,5),COLORWHITE,LINETHICK2;?IF(PM> REF(PM,1),PM,NULL),COLORRED,LINETHICK2;?IF(PM=REF(PM,1),PM,NULL),COLORRED;?IF(PM<REF(PM,1),PM,NULL),COLORFF9900,LINETHICK2;?S:=(PM> 操作線);?DD:=分水嶺<REF(分水嶺,1);?IF(DD,分水嶺,NULL),COLOR00FF00,LINETHICK2;?IF(S,分水嶺,NULL),COLOR00FF00,POINTDOT,LINETHICK4;?DIF :=EMA(CLOSE,12) - EMA(CLOSE,26);DEA? :=EMA(DIF,9);MACD:=2*(DIF-DEA),COLORSTICK;RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);D:=SMA(K,3,1);J:=3*K-2*D;LC := REF(CLOSE,1);
RSI1:SMA(MAX(CLOSE-LC,0),7,1)/SMA(ABS(CLOSE-LC),7,1)*100;RSI2:SMA(MAX(CLOSE-LC,0),14,1)/SMA(ABS(CLOSE-LC),14,1)*100;DRAWICON(CROSS(分水嶺,操作線),分水嶺-0.1,1);A1:=BARSLAST(REF(CROSS(DIF,DEA),1));?B1:=REF(C,A1+1)> C AND REF(DIF,A1+1)<DIF AND CROSS(DIF,DEA);?DRAWTEXT(B1> 0,L-0.02,'ACD底背離',COLOR00FFFF;{MACD底背離}?A2:=BARSLAST(REF(CROSS(K,D),1));?B2:=REF(C,A2+1)> C AND REF(K,A2+1)<K AND CROSS(K,D);?DRAWTEXT(B2,L-0.10,'DJ底背離',COLORFF00FF;{KDJ底背離}?A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));?B3:=REF(C,A3+1)> C AND REF(RSI1,A3+1)<RSI1 AND CROSS(RSI1,RSI2);?DRAWTEXT(B3> 0,L-0.18,'SI底背離',COLOR0000FF;{RSI底背離}?C1:=BARSLAST(REF(CROSS(DEA,DIF),1));?D1:=REF(C,C1+1)<C AND REF(DIF,C1+1)> DIF AND CROSS(DEA,DIF);?DRAWTEXT(D1> 0,H+0.16,'ACD頂背離',COLOR00FF00;{MACD頂背離}?C2:=BARSLAST(REF(CROSS(D,K),1));?D2:=REF(C,C2+1)<C AND REF(K,C2+1)> K AND CROSS(D,K);?DRAWTEXT(D2> 0,H+0.08,'DJ頂背離',COLORFFFFCC;{KDJ頂背離}?C3:=BARSLAST(REF(CROSS(RSI2,RSI1),1));?D3:=REF(C,C3+1)<C AND REF(RSI1,C3+1)> RSI1 AND CROSS(RSI2,RSI1);?DRAWTEXT(D3>0,H+0.04,'SI頂背離',COLORFF9900;
?
?來源:程序化99
-
文華技術人員：
?
DIF :=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA? :=EMA(DIF,9);
MACD:=2*(DIF-DEA),COLORSTICK;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
LC := REF(CLOSE,1);
RSI1:SMA(MAX(CLOSE-LC,0),7,1)/SMA(ABS(CLOSE-LC),7,1)*100;
RSI2:SMA(MAX(CLOSE-LC,0),14,1)/SMA(ABS(CLOSE-LC),14,1)*100;
A1:=BARSLAST(REF(CROSS(DIF,DEA),1));?
B1:=REF(C,A1+1)> C AND REF(DIF,A1+1)<DIF AND CROSS(DIF,DEA);?
DRAWTEXT(B1> 0,L-0.02,'ACD底背離',COLOR00FFFF;
{MACD底背離}?
A2:=BARSLAST(REF(CROSS(K,D),1));?
B2:=REF(C,A2+1)> C AND REF(K,A2+1)<K AND CROSS(K,D);?
DRAWTEXT(B2,L-0.10,'DJ底背離',COLORFF00FF;
{KDJ底背離}?
A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));?
B3:=REF(C,A3+1)> C AND REF(RSI1,A3+1)<RSI1 AND CROSS(RSI1,RSI2);?
DRAWTEXT(B3> 0,L-0.18,'SI底背離',COLOR0000FF;
{RSI底背離}?
C1:=BARSLAST(REF(CROSS(DEA,DIF),1));?
D1:=REF(C,C1+1)<C AND REF(DIF,C1+1)> DIF AND CROSS(DEA,DIF);?
DRAWTEXT(D1> 0,H+0.16,'ACD頂背離',COLOR00FF00;
{MACD頂背離}?
C2:=BARSLAST(REF(CROSS(D,K),1));?
D2:=REF(C,C2+1)<C AND REF(K,C2+1)> K AND CROSS(D,K);?
DRAWTEXT(D2> 0,H+0.08,'DJ頂背離',COLORFFFFCC;
{KDJ頂背離}?
C3:=BARSLAST(REF(CROSS(RSI2,RSI1),1));?
D3:=REF(C,C3+1)<C AND REF(RSI1,C3+1)> RSI1 AND CROSS(RSI2,RSI1);?
DRAWTEXT(D3>0,H+0.04,'SI頂背離',COLORFF9900;
打印本文
關閉窗口