奇狐社區論壇 - 求助修正文字表現紅黑K

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- 求助修正文字表現紅黑K (http://www.chiefox.com.tw/bbs/showthread.php?threadid=24122)

由 ivancclai 在 2024-11-02 05:53 發表:

求助修正文字表現紅黑K

版主你好
我想文字表現紅黑K 但是判斷式有誤幫我修正謝謝

EXPLAIN(1>0,'==============='),colorFFFFFF;
EXPLAINEX(1>0,'今高 =',H,0,0) COLOR000FF;
TD1:=C >= O;
TD2:=C < O;
IF TD1=1 THEN BEGIN
EXPLAINEX(1>0,'今收 =',C,0,0) COLOR0000FF;
EXPLAINEX(1>0,'今開 =',O,0,0) COLOR0000FF;
END;
IF TD2=1 THEN BEGIN
EXPLAINEX(1>0,'今開 =',O,0,0) COLOR00FF00;
EXPLAINEX(1>0,'今收 =',C,0,0) COLOR00FF00;
END;
EXPLAINEX(1>0,'今低 =',L,0,0) COLOR0FF00;
EXPLAIN(1>0,'==============='),colorFFFFFF;

由 cgjj 在 2024-11-02 12:09 發表:

回覆: 求助修正文字表現紅黑K

引用:
最初由 ivancclai 發表
版主你好
我想文字表現紅黑K 但是判斷式有誤幫我修正謝謝

EXPLAIN(1>0,'==============='),colorFFFFFF;
EXPLAINEX(1>0,'今高 =',H,0,0) COLOR000FF;
TD1:=C >= O;
TD2:=C < O;
IF TD1=1 THEN BEGIN
EXPLAINEX(1>0,'今收 =',C,0,0) COLOR0000FF;
EXPLAINEX(1>0,'今開 =',O,0,0) COLOR0000FF;
END;
IF TD2=1 THEN BEGIN
EXPLAINEX(1>0,'今開 =',O,0,0) COLOR00FF00;
EXPLAINEX(1>0,'今收 =',C,0,0) COLOR00FF00;
END;
EXPLAINEX(1>0,'今低 =',L,0,0) COLOR0FF00;
EXPLAIN(1>0,'==============='),colorFFFFFF;

不需要 if ... then
EXPLAINEX 第一個參數就是條件，該條件成立就會顯示

EXPLAIN(1,'==============='),colorFFFFFF;
EXPLAINEX(1>0,'今高 =',H,0,0) COLOR000FF;
TD1:=C >= O;
TD2:=C < O;
EXPLAINEX(TD1,'今收 =',C,0,0) COLOR0000FF;
EXPLAINEX(TD1,'今開 =',O,0,0) COLOR0000FF;
EXPLAINEX(TD2,'今開 =',O,0,0) COLOR00FF00;
EXPLAINEX(TD2,'今收 =',C,0,0) COLOR00FF00;
EXPLAINEX(1,'今低 =',L,0,0) COLOR0FF00;
EXPLAIN(1,'==============='),colorFFFFFF;

奇狐紅黑K的實際算法是：
紅K:=CLOSE>OPEN or CLOSE=OPEN and (CLOSE>ref(CLOSE,1) or barpos=1);
黑K:=CLOSE<OPEN or CLOSE=OPEN and CLOSE<=ref(CLOSE,1);

由 ivancclai 在 2024-11-03 08:55 發表:

謝謝版主可以了

全部時間均為台灣時間, 現在時間為03:39

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