{ 程序化指标多周期动量趋势指标 }
{ 10日最低价 }
V1 := LLV(LOW, 10);
{ 30日最高价 }
V2 := HHV(HIGH, 30);
{ 动量线：价格在10日区间的相对位置 }
动量线 := EMA(((CLOSE - V1) / (V2 - V1)) * 100, 4), COLORFFFFFF;
{ 加权均价 }
VAR06 := (2 * CLOSE + HIGH + LOW) / 4;
{ 13日最低价 }
VAR07 := LLV(LOW, 13);
{ 13日最高价 }
VAR08 := HHV(HIGH, 13);
{ 动量指标 }
VAR09 := EMA((VAR06 - VAR07) / (VAR08 - VAR07) * 100, 13);
VARA1 := EMA(0.667 * REF(VAR09, 1) + 0.333 * VAR09, 2);
{ 动量柱线：红绿判断 }
STICKLINE(VAR09 > VARA1, VAR09, VARA1, 5, 0), COLORRED;
STICKLINE(VAR09 <= VARA1, VAR09, VARA1, 5, 0), COLORGREEN;
{ 水平参考线 }
80, COLOR00FFFF;
50, COLORRED;
20, COLORGREEN;
{ 参数设置 }
T1 := 5;
T2 := 4;
{ 加权均价P }
P := (2 * CLOSE + HIGH + LOW + OPEN) / 5;
{ 均线BB }
BB := MA(P, 3);
{ 资金流向指标 }
CC := (SUM(IF(P > REF(P, 1), P * VOL, 0), 4)) / (SUM(IF(P < REF(P, 1), P * VOL, 0), 4));
DD := REF(100 - (100) / (1 + CC), 1);
{ 多周期动量计算 }
{ 15日动量 }
A1 := HHV(P, 15);
A2 := LLV(P, 15);
A3 := A1 - A2;
A4 := EMA((P - A2) / A3 * 100, 2);
{ 60日动量 }
B1 := HHV(P, 60);
B2 := LLV(P, 60);
B3 := B1 - B2;
B4 := EMA((P - B2) / B3 * 100, 2);
{ 240日动量 }
C1 := HHV(P, 240);
C2 := LLV(P, 240);
C3 := C1 - C2;
C4 := EMA((P - C2) / C3 * 100, 2);
{ 趋势反转判断 }
VAR4 := LLV(LOW, T1);
VAR5 := HHV(HIGH, T2);
VAR6 := ((HHV(HIGH, 4) - P) / (HHV(HIGH, 4) - LLV(LOW, 4))) * 100 - 72;
VAR7 := ((P - LLV(LOW, 4)) / (HHV(HIGH, 4) - LLV(LOW, 4))) * 100;
VAR8 := SMA(VAR7, 2, 1);
VAR9 := CLOSE - REF(CLOSE, 5);
{ 动量震荡指标 }
VARA := (EMA(EMA(VAR9, 5), 5) / EMA(EMA(ABS(VAR9), 5), 5)) * 100;
VARB := (EMA(EMA(VAR9, 10), 10) / EMA(EMA(ABS(VAR9), 10), 10)) * 100;
VARC := (EMA(EMA(VAR9, 20), 20) / EMA(EMA(ABS(VAR9), 20), 20)) * 100;
{ CCI指标 }
CCI := (P - MA(P, 14)) * 100 / (1.5 * AVEDEV(P, 14));
{ RSI指标 }
RSI1 := (SMA(MAX(CLOSE - REF(CLOSE, 1), 0), 6, 1) / SMA(ABS(CLOSE - REF(CLOSE, 1)), 6, 1)) * 100;
{ 超买超卖标记 }
STICKLINE(RSI1 > 80, 100, 95, 3, 0), COLOR3333DD;
STICKLINE(CCI < -100, 18, 14, 3, 0), COLORYELLOW;

指标公式逻辑介绍