奇狐社區論壇
在這個頁面顯示本主題全部的 9 個文章

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- 條件式 引用日線CDP (http://www.chiefox.com.tw/bbs/showthread.php?threadid=14334)


由 tycoon868 在 2010-09-23 08:29 發表:

條件式 引用日線CDP

請教總版主:
原碼如下:(15分K)
AH:="CDP.AH#DAY" Colorblue,linethick2,precision2;
NH:="CDP.NH#DAY" Colorffff00,linethick2,precision2;
CDP:="CDP.CDP#DAY" colorcccccc;
NL:="CDP.NL#DAY" Color339999,linethick2,precision2;
AL:="CDP.AL#DAY" Color006699,linethick2,precision2;

M2:MA(C,72),linethick0,colorff00ff,precision2;
S2:=Slope(M2,2)*100,precision2;

需求一: 希望只畫出四條橫線,日與日中間不要拉出延伸直線(看起來比較清爽)

需求二: 如果 S2>200 則只在畫面最上方顯示數值

需求三: 如果 S2<200 則在今日20根15分K中畫出四條橫線,但不要出現與上一次的四條橫線相連接


由 cgjj 在 2010-09-23 09:15 發表:

回覆: 條件式 引用日線CDP

引用:
最初由 tycoon868 發表
請教總版主:
原碼如下15分K)
AH:="CDP.AH#DAY" Colorblue,linethick2,precision2;
NH:="CDP.NH#DAY" Colorffff00,linethick2,precision2;
CDP:="CDP.CDP#DAY" colorcccccc;
NL:="CDP.NL#DAY" Color339999,linethick2,precision2;
AL:="CDP.AL#DAY" Color006699,linethick2,precision2;

M2:MA(C,72),linethick0,colorff00ff,precision2;
S2:=Slope(M2,2)*100,precision2;

需求一: 希望只畫出四條橫線,日與日中間不要拉出延伸直線(看起來比較清爽)

需求二: 如果 S2>200 則只在畫面最上方顯示數值

需求三: 如果 S2<200 則在今日20根15分K中畫出四條橫線,但不要出現與上一次的四條橫線相連接



日與日中間不要拉出延伸直線, 請參考此例做法
http://www.chiefox.com.tw/bbs/showt...&threadid=14198

需求二 & 需求三
使用 PARTLINE 函數時, 把判斷式加入條件當中即可


由 tycoon868 在 2010-09-23 21:55 發表:

謝謝版大:

再次請教:

需求四: 如何永遠(無條件)只秀出今天的
四條橫線 明天即自動消除昨日
的部分

需求五: 如何永遠只秀出今天的四條橫線
並在今日台指1:30 時 用當下的
收盤價 預先算出並畫出
明天四條線(虛線)~留倉決策用

謝謝


由 cgjj 在 2010-09-24 09:02 發表:

引用:
最初由 tycoon868 發表
謝謝版大:

再次請教:

需求四: 如何永遠(無條件)只秀出今天的
四條橫線 明天即自動消除昨日
的部分

需求五: 如何永遠只秀出今天的四條橫線
並在今日台指1:30 時 用當下的
收盤價 預先算出並畫出
明天四條線(虛線)~留倉決策用

謝謝



//需求四
判斷 ckde 是否成立, 成立時繪製
de:=date; ckde:=de=de[datacount];
PARTLINE(ckde, 價位)

//需求五範例
DRAWSL(barpos=datacount, 價位, 0, 0, 0) shift1 linedot;


由 tycoon868 在 2010-09-27 23:14 發表:

回覆版主:

需求五沒有成功,只跑出延續今日四條線之虛線,可否請您直接給我原碼?

******************再次重新定義需求 : 於3分K周期中,留住每一天的 歷史CDP四條線,於今日 1:30 該3分K收盤時,當作今日已經收盤,預先畫出明日四條CDP虛線,讓我有15分鐘的時間思考明日可能震盪區間,以便作為留倉與否之參考,等到1:45分時正式收盤後,則還是用真正的收盤價預先劃出明天四條CDP線(如附圖)並消除1:30所畫出來的模擬虛線**********************

請您照以下原碼指示
須加入哪些語法

最高:"CDP.AH#DAY" Colorblue,linethick0,precision2;
近高:"CDP.NH#DAY" Colorffff00,linethick0,precision2;
CDP:="CDP.CDP#DAY" colorcccccc;
近低:"CDP.NL#DAY" Color339999,linethick0,precision2;
最低:"CDP.AL#DAY" Color006699,linethick0,precision2;

STK:=REF(DATE,1)<>DATE OR BARPOS=1;
Partline(STK=0,最高) Colorblue,linethick2,precision2;
Partline(STK=0,近高) Colorffff00,linethick2,precision2;
Partline(STK=0,近低) Color339999,linethick2,precision2;
Partline(STK=0,最低) Color006699,linethick2,precision2;

感謝您


由 peter109 在 2010-09-28 00:55 發表:

引用:
最初由 tycoon868 發表
回覆版主:

需求五沒有成功,只跑出延續今日四條線之虛線,可否請您直接給我原碼?

******************再次重新定義需求 : 於3分K周期中,留住每一天的 歷史CDP四條線,於今日 1:30 該3分K收盤時,當作今日已經收盤,預先畫出明日四條CDP虛線,讓我有15分鐘的時間思考明日可能震盪區間,以便作為留倉與否之參考,等到1:45分時正式收盤後,則還是用真正的收盤價預先劃出明天四條CDP線(如附圖)並消除1:30所畫出來的模擬虛線**********************

請您照以下原碼指示
須加入哪些語法

最高:"CDP.AH#DAY" Colorblue,linethick0,precision2;
近高:"CDP.NH#DAY" Colorffff00,linethick0,precision2;
CDP:="CDP.CDP#DAY" colorcccccc;
近低:"CDP.NL#DAY" Color339999,linethick0,precision2;
最低:"CDP.AL#DAY" Color006699,linethick0,precision2;

STK:=REF(DATE,1)<>DATE OR BARPOS=1;
Partline(STK=0,最高) Colorblue,linethick2,precision2;
Partline(STK=0,近高) Colorffff00,linethick2,precision2;
Partline(STK=0,近低) Color339999,linethick2,precision2;
Partline(STK=0,最低) Color006699,linethick2,precision2;

感謝您


先將上面的劃線變更為
X01:=STK=0 AND TIME<=133000;
Partline(X01,最高) Colorblue,linethick2,precision2;
Partline(X01,近高) Colorffff00,linethick2,precision2;
Partline(X01,近低) Color339999,linethick2,precision2;
Partline(X01,最低) Color006699,linethick2,precision2;

其次處理您需要的1330相關數據
DH:=HHV(H,BARSLAST(STK));
DL:=LLV(L,BARSLAST(STK));
//以下1330您需要的三價
DH2:=REF(DH,BARSLAST(TIME=133000));
DL2:=REF(DL,BARSLAST(TIME=133000));
DC2:=REF(C,BARSLAST(TIME=133000));
//其他相關計算需求 請您自行處理

__________________
至誠能勝天下至偽
至拙能勝天下至巧


由 tycoon868 在 2010-09-28 09:31 發表:

萬分感謝Peter109兄:

您的提示我只看懂60%

還是拜託版主可以給我原碼

謝謝


由 peter109 在 2010-09-28 22:42 發表:

引用:
最初由 peter109 發表
先將上面的劃線變更為
X01:=STK=0 AND TIME<=133000;
Partline(X01,最高) Colorblue,linethick2,precision2;
Partline(X01,近高) Colorffff00,linethick2,precision2;
Partline(X01,近低) Color339999,linethick2,precision2;
Partline(X01,最低) Color006699,linethick2,precision2;

其次處理您需要的1330相關數據
DH:=HHV(H,BARSLAST(STK));
DL:=LLV(L,BARSLAST(STK));
//以下1330您需要的三價
DH2:=REF(DH,BARSLAST(TIME=133000));
DL2:=REF(DL,BARSLAST(TIME=133000));
DC2:=REF(C,BARSLAST(TIME=133000));
//其他相關計算需求 請您自行處理


承上
TP:=DH2-DL2;
CDP:=(DH2+DL2+DC2*2)/4;
X02:=STK=0 AND TIME>133000;
PARTLINE(X02,CDP),LINEDOT;
//其他的四條線 請您自行依據CDP指標的計算依據處理

__________________
至誠能勝天下至偽
至拙能勝天下至巧


由 tycoon868 在 2010-09-29 01:44 發表:

感謝Peter109兄:

請容小弟套入測試
如有問題再行請教

謝謝您的熱情相助


全部時間均為台灣時間, 現在時間為13:33
在這個頁面顯示本主題全部的 9 個文章


Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.

簡愛洋行 製作 Copyright 2003-. All Rights Reserved.