分红数据问题

106325

老师好：可以用代码获取分红时的股价及到现在的周期数吗？请老师给写一下

资深技术07

O1:=VALUEWHEN(SPLITDATA(0)  AND SPLITDATA(4)>0,CLOSE);//获取分红时的股价
B1:=VALUEWHEN(SPLITDATA(0)  AND SPLITDATA(4)>0,BARPOS);
FHK:BARPOS-B1;//到现在的周期数

106325

资深技术07 发表于 2026-8-17 11:35
O1:=VALUEWHEN(SPLITDATA(0)  AND SPLITDATA(4)>0,CLOSE);//获取分红时的股价
B1:=VALUEWHEN(SPLITDATA(0) ...

请写出：1、股息率的选股公式 2、写出到分红的时间小于30天的选股公式。3、写出从分红到现在小于30天的选股公式 。4、写出现在的股价小于分红时的股价10%的选股公式 。谢谢老师。

资深技术07

//选股公式运行在日K线上

[PEL] 复制代码

CFH:=VALUEWHEN(SPLITDATA(0)  AND SPLITDATA(4)>0,OPEN);//OPEN获取分红时的开盘价,CLOSE换成OPEN表示当天收盘价
B1:=VALUEWHEN(SPLITDATA(0)  AND SPLITDATA(4)>0,BARPOS);
FH:CLOSE<CFH*0.9;//股价小于分红时的股价10%
FHK:BARPOS-B1<30;//到现在的周期数

股息率选股公式

[PEL] 复制代码

CFH:=VALUEWHEN(SPLITDATA(0)  AND SPLITDATA(4)>0,CLOSE);//获取分红时的收盘价
现金分红:=VALUEWHEN(SPLITDATA(0)  AND SPLITDATA(4)>0,SPLITDATA(4));;//每10股派现
股息率:=现金分红/CFH*100;
选股:股息率>3;//筛选股息率大于3%，数字自己改