奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- 程式中有for迴圈如何跨周期顯示 (http://www.chiefox.com.tw/bbs/showthread.php?threadid=13302)

跨周期的疑問

總版主您好：
以您之前回答網友的公式為例，以下公式要在日線周期顯示周線結果的要怎麼改呢? 因為這種有對數列中的元素做運算的。謝謝!

a:MA(CLOSE,10)COLORGREEN;
b:MA(CLOSE,30)COLORBLUE;
金叉:IF(CROSS(a,b),CLOSE,0);
前金叉:ref(金叉,ref(BARSLAST(金叉),1)+1) LINETHICK0;
後金叉:c*0;
for NPos=lbound(金叉) to ubound(金叉) do begin
if 金叉[NPos]>1 then begin
for ZPos=NPos+1 to ubound(金叉) do begin
if 金叉[ZPos]>0 then begin
後金叉[NPos]:=金叉[ZPos];
break;
end;
end;
end;
end;

[求救]程式中有for迴圈如何跨周期顯示

總版主您好：
以您之前回答網友的公式為例，以下公式要在日線周期顯示周線結果的要怎麼改呢? 因為這種有對數列中的元素做運算的。謝謝!

a:MA(CLOSE,10)COLORGREEN;
b:MA(CLOSE,30)COLORBLUE;
金叉:IF(CROSS(a,b),CLOSE,0);
前金叉:ref(金叉,ref(BARSLAST(金叉),1)+1) LINETHICK0;
後金叉:c*0;
for NPos=lbound(金叉) to ubound(金叉) do begin
if 金叉[NPos]>1 then begin
for ZPos=NPos+1 to ubound(金叉) do begin
if 金叉[ZPos]>0 then begin
後金叉[NPos]:=金叉[ZPos];
break;
end;
end;
end;
end;

總版主：
可以請您幫幫忙嗎? 我試了很多次還是沒辦法，謝謝您~

回覆: [求救]程式中有for迴圈如何跨周期顯示

引用:

---

最初由 victor0726 發表
總版主您好：
以您之前回答網友的公式為例，以下公式要在日線周期顯示周線結果的要怎麼改呢? 因為這種有對數列中的元素做運算的。謝謝!

a:MA(CLOSE,10)COLORGREEN;
b:MA(CLOSE,30)COLORBLUE;
金叉:IF(CROSS(a,b),CLOSE,0);
前金叉:ref(金叉,ref(BARSLAST(金叉),1)+1) LINETHICK0;
後金叉:c*0;
for NPos=lbound(金叉) to ubound(金叉) do begin
if 金叉[NPos]>1 then begin
for ZPos=NPos+1 to ubound(金叉) do begin
if 金叉[ZPos]>0 then begin
後金叉[NPos]:=金叉[ZPos];
break;
end;
end;
end;
end;

---

版主您好：

後金叉:c*0;
for NPos=lbound(金叉) to ubound(金叉) do begin

後金叉也是一樣改成 周後金叉:"abc.後金叉#week";這樣就可以嗎?

for 迴圈中的範圍也會自動變成周線的嗎? 謝謝~

引用:

---

最初由 victor0726 發表
版主您好：

後金叉:c*0;
for NPos=lbound(金叉) to ubound(金叉) do begin

後金叉也是一樣改成 周後金叉:"abc.後金叉#week";這樣就可以嗎?

for 迴圈中的範圍也會自動變成周線的嗎? 謝謝~

---