CR（能量指标）
CR 能量指标又叫中间意愿指标、价格动量指标，它和 AR、BR 指标有很多相似之处，但更有自己独特的研判功能，是分析股市多空双方力量对比、把握买卖股票时机的一种中长期技术分析工具。CR 交易指标的基本原理同 AR、BR 交易指标有很多相似的地方，如计算公式和研判法则等，但它与 AR、BR 交易指标最大不同的地方在于理论的出发点有不同之处。CR 交易指标的理论出发点是：中间价是股市最有代表性的价格。
CR 计算方式：
CR（N 日）=P1÷P2×100
P1=Σ（H－YM），表示 N 日以来多方力量的总和
P2=Σ（YM－L），表示 N 日以来空方力量的总和
H 表示今日的最高价，L 表示今日的最低价
YM 表示昨日（上一个交易日）的中间价。
中间价 MID=（C+H+L）÷3
MA1= 前（M1/2.5+1）日的 MA(CR,M1)
MA2= 前（M2/2.5+1）日的 MA(CR,M2)
MA3= 前（M3/2.5+1）日的 MA(CR,M3)
指标参数：
y1 |
CR输出列，中间意愿指标。 |
y2 |
MA1输出列，前（m1/2.5+1）日的 CR 的 m1 日移动平均 |
y3 |
MA2输出列，前（m2/2.5+1）日的 CR 的 m2 日移动平均 |
y4 |
MA3输出列，前（M3/2.5+1）日的 CR 的 M3 日移动平均 |
n |
数字，时间周期，如 26 |
m1 |
周期 1，如 5 |
m2 |
周期 2，如 10 |
m3 |
周期 3，如 20 |
函数代码：
A |
B |
|
1 |
func CR(A,$y1,$y2,$y3,$y4,n,m1,m2,m3) |
=A.derive@o(:cr_mid,:cr_hmid,:cr_lmid,:cr_macr1,:cr_macr2,:cr_macr3) |
2 |
=A.run((最高 + 最低 + 收盘)/3:cr_mid,max(0, 最高 -cr_mid[-1]):cr_hmid,max(0,cr_mid[-1]- 最低 ):cr_lmid) |
|
3 |
=A.run(sum(cr_hmid[1-n:0])/sum(cr_lmid[1-n:0])*100:${y1}, avg(${y1}[1-m1:0]):cr_macr1, cr_macr1[-(m1/2.5+1)]:${y2}, avg(${y1}[1-m2:0]):cr_macr2, cr_macr2[-(m2/2.5+1)]:${y3}, avg(${y1}[1-m3:0]):cr_macr3, cr_macr3[-(m3/2.5+1)]:${y4}) |
|
4 |
=A.alter(;cr_mid,cr_hmid,cr_lmid,cr_macr1,cr_macr2,cr_macr3) |
函数保存到 indicator.splx 中。
举例：调用脚本函数计算浦发银行 2024 年的 CR 指标。
A |
B |
|
… |
… |
… |
5 |
=call@f("indicator.splx") |
登记脚本中的函数 |
6 |
… |
计算出源数据 |
7 |
=A6.derive(MA_5) |
增加要返回的指标字段 |
8 |
=MA(A7,MA_5, 收盘,5) |
调用函数计算指标 |
运行效果：
