 
等级: 超级版主
- 注册:
- 2021-5-24
- 曾用名:
|
本帖最后由 资深技术05 于 2026-8-24 15:55 编辑
这是股息率和股利率相关的代码,关键逻辑在注释中说明了下。 其中留意了下全年的算法。按照你之前除权登记日的固定股息率算法,这个全年的方式可能有待商榷。
new_y:=YEAR<>REF(YEAR,1);
LEN:=BARSLAST(new_y);
当年累计分红额:SUM(SPLITDATA(4),len+1),,NODRAW;
//只考虑分红情况!按:100*分红/10/除权登记日的收盘价. 除权数据是每十股,所以这里额外除了10
//返回最近一次,不一定是今年的.如果需要本年的,需要额外处理.
最近一次分红的股息率:100*VALUEWHEN(SPLITDATA(4),SPLITDATA(4)/10/REF(CLOSE,1)),NODRAW;
//只考虑分红情况!按:100*当年累计分红/10/最近一个除权登记日的收盘价. 除权数据是每十股,所以这里额外除了10
//这里分红是累计计算的,但是算除息率 时用的除权登记日价格是最近一次的.这个算法是有待商榷的!
//当年没有分红,返回0
当年累计分红的股息率:100*当年累计分红额/10/VALUEWHEN(SPLITDATA(4),REF(CLOSE,1)),NODRAW;
//100*当年累计分红额/10/每股收益
//当年没有分红,返回0
股利支付率:100*当年累计分红额/10/FINANCE(33),NODRAW;
|
|