奇狐社區論壇 (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=9430)

劃線

請問:
昨低為三日最低,要在昨低與今高劃線
A1:=REF(L,1)=LLV(L,3);
DRAWLINE(A1,REF(L,1),A1,H,0);
哪裡錯誤,TKS.

A1:=REF(L,1)=LLV(L,3);
DRAWLINE(refx(A1,1),REF(L,0),A1,H,0);

報告完畢 ~

__________________
偶而是不是也感覺有些老
像個大人般的戀愛
有時心情糟
請你相信我在你身邊別忘了

謝謝大大.
那裡有奇狐完整ㄉ函數可查,說明檔沒有REFX.
DRAWLINE解說也不同,難搞呀.

HUP:=H>REF(H,1);
DRAWLINE(refx(HUP,1),REF(H,0),HUP,H,0);
為什麼連續新高劃不出來?TKS.

QQ^^

__________________
偶而是不是也感覺有些老
像個大人般的戀愛
有時心情糟
請你相信我在你身邊別忘了

圖片被吞掉

__________________
偶而是不是也感覺有些老
像個大人般的戀愛
有時心情糟
請你相信我在你身邊別忘了

HUP:=H>REF(H,1);
DRAWLINE(refx(HUP,1),REF(H,0),HUP,H,0);
為什麼連續新高劃不出來(斷斷續續)?TKS.
大大如何改? TKS

DRAWLINE 這個函數我還真的第一次用耶
還蠻奇特的 , 他被設計成不會連續
也就是當 "終點" 的不會被 當成下一個 "起點" 所以導致會斷續 (若偶有理解錯 , 歡迎指正)

HUP:=H>REF(H,1);
Vertline(HUP),color888888;
DRAWLINE(refx(HUP,1),ref(H,0),1+C*0,H,0);
HUP:=ref(HUP,1) AND HUP;
DRAWLINE(refx(HUP,1),ref(H,0),1+C*0,H,0);

Kline(O,H,L,C,0);

// 不知道有其他方法不用 2 步驟嗎 ??

報告完畢~~

__________________
偶而是不是也感覺有些老
像個大人般的戀愛
有時心情糟
請你相信我在你身邊別忘了

謝謝大大.接起來ㄌ.

A1:=REF(L,1)=LLV(L,3);
DRAWLINE(refx(A1,1),L,A1,H,0),COLORYELLOW;
HUP:=H>REF(H,1);
DRAWLINE(refx(HUP,1),ref(H,0),1+C*0,H,0),COLORYELLOW;
HUP:=ref(HUP,1) AND HUP;
DRAWLINE(refx(HUP,1),ref(H,0),1+C*0,H,0),COLORYELLOW;

A2:=REF(H,1)=HHV(H,3);
DRAWLINE(refx(A2,1),H,A2,L,0),COLORGREEN;
LDN:=L<REF(L,1);
DRAWLINE(refx(LDN,1),ref(L,0),1+C*0,L,0),COLORGREEN;
LDN:=ref(LDN,1) AND LDN;
DRAWLINE(refx(LDN,1),ref(L,0),1+C*0,L,0),COLORGREEN;

大大,對不起,我不會貼圖,以大盤為例:
1-> 消除08/03/24 LOW 對08/03/25 LOW ㄉ線段
2-> 消除 08/03/17 HIGH 對 08/03/18 HIGH ㄉ線段
3-> 07/11/26 HIGH 直接連到 07/11/27 LOW
如何修改?感謝您.

會有重複線段是因為你 "同時 用了 2 個 條件"

所以沒辦法消除吧
一定會有 2 條線的

__________________
偶而是不是也感覺有些老
像個大人般的戀愛
有時心情糟
請你相信我在你身邊別忘了

alpha大謝謝您:
其實我想要ㄉ是
1-> 創高時連高點,不再創高時連低點
2-> 創低時連低點,不再創低時連高點
指導一下好嗎?

HUP:=H>REF(H,1) ;
LDN:=L<REF(L,1) ;
UPDN_out:= H>=REF(H,1) AND L<=REF(L,1);
UPDN_in := H<=REF(H,1) AND L>=REF(L,1) ;
Vertline(UPDN_in OR UPDN_out),colorff9900;
H1 := HUP AND NOT(UPDN_in OR UPDN_out) ;
L1 := LDN AND NOT(UPDN_in OR UPDN_out);
Q:=barslast(H1 OR L1);
L2 := ref(H1,Q) AND UPDN_in OR ref(L1,Q) AND UPDN_out ;
H2 := ref(L1,Q) AND UPDN_in OR ref(H1,Q) AND UPDN_out ;
P1:= if(H1 OR H2, H, L);
partline(H1 OR H2, P1),linethick3,colormagenta;
partline(NOT(H1 OR H2), P1),linethick3,colorgreen;

Kline(O,H,L,C,0);


報告完畢 ~~~

__________________
偶而是不是也感覺有些老
像個大人般的戀愛
有時心情糟
請你相信我在你身邊別忘了

alpha大謝謝您:
1-> 08/02/20 接低點才對
修一修好嗎?
語法學習中,

(1) 程式有重新修改 , 你在 copy 一次
(2)
08/02/19 高點 = 8024.41
08/02/20 高點 = 8040.83
因為 08/02/20 還是創新高
所以是連高點 "沒錯喲"

__________________
偶而是不是也感覺有些老
像個大人般的戀愛
有時心情糟
請你相信我在你身邊別忘了

sorry, you are right.
thank you very much.

大大:
AND , OR 是如何運算ㄉ?
EX : 1 AND 1 OR 0 AND 1 ?
TKS!

引用:

---

最初由 gmhks 發表
大大:
AND , OR 是如何運算ㄉ?
EX : 1 AND 1 OR 0 AND 1 ?
TKS!

---

指標有瑕疵
遺漏考慮 "連續" 狀況

修正如下

HUP:=H>REF(H,1);
LDN:=L<REF(L,1);
UPDN_out:= H>=REF(H,1) AND L<=REF(L,1);
UPDN_in := H<=REF(H,1) AND L>=REF(L,1) ;
UPDN_in_out_連續 := (UPDN_in OR UPDN_out) AND ref(UPDN_in OR UPDN_out,1) OR UPDN_in ;
UPDN_in_out_連續 := UPDN_in_out_連續 AND SUM(UPDN_in,barslast(NOT(UPDN_in_out_連續))) <> 0;
Vertline(UPDN_in),colorff9900;
Vertline(UPDN_out),color3399ff;

H1 := HUP AND NOT(UPDN_in OR UPDN_out) ;
L1 := LDN AND NOT(UPDN_in OR UPDN_out);

Q:= barslast(H1 OR L1);
L2 := (ref(H1,Q) AND UPDN_in OR ref(L1,Q) AND UPDN_out) AND NOT(UPDN_in_out_連續) ;
H2 := (ref(L1,Q) AND UPDN_in OR ref(H1,Q) AND UPDN_out) AND NOT(UPDN_in_out_連續) ;

index_UPDN_in:= SUM(UPDN_in_out_連續 AND UPDN_in, barslast(NOT(UPDN_in_out_連續))+1);
Q:= barslast(NOT(UPDN_in_out_連續)) = 0;
H3:= mod(index_UPDN_in, 2) = 0 AND ref(H1 OR H2,barslast(Q)) OR
mod(index_UPDN_in, 2) = 1 AND ref(L1 OR L2,barslast(Q));
H3:= ref(H3, barslast(UPDN_in)) AND UPDN_in_out_連續;

Q := H1 OR H2 OR H3;
P1:= if(Q, H, L);
partline(Q, P1),linethick3,colormagenta;
partline(NOT(Q), P1),linethick3,colorgreen;

Kline(O,H,L,C,0);

__________________
偶而是不是也感覺有些老
像個大人般的戀愛
有時心情糟
請你相信我在你身邊別忘了

用迴圈寫比較恰當

__________________
偶而是不是也感覺有些老
像個大人般的戀愛
有時心情糟
請你相信我在你身邊別忘了

用迴圈寫比較恰當
寫下範例好嗎 ? 多謝ㄌ !
我也覺得for next ,do while 比較方便,但不知奇狐ㄉ確切用法

(1)

H1:=H>ref(H,1);
L1:=L<ref(L,1);
Q:= C*0;

for w = lbound(H1) to datacount do begin
Q[w] := if( Q[w-1], H1[w], NOT(L1[w]) );
end;

P1:=if(Q,H,L);
partline(Q, P1),linethick3,colormagenta;
partline(NOT(Q), P1),linethick3,colorgreen;

Kline(O,H,L,C,0);


// 若有問題可以參考
// http://www.chiefox.com.tw/bbs/showt...=&threadid=2648

(2)


監看視窗 --> 移動光標 去看數值變化就行囉
例如:
H1 := H>ref(H,1);
改成
H1 : H>ref(H,1); 就可以看到數值了

__________________
偶而是不是也感覺有些老
像個大人般的戀愛
有時心情糟
請你相信我在你身邊別忘了

for w = lbound(H1)+1 to datacount do begin
if Q[w-1] then begin
Q[w] := H1[w];
end else begin
Q[w] := NOT(L1[w]);
end;
end;
奇狐有沒有類似"監看視窗"ㄉ功能可以觀察w,h1[w]ㄉ變化?
H1:H>ref(H,1); // h1為變數( 0 or 1)
H1[w]; // h1 為0,1陣列,對嗎?
thank you very much.