陶博士在【241103 逐日不雅察选股2.0】一文中革新了“逐日不雅察选股”公式,凭据个东谈主骨子需要,将此公式按四种诈骗场景进行了改编。
革新有两点:
一、公式中统统RPS数值均减小0.01。貌似不错科罚不同证券公司邃晓信软件关于RPS数值处理有互异,所引起的最终选股数目不一致的问题。
二、XG1中增多一个抵制条款:RPS120>95 and RPS50>95。
场景一、副图规画,代码如下:
{称呼:逐日不雅察}{版块:2.0}{技术:20241103}
{阐明:公式调试用途}
换手小:VOL/CAPITAL*100<20,COLORC0C0C0,DOTLINE;{日线换手率小于20%}
RPSXG50 :=EXTDATA_USER(3,0)/10,LINETHICK1,COLORYELLOW;{50RPS}
RPSXG120:=EXTDATA_USER(4,0)/10,LINETHICK1,COLORGREEN;{120RPS}
RPSXG250:=EXTDATA_USER(5,0)/10,LINETHICK1,COLORWHITE;{250RPS}
XG21:=C/HHV(H,250)>=0.5;{收盘价大于一年内最高价0.5,允许最大回撤逾越-50%,但必须运行回升}
XG22:=IF(RPSXG120<=97.99,0,1) OR IF(RPSXG250<=97.99,0,1);{RPS120大于98,大约RPS250大于98};
中期调完:(XG21 AND XG22)*2,COLOR808040,DOTLINE;
XG11:=COUNT(HIGH=HHV(HIGH,250),5)>=1;{已往5天内至少有1个往复日的最高价便是已往250天的最高价}
XG12:=IF(RPSXG120<=95.99,0,1) OR IF(RPSXG250<=95.99,0,1);{RPS120大于96,大约RPS250大于96};
XG13:=IF(RPSXG120<=94.99,0,1) AND IF(RPSXG50<=94.99,0,1);{RPS120大于95,且RPS50大于95};
一年新高:(XG11 AND (XG12 OR XG13))*3,COLORFF00FF,DOTLINE;
选股:6-((一年新高 OR 中期调完) AND 换手小),COLOR00FFFF;
场景二、选股规画1,代码如下:
{称呼:逐日不雅察选股1}{版块:2.0}
{技术:20241103}
{阐明:惟有相宜“一年新高”或“中期调完”条款的王人选出来}
换手小:=VOL/CAPITAL*100<20;{日线换手率小于20%}
RPSXG50 :=EXTDATA_USER(3,0)/10,LINETHICK1,COLORYELLOW;{50RPS}
RPSXG120:=EXTDATA_USER(4,0)/10,LINETHICK1,COLORGREEN;{120RPS}
RPSXG250:=EXTDATA_USER(5,0)/10,LINETHICK1,COLORWHITE;{250RPS}
XG21:=C/HHV(H,250)>=0.5;{收盘价大于一年内最高价0.5,允许最大回撤逾越-50%,但必须运行回升}
XG22:=IF(RPSXG120<=97.99,0,1) OR IF(RPSXG250<=97.99,0,1);{RPS120大于98,大约RPS250大于98};
中期调完:=XG21 AND XG22;
XG11:=COUNT(HIGH=HHV(HIGH,250),5)>=1;{已往5天内至少有1个往复日的最高价便是已往250天的最高价}
XG12:=IF(RPSXG120<=95.99,0,1) OR IF(RPSXG250<=95.99,0,1);{RPS120大于96,大约RPS250大于96};
XG13:=IF(RPSXG120<=94.99,0,1) AND IF(RPSXG50<=94.99,0,1);{RPS120大于95,且RPS50大于95};
一年新高:=XG11 AND (XG12 OR XG13);
选股:(一年新高 OR 中期调完) AND 换手小;
场景三、选股规画2,代码如下:{称呼:逐日不雅察选股2}{版块:2.0}
{技术:20241103}
{阐明:初次相宜“一年新高”或“中期调完”条款的王人选出来}
换手小:=VOL/CAPITAL*100<20;{日线换手率小于20%}
RPSXG50 :=EXTDATA_USER(3,0)/10,LINETHICK1,COLORYELLOW;{50RPS}
RPSXG120:=EXTDATA_USER(4,0)/10,LINETHICK1,COLORGREEN;{120RPS}
RPSXG250:=EXTDATA_USER(5,0)/10,LINETHICK1,COLORWHITE;{250RPS}
XG21:=C/HHV(H,250)>=0.5;{收盘价大于一年内最高价0.5,允许最大回撤逾越-50%,但必须运行回升}
XG22:=IF(RPSXG120<=97.99,0,1) OR IF(RPSXG250<=97.99,0,1);{RPS120大于98,大约RPS250大于98};
中期调完:=XG21 AND XG22;
XG11:=COUNT(HIGH=HHV(HIGH,250),5)>=1;{已往5天内至少有1个往复日的最高价便是已往250天的最高价}
XG12:=IF(RPSXG120<=95.99,0,1) OR IF(RPSXG250<=95.99,0,1);{RPS120大于96,大约RPS250大于96};
XG13:=IF(RPSXG120<=94.99,0,1) AND IF(RPSXG50<=94.99,0,1);{RPS120大于95,且RPS50大于95};
一年新高:=XG11 AND (XG12 OR XG13);
初次一年新高:=BARSSINCEN(一年新高 AND 换手小,5)=0;
初次中期调完:=BARSSINCEN(中期调完 AND 换手小,5)=0;
选股:初次一年新高 OR 初次中期调完;
场景四、镶嵌主图规画MA3中,代码如下:{--------第十一部分------------------逐日不雅察2.0------20241103};
换手小:=VOL/CAPITAL*100<20;{日线换手率小于20%}
RPSXG50 :=EXTDATA_USER(3,0)/10;{50RPS}
RPSXG120:=EXTDATA_USER(4,0)/10;{120RPS}
RPSXG250:=EXTDATA_USER(5,0)/10;{250RPS}
XG21:=C/HHV(H,250)>=0.5;{收盘价大于一年内最高价0.5,允许最大回撤逾越-50%,但必须运行回升}
XG22:=IF(RPSXG120<=97.99,0,1) OR IF(RPSXG250<=97.99,0,1);{RPS120大于98,大约RPS250大于98};
中期调完:=XG21 AND XG22;
XG11:=COUNT(HIGH=HHV(HIGH,250),5)>=1;{已往5天内至少有1个往复日的最高价便是已往250天的最高价}
XG12:=IF(RPSXG120<=95.99,0,1) OR IF(RPSXG250<=95.99,0,1);{RPS120大于96,大约RPS250大于96};
XG13:=IF(RPSXG120<=94.99,0,1) AND IF(RPSXG50<=94.99,0,1);{RPS120大于95,且RPS50大于95};
一年新高:=XG11 AND (XG12 OR XG13);
选股1:=一年新高 AND 换手小;
选股2:=中期调完 AND 换手小;
IF(选股1,MA50,DRAWNULL),LINETHICK4,COLORFF00FF; {相宜[一年新高]条款的,用粗粉线画出MA50}
IF(选股2,MA120,DRAWNULL),LINETHICK4,COLOR00FF00;{相宜[中期调完]条款的,用粗绿线画出MA120};
本站仅提供存储奇迹,统统内容均由用户发布,如发现存害或侵权内容,请点击举报。