以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  公式模型编写问题提交  (http://222.73.7.161/bbs/list.asp?boardid=4)
----  請教有冇高手懂編寫"TCL曾氏通道"或"樂活五線譜"公式?  (http://222.73.7.161/bbs/dispbbs.asp?boardid=4&id=173465)
--  作者：ENCORE
--  发布时间：2019/12/9 21:45:29
--  請教有冇高手懂編寫"TCL曾氏通道"或"樂活五線譜"公式?
如題!
--  作者：wenarm
--  发布时间：2019/12/10 7:40:20
--  

请提供具体的策略思路，我们尝试根据您的思路进行编写。
--  作者：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;
--  作者：FireScript
--  发布时间：2019/12/10 11:20:59
--  
 抱歉，你这个网址链接 我们本地不开的哦。
--  作者：ENCORE
--  发布时间：2019/12/10 11:43:45
--  
這個可以嗎?
--  作者：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-
--  作者：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)。
--  作者：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);
--  作者：ENCORE
--  发布时间：2019/12/10 14:28:58
--  
謝幫忙