|
回覆: 求助 修正 文字表現 紅黑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);
|
2024-11-02 05:53
