請老師能把這個幫忙改一下嗎？謝謝
作者：文華財經 來源：cxh99.com 發布時間：2025年02月19日
-
咨詢內容：
?
DIF:EMA(CLOSE,12)-EMA(CLOSE,26)COLORRED,LINETHICK2;DEA:EMA(DIF,9);IF(DIF<DEA,DIF,DRAWNULL),COLORWHITE,LINETHICK2;MACD:(DIF-DEA)*2,COLORSTICK;VAR1:=TDXDLL5(1,H,L,C);筆低A:=LOW<=LLV(LOW,筆參數),NODRAW;筆高A:=HIGH>=HHV(HIGH,筆參數),NODRAW;筆低:=筆低A AND 筆高A=0,NODRAW;筆高:=筆高A AND 筆低A=0,NODRAW;上筆:=DRAWLINE(筆低,LOW,筆高,HIGH,0)COLOR0000FF;下筆:=DRAWLINE(筆高,HIGH,筆低,LOW,0),COLOR00FF00;拐下:=上筆>REF(上筆,1) AND 下筆>REFX(下筆,1),NODRAW;拐上:=下筆<REF(下筆,1) AND 上筆<REFX(上筆,1),NODRAW;段低A:=LOW<=LLV(LOW,段參數*筆參數),NODRAW;段高A:=HIGH>=HHV(HIGH,段參數*筆參數),NODRAW;段低:=段低A AND 段高A=0,NODRAW;段高:=段高A AND 段低A=0,NODRAW;上段:=DRAWLINE(段低,LOW,段高,HIGH,0),LINETHICK2,COLORMAGENTA;下段:=DRAWLINE(段高,HIGH,段低,LOW,0),LINETHICK2,COLORFF8000;特殊底:=下段=上段 AND? 段低 AND MACD<0,NODRAW;TTT:=REF(BARSLAST(特殊底),1)+1;
底背離1:=特殊底 AND LOW<REF(LOW,TTT) AND DIF>REF(DIF,TTT) AND LLV(DIF,BARSLASTCOUNT(MACD<0))>REF(DIF,TTT),NODRAW;底背左點1:=BACKSET(底背離1,TTT+1) AND REF(BACKSET(底背離1,TTT+1),1)=0 AND 特殊底;DRAWLINE(底背左點1,DIF,底背離1,DIF,0),COLORFF00FF,LINETHICK2;底背離2:=特殊底 AND LOW<REF(LOW,TTT) AND MACD>REF(MACD,TTT) AND LLV(MACD,BARSLASTCOUNT(MACD<0))>REF(MACD,TTT),NODRAW;底背左點2:=BACKSET(底背離2,TTT+1) AND REF(BACKSET(底背離2,TTT+1),1)=0 AND 特殊底;DRAWLINE(底背左點2,MACD,底背離2,MACD,0),COLORFF00FF,LINETHICK1;
特殊頂:=下段=上段 AND? 段高 AND MACD>0,NODRAW;TTTG:=REF(BARSLAST(特殊頂),1)+1;頂背離1:=特殊頂 AND HIGH>REF(HIGH,TTTG) AND DIF<REF(DIF,TTTG) AND HHV(DIF,BARSLASTCOUNT(MACD>0))<REF(DIF,TTTG),NODRAW;頂背左點1:=BACKSET(頂背離1,TTTG+1) AND REF(BACKSET(頂背離1,TTTG+1),1)=0 AND 特殊頂;DRAWLINE(頂背左點1,DIF,頂背離1,DIF,0),COLORGREEN,LINETHICK2;頂背離2:=特殊頂 AND HIGH>REF(HIGH,TTTG) AND MACD<REF(MACD,TTTG) AND HHV(MACD,BARSLASTCOUNT(MACD>0))<REF(MACD,TTTG),NODRAW;頂背左點2:=BACKSET(頂背離2,TTTG+1) AND REF(BACKSET(頂背離2,TTTG+1),1)=0 AND 特殊頂;DRAWLINE(頂背左點2,MACD,頂背離2,MACD,0),COLORGREEN,LINETHICK1;
DRAWTEXT(底背離2=1,MACD,'柱背離',COLORFF00FF;DRAWTEXT(底背離1=1,DIF,'線背離',COLORFF00FF;DRAWTEXT(頂背離2=1,MACD,'柱背離',COLORGREEN;DRAWTEXT(頂背離1=1,DIF,'線背離',COLORGREEN;
DRAWICON(REF(DIF,1)>REF(DIF,2) AND DIF<REF(DIF,1) AND DIF>0 AND DIF>DEA,DIF*1.1,2),COLORGREEN;DRAWICON(REF(DIF,1)<REF(DIF,2) AND DIF>REF(DIF,1) AND DIF<0 AND DIF<DEA,DIF*1.1,1),COLORRED;XA_2:=BARSLAST(REF(MACD,1)<0 AND MACD>0);XA_3:=LLVBARS(MACD,XA_2+20);XA_4:=IF(XA_3>XA_2,REF(MACD,XA_3),0);XA_5:=MACD<0 AND MACD>XA_4 AND LOW=LLV(LOW,XA_2+20) AND XA_4<0;柱背離1:=(REF(XA_5,1)=1 AND MACD>REF(MACD,1) AND REF(DIF,XA_3)<0 AND MACD<0),NODRAW;DRAWLINE(XA_4=XA_3,MACD,柱背離1,MACD,0),COLORRED,LINETHICK1;DRAWICON(柱背離1,0,26);柱背離A:BARSLAST(柱背離1>0)+1,COLORYELLOW,NODRAW;柱背離:BARSLAST(底背離2>0)+1,COLORMAGENTA,NODRAW;線背離:BARSLAST(底背離1>0)+1,COLORWHITE,NODRAW;
DRAWRECTREL(0,965,130,999,RGB(0,0,1)),NOFRAME;DRAWTEXT_FIX(1,0,1,0,'式源于教您炒股123社區WWW.JNCG123.COM',COLOR999999;
?
?來源:程序化99
-
文華技術人員：
不同軟件函數機制不同，該協會有差異，另外參數需要您根據需求手動調整：
DIF:EMA(CLOSE,12)-EMA(CLOSE,26),COLORRED,LINETHICK2;
DEA:EMA(DIF,9);
IF(DIF<DEA,DIF,NULL),COLORWHITE,LINETHICK2;
MACD:(DIF-DEA)*2,COLORSTICK;
段參數:=5;
筆參數:=20;
筆低A:=LOW<=LLV(LOW,筆參數),NODRAW;
筆高A:=HIGH>=HHV(HIGH,筆參數),NODRAW;
筆低:筆低A AND 筆高A=0,NODRAW;
筆高:筆高A AND 筆低A=0,NODRAW;
DRAWLINE1(筆低,LOW,筆高,HIGH,0),COLOR0000FF;
DRAWLINE1(筆高,HIGH,筆低,LOW,0),COLOR00FF00;
//拐上:=上筆>REF(上筆,1) AND 下筆>REFX(下筆,1),NODRAW;
//拐下:=下筆<REF(下筆,1) AND 上筆<REFX(上筆,1),NODRAW;
段低A:=LOW<=LLV(LOW,段參數*筆參數),NODRAW;
段高A:=HIGH>=HHV(HIGH,段參數*筆參數),NODRAW;
段低:=段低A AND 段高A=0,NODRAW;
段高:=段高A AND 段低A=0,NODRAW;
上段:=TRENDLINES(段低,LOW,段高,HIGH),LINETHICK2,COLORMAGENTA;
下段:=TRENDLINES(段高,HIGH,段低,LOW),LINETHICK2,COLORFF8000;
特殊底:=下段=上段 AND? 段低 AND MACD<0,NODRAW;
TTT:=REF(BARSLAST(特殊底),1)+1;
底背離1:=特殊底 AND LOW<REF(LOW,TTT) AND DIF>REF(DIF,TTT) AND LLV(DIF,BARSLASTCOUNT(MACD<0))>REF(DIF,TTT),NODRAW;
底背左點1:=BACKSET(底背離1,TTT+1) AND REF(BACKSET(底背離1,TTT+1),1)=0 AND 特殊底;
DRAWLINE(底背左點1,DIF,底背離1,DIF,0),COLORFF00FF,LINETHICK2;
底背離2:=特殊底 AND LOW<REF(LOW,TTT) AND MACD>REF(MACD,TTT) AND LLV(MACD,BARSLASTCOUNT(MACD<0))>REF(MACD,TTT),NODRAW;
底背左點2:=BACKSET(底背離2,TTT+1) AND REF(BACKSET(底背離2,TTT+1),1)=0 AND 特殊底;
DRAWLINE(底背左點2,MACD,底背離2,MACD,0),COLORFF00FF,LINETHICK1;
特殊頂:=下段=上段 AND? 段高 AND MACD>0,NODRAW;
TTTG:=REF(BARSLAST(特殊頂),1)+1;
頂背離1:=特殊頂 AND HIGH>REF(HIGH,TTTG) AND DIF<REF(DIF,TTTG) AND HHV(DIF,BARSLASTCOUNT(MACD>0))<REF(DIF,TTTG),NODRAW;
頂背左點1:=BACKSET(頂背離1,TTTG+1) AND REF(BACKSET(頂背離1,TTTG+1),1)=0 AND 特殊頂;
DRAWLINE(頂背左點1,DIF,頂背離1,DIF,0),COLORGREEN,LINETHICK2;
頂背離2:=特殊頂 AND HIGH>REF(HIGH,TTTG) AND MACD<REF(MACD,TTTG) AND HHV(MACD,BARSLASTCOUNT(MACD>0))<REF(MACD,TTTG),NODRAW;
頂背左點2:=BACKSET(頂背離2,TTTG+1) AND REF(BACKSET(頂背離2,TTTG+1),1)=0 AND 特殊頂;
DRAWLINE(頂背左點2,MACD,頂背離2,MACD,0),COLORGREEN,LINETHICK1;
DRAWTEXT(底背離2=1,MACD,'柱背離',COLORFF00FF;
DRAWTEXT(底背離1=1,DIF,'線背離',COLORFF00FF;
DRAWTEXT(頂背離2=1,MACD,'柱背離',COLORGREEN;
DRAWTEXT(頂背離1=1,DIF,'線背離',COLORGREEN;
DRAWICON(REF(DIF,1)>REF(DIF,2) AND DIF<REF(DIF,1) AND DIF>0 AND DIF>DEA,DIF*1.1,2),COLORGREEN;
DRAWICON(REF(DIF,1)<REF(DIF,2) AND DIF>REF(DIF,1) AND DIF<0 AND DIF<DEA,DIF*1.1,1),COLORRED;
XA_2:=BARSLAST(REF(MACD,1)<0 AND MACD>0);
XA_3:=LLVBARS(MACD,XA_2+20);
XA_4:=IF(XA_3>XA_2,REF(MACD,XA_3),0);
XA_5:=MACD<0 AND MACD>XA_4 AND LOW=LLV(LOW,XA_2+20) AND XA_4<0;
柱背離1:=(REF(XA_5,1)=1 AND MACD>REF(MACD,1) AND REF(DIF,XA_3)<0 AND MACD<0),NODRAW;
DRAWLINE(XA_4=XA_3,MACD,柱背離1,MACD,0),COLORRED,LINETHICK1;
DRAWICON(柱背離1,0,26);
柱背離A:=BARSLAST(柱背離1>0)+1,COLORYELLOW,NODRAW;
柱背離:BARSLAST(底背離2>0)+1,COLORMAGENTA,NODRAW;
線背離:BARSLAST(底背離1>0)+1,COLORWHITE,NODRAW;
打印本文
關閉窗口