奇狐社區論壇 - [問題]連續上升或下降階梯線直到跌破或突破,再重新開始另一輪

總頁數 (3): [1] 2 3 »
在這個頁面顯示本主題全部的 34 個文章

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- [問題]連續上升或下降階梯線直到跌破或突破,再重新開始另一輪 (http://www.chiefox.com.tw/bbs/showthread.php?threadid=19045)

由 Markchu7 在 2015-01-09 22:53 發表:

[問題]連續上升或下降階梯線直到跌破或突破,再重新開始另一輪

如題!
源碼:
DD:REF(H,BARSLAST(CROSS(0.8,H=HHV(H,5)))+1)+9,COLORBLUE,LINEDOT;
UU:REF(L,BARSLAST(CROSS(0.8,L=LLV(L,5)))+1)-9,COLORRED,LINEDOT;

由 cgjj 在 2015-01-12 09:25 發表:

回覆: [問題]連續上升或下降階梯線直到跌破或突破,再重新開始另一輪

引用:
最初由 Markchu7 發表
如題!
源碼:
DD:REF(H,BARSLAST(CROSS(0.8,H=HHV(H,5)))+1)+9,COLORBLUE,LINEDOT;
UU:REF(L,BARSLAST(CROSS(0.8,L=LLV(L,5)))+1)-9,COLORRED,LINEDOT;

規則不一致

圖中藍色實線，有些並未比照以下規則處理:
此處雖是下降階梯但較原來
階梯高則原來階梯繼續延伸

由 Markchu7 在 2015-01-12 10:04 發表:

報告總版主:圖中舉例為2015/1/7的一分鐘週期的台當月!不知您所言,規則不一指的是那幾根K棒?畢竟眼睛看有時還是會有看走眼的時候!可否以時間為準予以明示指正?
至於有些藍色階梯實線高起來的部分,其規則為'收盤價突破藍色階梯實線"後"第一個藍色虛線下降階梯',請指導!

由 cgjj 在 2015-01-12 10:51 發表:

引用:
最初由 Markchu7 發表
報告總版主:圖中舉例為2015/1/7的一分鐘週期的台當月!不知您所言,規則不一指的是那幾根K棒?畢竟眼睛看有時還是會有看走眼的時候!可否以時間為準予以明示指正?
至於有些藍色階梯實線高起來的部分,其規則為'收盤價突破藍色階梯實線"後"第一個藍色虛線下降階梯',請指導!

原來寫的這句, 容易誤導:
此處雖是下降階梯但較原來
階梯高則原來階梯繼續延伸

您補上下面這句後，就較清楚了
"至於有些藍色階梯實線高起來的部分,其規則為'收盤價突破藍色階梯實線"後"第一個藍色虛線下降階梯'"

由 Markchu7 在 2015-01-12 11:04 發表:

是的!有時詞不達意,需多加溝通,請指導!

由 cgjj 在 2015-01-12 11:50 發表:

引用:
最初由 Markchu7 發表
是的!有時詞不達意,需多加溝通,請指導!

以藍線為例，給您當參考:

原碼:


CC:=C;

DD:REF(H,BARSLAST(CROSS(0.8,H=HHV(H,5)))+1)+9,COLORBLUE,LINEDOT;

UU:REF(L,BARSLAST(CROSS(0.8,L=LLV(L,5)))+1)-9,COLORRED,LINEDOT;



StDD:=lbound(DD);

MDD:DD*0; MDD[StDD]:=DD[StDD]; DDF:=0;

for i=StDD+1 to datacount do begin

  MDD[i]:=MDD[i-1]; 

  if CC[i]>MDD[i-1] then DDF:=1;

  if DD[i]<DD[i-1] then begin

    if DD[i]<MDD[i-1] or DD[i]<DD[i-1] and DDF=1 then begin

      MDD[i]:=DD[i]; DDF:=0;

    end;

  end;

end;

由 Markchu7 在 2015-01-12 12:17 發表:

感謝指導!來去消化一下!

由 Markchu7 在 2015-01-12 12:42 發表:

感謝總版主指導!完全合乎個人需求!再次感謝!
紅色實線部分自己依樣畫葫蘆源碼如下==(也是符合需求之效果,應該沒錯,如果有誤請版主指正!)
StUU:=lbound(UU);
MUU:UU*0; MUU[StUU]:=DD[StUU]; UUF:=0;
for i=StUU+1 to datacount do begin
MUU[i]:=MUU[i-1];
if CC[i]<MUU[i-1] then UUF:=1;
if UU[i]>UU[i-1] then begin
if UU[i]>MUU[i-1] or UU[i]>UU[i-1] and UUF=1 then begin
MUU[i]:=UU[i]; UUF:=0;
end;
end;
end;
追加一個問題:從新一輪的起點開始劃分段線的公式要如何寫?(因為功力有限,從您指導的公式中,看不懂判斷地條件式是甚麼!),請協助!再次感謝!

由 cgjj 在 2015-01-12 13:13 發表:

引用:
最初由 Markchu7 發表
感謝總版主指導!完全合乎個人需求!再次感謝!
紅色實線部分自己依樣畫葫蘆源碼如下==(也是符合需求之效果,應該沒錯,如果有誤請版主指正!)
StUU:=lbound(UU);
MUU:UU*0; MUU[StUU]:=DD[StUU]; UUF:=0;
for i=StUU+1 to datacount do begin
MUU[i]:=MUU[i-1];
if CC[i]<MUU[i-1] then UUF:=1;
if UU[i]>UU[i-1] then begin
if UU[i]>MUU[i-1] or UU[i]>UU[i-1] and UUF=1 then begin
MUU[i]:=UU[i]; UUF:=0;
end;
end;
end;
追加一個問題:從新一輪的起點開始劃分段線的公式要如何寫?(因為功力有限,從您指導的公式中,看不懂判斷地條件式是甚麼!),請協助!再次感謝!

MUU:UU*0; MUU[StUU]:=DD[StUU]; UUF:=0;

要修正為
MUU:UU*0; MUU[StUU]:=UU[StUU]; UUF:=0;

由 Markchu7 在 2015-01-12 13:18 發表:

感謝指導!分段線再有勞總版主指導!

由 cgjj 在 2015-01-12 13:26 發表:

引用:
最初由 Markchu7 發表
感謝指導!分段線再有勞總版主指導!

怎樣算新的一輪?

由 Markchu7 在 2015-01-12 13:36 發表:

'收盤價突破藍色階梯實線"後"第一個藍色虛線下降階梯'開啟下降階梯稱為新一輪!
依此類推-->'收盤價跌破紅色階梯實線"後"第一個紅色虛線上升階梯'開啟上升階梯!請指導!

由 cgjj 在 2015-01-12 13:49 發表:

引用:
最初由 Markchu7 發表
'收盤價突破藍色階梯實線"後"第一個藍色虛線下降階梯'開啟下降階梯稱為新一輪!
依此類推-->'收盤價跌破紅色階梯實線"後"第一個紅色虛線上升階梯'開啟上升階梯!請指導!

原碼:


StDD:=lbound(DD);

MDD:DD*0 linethick0 colorblue;

MDD[StDD]:=DD[StDD]; DDF:=0;

DDSNo:=MDD;

for i=StDD+1 to datacount do begin

  MDD[i]:=MDD[i-1]; DDSNo[i]:=DDSNo[i-1];

  if CC[i]>MDD[i-1] then DDF:=1;

  if DD[i]<DD[i-1] then begin

    if DD[i]<MDD[i-1] then begin

      MDD[i]:=DD[i]; DDF:=0;

    end else if DD[i]<DD[i-1] and DDF=1 then begin

      MDD[i]:=DD[i]; DDF:=0; DDSNo[i]:=DDSNo[i]+1;

    end;

  end;

end;

PARTLINE(DDSNo=ref(DDSNo,1),MDD) colorblue linethick2;

由 Markchu7 在 2015-01-12 15:50 發表:

感謝總版主協助!有您真好!
感謝!再感謝!

由 cgjj 在 2015-01-12 16:25 發表:

引用:
最初由 Markchu7 發表
感謝總版主協助!有您真好!
感謝!再感謝!

不客氣 ^^

全部時間均為台灣時間, 現在時間為05:23

總頁數 (3): [1] 2 3 »
在這個頁面顯示本主題全部的 34 個文章