相關(guān)標(biāo)簽:

?

?

?

原理解析：
DIFF賦值:收盤(pán)價(jià)的SHORT日指數(shù)移動(dòng)平均-收盤(pán)價(jià)的LONG日指數(shù)移動(dòng)平均 DEA賦值:DIFF的M日指數(shù)移動(dòng)平均 MACD2賦值:2*(DIFF-DEA) VERTLINE(收盤(pán)價(jià)<0 AND DIFF上穿0),COLOR80 VERTLINE(收盤(pán)價(jià)<0 AND MACD2上穿0),COLOR80 VERTLINE(收盤(pán)價(jià)<0 AND 0上穿DIFF),COLOR808080 VERTLINE(收盤(pán)價(jià)<0 AND 0上穿MACD2),COLOR808080 DU0賦值:DIFF上穿0 UD0賦值:0上穿DIFF TDU0賦值:上次DU0距今天數(shù) TUD0賦值:上次UD0距今天數(shù) DU3賦值:1日前的DU0 UD3賦值:1日前的UD0 TDU3賦值:上次DU3距今天數(shù) TUD3賦值:上次UD3距今天數(shù) UDGLINE賦值:如果TDU3<TUD3,返回TDU3日前的2日內(nèi)最高價(jià)的最高值,否則返回TUD3日前的2日內(nèi)最低價(jià)的最低值 JDU0賦值:1日前的收盤(pán)價(jià)<=1日前的UDGLINE AND 收盤(pán)價(jià)>UDGLINE AND TDU0<TUD0 JUD0賦值:1日前的收盤(pán)價(jià)>=1日前的UDGLINE AND 收盤(pán)價(jià)<UDGLINE AND TUD0<TDU0 JDU1賦值:JDU0 AND 統(tǒng)計(jì)TDU0日中滿足JDU0的天數(shù)=1 JUD1賦值:JUD0 AND 統(tǒng)計(jì)TUD0日中滿足JUD0的天數(shù)=1 JDU2賦值:JDU1 AND 1日前的上次JUD1距今天數(shù)<1日前的上次JDU1距今天數(shù) JUD2賦值:JUD1 AND 1日前的上次JUD1距今天數(shù)>1日前的上次JDU1距今天數(shù) JDU3賦值:JDU1 AND 1日前的上次JUD1距今天數(shù)>1日前的上次JDU1距今天數(shù) JUD3賦值:JUD1 AND 1日前的上次JUD1距今天數(shù)<1日前的上次JDU1距今天數(shù) BSLINE賦值:如果上次JDU2距今天數(shù)<上次JUD2距今天數(shù),返回如果1日前的0上穿MACD2,返回2日內(nèi)最低價(jià)的最低值,否則返回上次1日前的0上穿MACD2距今天數(shù)日前的2日內(nèi)最低價(jià)的最低值,否則返回如果1日前的MACD2上穿0,返回2日內(nèi)最高價(jià)的最高值,否則返回上次1日前的MACD2上穿0距今天數(shù)日前的2日內(nèi)最高價(jià)的最高值 當(dāng)滿足條件JDU1ORBARSLAST(JDU1)<上次JUD1距今天數(shù)時(shí),在0位置畫(huà)10號(hào)圖標(biāo),ALIGN4 當(dāng)滿足條件JUD1ORBARSLAST(JDU1)>上次JUD1距今天數(shù)時(shí),在0位置畫(huà)11號(hào)圖標(biāo),ALIGN5 當(dāng)滿足條件MACD2>=0時(shí),在0和MACD2位置之間畫(huà)柱狀線,寬度為6,1不為0則畫(huà)空心柱.,COLORFF 當(dāng)滿足條件MACD2>=0ANDMACD2<1日前的MACD2時(shí),在0和MACD2位置之間畫(huà)柱狀線,寬度為6,0不為0則畫(huà)空心柱.,COLORFF 當(dāng)滿足條件MACD2<0時(shí),在0和MACD2位置之間畫(huà)柱狀線,寬度為6,0不為0則畫(huà)空心柱.,COLORFFFF00 當(dāng)滿足條件MACD2<0ANDMACD2>1日前的MACD2時(shí),在0和MACD2位置之間畫(huà)柱狀線,寬度為6,1不為0則畫(huà)空心柱.,COLORFFFF00 輸出DIF:DIFF,線寬為2,COLORFFFF 輸出平滑異同平均:DEA,COLORFF00 輸出DEF:MACD2,線寬為0,COLORFFFF00 當(dāng)滿足條件收盤(pán)價(jià)>0時(shí),在0和0位置之間畫(huà)柱狀線,寬度為10,0不為0則畫(huà)空心柱.,COLOR808080 DEFUT賦值:上次MACD2上穿0距今天數(shù) DEFDT賦值:上次0上穿MACD2距今天數(shù) DEFUL賦值:如果MACD2>=0,返回DEFUT+1日內(nèi)MACD2的最高值,否則返回DEFDT+1日前的DEFUT+1日內(nèi)MACD2的最高值 DEFDL賦值:如果MACD2<0,返回DEFDT+1日內(nèi)MACD2的最低值,否則返回DEFUT+1日前的DEFDT+1日內(nèi)MACD2的最低值 DEFU2L賦值:DEFUT+1日前的DEFUL DEFD2L賦值:DEFDT+1日前的DEFDL 當(dāng)滿足條件4日內(nèi)MACD2的最低值>0ANDMACD2<1日前的MACD2ANDREF(MACD2,1)>2日前的MACD2ANDREF(MACD2,2)>3日前的MACD2時(shí),在MACD2位置畫(huà)5號(hào)圖標(biāo),ALIGN0 當(dāng)滿足條件4日內(nèi)MACD2的最高值<0ANDMACD2>1日前的MACD2ANDREF(MACD2,1)<2日前的MACD2ANDREF(MACD2,2)<3日前的MACD2時(shí),在MACD2位置畫(huà)4號(hào)圖標(biāo) 當(dāng)滿足條件(JUD1ORBARSLAST(JDU1)>上次JUD1距今天數(shù))ANDMACD2>=0ANDREF(MACD2,1)<1日前的DEFU2LANDMACD2>DEFU2L時(shí),在MACD2位置畫(huà)12號(hào)圖標(biāo),ALIGN0 當(dāng)滿足條件(JDU1ORBARSLAST(JDU1)<上次JUD1距今天數(shù))ANDMACD2<0ANDREF(MACD2,1)>1日前的DEFD2LANDMACD2<DEFD2L時(shí),在MACD2位置畫(huà)12號(hào)圖標(biāo) EXPLAIN(JDU2,'注意長(zhǎng)線趨勢(shì)空轉(zhuǎn)多') EXPLAIN(JUD2,'注意長(zhǎng)線趨勢(shì)多轉(zhuǎn)空') EXPLAIN(JDU1 OR 上次JDU1距今天數(shù)<上次JUD1距今天數(shù),'長(zhǎng)線為多頭趨勢(shì)') EXPLAIN(JUD1 OR 上次JDU1距今天數(shù)>上次JUD1距今天數(shù),'長(zhǎng)線為空頭趨勢(shì)') EXPLAINEX(JDU1 OR 上次JDU1距今天數(shù)<上次JUD1距今天數(shù),'MACD多頭防守價(jià)',BSLINE,2,1) EXPLAINEX(JUD1 OR 上次JDU1距今天數(shù)>上次JUD1距今天數(shù),'MACD空頭防守價(jià)',BSLINE,2,1) EXPLAIN((JDU1 OR 上次JDU1距今天數(shù)<上次JUD1距今天數(shù)) AND 收盤(pán)價(jià)<BSLINE,'防守價(jià)跌破：多頭小心') EXPLAIN((JUD1 OR 上次JDU1距今天數(shù)>上次JUD1距今天數(shù)) AND 收盤(pán)價(jià)>BSLINE,'防守價(jià)突破：空頭小心') EXPLAIN((JUD1 OR 上次JDU1距今天數(shù)>上次JUD1距今天數(shù)) AND MACD2上穿0,'空頭注意今明兩日高點(diǎn)壓力\N找日落K線放空，用線控盤(pán)') EXPLAIN((JDU1 OR 上次JDU1距今天數(shù)<上次JUD1距今天數(shù)) AND 0上穿MACD2,'多頭注意今明兩日低點(diǎn)支撐\N找日出K線做多，用線控盤(pán)') EXPLAIN((JUD1 OR 上次JDU1距今天數(shù)>上次JUD1距今天數(shù)) AND MACD2>=0 AND 1日前的MACD2<1日前的DEFU2L AND MACD2>DEFU2L,'DEF柱狀特殊研判\(zhòng)N空頭注意今明兩日高點(diǎn)壓力') EXPLAIN((JDU1 OR 上次JDU1距今天數(shù)<上次JUD1距今天數(shù)) AND MACD2<0 AND 1日前的MACD2>1日前的DEFD2L AND MACD2<DEFD2L,'DEF柱狀特殊研判\(zhòng)N多頭注意今明兩日低點(diǎn)支撐') EXPLAINEX((1日前的JUD1ORBARSLAST(JDU1)>上次JUD1距今天數(shù)) AND 1日前的MACD2上穿0,'空頭注意壓力',2日內(nèi)最高價(jià)的最高值,2,1) EXPLAIN((1日前的JUD1ORBARSLAST(JDU1)>上次JUD1距今天數(shù)) AND 1日前的MACD2上穿0,'找日落K線放空，用線控盤(pán)') EXPLAINEX((1日前的JDU1ORBARSLAST(JDU1)<上次JUD1距今天數(shù)) AND 0上穿1日前的MACD2,'多頭注意支撐',2日內(nèi)最低價(jià)的最低值,2,1) EXPLAIN((1日前的JDU1ORBARSLAST(JDU1)<上次JUD1距今天數(shù)) AND 0上穿1日前的MACD2,'找日出K線進(jìn)場(chǎng)，用線控盤(pán)') EXPLAIN(4日內(nèi)MACD2的最低值>0 AND MACD2<1日前的MACD2 AND 1日前的MACD2>2日前的MACD2 AND 2日前的MACD2>3日前的MACD2,'請(qǐng)注意DEF柱狀縮頭') EXPLAIN(4日內(nèi)MACD2的最高值<0 AND MACD2>1日前的MACD2 AND 1日前的MACD2<2日前的MACD2 AND 2日前的MACD2<3日前的MACD2,'請(qǐng)注意DEF柱狀縮腳')

?

?來(lái)源:程序化99（ m.weiqiv.net.cn ）

源碼：

?

?

?

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,'注意長(zhǎng)線趨勢(shì)空轉(zhuǎn)多');
EXPLAIN(JUD2,'注意長(zhǎng)線趨勢(shì)多轉(zhuǎn)空');
EXPLAIN(JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1),'長(zhǎng)線為多頭趨勢(shì)');
EXPLAIN(JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1),'長(zhǎng)線為空頭趨勢(shì)');
EXPLAINEX(JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1),'MACD多頭防守價(jià)',BSLINE,2,1);
EXPLAINEX(JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1),'MACD空頭防守價(jià)',BSLINE,2,1);
EXPLAIN((JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1)) AND CLOSE<BSLINE,'防守價(jià)跌破：多頭小心');
EXPLAIN((JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1)) AND CLOSE>BSLINE,'防守價(jià)突破：空頭小心');
EXPLAIN((JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1)) AND CROSS(MACD2,0),'空頭注意今明兩日高點(diǎn)壓力\n找日落K線放空，用線控盤(pán)');
EXPLAIN((JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1)) AND CROSS(0,MACD2),'多頭注意今明兩日低點(diǎn)支撐\n找日出K線做多，用線控盤(pán)');
EXPLAIN((JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1)) AND MACD2>=0 AND REF(MACD2,1)<REF(DEFU2L,1) AND MACD2>DEFU2L,'DEF柱狀特殊研判\(zhòng)n空頭注意今明兩日高點(diǎn)壓力');
EXPLAIN((JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1)) AND MACD2<0 AND REF(MACD2,1)>REF(DEFD2L,1) AND MACD2<DEFD2L,'DEF柱狀特殊研判\(zhòng)n多頭注意今明兩日低點(diǎ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線放空，用線控盤(pán)');
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線進(jìn)場(chǎng)，用線控盤(pán)');
EXPLAIN(LLV(MACD2,4)>0 AND MACD2<REF(MACD2,1) AND REF(MACD2,1)>REF(MACD2,2) AND REF(MACD2,2)>REF(MACD2,3),'請(qǐng)注意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),'請(qǐng)注意DEF柱狀縮腳');

?

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

?