等级: 免费版
- 注册:
- 2021-6-17
- 曾用名:
|

楼主 |
发表于 2023-12-26 11:26
|
显示全部楼层
看看这个示例如何,能否抽取出实现方法并简化下
input:N(30, 0, 1000,1);
variable:LLT_1=0,LLT_2=0,LLT_N=0;
alpha := 2/(N+1);
alpha_double := alpha*alpha;
c1 := ref(close,1);
c2 := ref(close,2);
IF barpos<=2 THEN BEGIN
LLT_1 := close;
LLT_2 := close;
END
ELSE BEGIN
LLT_N := (alpha-alpha_double/4)*close+(alpha_double/2*c1)-(alpha-3*alpha_double/4)*c2 + 2*(1-alpha)*LLT_1 - ((1-alpha)*(1-alpha)*LLT_2);
LLT_2 := LLT_1;
LLT_1 := LLT_N;
END
LLT : LLT_N, colorYellow;
LL1: REF(LLT_N,1),colorYellow,linethick0;
LL2: REF (LLT_N,2),colorYellow,linethick0;
DEL: LLT_N - LL1,linethick0;
DEF: LL1 - LL2,linethick0; |
|