标题：請教有冇高手懂編寫"TCL曾氏通道"或"樂活五線譜"公式?

1楼

ENCORE 发表于：2019/12/9 21:45:29

如題!

2楼

wenarm 发表于：2019/12/10 7:40:20

请提供具体的策略思路，我们尝试根据您的思路进行编写。

3楼

ENCORE 发表于：2019/12/10 10:26:00

https://vocus.cc/stockscreen/5c8ca2fafd89780001088938

我找了很多網頁,仍找不到公式和參數的詳細說明,只找到了以下編碼(應該是excel里的編碼),應如何轉成股票公式編碼?

input:Length(20);
 variable:
MA(0),H_Length(0),L_Length(0),
High_Low(0),Half_H_L(0),K(0),
one_twoK(0),H_2K(0),twoK_one(0),L_2K(0),
Up_Band(0),down_Band(0);
 
 
MA = average(close,Length);
H_Length = highest(high,Length);
L_Length = lowest(low,Length);
 
High_Low = high - low;
Half_H_L = (high + low) / 2;
K = High_Low / Half_H_L;
 
one_twoK = 1+2*K;
H_2K = high * one_twoK;
 
twoK_one = 1-2*K;
L_2K = low * twoK_one;
 
Up_Band = average(H_2K,Length);
 
down_Band = average(L_2K,Length);
 
 
plot2(MA ,"MA");
 
if currentbar >= Length + Length then begin
 
plot1(Up_Band,"Up_Band");
plot3(down_Band,"down_Band");
end;

4楼

FireScript 发表于：2019/12/10 11:20:59

抱歉，你这个网址链接我们本地不开的哦。

5楼

ENCORE 发表于：2019/12/10 11:43:45

這個可以嗎?

https://xueqiu.com/8524080201/127058969

6楼

ENCORE 发表于：2019/12/10 11:44:53

https://support.caibaoshuo.com/hc/zh-cn/articles/360023639453-%E4%BB%80%E4%B9%88%E6%98%AF%E4%BA%94%E7%BA%BF%E8%B0%B1%E8%B6%8B%E5%8A%BF%E5%9B%BE-

7楼

ENCORE 发表于：2019/12/10 12:31:42

1. 以20MA為中心線。

2. K= H(20)-L(20) / average[(H(20)+L(20)]。

此K值會隨者20日內的最高價最低價的差值，而放大或減小。

3. ub=最高價*(1+2K)；lb=最高價*(1-2K)

4. UB=average[ub(20)]；LB=average[lb(20)]

此通道，以20MA為中心。

然後根據20日最高和最低價，為基準，算出通道上緣和下緣。

如果趨勢變動快速(擴張狀態)，此通道上下緣，會隨之擴張。

趨勢平穩，就會收縮。

大趨勢的公式，

是為了看最近的價格變化，看是否會快速衝出上下通道，

如果是的話，代表最近有很強的買盤和賣盤。

或許有肥尾現象發生。

最後要注意的是，

1. 五線譜使用的是以年為單位。

2. 大趨勢使用的是以月為單位(20日ma)。

8楼

FireScript 发表于：2019/12/10 14:06:36

根据这段描述：

1. 以20MA為中心線。

2. K= H(20)-L(20) / average[(H(20)+L(20)]。

此K值會隨者20日內的最高價最低價的差值，而放大或減小。

3. ub=最高價*(1+2K)；lb=最高價*(1-2K)

4. UB=average[ub(20)]；LB=average[lb(20)]

代码大致是这样，但是上面毕竟只是文字描述。average 这个我就按照均线函数去理解的。但是具体它想表述的含义和使用方法还是不怎么明确。

我只能按照我推测的结果去编写代码

mid:ma(c,20);

K:(hhv(H,20)-LLV(L,20))/(hhv(H,20)+LLV(L,20))/2,NODRAW;
UB:=h*(1+2*k);
LB:=L*(1-2*k);

ubx:ma(ub,20);
lbx:ma(lb,20);

9楼

ENCORE 发表于：2019/12/10 14:28:58

謝幫忙

共9 条记录, 每页显示 10 条, 页签: [1]