請教MACD公式

作者：通達信來源：cxh99.com 發布時間：2015年10月28日

咨詢內容： 請教：求離當前時間最近macd為連續一堆綠柱時MACD最低值（有可能只一個綠柱），及這堆綠柱中價格最低值；同時算出離當前時間第二近macd為連續一堆綠柱時MACD最低值（有可能只一個綠柱），及這堆綠柱中價格最低值(副圖)。如下圖：

此主題相關圖片如下qq圖片20140119105318.jpg：
通達信技術部： 去參考 nirendao的帖子。他那里是 Diff背離，你要做的是 macd柱背離。
通達信客服： 用以下方式能準確計算出lmacd1和llv1，但是lmacd2和llv2有時不正確，用計算出的數字代替TS1+TS2+TS5和TS6時驗證又是正確的，請指導下

DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD:=(DIF-DEA)*2;
TS1:BARSLAST(MACD<0);
{從右向左數第一堆紅柱的個數，如最后一個是綠柱，則TS1為0}
TS2:REF(BARSLAST(MACD>0),TS1);
{從右向左數起，第一堆綠柱的個數}
TS5:REF(BARSLAST(MACD<0),TS1+TS2);
{從右向左數起，第二堆紅柱的個數，若最后一個是綠柱，則為第一堆紅柱的個數}
TS6:=REF(BARSLAST(MACD>0),TS1+TS2+TS5);
{從右向左數起，第二堆綠柱的個數}
LMACD1:REF(LLV(MACD,TS2),TS1);
{從右向左數起，第一堆綠柱的MACD值的最低值}

LMACD2:REF(LLV(MACD,TS6),TS1+TS2+TS5);
{從右向左數起，第二堆綠柱的MACD值的最低值}
LLV1:REF(LLV(L,TS2),TS1);
{從右向左數起，第一堆綠柱的價格的最低值}
LLV2:REF(LLV(L,TS6),TS1+TS2+TS5);
{從右向左數起，第二堆綠柱的價格的最低值};
網友交流：
macd:=macd.macd;

jcb1:=barslast(cross(macd,0));

scb1:=barslast(cross(0,macd));

jcb2:=ref(barslast(jc),jcb1+1)+jcb1+1;

d1:ref(llv(macd,scb1+1),jcb1); c1:ref(llv(c,scb1+1),jcb1);

d2:ref(llv(macd,scb1+1),jcb2); c2:ref(llv(c,scb1+1),jcb2);

(4個綠柱區最低值，這樣寫簡明。）
網友交流： 這哥們兒看起來好像是個纏論愛好者。。。