通达信〖九红寻牛〗副图/选股源码
提醒:文中分享的指标都是经过电脑或手机的测试,有的指标不支持手机使用,看标题提示。对于指标不会安装可以查看公众号菜单栏安装教程。
此文含“tn6安装包”点击左下角“阅读原文”下载。
本文只作为知识分享,仅供学习交流,不构成任何投资建议,请勿用于股票交易。
目录:
第一部分:副图指标源码,安装在副图指标处
第二部分:公式使用方法和编译逻辑解析
第三部分:选股公式源码,多个选股公式,分开安装
第四部分:图片示例
{九红寻牛副图}
GSZJ1:=CLOSE;
GSZJ2:=100*ABS(C-O)/REF(GSZJ1,1);
GSZJ3:=100*(H-MAX(GSZJ1,O))/REF(GSZJ1,1);
GSZJ4:=100*(MIN(GSZJ1,O)-L)/REF(GSZJ1,1);
GSZJ5:=HHV(GSZJ2,20)< 5 AND HHV(GSZJ3,20)< 5 AND HHV(GSZJ4,20)< 5;
GSZJ6:=REF(GSZJ5,1) AND GSZJ1>O AND V>2*REF(V,1) AND H/REF(C,1)>1.08 AND GSZJ2>1.02 AND GSZJ3>3;
GSZJ7:=BARSLAST(GSZJ6);
GSZJ8:=EVERY(H< REF(H,GSZJ7),GSZJ7);
GSZJ9:=GSZJ1>O AND REF(GSZJ1>O,1) AND REF(GSZJ1>O,2) AND REF(GSZJ1>O,3) AND REF(C>O,4);
GSZJ10:=C>O AND REF(GSZJ1>O,1) AND REF(C>O,2) AND REF(GSZJ1>O,3) AND REF(GSZJ1>O,4) AND REF(C>O,5) AND REF(GSZJ1>O,6) AND REF(GSZJ1>O,7) AND REF(GSZJ1>O,8);
GSZJ11:=NOT( (GSZJ1=ZTPRICE(REF(C,1),0.1) AND NOT(NAMELIKE(‘ST’) OR NAMELIKE(‘*ST’))) OR (GSZJ1=ZTPRICE(REF(C,1),0.05) AND (NAMELIKE(‘ST’) OR NAMELIKE(‘*ST’))) );
九红寻牛:C>O AND REF(C>O,1) AND REF(C>O,2) AND REF(C>O,3) AND REF(C>O,4) AND REF(GSZJ1>O,5) AND REF(GSZJ1>O,6) AND REF(GSZJ1>O,7) AND REF(GSZJ1>O,8) AND EVERY( NOT( (GSZJ1=ZTPRICE(REF(GSZJ1,1),0.1) AND NOT(NAMELIKE(‘ST’) OR NAMELIKE(‘*ST’))) OR (GSZJ1=ZTPRICE(REF(GSZJ1,1),0.05) AND (NAMELIKE(‘ST’) OR NAMELIKE(‘*ST’))) ),3),LINETHICK3,COLOR0000FF;
{九红寻牛副图}
GSZJ1:=CLOSE;
GSZJ2:=100*ABS(C-O)/REF(GSZJ1,1);
GSZJ3:=100*(H-MAX(GSZJ1,O))/REF(GSZJ1,1);
GSZJ4:=100*(MIN(GSZJ1,O)-L)/REF(GSZJ1,1);
GSZJ5:=HHV(GSZJ2,20)< 5 AND HHV(GSZJ3,20)< 5 AND HHV(GSZJ4,20)< 5;
GSZJ6:=REF(GSZJ5,1) AND GSZJ1>O AND V>2*REF(V,1) AND H/REF(C,1)>1.08 AND GSZJ2>1.02 AND GSZJ3>3;
GSZJ7:=BARSLAST(GSZJ6);
GSZJ8:=EVERY(H< REF(H,GSZJ7),GSZJ7);
GSZJ9:=GSZJ1>O AND REF(GSZJ1>O,1) AND REF(GSZJ1>O,2) AND REF(GSZJ1>O,3) AND REF(C>O,4);
GSZJ10:=C>O AND REF(GSZJ1>O,1) AND REF(C>O,2) AND REF(GSZJ1>O,3) AND REF(GSZJ1>O,4) AND REF(C>O,5) AND REF(GSZJ1>O,6) AND REF(GSZJ1>O,7) AND REF(GSZJ1>O,8);
GSZJ11:=NOT( (GSZJ1=ZTPRICE(REF(C,1),0.1) AND NOT(NAMELIKE(‘ST’) OR NAMELIKE(‘*ST’))) OR (GSZJ1=ZTPRICE(REF(C,1),0.05) AND (NAMELIKE(‘ST’) OR NAMELIKE(‘*ST’))) );
九红寻牛:GSZJ1>O AND REF(GSZJ1>O,1) AND REF(C>O,2) AND REF(C>O,3) AND REF(C>O,4) AND REF(GSZJ1>O,5) AND REF(GSZJ1>O,6) AND REF(GSZJ1>O,7) AND REF(GSZJ1>O,8) AND EVERY( NOT( (GSZJ1=ZTPRICE(REF(GSZJ1,1),0.1) AND NOT(NAMELIKE(‘ST’) OR NAMELIKE(‘*ST’))) OR (GSZJ1=ZTPRICE(REF(GSZJ1,1),0.05) AND (NAMELIKE(‘ST’) OR NAMELIKE(‘*ST’)))),3);

更多示例图,点击左下角阅读原文查看

夜雨聆风
