程序化大资金活动 + 主力动向指标公式

{ {程序化指标大资金活动信号 }
动量值 := 100 - 3 * SMA((C - LLV(L,65)) / (HHV(H,80) - LLV(L,65)) * 100, 20, 1) + 2 * SMA(SMA((C - LLV(L,65)) / (HHV(H,80) - LLV(L,65)) * 100, 20, 1), 15, 1);
动量开 := 100 - 3 * SMA((O - LLV(L,65)) / (HHV(H,80) - LLV(L,65)) * 100, 20, 1)  + 2 * SMA(SMA((O - LLV(L,65)) / (HHV(H,80) - LLV(L,65)) * 100, 20, 1), 15, 1);
资金异动 := 动量值 < REF(动量开,1) AND VOL > REF(VOL,1) AND C > REF(C,1);
大资金活动: IF(资金异动 AND COUNT(资金异动,30) = 1, 50, 0), LINETHICK1, COLORYELLOW;
STICKLINE(资金异动 AND COUNT(资金异动,30) = 1, 0, 15, 5, 0), COLORRED;
DRAWTEXT(资金异动 AND COUNT(资金异动,30) = 1, 50, '大资金活动'), COLORYELLOW;
{程序化指标 主力资金流向 }
加权价 := (C*2 + H + L) / 4 * 10;
主力差 := EMA(加权价, 13) - EMA(加权价, 34);
信号线 := EMA(主力差, 5);
动量柱 := 2 * (主力差 - 信号线) * 5.5;
主力撤: IF(动量柱 <= 0, 动量柱, 0), COLORGREEN;
主力进: IF(动量柱 >= 0, 动量柱, 0), COLORRED;