1、從第一次記錄指標數值開始，之後同向不與比較也不記錄，反向才要比較。
2、反向減少則與最近一次記錄之指標數值比較，低於則記錄指標數值，並顯示為空方，高於則忽略(但之後出現的反向減少必須持續比較)。
3、同理，反向增加則與最近一次記錄之指標數值比較，高於則記錄指標數值，並顯示為多方，低於則忽略(但之後出現的反向增加必須持續比較)。
4、指標差值為前後指標數值之差值，即指標差值:指標數值-REF(指標數值,1);
5、煩請板主以五彩K線為例指導，謝謝。

Digol 附帶上了此圖片:

__________________
大家發財^^

引用:

---

最初由 Digol 發表
1、從第一次記錄指標數值開始，之後同向不與比較也不記錄，反向才要比較。
2、反向減少則與最近一次記錄之指標數值比較，低於則記錄指標數值，並顯示為空方，高於則忽略(但之後出現的反向減少必須持續比較)。
3、同理，反向增加則與最近一次記錄之指標數值比較，高於則記錄指標數值，並顯示為多方，低於則忽略(但之後出現的反向增加必須持續比較)。
4、指標差值為前後指標數值之差值，即指標差值:指標數值-REF(指標數值,1);
5、煩請板主以五彩K線為例指導，謝謝。

---

細看了一下~~
我原先回應的，跟您要的想法應該不太一樣(需要重新撰寫答覆)

您要做的指標，起算點為歷史首根嗎?
(起點對後期影響很大....)

引用:

---

最初由 cgjj 發表
細看了一下~~
我原先回應的，跟您要的想法應該不太一樣(需要重新撰寫答覆)

您要做的指標，起算點為歷史首根嗎?
(起點對後期影響很大....)

---

__________________
大家發財^^

引用:

---

最初由 Digol 發表
回板主，起算點為每日第1根K棒開始，因為有運用分筆資料，所以每天都是從開盤開始重新計算。

---

原碼:
差值:={請自行帶入指標差值};
DE:=date;
StNo:=lbound(BARSSINCE(DE=DE[datacount]));
if lbound(差值)>StNo then StNo:=lbound(差值);
Last差:=差值[StNo];
UD差:=C*0; UD差[StNo]:=Last差;
for i=StNo+1 to datacount do begin
  if 差值[i]<>0 then begin
    if ABS(差值[i])<ABS(Last差) and SGN(差值[i])=-SGN(Last差) then begin
      UD差[i]:=差值[i]; Last差:=差值[i];
    end;
  end;
end;
UD差>0 colorred;
UD差<0 colorgreen;
UD差=0 color777777;

引用:

---

最初由 cgjj 發表
看看是否為您要的

原碼:
差值:={請自行帶入指標差值};
DE:=date;
StNo:=lbound(BARSSINCE(DE=DE[datacount]));
if lbound(差值)>StNo then StNo:=lbound(差值);
Last差:=差值[StNo];
UD差:=C*0; UD差[StNo]:=Last差;
for i=StNo+1 to datacount do begin
  if 差值[i]<>0 then begin
    if ABS(差值[i])<ABS(Last差) and SGN(差值[i])=-SGN(Last差) then begin
      UD差[i]:=差值[i]; Last差:=差值[i];
    end;
  end;
end;
UD差>0 colorred;
UD差<0 colorgreen;
UD差=0 color777777;

---

__________________
大家發財^^

引用:

---

最初由 Digol 發表
謝謝板主，但經測試K棒均顯示color777777這個顏色，並沒有依需求改變。

另外，我想要的是當差為多方時，當根K棒與之後K棒一直顯示為紅色，直到符合比較原則轉為空方時則一直顯示成綠色，也就是只有開盤到第一次出現差值前才會顯示UD差=0的顏色。

---

引用:

---

最初由 cgjj 發表
您用哪個週期跑? 分線嗎?
請觀察今日之分線K棒，它僅算最新一日，之前的都會是灰色的
若在分線沒結果，請確認您帶入的差值數列無誤

Re:另外，我想要的是當差為多方時，當根K棒與之後K棒一直顯示為紅色....
這部分要等前面的部分確立無誤後
再進行處理，否則先處理不利比對

---

__________________
大家發財^^

引用:

---

最初由 Digol 發表
我用1分鐘週期跑，如圖都是灰色的。
另外差值請看附圖指標，只有出現差值時才會有紅、綠，其他時間差值為0。

---

Digol 附帶上了此圖片:

__________________
大家發財^^

引用:

---

最初由 Digol 發表
我用1分鐘週期跑，如圖都是灰色的。
另外差值請看附圖指標，只有出現差值時才會有紅、綠，其他時間差值為0。

---

原碼:
差值:={請自行帶入指標差值};
DE:=date;
StNo:=lbound(BARSSINCE(DE=DE[datacount]));
if lbound(差值)>StNo then StNo:=lbound(差值);
Last差:=差值[StNo];
UD差:=C*0; UD差[StNo]:=Last差;
for i=StNo+1 to datacount do begin
  if 差值[i]<>0 then begin    
    if Last差=0 or (ABS(差值[i])<ABS(Last差) and SGN(差值[i])=-SGN(Last差)) then begin
      UD差[i]:=差值[i]; Last差:=差值[i];
    end;
  end;
end;
UD差>0 colorred;
UD差<0 colorgreen;
UD差=0 color777777;

確認無誤後，只需

將
UD差>0 colorred;
UD差<0 colorgreen;
UD差=0 color777777;

改為
UD差:=ref(UD差,barslast(UD差<>0));
UD差>0 colorred;
UD差<0 colorgreen;
UD差=0 color777777;

就可達到您要的:
當差為多方時，當根K棒與之後K棒一直顯示為紅色，直到符合比較原則轉為空方時則一直顯示成綠色

引用:

---

最初由 cgjj 發表
是起點差值為零引起的，請改為這樣

原碼:
差值:={請自行帶入指標差值};
DE:=date;
StNo:=lbound(BARSSINCE(DE=DE[datacount]));
if lbound(差值)>StNo then StNo:=lbound(差值);
Last差:=差值[StNo];
UD差:=C*0; UD差[StNo]:=Last差;
for i=StNo+1 to datacount do begin
  if 差值[i]<>0 then begin    
    if Last差=0 or (ABS(差值[i])<ABS(Last差) and SGN(差值[i])=-SGN(Last差)) then begin
      UD差[i]:=差值[i]; Last差:=差值[i];
    end;
  end;
end;
UD差>0 colorred;
UD差<0 colorgreen;
UD差=0 color777777;

---

Digol 附帶上了此圖片:

__________________
大家發財^^

引用:

---

最初由 Digol 發表
經測試仍有問題，如圖。

另外好像無法歷史回憶？希望能歷史回憶，往後才能正確的測試指標。

---

引用:

---

最初由 cgjj 發表
@@ 抱歉，被圖誤導

這邊的
差值:={請自行帶入指標差值};

應該是要帶入您所謂的[指標數值]
差值:={指標數值};

以您的公式特性而言
要做歷史回憶需要具備:
1.開啟該天的歷史回應
2.訓練模式調到該天收盤後的時間(例如:15:00)
兩者同時配合，才能正常看

---

Digol 附帶上了此圖片:

__________________
大家發財^^

引用:

---

最初由 Digol 發表
報告板主，帶入指標數值，紅K變成開盤第一根了。如圖。

---