分享

通达信钱袋子启动主图 指标 源码

 常熟老李jlr5mr 2023-08-30 发布于江苏

测试从2016至今成功率为100% , 检测指标无未来 不漂移 指标不加密。

本来公式里有去除科创板 去除创业板 去除ST和停牌,因为检测 DYNAINFO(4)=0)为未来函数 所以去除了 ,条件选股时,勾选剔除ST,剔除未交易。

本公式就是长线指标,选出股票很少,但成功率高!可以了解一下选股思路。
今年就选出2只,信号很少。对于稳健型的投资者,一年做两次这种票,足够了!

Image

Image

【钱袋子启动】主图源码:

注意参数设置!

MA1:MA(CLOSE,M1);

MA2:MA(CLOSE,M2);

MA3:MA(CLOSE,M3);

MA4:MA(CLOSE,M4);

MA5:MA(CLOSE,M5);

MA6:MA(CLOSE,M6);

MA7:MA(CLOSE,M7);

TJ1:=MA(C,5);

TJ2:=MA(C,10);

TJ3:=MA(C,20);

TJ4:=MA(C,60);

X1:=ABS(MA(C,5)/MA(C,10)-1)<=0.036;

X2:=ABS(MA(C,10)/MA(C,20)-1)<=0.036;

X3:=ABS(MA(C,20)/MA(C,30)-1)<=0.036;

XX:=X1 AND X2 AND X3;

LJZF:=(C-REF(C,75))/REF(C,75)*100<32;

振幅:=(HHV(H,75)-LLV(L,75))/LLV(L,45)<=0.28;

ZDDF:=(L-REF(C,1))/REF(C,1)<-0.05; 

新法:=SUM((C-REF(C,1))/REF(C,1)*100,75)<28;

DXZF:=(C-REF(C,7))/REF(C,7)*100<5; 

QY:=(REF(C,1)-C)/REF(C,1)<=0.0238;

QY1:=(REF(C,1)-C)/REF(C,1)<=0.012;

去除科创板:=IF(CODELIKE('688'),0,1) AND C>DTPRICE(REF(C,1),0.1);

去除创业板:=IF(CODELIKE('300'),0,1) AND C>DTPRICE(REF(C,1),0.1);

去除ST和停牌:=NOT(NAMELIKE('ST') OR NAMELIKE('*ST') OR DYNAINFO(4)=0);

XG:XX AND 去除ST和停牌  AND REF(LJZF,1)=1  AND REF(新法,1)=1

      AND COUNT(ZDDF,75)<=1   AND REF(LJZF,1)=1   AND REF(DXZF,1)=1

      AND REF(C,3)/REF(C,4)>1.0328 AND REF(C,2)<REF(C,3) AND  REF(C,1)<REF(C,2)  

      AND  REF(QY,2)=1  AND  REF(QY1,1)=1

      AND REF(C,2)<REF(O,2)  AND REF(C,1)<REF(O,1)   AND C/REF(C,1)>1.0408 

       AND REF(L,2)>REF(L,3)  AND REF(L,1)>REF(L,3) AND L>REF(L,3) AND C>REF(H,3) AND  V=HHV(V,75)

           AND TJ1>REF(TJ1,1) AND TJ1>TJ2 ;

DRAWICON(XG,L*1.01,9);

Image

【钱袋子启动】选股公式

TJ1:=MA(C,5);

TJ2:=MA(C,10);

TJ3:=MA(C,20);

TJ4:=MA(C,60);

X1:=ABS(MA(C,5)/MA(C,10)-1)<=0.036;

X2:=ABS(MA(C,10)/MA(C,20)-1)<=0.036;

X3:=ABS(MA(C,20)/MA(C,30)-1)<=0.036;

XX:=X1 AND X2 AND X3;

LJZF:=(C-REF(C,75))/REF(C,75)*100<32;

振幅:=(HHV(H,75)-LLV(L,75))/LLV(L,45)<=0.28;

ZDDF:=(L-REF(C,1))/REF(C,1)<-0.05; 

新法:=SUM((C-REF(C,1))/REF(C,1)*100,75)<28;

DXZF:=(C-REF(C,7))/REF(C,7)*100<5; 

QY:=(REF(C,1)-C)/REF(C,1)<=0.0238;

QY1:=(REF(C,1)-C)/REF(C,1)<=0.012;

XG:XX   AND REF(LJZF,1)=1  AND REF(新法,1)=1

      AND COUNT(ZDDF,75)<=1   AND REF(LJZF,1)=1   AND REF(DXZF,1)=1

      AND REF(C,3)/REF(C,4)>1.0328 AND REF(C,2)<REF(C,3) AND  REF(C,1)<REF(C,2)  

      AND  REF(QY,2)=1  AND  REF(QY1,1)=1

      AND REF(C,2)<REF(O,2)  AND REF(C,1)<REF(O,1)   AND C/REF(C,1)>1.0408 

       AND REF(L,2)>REF(L,3)  AND REF(L,1)>REF(L,3) AND L>REF(L,3) AND C>REF(H,3)

           AND  V=HHV(V,75)

           AND TJ1>REF(TJ1,1) AND TJ1>TJ2 ;

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约