通达信“缠论波浪”主图指标选股公式--转折买点

admin

一、指标说明：
这个指标是波段操作的 “精准导航仪”，自动识别高低点画趋势线、算斐波那契回调位，
一是趋势线自动生成，红色实线是压力线（连接关键高点），绿色实线是支撑线（连接关键低点）。二是斐波那契回调位精准标注，基于 34 天高低点算出 0.191、0.382、0.5、0.618、0.809 五个关键比例位，每个位置都标了具体价格和比例，其中红色虚线的 0.5 是核心中位，黄色实线的 “高”“底” 是 34 天区间极值，股价回踩这些位置就是潜在机会或风险点。趋势线和回调位共振验证，比如股价碰到 0.618 回调位同时碰到绿色支撑线，支撑力度更强；碰到 0.382 位同时碰到红色压力线，压力更足。
二、主图公式如下：
CTA1:=8;
CTA2:=REF(H,CTA1)=HHV(H,2*CTA1+1);
CTA3:=FILTER(CTA2,CTA1);
CTA4:=BACKSET(CTA3,CTA1+1);
CTA5:=FILTER(CTA4,CTA1);
CTA6:=REF(L,CTA1)=LLV(L,2*CTA1+1);
CTA7:=FILTER(CTA6,CTA1);
CTA8:=BACKSET(CTA7,CTA1+1);
CTA9:=FILTER(CTA8,CTA1);
CTA10:=(REF(LLV(L,2*CTA1),1)+REF(HHV(H,2*CTA1),1))/2;
CTA11:=(H+L)/2;
CTA12:=(CTA5 AND NOT(CTA9 AND CTA10>=CTA11)) OR ISLASTBAR OR BARSCOUNT(C)=1;
CTA13:=(CTA9 AND NOT(CTA5 AND CTA10< CTA11));
CTA14:=CTA5 AND NOT(CTA9 AND CTA10>=CTA11);
CTA15:=REF(BARSLAST(CTA12),1)+1;
CTA16:=BACKSET(CTA12 AND COUNT(CTA13,CTA15)>0,LLVBARS(IF(CTA13,L,10000),CTA15));
CTA17:=CTA16>REF(CTA16,1);
CTA18:=BACKSET(CTA17,2);
CTA19:=CTA18>REF(CTA18,1);
CTA20:=CTA19 OR ISLASTBAR OR BARSCOUNT(C)=1;
CTA21:=REF(BARSLAST(CTA20),1)+1;
CTA22:=BACKSET(CTA20 AND COUNT(CTA14,CTA21)>0,HHVBARS(IF(CTA14,H,0),CTA21));
CTA23:=CTA22>REF(CTA22,1);
CTA24:=BACKSET(CTA23,2);
CTA25:=CTA24>REF(CTA24,1);
CTA26:=BACKSET(ISLASTBAR,BARSLAST(CTA25)+1);
CTA27:=CTA26>REF(CTA26,1);
CTA28:=BACKSET(ISLASTBAR,BARSLAST(CTA19)+1);
CTA29:=CTA28>REF(CTA28,1);
CTA30:=BACKSET(CTA27,REF(BARSLAST(CTA25),1)+2);
CTA31:=CTA30>REF(CTA30,1);
CTA32:=BACKSET(CTA29,REF(BARSLAST(CTA19),1)+2);
CTA33:=CTA32>REF(CTA32,1);
CTA34:DRAWLINE(CTA31,H,CTA27,H,1),LINETHICK2,COLORRED;
CTA35:DRAWLINE(CTA33,L,CTA29,L,1),LINETHICK2,COLORGREEN;
DRAWICON(CTA31,H,2);
DRAWICON(CTA27,H,2);
DRAWICON(CTA33,L,1);
DRAWICON(CTA29,L,1);
DRAWLINE(CTA25,H,CTA19,L,0),COLORGREEN;
DRAWLINE(CTA19,L,CTA25,H,0),COLORRED;
CTA36:=34;
CTA37:=3;
CTA38:=REF(HHV(H,CTA36),CTA37);
CTA39:=REF(LLV(L,CTA36),CTA37);
CTA40:=CTA38-(CTA38-CTA39)*0.191;
CTA41:=CTA38-(CTA38-CTA39)*0.382;
CTA42:=CTA38-(CTA38-CTA39)*0.500;
CTA43:=CTA38-(CTA38-CTA39)*0.618;
CTA44:=CTA38-(CTA38-CTA39)*0.809;
CTA45:REFDATE(CTA38,DATE),COLORYELLOW;
CTA46:REFDATE(CTA40,DATE),COLORGRAY,DOTLINE;
CTA47:REFDATE(CTA41,DATE),COLORGRAY,DOTLINE;
CTA48:REFDATE(CTA42,DATE),COLORRED,DOTLINE;
CTA49:REFDATE(CTA43,DATE),COLORGRAY,DOTLINE;
CTA50:REFDATE(CTA44,DATE),COLORGRAY,DOTLINE;
CTA51:REFDATE(CTA39,DATE),COLORYELLOW;
CTA52:=(CURRBARSCOUNT=34);
DRAWTEXT(CTA52 AND CTA45,CTA45,'---高---'),COLORYELLOW;
DRAWTEXT(CTA52 AND CTA46,CTA46,'-0.809-'),COLORCYAN;
DRAWTEXT(CTA52 AND CTA47,CTA47,'-0.618-'),COLORGREEN;
DRAWTEXT(CTA52 AND CTA48,CTA48,'-0.500-'),COLORYELLOW;
DRAWTEXT(CTA52 AND CTA49,CTA49,'-0.382-'),COLORGREEN;
DRAWTEXT(CTA52 AND CTA50,CTA50,'-0.191-'),COLORCYAN;
DRAWTEXT(CTA52 AND CTA51,CTA51,'---底---'),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=1,CTA45,CON2STR(CTA45,2)),COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=1,CTA46,CON2STR(CTA46,2)),COLORCYAN;
DRAWTEXT(CURRBARSCOUNT=1,CTA47,CON2STR(CTA47,2)),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,CTA48,CON2STR(CTA48,2)),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=1,CTA49,CON2STR(CTA49,2)),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,CTA50,CON2STR(CTA50,2)),COLORCYAN;
DRAWTEXT(CURRBARSCOUNT=1,CTA51,CON2STR(CTA51,2)),COLORMAGENTA;