請教各位大大，

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

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

有大大可以教我嗎？
感激不盡！

引用:

---

最初由 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:=L; ML:=LL[datacount];

for i=datacount downto 1 do begin

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

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

end;

SP:-1;

if i>0 then SP:=datacount-i;

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

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

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」
會顯示語法錯誤的訊息
若拿掉就可以正常使用
想請教板主那一句的錯誤在哪？

引用:

---

最初由 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」
會顯示語法錯誤的訊息
若拿掉就可以正常使用
想請教板主那一句的錯誤在哪？

---

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