分享

判断大盘趋势、概念强弱部分通达信公式

 千里走单骑2 2023-03-29 发布于云南
陶博士说过:道氏理论最有用的部分,甚至是每一天都必须牢记的部分,就是只有当股 价的运动得到了两个平均价格指数的互相确认时,才有考虑它的价值我经常综合观察A股20几个指数,从不同指数的相互验证角度来观察指数如果各指数之间有背离,则是非常重要的预警信号。指数之间的背离在我的指数中期信号中,占据 相当重要的地位,这个我历史上分析指数的时候,已经讲过很多次了。
在参考公众号狮子孤星、像欧奈尔口袋支点量化的公众号学者之后,结合过去陶博士观察的28个指数我自己进行了整理。使用时注意观察各指数支点的背离或者趋同状态、或如深证综指与深证成值背离状态、医药指数可以反向评估市场风险状态,建议使用周线来观察。
下图为最新的28个指数周线指数信号共振图,在12月17日那周明显出现指数向好的共振高点,之后市场缺少领头羊板块,同时各指数开始共振向下。

图片


下图为日线图,可以更加准确的看到12月17日那周中,14日为共振高点,之后趋势迅速向下,此时按趋势操作者一定要减仓,配合均线理论对自己的持仓汰弱留强

图片


1、指数信号序列公式如下:
第一步:Control+F,点击技术指标公式-其他类型-新建

图片

第二步:公式名工具箱,副图显示,填入下述公式。

{公式如下}

{第1个值,跨度用于点阵信号}

跨度:SAR(4,2,20),NODRAW;

{第2-4个值,新高新低NHL指数}

新高:H>REF(HHV(H,250),1);

新低:H<REF(LLV(L,250),1);

新高新低差:新高-新低;

DRAWTEXT_FIX(1,0,10,0,'微信公众号:欧奈尔口袋支点与趋势量化策略'),COLORGREEN;

{第5-6个值,站上50日线}

站上50均线:C>=MA(C,50);

所有股数:BARSCOUNT(C)>=50;

{第7-8个值,创一年内新高}

创一年内新高:H>=HHV(H,250);

涨停:C>=REF(C,1)*1.099;

{第9个值,SAR值,用于大盘信号}

SARS:SAR(4,2,20),NODRAW;

{公式结束}

图片

第三步:公式名EPEXTRS,副图显示,填入下述公式

{公式如下}

DRAWTEXT(ISLASTBAR,28,'  上证指数'),COLORWHITE;

DRAWTEXT(ISLASTBAR,27,'  上证50'),COLORWHITE;

DRAWTEXT(ISLASTBAR,26,'  沪深300'),COLORWHITE;

DRAWTEXT(ISLASTBAR,25,'  深证综指'),COLORWHITE;

DRAWTEXT(ISLASTBAR,24,'  深证成指'),COLORWHITE;

DRAWTEXT(ISLASTBAR,23,'  创业板指'),COLORWHITE;

DRAWTEXT(ISLASTBAR,22,'  创业板综'),COLORWHITE;

DRAWTEXT(ISLASTBAR,21,'  创业板50'),COLORWHITE;

DRAWTEXT(ISLASTBAR,20,'  科创50'),COLORWHITE;

DRAWTEXT(ISLASTBAR,19,'  中小综指'),COLORWHITE;

DRAWTEXT(ISLASTBAR,18,'  中证100'),COLORWHITE;

DRAWTEXT(ISLASTBAR,17,'  深证100R'),COLORWHITE;

DRAWTEXT(ISLASTBAR,16,'  中小100'),COLORWHITE;

DRAWTEXT(ISLASTBAR,15,'  中证500'),COLORWHITE;

DRAWTEXT(ISLASTBAR,14,'  中证1000'),COLORWHITE;

DRAWTEXT(ISLASTBAR,13,'  国证1000'),COLORWHITE;

DRAWTEXT(ISLASTBAR,12,'  次新股'),COLORWHITE;

DRAWTEXT(ISLASTBAR,11,'  两年新股'),COLORWHITE;

DRAWTEXT(ISLASTBAR,10,'  深次新股'),COLORWHITE;

DRAWTEXT(ISLASTBAR,9,'  基金指数'),COLORWHITE;

DRAWTEXT(ISLASTBAR,8,'  B股指数'),COLORWHITE;

DRAWTEXT(ISLASTBAR,7,'  成分B指'),COLORWHITE;

DRAWTEXT(ISLASTBAR,6,'  深证B指'),COLORWHITE;

DRAWTEXT(ISLASTBAR,5,'  国证B指'),COLORWHITE;

DRAWTEXT(ISLASTBAR,4,'  消费100'),COLORWHITE;

DRAWTEXT(ISLASTBAR,3,'  300医药'),COLORWHITE;

DRAWTEXT(ISLASTBAR,2,'  全指医药'),COLORWHITE;

DRAWTEXT(ISLASTBAR,1,'  医药等权'),COLORWHITE;

29,COLORBLACK;

NOTEXT_SZZS1:IF('999999$C'>CALCSTOCKINDEX('999999','工具箱',9),28,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_SZZS2:IF('999999$C'<=CALCSTOCKINDEX('999999','工具箱',9),28,DRAWNULL),CIRCLEDOT,COLORGREEN;

SZZS:=IF('999999$C'>CALCSTOCKINDEX('999999','工具箱',9),1,0);

NOTEXT_SZ501:IF('SH000016$C'>CALCSTOCKINDEX('SH000016','工具箱',9),27,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_SZ502:IF('SH000016$C'<=CALCSTOCKINDEX('SH000016','工具箱',9),27,DRAWNULL),CIRCLEDOT,COLORGREEN;

SZ50:=IF('SH000016$C'>CALCSTOCKINDEX('SH000016','工具箱',9),1,0);

NOTEXT_HS3001:IF('000300$C'>CALCSTOCKINDEX('000300','工具箱',9),26,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_HS3002:IF('000300$C'<=CALCSTOCKINDEX('000300','工具箱',9),26,DRAWNULL),CIRCLEDOT,COLORGREEN;

HS300:=IF('000300$C'>CALCSTOCKINDEX('000300','工具箱',9),1,0);

NOTEXT_SZZZ1:IF('399106$C'>CALCSTOCKINDEX('399106','工具箱',9),25,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_SZZZ2:IF('399106$C'<=CALCSTOCKINDEX('399106','工具箱',9),25,DRAWNULL),CIRCLEDOT,COLORGREEN;

SZZZ:=IF('399106$C'>CALCSTOCKINDEX('399106','工具箱',9),1,0);

NOTEXT_SZCZ1:IF('399001$C'>CALCSTOCKINDEX('399001','工具箱',9),24,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_SZCZ2:IF('399001$C'<=CALCSTOCKINDEX('399001','工具箱',9),24,DRAWNULL),CIRCLEDOT,COLORGREEN;

SZCZ:=IF('399001$C'>CALCSTOCKINDEX('399001','工具箱',9),1,0);

NOTEXT_CYBZ1:IF('399006$C'>CALCSTOCKINDEX('399006','工具箱',9),23,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_CYBZ2:IF('399006$C'<=CALCSTOCKINDEX('399006','工具箱',9),23,DRAWNULL),CIRCLEDOT,COLORGREEN;

CYBZ:=IF('399006$C'>CALCSTOCKINDEX('399006','工具箱',9),1,0);

NOTEXT_CYBZ11:IF('399102$C'>CALCSTOCKINDEX('399102','工具箱',9),22,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_CYBZ12:IF('399102$C'<=CALCSTOCKINDEX('399102','工具箱',9),22,DRAWNULL),CIRCLEDOT,COLORGREEN;

CYBZ1:=IF('399102$C'>CALCSTOCKINDEX('399102','工具箱',9),1,0);

NOTEXT_CYB501:IF('399673$C'>CALCSTOCKINDEX('399673','工具箱',9),21,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_CYB502:IF('399673$C'<=CALCSTOCKINDEX('399673','工具箱',9),21,DRAWNULL),CIRCLEDOT,COLORGREEN;

CYB50:=IF('399673$C'>CALCSTOCKINDEX('399673','工具箱',9),1,0);

NOTEXT_KC501:IF('000688$C'>CALCSTOCKINDEX('000688','工具箱',9),20,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_KC502:IF('000688$C'<=CALCSTOCKINDEX('000688','工具箱',9),20,DRAWNULL),CIRCLEDOT,COLORGREEN;

KC50:=IF('000688$C'>CALCSTOCKINDEX('000688','工具箱',9),1,0);

NOTEXT_ZXZZ1:IF('399101$C'>CALCSTOCKINDEX('399101','工具箱',9),19,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_ZXZZ2:IF('399101$C'<=CALCSTOCKINDEX('399101','工具箱',9),19,DRAWNULL),CIRCLEDOT,COLORGREEN;

ZXZZ:=IF('399101$C'>CALCSTOCKINDEX('399101','工具箱',9),1,0);

NOTEXT_ZZ1001:IF('399903$C'>CALCSTOCKINDEX('399903','工具箱',9),18,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_ZZ1002:IF('399903$C'<=CALCSTOCKINDEX('399903','工具箱',9),18,DRAWNULL),CIRCLEDOT,COLORGREEN;

ZZ100:=IF('399903$C'>CALCSTOCKINDEX('399903','工具箱',9),1,0);

NOTEXT_SZ1001:IF('399004$C'>CALCSTOCKINDEX('399004','工具箱',9),17,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_SZ1002:IF('399004$C'<=CALCSTOCKINDEX('399004','工具箱',9),17,DRAWNULL),CIRCLEDOT,COLORGREEN;

SZ100:=IF('399004$C'>CALCSTOCKINDEX('399004','工具箱',9),1,0);

NOTEXT_ZX1001:IF('399005$C'>CALCSTOCKINDEX('399005','工具箱',9),16,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_ZX1002:IF('399005$C'<=CALCSTOCKINDEX('399005','工具箱',9),16,DRAWNULL),CIRCLEDOT,COLORGREEN;

ZX100:=IF('399005$C'>CALCSTOCKINDEX('399005','工具箱',9),1,0);

NOTEXT_ZZ5001:IF('399905$C'>CALCSTOCKINDEX('399905','工具箱',9),15,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_ZZ5002:IF('399905$C'<=CALCSTOCKINDEX('399905','工具箱',9),15,DRAWNULL),CIRCLEDOT,COLORGREEN;

ZZ500:=IF('399905$C'>CALCSTOCKINDEX('399905','工具箱',9),1,0);

NOTEXT_ZZ10001:IF('000852$C'>CALCSTOCKINDEX('000852','工具箱',9),14,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_ZZ10002:IF('000852$C'<=CALCSTOCKINDEX('000852','工具箱',9),14,DRAWNULL),CIRCLEDOT,COLORGREEN;

ZZ1000:=IF('000852$C'>CALCSTOCKINDEX('000852','工具箱',9),1,0);

NOTEXT_GZ10001:IF('399311$C'>CALCSTOCKINDEX('399311','工具箱',9),13,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_GZ10002:IF('399311$C'<=CALCSTOCKINDEX('399311','工具箱',9),13,DRAWNULL),CIRCLEDOT,COLORGREEN;

GZ1000:=IF('399311$C'>CALCSTOCKINDEX('399311','工具箱',9),1,0);

NOTEXT_CXG1:IF('880529$C'>CALCSTOCKINDEX('880529','工具箱',9),12,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_CXG2:IF('880529$C'<=CALCSTOCKINDEX('880529','工具箱',9),12,DRAWNULL),CIRCLEDOT,COLORGREEN;

CXG:=IF('880529$C'>CALCSTOCKINDEX('880529','工具箱',9),1,0);

NOTEXT_LNCXG1:IF('880870$C'>CALCSTOCKINDEX('880870','工具箱',9),11,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_LNCXG2:IF('880870$C'<=CALCSTOCKINDEX('880870','工具箱',9),11,DRAWNULL),CIRCLEDOT,COLORGREEN;

LNCXG:=IF('880870$C'>CALCSTOCKINDEX('880870','工具箱',9),1,0);

NOTEXT_SCXG1:IF('399678$C'>CALCSTOCKINDEX('399678','工具箱',9),10,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_SCXG2:IF('399678$C'<=CALCSTOCKINDEX('399678','工具箱',9),10,DRAWNULL),CIRCLEDOT,COLORGREEN;

SCXG:=IF('399678$C'>CALCSTOCKINDEX('399678','工具箱',9),1,0);

NOTEXT_JJZS1:IF('000011$C'>CALCSTOCKINDEX('000011','工具箱',9),9,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_JJZS2:IF('000011$C'<=CALCSTOCKINDEX('000011','工具箱',9),9,DRAWNULL),CIRCLEDOT,COLORGREEN;

JJZS:=IF('000011$C'>CALCSTOCKINDEX('000011','工具箱',9),1,0);

NOTEXT_BGZS1:IF('999997$C'>CALCSTOCKINDEX('999997','工具箱',9),8,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_BGZS2:IF('999997$C'<=CALCSTOCKINDEX('999997','工具箱',9),8,DRAWNULL),CIRCLEDOT,COLORGREEN;

BGZS:=IF('999997$C'>CALCSTOCKINDEX('999997','工具箱',9),1,0);

NOTEXT_CFBZ1:IF('399003$C'>CALCSTOCKINDEX('399003','工具箱',9),7,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_CFBZ2:IF('399003$C'<=CALCSTOCKINDEX('399003','工具箱',9),7,DRAWNULL),CIRCLEDOT,COLORGREEN;

CFBZ:=IF('399003$C'>CALCSTOCKINDEX('399003','工具箱',9),1,0);

NOTEXT_SZBZ1:IF('399108$C'>CALCSTOCKINDEX('399108','工具箱',9),6,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_SZBZ2:IF('399108$C'<=CALCSTOCKINDEX('399108','工具箱',9),6,DRAWNULL),CIRCLEDOT,COLORGREEN;

SZBZ:=IF('399108$C'>CALCSTOCKINDEX('399108','工具箱',9),1,0);

NOTEXT_GZBZ1:IF('399318$C'>CALCSTOCKINDEX('399318','工具箱',9),5,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_GZBZ2:IF('399318$C'<=CALCSTOCKINDEX('399318','工具箱',9),5,DRAWNULL),CIRCLEDOT,COLORGREEN;

GZBZ:=IF('399318$C'>CALCSTOCKINDEX('399318','工具箱',9),1,0);

NOTEXT_XF1001:IF('399364$C'>CALCSTOCKINDEX('399364','工具箱',9),4,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_XF1002:IF('399364$C'<=CALCSTOCKINDEX('399364','工具箱',9),4,DRAWNULL),CIRCLEDOT,COLORGREEN;

XF100:=IF('399364$C'>CALCSTOCKINDEX('399364','工具箱',9),1,0);

NOTEXT_300YY1:IF('399913$C'>CALCSTOCKINDEX('399913','工具箱',9),3,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_300YY2:IF('399913$C'<=CALCSTOCKINDEX('399913','工具箱',9),3,DRAWNULL),CIRCLEDOT,COLORGREEN;

YY300:=IF('399913$C'>CALCSTOCKINDEX('399913','工具箱',9),1,0);

NOTEXT_QZYY1:IF('000911$C'>CALCSTOCKINDEX('000911','工具箱',9),2,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_QZYY2:IF('000911$C'<=CALCSTOCKINDEX('000911','工具箱',9),2,DRAWNULL),CIRCLEDOT,COLORGREEN;

QZYY:=IF('000911$C'>CALCSTOCKINDEX('000911','工具箱',9),1,0);

NOTEXT_YYDQ1:IF('000075$C'>CALCSTOCKINDEX('000075','工具箱',9),1,DRAWNULL),CIRCLEDOT,COLORRED;

NOTEXT_YYDQ2:IF('000075$C'<=CALCSTOCKINDEX('000075','工具箱',9),1,DRAWNULL),CIRCLEDOT,COLORGREEN;

YYDQ:=IF('000075$C'>CALCSTOCKINDEX('000075','工具箱',9),1,0);

信号释放:SZZS+SZ50+HS300+SZZZ+SZCZ+CYBZ+CYBZ1+CYB50+KC50+ZXZZ+ZZ100+SZ100+ZX100+ZZ500+ZZ1000+GZ1000+SCXG+JJZS+BGZS+CFBZ+SZBZ+GZBZ+XF100+YY300+QZYY+YYDQ,LINETHICK1,COLORWHITE;

{公式结束}

图片

2、动力指数公式如下:

史丹温斯坦对在经典名著《笑傲牛熊》中成功运用动力指数、新高新低(NHL)指数多次判断对顶底,他利用这两个线条与均线之间产生的背离确定可能产生转折,然后将其与多指数共振相匹配,判断即将产生向上还是向下趋势。
在21年5月11日我利用这一点成功判断出一段由光伏领导的一次中期行情

图片

图片

图片

1、指数信号序列公式如下:
第一步:Control+F,点击技术指标公式-其他类型-新建

图片

第二步:因为已经建立过工具箱公式。直接新建动力指数和NHL指数即可。这个公式运算量很大,在开盘期间不要运行,容易卡住,建议在复盘时使用

{公式开始}

0,DOTLINE,COLORWHITE;

新高:INSUM('【上市一年以上】','工具箱',2,0),NODRAW;

新低:INSUM('【上市一年以上】','工具箱',3,0),NODRAW;

新高新低差:新高-新低,LINETHICK2,COLORGREEN;

IF(新高新低差>REF(新高新低差,1),新高新低差,DRAWNULL),LINETHICK2,COLORRED;

MAAD:(ADVANCE-DECLINE)/6,COLORSTICK;

动力指数40周线:SUM(ADVANCE-DECLINE,40)/40,LINETHICK2,COLORYELLOW;

因为公众号平台更改了推送规则,记得读完点赞,点下“在看”,这样每次新文章推送才会第一时间出现在你的订阅列表!

图片

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

    0条评论

    发表

    请遵守用户 评论公约