在視頻《算法0075 峰谷取值與篩選的算法》及其對應的文章《應用峰谷标注法進行波浪的界定》、《峰谷的取值與過濾算法》之後的此刻，将它們進行進一步的組合，給峰谷ABCD的主圖實現帶來更加完美的算法。

如何實現呢？

思路步驟

1. 導入已有算法《峰谷篩選》；
2. 對已有的算法進行第二對峰谷的計；
3. 對得到的峰B、D與谷A、C進行标示。

算法建立

1.導入已有的算法，第一個峰谷對兒“DC”

TE:=CONST(PEAKBARS(1,峰轉向比/10,第幾個峰));{TE第幾個峰1位微調}

TB:=CONST(TROUGHBARS(2,谷轉向比/10,第幾個谷));{TB第幾個谷1位微調}

REW:=IF(CURRBARSCOUNT<=TE 峰1位微調 1,CONST(REF(H,TE 峰1位微調)),DRAWNULL),COLORRED;{REW 第一個峰值微調}

RBW:=IF(CURRBARSCOUNT<=TB 谷1位微調 1,CONST(REF(L,TB 谷1位微調)),DRAWNULL),COLORGREEN;{RBW 第一個谷值微調}

REH:IF(CURRBARSCOUNT<=TE 1 AND 峰1位微調=0,CONST(PEAK(1,峰轉向比/10,第幾個峰)),REW),COLORYELLOW;{EH 第一個峰值}

RBL:IF(CURRBARSCOUNT<=TB 1 AND 谷1位微調=0,CONST(TROUGH(2,谷轉向比/10,第幾個谷)),RBW),COLORYELLOW;{BL 第一個谷值}

2.建立第二個峰谷對兒“BA”

TE2:=CONST(PEAKBARS(1,峰轉向比/10,第幾個峰 1));{TE2第2個峰位微調}

TB2:=CONST(TROUGHBARS(2,谷轉向比/10,第幾個谷 1));{TB2第2個谷位微調}

REW2:=IF(CURRBARSCOUNT<=TE2 峰2位微調 1,CONST(REF(H,TE2 峰2位微調)),DRAWNULL),COLORRED;{REW2 第2個峰值微調}

RBW2:=IF(CURRBARSCOUNT<=TB2 谷2位微調 1,CONST(REF(L,TB2 谷2位微調)),DRAWNULL),COLORGREEN;{RBW2 第2個谷值微調}

REH2:IF(CURRBARSCOUNT<=TE2 1 AND 峰2位微調=0,CONST(PEAK(1,峰轉向比/10,第幾個峰 1)),REW2),COLORMAGENTA;{EH2 第2個峰值}

RBL2:IF(CURRBARSCOUNT<=TB2 1 AND 谷2位微調=0,CONST(TROUGH(2,谷轉向比/10,第幾個谷 1)),RBW2),COLORMAGENTA;{BL2 第2個谷值}

3.優化标示

a.右側第一對峰谷

DRAWICON(CURRBARSCOUNT=IF(峰1位微調=0,TE,TE 峰1位微調) 1,H*1.003,86);

DRAWICON(CURRBARSCOUNT=IF(谷1位微調=0,TB,TB 谷1位微調) 1,L*0.997,85);

DRAWTEXT(CURRBARSCOUNT=IF(峰1位微調=0,TE,TE 峰1位微調) 1,H*1.004,'峰1-D');

DRAWTEXT(CURRBARSCOUNT=IF(谷1位微調=0,TB,TB 谷1位微調) 1,L*0.996,'谷1-C');

CHA:DRAWNUMBER(ISLASTBAR,(REH RBL)/2,(REH RBL)/2),COLORYELLOW;{CHA 第一個峰值與第一個谷值的差}

b.左側第二對峰谷

DRAWICON(CURRBARSCOUNT=IF(峰2位微調=0,TE2,TE2 峰2位微調) 1,H*1.003,86);

DRAWICON(CURRBARSCOUNT=IF(谷2位微調=0,TB2,TB2 谷2位微調) 1,L*0.997,85);

DRAWTEXT(CURRBARSCOUNT=IF(峰2位微調=0,TE2,TE2 峰2位微調) 1,H*1.004,'峰2-B');

DRAWTEXT(CURRBARSCOUNT=IF(谷2位微調=0,TB2,TB2 谷2位微調) 1,L*0.996,'谷2-A');

CHA2:DRAWNUMBER(ISLASTBAR,(REH2 RBL2)/2,(REH2 RBL2)/2),COLORMAGENTA;{CHA2 第2個峰值與第2個谷值的差};

八個參數

參數表1

參數表2

效果示意

完整代碼

{右側峰谷 1}

TE:=CONST(PEAKBARS(1,峰轉向比/10,第幾個峰));{TE第幾個峰1位微調}

TB:=CONST(TROUGHBARS(2,谷轉向比/10,第幾個谷));{TB第幾個谷1位微調}

REW:=IF(CURRBARSCOUNT<=TE 峰1位微調 1,CONST(REF(H,TE 峰1位微調)),DRAWNULL),COLORRED;{REW 第一個峰值微調}

RBW:=IF(CURRBARSCOUNT<=TB 谷1位微調 1,CONST(REF(L,TB 谷1位微調)),DRAWNULL),COLORGREEN;{RBW 第一個谷值微調}

REH:IF(CURRBARSCOUNT<=TE 1 AND 峰1位微調=0,CONST(PEAK(1,峰轉向比/10,第幾個峰)),REW),COLORYELLOW;{EH 第一個峰值}

RBL:IF(CURRBARSCOUNT<=TB 1 AND 谷1位微調=0,CONST(TROUGH(2,谷轉向比/10,第幾個谷)),RBW),COLORYELLOW;{BL 第一個谷值}

DRAWICON(CURRBARSCOUNT=IF(峰1位微調=0,TE,TE 峰1位微調) 1,H*1.003,86);

DRAWICON(CURRBARSCOUNT=IF(谷1位微調=0,TB,TB 谷1位微調) 1,L*0.997,85);

DRAWTEXT(CURRBARSCOUNT=IF(峰1位微調=0,TE,TE 峰1位微調) 1,H*1.004,'峰1-D');

DRAWTEXT(CURRBARSCOUNT=IF(谷1位微調=0,TB,TB 谷1位微調) 1,L*0.996,'谷1-C');

CHA:DRAWNUMBER(ISLASTBAR,(REH RBL)/2,(REH RBL)/2),COLORYELLOW;{CHA 第一個峰值與第一個谷值的差}

{左側峰谷 2}

TE2:=CONST(PEAKBARS(1,峰轉向比/10,第幾個峰 1));{TE2第2個峰位微調}

TB2:=CONST(TROUGHBARS(2,谷轉向比/10,第幾個谷 1));{TB2第2個谷位微調}

REW2:=IF(CURRBARSCOUNT<=TE2 峰2位微調 1,CONST(REF(H,TE2 峰2位微調)),DRAWNULL),COLORRED;{REW2 第2個峰值微調}

RBW2:=IF(CURRBARSCOUNT<=TB2 谷2位微調 1,CONST(REF(L,TB2 谷2位微調)),DRAWNULL),COLORGREEN;{RBW2 第2個谷值微調}

REH2:IF(CURRBARSCOUNT<=TE2 1 AND 峰2位微調=0,CONST(PEAK(1,峰轉向比/10,第幾個峰 1)),REW2),COLORMAGENTA;{EH2 第2個峰值}

RBL2:IF(CURRBARSCOUNT<=TB2 1 AND 谷2位微調=0,CONST(TROUGH(2,谷轉向比/10,第幾個谷 1)),RBW2),COLORMAGENTA;{BL2 第2個谷值}

DRAWICON(CURRBARSCOUNT=IF(峰2位微調=0,TE2,TE2 峰2位微調) 1,H*1.003,86);

DRAWICON(CURRBARSCOUNT=IF(谷2位微調=0,TB2,TB2 谷2位微調) 1,L*0.997,85);

DRAWTEXT(CURRBARSCOUNT=IF(峰2位微調=0,TE2,TE2 峰2位微調) 1,H*1.004,'峰2-B');

DRAWTEXT(CURRBARSCOUNT=IF(谷2位微調=0,TB2,TB2 谷2位微調) 1,L*0.996,'谷2-A');

CHA2:DRAWNUMBER(ISLASTBAR,(REH2 RBL2)/2,(REH2 RBL2)/2),COLORMAGENTA;{CHA2 第2個峰值與第2個谷值的差};

我的努力隻為達成你的成功。

江豐魚的文章隻在今日頭條首發。

更多精彩资讯请关注tft每日頭條，我们将持续为您更新最新资讯!