奇狐社區論壇 - [問題]KD金叉成立時,向前找L=LLV(L,10)該根K棒,開始計算WBC

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- [問題]KD金叉成立時,向前找L=LLV(L,10)該根K棒,開始計算WBC (http://www.chiefox.com.tw/bbs/showthread.php?threadid=20683)

由 Markchu7 在 2017-02-09 17:57 發表:

[問題]KD金叉成立時,向前找L=LLV(L,10)該根K棒,開始計算WBC

如題!
KD,WBC皆為內建指標!
若該根K棒定義為'低點'!
請問程式要如何寫?謝謝!

由 cgjj 在 2017-02-09 18:31 發表:

回覆: [問題]KD金叉成立時,向前找L=LLV(L,10)該根K棒,開始計算WBC

引用:
最初由 Markchu7 發表
如題!
KD,WBC皆為內建指標!
若該根K棒定義為'低點'!
請問程式要如何寫?謝謝!

SP1:=barslast(cross(K,D));
if lbound(SP1)=0 then exit;
SP2:=barslast(L=LLV(L,10));
if lbound(SP2)=0 then exit;
PP:=ref(barpos,ref(SP2,SP1)+SP1);
CA:=barpos=PP[datacount];
CB:=BARSLAST(CA)+1;
C1:=SUM(VOL,CB);
DC:=((H+L+C*2)/4);
C2:=SUM(DC*VOL,CB);
WBC:C2/C1;

由 Markchu7 在 2017-02-09 19:37 發表:

感謝指導!來去研究研究!

由 Markchu7 在 2017-02-10 08:02 發表:

請教總版主:如此寫法只顯示最後一次條件成立時(將運用於盤中)!
可否指導歷史的每次條件成立皆顯示的語法,用於盤後的分析歸納?
感謝您!

由 cgjj 在 2017-02-10 08:56 發表:

引用:
最初由 Markchu7 發表
請教總版主:如此寫法只顯示最後一次條件成立時(將運用於盤中)!
可否指導歷史的每次條件成立皆顯示的語法,用於盤後的分析歸納?
感謝您!

原碼:SP1:=barslast(cross(K,D));
if lbound(SP1)=0 then exit;
SP2:=barslast(L=LLV(L,10));
if lbound(SP2)=0 then exit;
CA:SP2*0 linethick;
for i=datacount downto lbound(SP1) do begin
  if SP1[i]=0 then begin
    for j=i downto lbound(SP2) do begin
      if SP2[j]=0 then begin
        CA[j]:=1; break;
      end;
    end;
  end;
end;
CB:=BARSLAST(CA)+1;
C1:=SUM(VOL,CB);
DC:=((H+L+C*2)/4);
C2:=SUM(DC*VOL,CB);
WBC:C2/C1;
VERTLINE(CA) linedot;

由 Markchu7 在 2017-02-10 09:24 發表:

感謝協助!祝萬事順心!

由 Markchu7 在 2017-02-10 10:41 發表:

想要找200天內最低點畫線!自己依樣畫葫蘆卻找錯低點(如圖)!
源碼:
SP1:=barslast(ISLASTBAR);
if lbound(SP1)=0 then exit;
SP2:=barslast(L=LLV(L,200));
if lbound(SP2)=0 then exit;
PP:=ref(barpos,ref(SP2,SP1)+SP1);
CA:=barpos=PP[datacount];
CB:=BARSLAST(CA)+1;
C1:=SUM(VOL,CB);
DC:=((H+L+C*2)/4);
C2:=SUM(DC*VOL,CB);
WBC:C2/C1;

請指正!謝謝!

由 cgjj 在 2017-02-11 13:51 發表:

引用:
最初由 Markchu7 發表
想要找200天內最低點畫線!自己依樣畫葫蘆卻找錯低點(如圖)!
源碼:
SP1:=barslast(ISLASTBAR);
if lbound(SP1)=0 then exit;
SP2:=barslast(L=LLV(L,200));
if lbound(SP2)=0 then exit;
PP:=ref(barpos,ref(SP2,SP1)+SP1);
CA:=barpos=PP[datacount];
CB:=BARSLAST(CA)+1;
C1:=SUM(VOL,CB);
DC:=((H+L+C*2)/4);
C2:=SUM(DC*VOL,CB);
WBC:C2/C1;

請指正!謝謝!

圈圈那個位置才不是呢~
它沒有畫錯呀!

由 Markchu7 在 2017-02-12 22:05 發表:

是的!後來發現是我的認知錯誤!耽誤寶貴時間!SORRY!

全部時間均為台灣時間, 現在時間為09:47

在這個頁面顯示本主題全部的 9 個文章