20230908 通达信趋势画线：压力支撑主图和选股公式

欧欧 欧欧量化 2023-09-08 08:01 发表于广西

一、指标说明：主图画线区间表示上升（下降）趋势的振幅，方便观察手中个股上升 下降，了解目前股价处于趋势的什么位置。

二、主图公式如下：

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

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

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

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

N:=60;

CAT:=HHVBARS(H,N);

CAT1:=LLVBARS(L,N);

CAT2:=CONST(CAT)>CONST(CAT1);

CAT3:=CONST(CAT)<CONST(CAT1);

G:=CONST(REF(H,CAT));

D:=CONST(REF(L,CAT1));

CAT4:=D*1.0418;

CAT5:=(G-CAT4)*0.218+CAT4;

CAT6:=(G-CAT5)*0.382+CAT5;

CAT7:=G*0.9618;

CAT8:=(CAT7-D)*0.382+D;

CAT9:=(CAT7-D)*0.682+D;

DRAWLINE(CAT3 AND CURRBARSCOUNT=CONST(CAT1)+1,L,CAT3 AND CURRBARSCOUNT=CONST(CAT)+1,H,0),COLOR80FFFF,LINETHICK3;

DRAWLINE(CAT2 AND CURRBARSCOUNT=CONST(CAT)+1,H,CAT2 AND CURRBARSCOUNT=CONST(CAT1)+1,L,0),COLORGREEN,LINETHICK3;

STICKLINE(CAT3 AND CURRBARSCOUNT=CONST(CAT)+1,H,CAT4,0,-1),COLORLIGRAY;

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

DRAWLINE(CAT3 AND CURRBARSCOUNT=CONST(CAT)+1,CAT4,CAT3 AND ISLASTBAR,CAT4,0),COLORLIGRAY,DOTLINE;

DRAWLINE(CAT3 AND CURRBARSCOUNT=CONST(CAT)+1,CAT5,CAT3 AND ISLASTBAR,CAT5,0),COLORLIGRAY,DOTLINE;

DRAWLINE(CAT3 AND CURRBARSCOUNT=CONST(CAT)+1,CAT6,CAT3 AND ISLASTBAR,CAT6,0),COLORLIGRAY,DOTLINE;

STICKLINE(CAT2 AND CURRBARSCOUNT=CONST(CAT1)+1,L,CAT7,0,-1),COLORLIGREEN;

DRAWLINE(CAT2 AND CURRBARSCOUNT=CONST(CAT1)+1,CAT7,CAT2 AND ISLASTBAR,CAT7,0),COLORLIGREEN,DOTLINE;

DRAWLINE(CAT2 AND CURRBARSCOUNT=CONST(CAT1)+1,CAT8,CAT2 AND ISLASTBAR,CAT8,0),COLORLIGREEN,DOTLINE;

DRAWLINE(CAT2 AND CURRBARSCOUNT=CONST(CAT1)+1,CAT9,CAT2 AND ISLASTBAR,CAT9,0),COLORLIGREEN,DOTLINE;

A:=CAT3 AND CURRBARSCOUNT=CONST(CAT)+15;

B:=CAT3 AND CURRBARSCOUNT=CONST(CAT)+3;

A1:=CAT2 AND CURRBARSCOUNT=CONST(CAT);

B1:=CAT2 AND CURRBARSCOUNT=CONST(CAT1)+3;

DRAWTEXT(A,G*0.98,VARCAT(VARCAT('本轮区间振幅：',VAR2STR((G-D)/D*100,2)),'%,')),COLOR80FFFF;

DRAWNUMBER(B,CAT4,CAT4),COLOR80FFFF;

DRAWNUMBER(B,CAT5,CAT5),COLOR80FFFF;

DRAWNUMBER(B,CAT6,CAT6),COLOR80FFFF;

DRAWTEXT(A1,G*0.98,VARCAT(VARCAT('本轮区间振幅：',VAR2STR((G-D)/D*100,2)),'%,')),COLORGREEN;

DRAWNUMBER(B1,CAT7,CAT7),COLORGREEN;

DRAWNUMBER(B1,CAT8,CAT8),COLORGREEN;

DRAWNUMBER(B1,CAT9,CAT9),COLORGREEN;

三、选股公式如下：

---

N:=60;

HH:=HHVBARS(H,N);

LL:=LLVBARS(L,N);

XX:=CONST(HH)>CONST(LL);

SX:=CONST(HH)<CONST(LL);

G:=CONST(REF(H,HH));

D:=CONST(REF(L,LL));

D1:=D*1.0418;

D2:=(G-D1)*0.218+D1;

D3:=(G-D2)*0.382+D2;

G1:=G*0.9618;

G2:=(G1-D)*0.382+D;

G3:=(G1-D)*0.682+D;

SX AND CROSS(C,G3);

---

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

END