請問版主：
如何表達當日五分鐘線，在10：30（含）之前，由收盤價折線所產生的第一、第二個波峰，謝謝

引用:

---

最初由 chungdune 發表
請問版主：
如何表達當日五分鐘線，在10：30（含）之前，由收盤價折線所產生的第一、第二個波峰，謝謝

---

引用:

---

最初由 cgjj 發表
請定義 "波峰" 判斷的條件為何? (要有邏輯，不能用眼睛看)
以及如何表達? (在波峰位置畫垂直線嗎?)

---

引用:

---

最初由 chungdune 發表
>>請定義 "波峰" 判斷的條件為何?
例如：9:05收盤價大於昨日收盤價，9:10收盤價小於9:05收盤價，如此產生的轉折就算波峰

>>如何表達?
顯示出當時收盤價數據

---

引用:

---

最初由 cgjj 發表
W1 和 W2 就是您要的數值

DE:=date;
DESP:=barslast(DE<>ref(DE,1));
CK:=c>ref(c,1) and c>refx(c,1) and time<103000;
CK:=sum(CK,DESP+1)*CK;
SP1:=barslast(CK=1);
SP2:=barslast(CK=2);
W1:ref(C,SP1)*(ref(DE,SP1)=ref(DE,DESP)) linethick;
W2:ref(C,SP2)*(ref(DE,SP1)=ref(DE,DESP)) linethick;
VERTLINE(CK=1) linedot;
VERTLINE(CK=2) linedot;

---

引用:

---

最初由 chungdune 發表
請問版主以下條件該如何寫：
若要在W1、W2畫水平線，若是今日有被任意收盤價突破或跌破，則線不再延伸；或是直到今日收盤後未被任意收盤價突破或跌破，則線於收盤時不再延伸

---

請問五分鐘線，
1.在今日第一個KD生叉時，在前一根K棒收盤價標示「KD生叉」文字，之後的KD生叉皆不標示，明日重新計算
2.在今日第一個KD生叉時，往前尋找最近一個收盤價的轉折低點（定義：收盤價呈現高-低-高），且此轉折低點要低於KD生叉時之收盤價低點，並且在此轉折低點劃線且向右延伸，直到被某一收盤價跌破

引用:

---

最初由 chungdune 發表
請問五分鐘線，
1.在今日第一個KD生叉時，在前一根K棒收盤價標示「KD生叉」文字，之後的KD生叉皆不標示，明日重新計算
2.在今日第一個KD生叉時，往前尋找最近一個收盤價的轉折低點（定義：收盤價呈現高-低-高），且此轉折低點要低於KD生叉時之收盤價低點，並且在此轉折低點劃線且向右延伸，直到被某一收盤價跌破

---

引用:

---

最初由 cgjj 發表
定義仍有不明確的地方

Q1:
於 1. 在 "KD生叉" 條件成立時，標示 "KD生叉" 於前根收盤價
那麼 2. 中所提 "KD生叉" 時之價，是取 "KD生叉" 的前根還是本根之價?

Q2:
於 2. 所提 "要低於KD生叉時之收盤價低點"
收盤價僅有一個價，沒有所謂低點，所指是否為該根K棒最低價呢?

---

引用:

---

最初由 chungdune 發表
A1:
2.中所提 "KD生叉" 時之價，是取 "KD生叉" 的本根之價，也就是生叉成立時當根的收盤價

A2:
是指收盤價，正確的說法應該是 "要低於KD生叉時當根之收盤價"

---

原碼:
DESP:=barslast(date<>ref(date,1));
KD生叉:=cross(K,D);
FKD生叉:=KD生叉 and sum(KD生叉,DESP+1)=1;
DRAWTEXT(refx(FKD生叉,1),C,'KD生叉') ALIGN2 pxup9;
VERTLINE(FKD生叉) linedot;
VLC:=C<ref(C,1) and C<refx(C,1) or barpos=0;
DWP:=C*0; DWL:=DWP; CC:=C;
for i=lbound(FKD生叉) to datacount do begin
  if FKD生叉[i] then begin
    for j=i-1 downto 1 do if VLC[j] then break;
    if j=0 then break;
    DWP[j]:=1;
    for k=j+1 to datacount do begin
      if CC[k]<CC[j] then break;
    end;
    DWL[j]:=j-K;
  end;
end;
DRAWSL(DWP,C,0,DWL,0) pxdn2 linedot;

引用:

---

最初由 cgjj 發表
KD 源碼請自行帶入於前

原碼:
DESP:=barslast(date<>ref(date,1));
KD生叉:=cross(K,D);
FKD生叉:=KD生叉 and sum(KD生叉,DESP+1)=1;
DRAWTEXT(refx(FKD生叉,1),C,'KD生叉') ALIGN2 pxup9;
VERTLINE(FKD生叉) linedot;
VLC:=C<ref(C,1) and C<refx(C,1) or barpos=0;
DWP:=C*0; DWL:=DWP; CC:=C;
for i=lbound(FKD生叉) to datacount do begin
  if FKD生叉[i] then begin
    for j=i-1 downto 1 do if VLC[j] then break;
    if j=0 then break;
    DWP[j]:=1;
    for k=j+1 to datacount do begin
      if CC[k]<CC[j] then break;
    end;
    DWL[j]:=j-K;
  end;
end;
DRAWSL(DWP,C,0,DWL,0) pxdn2 linedot;

---

引用:

---

最初由 chungdune 發表
有關第2點向右劃線的問題要請教：
1.目前的狀況是左邊起點若是不再畫面內被看見，整條線就會消失，有沒有辦法讓線就算不被看見也一直持續顯示？
2.目前是「向右延伸，直到被某一收盤價跌破」，可否改成「向右延伸，直到被今日某一收盤價跌破，若今日未跌破則不再延伸至明日」？

---

原碼:
DECK:=date<>ref(date,1) or barpos=1;
DESP:=barslast(DECK);
DENO:=SUM(DECK,0);
DEM2:=MOD(DENO,2)+1;
KD生叉:=cross(K,D);
FKD生叉:=KD生叉 and sum(KD生叉,DESP+1)=1;
DRAWTEXT(refx(FKD生叉,1),C,'KD生叉') ALIGN2 pxup9;
VERTLINE(FKD生叉) linedot color777777;
VLC:=C<ref(C,1) and C<refx(C,1) or barpos=0;
DWP:=C*0; DWE:=DWP; DWL:=DWP; CC:=C;
for i=lbound(FKD生叉) to datacount do begin
  if FKD生叉[i] then begin
    for j=i-1 downto 1 do if VLC[j] then break;
    if j=0 then break;
    DWP[j]:=DEM2[i];
    for k=j+1 to datacount do begin
      if CC[k]<CC[j] or DENO[k]>DENO[i]  then break;
    end;
    if K>datacount then K:=datacount;
    DWE[K]:=DWE[K]+DWP[j];
  end;
end;
DRAWLINE(DWP=1,C,DWE=1 or DWE=3,ref(C,barslast(DWP=1)),0) pxdn2 linedot colormagenta;
DRAWLINE(DWP=2,C,DWE=2 or DWE=3,ref(C,barslast(DWP=2)),0) pxdn2 linedot colormagenta;

引用:

---

最初由 cgjj 發表

原碼:
DECK:=date<>ref(date,1) or barpos=1;
DESP:=barslast(DECK);
DENO:=SUM(DECK,0);
DEM2:=MOD(DENO,2)+1;
KD生叉:=cross(K,D);
FKD生叉:=KD生叉 and sum(KD生叉,DESP+1)=1;
DRAWTEXT(refx(FKD生叉,1),C,'KD生叉') ALIGN2 pxup9;
VERTLINE(FKD生叉) linedot color777777;
VLC:=C<ref(C,1) and C<refx(C,1) or barpos=0;
DWP:=C*0; DWE:=DWP; DWL:=DWP; CC:=C;
for i=lbound(FKD生叉) to datacount do begin
  if FKD生叉[i] then begin
    for j=i-1 downto 1 do if VLC[j] then break;
    if j=0 then break;
    DWP[j]:=DEM2[i];
    for k=j+1 to datacount do begin
      if CC[k]<CC[j] or DENO[k]>DENO[i]  then break;
    end;
    if K>datacount then K:=datacount;
    DWE[K]:=DWE[K]+DWP[j];
  end;
end;
DRAWLINE(DWP=1,C,DWE=1 or DWE=3,ref(C,barslast(DWP=1)),0) pxdn2 linedot colormagenta;
DRAWLINE(DWP=2,C,DWE=2 or DWE=3,ref(C,barslast(DWP=2)),0) pxdn2 linedot colormagenta;

---

引用:

---

最初由 chungdune 發表
不好意思，再請版主幫忙一下，可否將第2點「向右延伸，直到被今日某一收盤價跌破，若今日未跌破則不再延伸至明日」再改回成「向右延伸，直到被某一收盤價跌破」？謝謝

---

引用:

---

最初由 cgjj 發表
那這樣就無法實現 1. 了
因為同一個時間位置(K棒)畫的水平線數量無法掌握

原先每日最多僅有兩條水平線在同時間位置
共需要兩組 DRAWLINE
N條水平線在同時間位置，就需要N組 DRAWLINE
此外
畫的起點若距離較遠，且起點K棒與當前K棒落差大
如此畫線也會讓畫面的K棒被擠壓的很扁
故難以實現...

---