奇狐社區論壇 - [求救]如何把日線的CDP四條線轉畫在5分.....

奇狐社區論壇 : Powered by vBulletin version 2.3.0

奇狐社區論壇 > 指標公式 > 問題交流 > [求救]如何把日線的CDP四條線轉畫在5分.....

總頁數 (2): « 1 [2]

上一主題下一主題

作者

主題

APSHEU
初級會員

註冊日期: Mar 2005
來　　自:
文章數量: 28

引用:
最初由 peter109 發表
AH: ="CDP2.AH#DAY";
AL: ="CDP2.AL#DAY";
CDP: ="CDP2.CDP#DAY";
NH: ="CDP2.NH#DAY";
NL: ="CDP2.NL#DAY";
zAH:=sum(AH<>ref(AH,1),0);
AH:ref(AH,barslast(zAH=zAH[datacount] AND AH<>ref(AH,1)));
zAL:=sum(AL<>ref(AL,1),0);
AL:ref(AL,barslast(zAL=zAL[datacount] AND AL<>ref(AL,1)));
zCDP:=sum(CDP<>ref(CDP,1),0);
CDP:ref(CDP,barslast(zCDP=zCDP[datacount] AND CDP<>ref(CDP,1)));
zNH:=sum(NH<>ref(NH,1),0);
NH:ref(NH,barslast(zNH=zNH[datacount] AND NH<>ref(NH,1)));
zNL:=sum(NL<>ref(NL,1),0);
NL:ref(NL,barslast(zNL=zNL[datacount] AND NL<>ref(NL,1)));

請問大大能否將先建立之cdp2加入看一下完整的程式,謝謝

向版主報告此篇 |

2005-08-26 07:08

robert
中級會員

註冊日期: Jul 2004
來　　自: 台中
文章數量: 46

CDP2 公式就在本論壇第三篇,也就是同時需寫 CDP2, CDP3
這兩個公式, CDP3 用borgster兄的就很完美了,SHIFT60可刪除
有出乎意外的效果,連任何分鐘周期都能使用.

向版主報告此篇 |

2005-08-26 08:12

robert
中級會員

註冊日期: Jul 2004
來　　自: 台中
文章數量: 46

的確太準了,標準N型,AMA也很好

robert 附帶上了此圖片:

向版主報告此篇 |

2005-08-26 10:26

APSHEU
初級會員

註冊日期: Mar 2005
來　　自:
文章數量: 28

引用:
最初由 robert 發表
CDP2 公式就在本論壇第三篇,也就是同時需寫 CDP2, CDP3
這兩個公式, CDP3 用borgster兄的就很完美了,SHIFT60可刪除
有出乎意外的效果,連任何分鐘周期都能使用.

PT:=REF(H,1)-REF(L,1);
CDP: (REF(H,1)+REF(L,1)+REF(C,1)*2)/4;
AH: (CDP+PT);
AL: (CDP-PT);
NH: (2*CDP-L);
NL: (2*CDP-H);

VAR1:="CDP2.AH#DAY";Drawnumber(ISLASTBAR,VAR1,VAR1,0),ALIGN1,colorwhite,shift60;
VAR2:="CDP2.NH#DAY";Drawnumber(ISLASTBAR,VAR2,VAR2,0),ALIGN1,colorwhite,shift60;
VAR3:="CDP2.CDP#DAY";Drawnumber(ISLASTBAR,VAR3,VAR3,0),ALIGN1,colorwhite,shift60;
VAR4:="CDP2.NL#DAY";Drawnumber(ISLASTBAR,VAR4,VAR4,0),ALIGN1,colorwhite,shift60;
VAR5:="CDP2.AL#DAY";Drawnumber(ISLASTBAR,VAR5,VAR5,0),ALIGN1,colorwhite,shift60;
VAR6:=DATE<>REF(DATE,1);
VAR7:=BARSLAST(VAR6);

PARTLINE(VAR7>0,VAR1),colorred,shift60;
PARTLINE(VAR7>0,VAR2),coloryellow,shift60;
PARTLINE(VAR7>0,VAR3),colorgreen,shift60;
PARTLINE(VAR7>0,VAR4),coloryellow,shift60;
PARTLINE(VAR7>0,VAR5),colorred,shift60;
STICKLINE(VAR6,VAR1,VAR5,0.1,0),colorwhite,shift60;
STICKLINE(REFX(VAR6,1),VAR1,VAR5,0.1,0),colorwhite,shift60;

在VAR1:="CDP2.怎出現錯誤訊息呢?請賜教

向版主報告此篇 |

2005-08-26 18:21