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

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- [求救]想要知道最近一次黃金交叉K棒低點至今仍未被跌破是幾天前? (http://www.chiefox.com.tw/bbs/showthread.php?threadid=15895)


由 vecstar 在 2011-07-27 11:07 發表:

[求救]想要知道最近一次黃金交叉K棒低點至今仍未被跌破是幾天前?

請教各位大大,

小弟目前有一個需求,
想抓5MA和10MA黃金交叉當日,
K棒低點至今仍未被跌破的現象,
最近一次符合這種現象的黃金交叉是發生在幾天前?

例如:
最近一次黃金交叉是T1日前,再前一次是T2日前,再前一次是T3日前,
但是T1和T2當天的K棒低點之後都曾經被跌破過,
T3當天的K棒低點則是至今都沒有被跌破過,
我想求取這個T3是幾天前,不知道怎麼寫?

有大大可以教我嗎?
感激不盡!


由 cgjj 在 2011-07-27 15:59 發表:

回覆: [求救]想要知道最近一次黃金交叉K棒低點至今仍未被跌破是幾天前?

引用:
最初由 vecstar 發表
請教各位大大,

小弟目前有一個需求,
想抓5MA和10MA黃金交叉當日,
K棒低點至今仍未被跌破的現象,
最近一次符合這種現象的黃金交叉是發生在幾天前?

例如:
最近一次黃金交叉是T1日前,再前一次是T2日前,再前一次是T3日前,
但是T1和T2當天的K棒低點之後都曾經被跌破過,
T3當天的K棒低點則是至今都沒有被跌破過,
我想求取這個T3是幾天前,不知道怎麼寫?

有大大可以教我嗎?
感激不盡!



原碼:

K
:="KD.K";
D:="KD.D";
CK:cross(K,d) or barpos=0 linethick;
LL:=LML:=LL[datacount];
for 
i=datacount downto 1 do begin
  
if CK[i]=and LL[i]<=ML then break;
  if 
LL[i]<ML then ML:=LL[i];
end;
SP:-1;
if 
i>0 then SP:=datacount-i;



SP -1 代表無符合
SP 0 代表當根符合
SP>0 代表前面第n根符合


由 vecstar 在 2011-07-28 10:03 發表:

好厲害的寫法,謝謝板主,我學習了

我稍微改寫一下程式如下:

K:="KD.K";

D:="KD.D";

CK:cross(K,d) or barpos=0 linethick;

LL:=L; SP:=C;

for j=datacount downto 1 do begin
ML:=LL[j];
SP[j]=-1 ;

for i=j downto 1 do begin

if CK[i]=1 and LL[i]<=ML and i<>j then break;

if LL[i]<ML then ML:=LL[i];

end;

SP[j]:=j-i;
end ;

X: SP ;

但是紅色那一句「SP[j]=-1」
會顯示語法錯誤的訊息
若拿掉就可以正常使用
想請教板主那一句的錯誤在哪?


由 cgjj 在 2011-07-28 11:35 發表:

引用:
最初由 vecstar 發表
好厲害的寫法,謝謝板主,我學習了

我稍微改寫一下程式如下:

K:="KD.K";

D:="KD.D";

CK:cross(K,d) or barpos=0 linethick;

LL:=L; SP:=C;

for j=datacount downto 1 do begin
ML:=LL[j];
SP[j]=-1 ;

for i=j downto 1 do begin

if CK[i]=1 and LL[i]<=ML and i<>j then break;

if LL[i]<ML then ML:=LL[i];

end;

SP[j]:=j-i;
end ;

X: SP ;

但是紅色那一句「SP[j]=-1」
會顯示語法錯誤的訊息
若拿掉就可以正常使用
想請教板主那一句的錯誤在哪?



少了冒號
SP[j]=-1; 改為 SP[j]:=-1;


由 vecstar 在 2011-07-28 12:00 發表:



有勞板主了,
這麼簡單我竟然沒發現


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


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

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