MACD改編帶解盤指標公式

作者：飛狐來源：cxh99.com 發布時間：2020年11月24日

相關標簽:

源碼：
{MACD改編指標 LONG 26 SHORT 12 M 9 } input:long(26),short(12),m(9); DIFF:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG); DEA:=EMA(DIFF,M); MACD2:=2*(DIFF-DEA); VERTLINE(CLOSE<0 AND CROSS(DIFF,0)),color80; VERTLINE(CLOSE<0 AND CROSS(MACD2,0)),color80; VERTLINE(CLOSE<0 AND CROSS(0,DIFF)),color808080; VERTLINE(CLOSE<0 AND CROSS(0,MACD2)),color808080; DU0:=CROSS(DIFF,0); UD0:=CROSS(0,DIFF); TDU0:=BARSLAST(DU0); TUD0:=BARSLAST(UD0); DU3:=REF(DU0,1); UD3:=REF(UD0,1); TDU3:=BARSLAST(DU3); TUD3:=BARSLAST(UD3); UDGLINE:=IF(TDU3<TUD3,REF(HHV(HIGH,2),TDU3),REF(LLV(LOW,2),TUD3)); JDU0:=REF(CLOSE,1)<=REF(UDGLINE,1) AND CLOSE>UDGLINE AND TDU0<TUD0; JUD0:=REF(CLOSE,1)>=REF(UDGLINE,1) AND CLOSE<UDGLINE AND TUD0<TDU0; JDU1:=JDU0 AND COUNT(JDU0,TDU0)=1; JUD1:=JUD0 AND COUNT(JUD0,TUD0)=1; JDU2:=JDU1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1); JUD2:=JUD1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1); JDU3:=JDU1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1); JUD3:=JUD1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1); BSLINE:=IF(BARSLAST(JDU2)<BARSLAST(JUD2),IF(REF(CROSS(0,MACD2),1),LLV(LOW,2),REF(LLV(LOW,2),BARSLAST(REF(CROSS(0,MACD2),1)))),IF(REF(CROSS(MACD2,0),1),HHV(HIGH,2),REF(HHV(HIGH,2),BARSLAST(REF(CROSS(MACD2,0),1))))); DRAWICON(JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1),0,10),ALIGN4; DRAWICON(JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1),0,11),ALIGN5; STICKLINE(MACD2>=0,0,MACD2,6,1),colorFF; STICKLINE(MACD2>=0 AND MACD2<REF(MACD2,1),0,MACD2,6,0),colorFF; STICKLINE(MACD2<0,0,MACD2,6,0),colorFFFF00; STICKLINE(MACD2<0 AND MACD2>REF(MACD2,1),0,MACD2,6,1),colorFFFF00; DIF:DIFF,LINETHICK2,colorFFFF; MACD:DEA,colorFF00; DEF:MACD2,LINETHICK0,colorFFFF00; STICKLINE(CLOSE>0,0,0,10,0),color808080; DEFUT:=BARSLAST(CROSS(MACD2,0)); DEFDT:=BARSLAST(CROSS(0,MACD2)); DEFUL:=IF(MACD2>=0,HHV(MACD2,DEFUT+1),REF(HHV(MACD2,DEFUT+1),DEFDT+1)); DEFDL:=IF(MACD2<0,LLV(MACD2,DEFDT+1),REF(LLV(MACD2,DEFDT+1),DEFUT+1)); DEFU2L:=REF(DEFUL,DEFUT+1); DEFD2L:=REF(DEFDL,DEFDT+1); DRAWICON(LLV(MACD2,4)>0 AND MACD2<REF(MACD2,1) AND REF(MACD2,1)>REF(MACD2,2) AND REF(MACD2,2)>REF(MACD2,3),MACD2,5),ALIGN0; DRAWICON(HHV(MACD2,4)<0 AND MACD2>REF(MACD2,1) AND REF(MACD2,1)<REF(MACD2,2) AND REF(MACD2,2)<REF(MACD2,3),MACD2,4); DRAWICON((JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1)) AND MACD2>=0 AND REF(MACD2,1)<REF(DEFU2L,1) AND MACD2>DEFU2L,MACD2,12),ALIGN0; DRAWICON((JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1)) AND MACD2<0 AND REF(MACD2,1)>REF(DEFD2L,1) AND MACD2<DEFD2L,MACD2,12); EXPLAIN(JDU2,'注意長線趨勢空轉多'); EXPLAIN(JUD2,'注意長線趨勢多轉空'); EXPLAIN(JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1),'長線為多頭趨勢'); EXPLAIN(JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1),'長線為空頭趨勢'); EXPLAINEX(JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1),'MACD多頭防守價',BSLINE,2,1); EXPLAINEX(JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1),'MACD空頭防守價',BSLINE,2,1); EXPLAIN((JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1)) AND CLOSE<BSLINE,'防守價跌破：多頭小心'); EXPLAIN((JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1)) AND CLOSE>BSLINE,'防守價突破：空頭小心'); EXPLAIN((JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1)) AND CROSS(MACD2,0),'空頭注意今明兩日高點壓力\n找日落K線放空，用線控盤'); EXPLAIN((JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1)) AND CROSS(0,MACD2),'多頭注意今明兩日低點支撐\n找日出K線做多，用線控盤'); EXPLAIN((JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1)) AND MACD2>=0 AND REF(MACD2,1)<REF(DEFU2L,1) AND MACD2>DEFU2L,'DEF柱狀特殊研判\n空頭注意今明兩日高點壓力'); EXPLAIN((JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1)) AND MACD2<0 AND REF(MACD2,1)>REF(DEFD2L,1) AND MACD2<DEFD2L,'DEF柱狀特殊研判\n多頭注意今明兩日低點支撐'); EXPLAINEX((REF(JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1),1)) AND CROSS(REF(MACD2,1),0),'空頭注意壓力',HHV(HIGH,2),2,1); EXPLAIN((REF(JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1),1)) AND CROSS(REF(MACD2,1),0),'找日落K線放空，用線控盤'); EXPLAINEX((REF(JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1),1)) AND CROSS(0,REF(MACD2,1)),'多頭注意支撐',LLV(LOW,2),2,1); EXPLAIN((REF(JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1),1)) AND CROSS(0,REF(MACD2,1)),'找日出K線進場，用線控盤'); EXPLAIN(LLV(MACD2,4)>0 AND MACD2<REF(MACD2,1) AND REF(MACD2,1)>REF(MACD2,2) AND REF(MACD2,2)>REF(MACD2,3),'請注意DEF柱狀縮頭'); EXPLAIN(HHV(MACD2,4)<0 AND MACD2>REF(MACD2,1) AND REF(MACD2,1)<REF(MACD2,2) AND REF(MACD2,2)<REF(MACD2,3),'請注意DEF柱狀縮腳');

?來源:程序化99（ www.tumamayizhan.com ）

原理解析：

輸出INPUT:LONG(26),SHORT(12),M(9)

DIFF賦值:收盤價的SHORT日指數移動平均-收盤價的LONG日指數移動平均

DEA賦值:DIFF的M日指數移動平均

MACD2賦值:2*(DIFF-DEA)

VERTLINE(收盤價<0 AND DIFF上穿0),COLOR80

VERTLINE(收盤價<0 AND MACD2上穿0),COLOR80

VERTLINE(收盤價<0 AND 0上穿DIFF),COLOR808080

VERTLINE(收盤價<0 AND 0上穿MACD2),COLOR808080

DU0賦值:DIFF上穿0

UD0賦值:0上穿DIFF

TDU0賦值:上次DU0距今天數

TUD0賦值:上次UD0距今天數

DU3賦值:1日前的DU0

UD3賦值:1日前的UD0

TDU3賦值:上次DU3距今天數

TUD3賦值:上次UD3距今天數

UDGLINE賦值:如果TDU3<TUD3,返回TDU3日前的2日內最高價的最高值,否則返回TUD3日前的2日內最低價的最低值

JDU0賦值:1日前的收盤價<=1日前的UDGLINE AND 收盤價>UDGLINE AND TDU0<TUD0

JUD0賦值:1日前的收盤價>=1日前的UDGLINE AND 收盤價<UDGLINE AND TUD0<TDU0

JDU1賦值:JDU0 AND 統計TDU0日中滿足JDU0的天數=1

JUD1賦值:JUD0 AND 統計TUD0日中滿足JUD0的天數=1

JDU2賦值:JDU1 AND 1日前的上次JUD1距今天數<1日前的上次JDU1距今天數

JUD2賦值:JUD1 AND 1日前的上次JUD1距今天數>1日前的上次JDU1距今天數

JDU3賦值:JDU1 AND 1日前的上次JUD1距今天數>1日前的上次JDU1距今天數

JUD3賦值:JUD1 AND 1日前的上次JUD1距今天數<1日前的上次JDU1距今天數

BSLINE賦值:如果上次JDU2距今天數<上次JUD2距今天數,返回如果1日前的0上穿MACD2,返回2日內最低價的最低值,否則返回上次1日前的0上穿MACD2距今天數日前的2日內最低價的最低值,否則返回如果1日前的MACD2上穿0,返回2日內最高價的最高值,否則返回上次1日前的MACD2上穿0距今天數日前的2日內最高價的最高值

當滿足條件JDU1ORBARSLAST(JDU1)<上次JUD1距今天數時,在0位置畫10號圖標,ALIGN4

當滿足條件JUD1ORBARSLAST(JDU1)>上次JUD1距今天數時,在0位置畫11號圖標,ALIGN5

當滿足條件MACD2>=0時,在0和MACD2位置之間畫柱狀線,寬度為6,1不為0則畫空心柱.,COLORFF

當滿足條件MACD2>=0ANDMACD2<1日前的MACD2時,在0和MACD2位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLORFF

當滿足條件MACD2<0時,在0和MACD2位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLORFFFF00

當滿足條件MACD2<0ANDMACD2>1日前的MACD2時,在0和MACD2位置之間畫柱狀線,寬度為6,1不為0則畫空心柱.,COLORFFFF00

輸出DIF:DIFF,線寬為2,COLORFFFF

輸出平滑異同平均:DEA,COLORFF00

輸出DEF:MACD2,線寬為0,COLORFFFF00

當滿足條件收盤價>0時,在0和0位置之間畫柱狀線,寬度為10,0不為0則畫空心柱.,COLOR808080

DEFUT賦值:上次MACD2上穿0距今天數

DEFDT賦值:上次0上穿MACD2距今天數

DEFUL賦值:如果MACD2>=0,返回DEFUT+1日內MACD2的最高值,否則返回DEFDT+1日前的DEFUT+1日內MACD2的最高值

DEFDL賦值:如果MACD2<0,返回DEFDT+1日內MACD2的最低值,否則返回DEFUT+1日前的DEFDT+1日內MACD2的最低值

DEFU2L賦值:DEFUT+1日前的DEFUL

DEFD2L賦值:DEFDT+1日前的DEFDL

當滿足條件4日內MACD2的最低值>0ANDMACD2<1日前的MACD2ANDREF(MACD2,1)>2日前的MACD2ANDREF(MACD2,2)>3日前的MACD2時,在MACD2位置畫5號圖標,ALIGN0

當滿足條件4日內MACD2的最高值<0ANDMACD2>1日前的MACD2ANDREF(MACD2,1)<2日前的MACD2ANDREF(MACD2,2)<3日前的MACD2時,在MACD2位置畫4號圖標

當滿足條件(JUD1ORBARSLAST(JDU1)>上次JUD1距今天數)ANDMACD2>=0ANDREF(MACD2,1)<1日前的DEFU2LANDMACD2>DEFU2L時,在MACD2位置畫12號圖標,ALIGN0

當滿足條件(JDU1ORBARSLAST(JDU1)<上次JUD1距今天數)ANDMACD2<0ANDREF(MACD2,1)>1日前的DEFD2LANDMACD2<DEFD2L時,在MACD2位置畫12號圖標

EXPLAIN(JDU2,'注意長線趨勢空轉多')

EXPLAIN(JUD2,'注意長線趨勢多轉空')

EXPLAIN(JDU1 OR 上次JDU1距今天數<上次JUD1距今天數,'長線為多頭趨勢')

EXPLAIN(JUD1 OR 上次JDU1距今天數>上次JUD1距今天數,'長線為空頭趨勢')

EXPLAINEX(JDU1 OR 上次JDU1距今天數<上次JUD1距今天數,'MACD多頭防守價',BSLINE,2,1)

EXPLAINEX(JUD1 OR 上次JDU1距今天數>上次JUD1距今天數,'MACD空頭防守價',BSLINE,2,1)

EXPLAIN((JDU1 OR 上次JDU1距今天數<上次JUD1距今天數) AND 收盤價<BSLINE,'防守價跌破：多頭小心')

EXPLAIN((JUD1 OR 上次JDU1距今天數>上次JUD1距今天數) AND 收盤價>BSLINE,'防守價突破：空頭小心')

EXPLAIN((JUD1 OR 上次JDU1距今天數>上次JUD1距今天數) AND MACD2上穿0,'空頭注意今明兩日高點壓力\N找日落K線放空，用線控盤')

EXPLAIN((JDU1 OR 上次JDU1距今天數<上次JUD1距今天數) AND 0上穿MACD2,'多頭注意今明兩日低點支撐\N找日出K線做多，用線控盤')

EXPLAIN((JUD1 OR 上次JDU1距今天數>上次JUD1距今天數) AND MACD2>=0 AND 1日前的MACD2<1日前的DEFU2L AND MACD2>DEFU2L,'DEF柱狀特殊研判\N空頭注意今明兩日高點壓力')

EXPLAIN((JDU1 OR 上次JDU1距今天數<上次JUD1距今天數) AND MACD2<0 AND 1日前的MACD2>1日前的DEFD2L AND MACD2<DEFD2L,'DEF柱狀特殊研判\N多頭注意今明兩日低點支撐')

EXPLAINEX((1日前的JUD1ORBARSLAST(JDU1)>上次JUD1距今天數) AND 1日前的MACD2上穿0,'空頭注意壓力',2日內最高價的最高值,2,1)

EXPLAIN((1日前的JUD1ORBARSLAST(JDU1)>上次JUD1距今天數) AND 1日前的MACD2上穿0,'找日落K線放空，用線控盤')

EXPLAINEX((1日前的JDU1ORBARSLAST(JDU1)<上次JUD1距今天數) AND 0上穿1日前的MACD2,'多頭注意支撐',2日內最低價的最低值,2,1)

EXPLAIN((1日前的JDU1ORBARSLAST(JDU1)<上次JUD1距今天數) AND 0上穿1日前的MACD2,'找日出K線進場，用線控盤')

EXPLAIN(4日內MACD2的最低值>0 AND MACD2<1日前的MACD2 AND 1日前的MACD2>2日前的MACD2 AND 2日前的MACD2>3日前的MACD2,'請注意DEF柱狀縮頭')

EXPLAIN(4日內MACD2的最高值<0 AND MACD2>1日前的MACD2 AND 1日前的MACD2<2日前的MACD2 AND 2日前的MACD2<3日前的MACD2,'請注意DEF柱狀縮腳')

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

MACD改編 帶解盤指標公式

MACD改編帶解盤指標公式