
PARM1:=5;
PARM2:=10;
DIRECTION := ABS(CLOSE - REF(CLOSE, PARM1));
VOLATILITYQ := SUM(ABS(CLOSE - REF(CLOSE, 1)), PARM1);
ER := DIRECTION / VOLATILITYQ;
FASTEST := 2 / (2 + 1);
SLOWEST := 2 / (30 + 1);
SMOOTH := ER * (FASTEST - SLOWEST) + SLOWEST;
SC := POW(SMOOTH, 2);
KAMA1 := DMA(CLOSE, SC);
NOTEXT1 := IF(KAMA1 < REF(KAMA1, 1), KAMA1, NULL);
DIRECTION2 := ABS(CLOSE - REF(CLOSE, PARM2));
VOLATILITYQ2 := SUM(ABS(CLOSE - REF(CLOSE, 1)), PARM2);
ER2 := DIRECTION2 / VOLATILITYQ2;
FASTEST2 := 2 / (2 + 1);
SLOWEST2 := 2 / (30 + 1);
SMOOTH2 := ER2 * (FASTEST2 - SLOWEST2) + SLOWEST2;
SC2 := POW(SMOOTH2, 2);
KAMA2 := DMA(CLOSE, SC2);
NOTEXT2 := IF(KAMA2 < REF(KAMA2, 1), KAMA2, NULL);
趋势向上 := KAMA1 > KAMA2;
KAMA1F := EMA(KAMA1, 5);
KAMA2F := EMA(KAMA2, 5);
STICKLINE(KAMA1 >= REF(KAMA1, 1), KAMA1, REF(KAMA1, 1), 3, 0), COLORRED;
STICKLINE(KAMA1 < REF(KAMA1, 1), KAMA1, REF(KAMA1, 1), 3, 0), COLORGREEN;
STICKLINE(KAMA2 >= REF(KAMA2, 1), KAMA2, REF(KAMA2, 1), 3, 0), COLORRED;
STICKLINE(KAMA2 < REF(KAMA2, 1), KAMA2, REF(KAMA2, 1), 3, 0), COLORGREEN;
// 输出平滑值
KAMA1F, COLORMAGENTA;
KAMA2F, COLORGREEN;
本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请点击举报。个人配资网提示:文章来自网络,不代表本站观点。