logo
搜索
我的图书馆

发文章

发文工具

其他工具

留言交流
搜索
分享

20231203 通达信“跨年龙妖”主图指标选股公式--年线寻龙

 vfswjjx9wz3kz7 2023-12-03 发布于安徽

欧欧 欧欧量化 2023-12-03 08:00 

一、指标说明：
1、大势以年线长期下跌之后出现的首个涨停板上穿突破年线为预警信号，以此板的实底画一水平延伸线，做为底部临界平衡线，线上看多线下看空，年线下行取绿线，年线上行取红色。
2、中短期多空临界点以20日高量顶线（阴阳同取量，画线分蓝红）为短期的临界平衡线，线上看多线下看空。
二、主图公式如下：

DRAWTEXT_FIX(1,0.005,0,0,'所属风格:'),COLORYELLOW;

DRAWTEXT_FIX(1,0.06,0,0,FGBLOCK),COLORYELLOW;

DRAWTEXT_FIX(1,0.005,0.05,0,'所属概念:'),COLORMAGENTA;

DRAWTEXT_FIX(1,0.06,0.05,0,GNBLOCK),COLORYELLOW;

历低价:LOWRANGE(L),COLORLICYAN NODRAW;

历高价:TOPRANGE(H),COLORMAGENTA,NODRAW;

历低量:LOWRANGE(V),COLORLICYAN NODRAW;

历高量:TOPRANGE(V),COLORMAGENTA,NODRAW;

NHL:=COUNT(BARSLAST(MA(C,250)>REF(MA(C,250),1))>=220,30)>=1 AND BARSLAST(MA(C,250)<=REF(MA(C,250),1))>=1;

NOTEXTQ:IF(MA(C,250)>=REF(MA(C,250),1),MA(C,250),DRAWNULL)COLORRED LINETHICK2;

NOTEXTR:IF(MA(C,250)<REF(MA(C,250),1),MA(C,250),DRAWNULL)COLORLICYAN LINETHICK2;

NOTEXTD:IF(COUNT(BARSLAST(MA(C,250)>REF(MA(C,250),1))>=220,30)>=1 AND BARSLAST(MA(C,250)<=REF(MA(C,250),1))>=1 AND MA(C,20)>MA(C,250),MA(C,250),DRAWNULL)COLORMAGENTA LINETHICK5;

NO2:=REF(IF(REF(V>=REF(V,1)*1.87 AND C>=(REF(C,1),O) AND TOPRANGE(V)>=20,1) AND L>REF(O,1),REF(O,1),REF(IF(L>REF(H,1),REF(H,1),O),BARSLAST(FILTER(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))=1,5)))),BARSLAST(FILTER(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))=1,5)));

NOD:=REF(IF(REF(L,1)>REF(H,2),REF(H,2),NO2),BARSLAST(FILTER(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))=1,5)));

DRAWKLINE(H,O,L,C);

STICKLINE(REF(O,1),REF(IF(REF(L,1)>REF(H,2),REF(H,2),NO2),BARSLAST(FILTER(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))=1,5))),REF(IF(REF(L,1)>REF(H,2),REF(H,2),NO2),BARSLAST(FILTER(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))=1,5))),2,0),COLOR404080;

STICKLINE(H,REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3))),REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3))),1,0),COLORBLUE;

STICKLINE(H,REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1))),REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1))),1,0),COLORLIGRAY;

STICKLINE(V>=REF(V,1)*1.87 AND C>=(REF(C,1),O) AND TOPRANGE(V)>=20,O,C,3,0)COLORBLUE;

STICKLINE(V/REF(V,1)>=2.9 AND C>=O AND TOPRANGE(V)>=20,O,C,(-1),0)COLORMAGENTA;

STICKLINE((C-REF(C,1))/REF(C,1)*100<IF(CODELIKE('68'),-9.0,-6.9) AND (C-REF(C,1))/REF(C,1)*100<IF(CODELIKE('30'),-9.0,-6.9),O,C,(-1),0),COLORGREEN;

STICKLINE((C/REF(C,1)-1)*100<IF(CODELIKE('68'),-9.0,-6.9) AND (C-REF(C,1))/REF(C,1)*100<IF(CODELIKE('30'),-9.0,-6.9) AND H<REF(L,1),O,C,(-1),0),COLORBLACK;

STICKLINE((SUM(AMOUNT,1)/SUM(V,1)/100>REF(C,1) AND C<=O) OR (SUM(AMOUNT,1)/SUM(V,1)/100>REF(C,1) AND C>REF(C,1) AND C<O AND C>300) AND NOT((C-REF(C,1))/REF(C,1)*100>=9.71 AND O=C) AND NOT((C-REF(C,1))/REF(C,1)*100<=-9.71 AND O=C) AND NOT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H) OR AMOUNT/V/100<REF(C,1) AND C>O AND C<300  AND SUM(AMOUNT,1)/SUM(V,1)/100<REF(C,1) AND NOT((C-REF(C,1))/REF(C,1)*100>=9.71 AND O=C) AND NOT((C-REF(C,1))/REF(C,1)*100<=-9.71 AND O=C),MIN(O,C),MIN(O,C)+(MAX(O,C)-MIN(O,C))*0.5,1,0)COLORFF80FF;

STICKLINE(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,O,C,(3),0)COLORRED;

STICKLINE((O-C)/O>0.02 AND C<REF(C,1),(C+O)/2,(C+O)/2,2,1)COLORCYAN;

STICKLINE((C-O)/O>0.02 AND C>REF(C,1),(C+O)/2,(C+O)/2,2,1)COLORCYAN;

STICKLINE(TOPRANGE(V)>=88 AND C>O,(MAX(C,O)-MIN(C,O))*0.50+MIN(C,O),C,(-1),0)COLOR4080FF;

DRAWTEXT_FIX(C>O,0.01,0.9,0,'微信公众号：欧欧量化'),COLORRED;

STICKLINE((H-REF(C,1))/REF(C,1)*100>IF(CODELIKE('68'),19.71,9.71) AND (H-REF(C,1))/REF(C,1)*100>IF(CODELIKE('30'),19.71,9.71) AND C<H,MAX(C,O),MAX(C,O)*0.995,(2),0)COLORBLACK;

DRAWICON(FILTER(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))=1,5),H+0.05,9)DRAWABOVE;

DRAWTEXT(REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3)))>0 AND CURRBARSCOUNT=1,REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3))),'    高量阴') DRAWABOVE COLORFF8000;

DRAWTEXT(REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1)))>0 AND CURRBARSCOUNT=1,REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1))),'    高量    阳') DRAWABOVE COLORLIMAGENTA;

DRAWNUMBER(REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3)))>0 AND CURRBARSCOUNT=1,REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3))),       REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3)))),COLORBLUE;

DRAWNUMBER(REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1)))>0 AND CURRBARSCOUNT=1,REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1))),       REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1)))),COLORLIMAGENTA;

板底:IF(CURRBARSCOUNT<=CONST(REF(BARSLAST(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))),1)+1)+1,CONST(REF(NOD,REF(BARSLAST(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H AND IF(RANGE(BARSCOUNT(V),20,250), COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))),1)+0)),DRAWNULL),COLORMAGENTA,LINETHICK2;DRAWGBK(DATE>1231231,RGB(0,255,0),RGB(255,0,0),0,0,0);

高阳:IF(CURRBARSCOUNT<=CONST(REF(BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1)),1)+1)+1,CONST(REF(REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1))),REF(BARSLAST(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1)),1)+1)),DRAWNULL),COLORRED,LINETHICK2;

高阴:IF(CURRBARSCOUNT<=CONST(REF(BARSLAST(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1)),1)+1)+1,CONST(REF(REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3))),REF(BARSLAST(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1)),1)+1)),DRAWNULL),COLORFF8000 ,LINETHICK2;

三、跨年龙妖钱袋子选股公式：

FILTER(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) 
AND C=H 
AND IF(RANGE(BARSCOUNT(V),20,250), 
COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) 
AND C=H,8)=1,COUNT(((C/REF(C,1))-1)*100>IF(CODELIKE('68') OR CODELIKE('30'),19.71,9.71) 
AND C=H,20)=1 AND (CROSS(MA(C,20),MA(C,250)) 
AND C/MA(C,250)<1.15 OR CROSS(C,MA(C,250))))=1,5);

风险提示：本指标公式仅作为知识分享，模拟测试不构成任何投资建议，不作投资依据。

END

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

    来自： vfswjjx9wz3kz7 > 《欧欧量化》

    举报/认领

    0条评论

    发表

    请遵守用户 评论公约

    类似文章 更多