缠论顶底指标是基于缠论分型理论设计的主图指标,核心围绕股价顶底分型结构识别展开,结合重心线、牛熊线等价格中枢及趋势指标,辅以视觉化的彩色K线展示,帮助投资者快速识别股价短期高低点,为买入和卖出决策提供直观参考。
HG0:=CLOSE;
重心线:(H+L+O+HG0*3)/6;
HG1:=(3*HG0+LOW+OPEN+HIGH)/6;
牛线:(20*HG1+19*REF(HG1,1)+18*REF(HG1,2)+17*REF(HG1,3)+16*REF(HG1,4)+15*REF(HG1,5)+14*REF(HG1,6)+13*REF(HG1,7)+12*REF(HG1,8)+11*REF(HG1,9)+10*REF(HG1,10)+9*REF(HG1,11)+8*REF(HG1,12)+7*REF(HG1,13)+6*REF(HG1,14)+5*REF(HG1,15)+4*REF(HG1,16)+3*REF(HG1,17) +2*REF(HG1,18)+REF(HG1,20))/210;
牛熊线:MA(牛线,6),COLOR00FF00,LINETHICK2;
HG2:=BBI+3*STD(BBI,13);
HG3:=BBI-3*STD(BBI,13);
HG4:=IF(HIGH=HHV(HIGH,3),1,0);
HG5:=IF(LOW=LLV(LOW,3),1,0);
HG6:=IF(REF(HG4,2)=1 AND REF(HG4,1)=0 AND HG4=0,REF(HIGH,2),REF(HIGH,2+BARSLAST(REF(HG4,2)=1 AND REF(HG4,1)=0 AND HG4=0)));
HG7:=IF(REF(HG5,2)=1 AND REF(HG5,1)=0 AND HG5=0,REF(LOW,2),REF(LOW,2+BARSLAST(REF(HG5,2)=1 AND REF(HG5,1)=0 AND HG5=0)));
HG8:=H>HG6 AND H>REF(H,1);
HG9:=L< HG7 AND L< REF(L,1);
HG10:=BARSLAST(HG8);
HG11:=BARSLAST(HG9);
HG12:=IF(HG10=0,HG11,HG10)>3;
HG13:=HG8 AND HG12 AND H>=HHV(H,BARSLAST(HG9));
HG14:=HG9 AND HG12 AND L<=LLV(L,BARSLAST(HG8));
HG15:=HIGH< REF(HIGH,1) AND LOW< REF(LOW,1);
HG16:=HIGH< REF(HIGH,1) AND LOW>REF(LOW,1);
HG17:=HIGH>REF(HIGH,1) AND LOW< REF(LOW,1);
HG18:=HIGH>REF(HIGH,1) AND LOW>REF(LOW,1);
HG19:=REF(HIGH,2)< HIGH AND REF(LOW,2)< LOW AND REF(HIGH,2)>REF(HIGH,1) AND REF(LOW,2)< REF(LOW,1);
HG20:=COUNT(HG15,6)>=3 AND COUNT(HG16 OR HG17,5)=0 AND LLVBARS(LOW,6)=1 AND HHVBARS(HIGH,6)>=5 AND HG18;
HG21:=COUNT(HG15,7)>=3 AND COUNT(HG16 OR HG17,6)=1 AND LLVBARS(LOW,7)=2 AND HHVBARS(HIGH,7)>=6 AND HG19;
HG22:=COUNT(HG15,7)>=3 AND COUNT(HG16 OR HG17,6)=1 AND LLVBARS(LOW,7)=1 AND HHVBARS(HIGH,7)>=6 AND HG18;
HG23:=COUNT(HG15,8)>=3 AND COUNT(HG16 OR HG17,7)<=2 AND LLVBARS(LOW,8)=2 AND HHVBARS(HIGH,8)>=7 AND HG19;
HG24:=COUNT(HG15,8)>=3 AND COUNT(HG16 OR HG17,7)<=2 AND LLVBARS(LOW,8)=1 AND HHVBARS(HIGH,8)>=7 AND HG18;
HG25:=COUNT(HG15,9)>=3 AND COUNT(HG16 OR HG17,8)<=3 AND LLVBARS(LOW,9)=2 AND HHVBARS(HIGH,9)>=8 AND HG19;
HG26:=COUNT(HG15,9)>=3 AND COUNT(HG16 OR HG17,8)<=3 AND LLVBARS(LOW,9)=1 AND HHVBARS(HIGH,9)>=8 AND HG18;
HG27:=COUNT(HG15,10)>=3 AND COUNT(HG16 OR HG17,9)<=4 AND LLVBARS(LOW,10)=2 AND HHVBARS(HIGH,10)>=9 AND HG19;
HG28:=COUNT(HG15,10)>=3 AND COUNT(HG16 OR HG17,9)<=4 AND LLVBARS(LOW,10)=1 AND HHVBARS(HIGH,10)>=9 AND HG18;
HG29:=COUNT(HG15,11)>=3 AND COUNT(HG16 OR HG17,10)<=5 AND LLVBARS(LOW,11)=2 AND HHVBARS(HIGH,11)>=10 AND HG19;
HG30:=HG20 OR HG21 OR HG22 OR HG23 OR HG24 OR HG25 OR HG26 OR HG27 OR HG28 OR HG29;
HG31:=HIGH>REF(HIGH,1) AND LOW>REF(LOW,1);
HG32:=HIGH< REF(HIGH,1) AND LOW>REF(LOW,1);
HG33:=HIGH>REF(HIGH,1) AND LOW< REF(LOW,1);
HG34:=HIGH< REF(HIGH,1) AND LOW< REF(LOW,1);
HG35:=REF(HIGH,2)>HIGH AND REF(LOW,2)>LOW AND REF(HIGH,2)>REF(HIGH,1) AND REF(LOW,2)< REF(LOW,1);
HG36:=COUNT(HG31,6)>=3 AND COUNT(HG32 OR HG33,5)=0 AND HHVBARS(HIGH,6)=1 AND LLVBARS(LOW,6)>=5 AND HG34;
HG37:=COUNT(HG31,7)>=3 AND COUNT(HG32 OR HG33,6)=1 AND HHVBARS(HIGH,7)=2 AND LLVBARS(LOW,7)>=6 AND HG35;
HG38:=COUNT(HG31,7)>=3 AND COUNT(HG32 OR HG33,6)=1 AND HHVBARS(HIGH,7)=1 AND LLVBARS(LOW,7)>=6 AND HG34;
HG39:=COUNT(HG31,8)>=3 AND COUNT(HG32 OR HG33,7)<=2 AND HHVBARS(HIGH,8)=2 AND LLVBARS(LOW,8)>=7 AND HG35;
HG40:=COUNT(HG31,8)>=3 AND COUNT(HG32 OR HG33,7)<=2 AND HHVBARS(HIGH,8)=1 AND LLVBARS(LOW,8)>=7 AND HG34;
HG41:=COUNT(HG31,9)>=3 AND COUNT(HG32 OR HG33,8)<=3 AND HHVBARS(HIGH,9)=2 AND LLVBARS(LOW,9)>=8 AND HG35;
HG42:=COUNT(HG31,9)>=3 AND COUNT(HG32 OR HG33,8)<=3 AND HHVBARS(HIGH,9)=1 AND LLVBARS(LOW,9)>=8 AND HG34;
HG43:=COUNT(HG31,10)>=3 AND COUNT(HG32 OR HG33,9)<=4 AND HHVBARS(HIGH,10)=2 AND LLVBARS(LOW,10)>=9 AND HG35;
HG44:=COUNT(HG31,10)>=3 AND COUNT(HG32 OR HG33,9)<=4 AND HHVBARS(HIGH,10)=1 AND LLVBARS(LOW,10)>=9 AND HG34;
HG45:=COUNT(HG31,11)>=3 AND COUNT(HG32 OR HG33,10)<=5 AND HHVBARS(HIGH,11)=2 AND LLVBARS(LOW,11)>=10 AND HG35;
HG46:=HG36 OR HG37 OR HG38 OR HG39 OR HG40 OR HG41 OR HG42 OR HG43 OR HG44 OR HG45;
底分型:FILTER(HG30=1,5) AND 重心线< 10.5 AND 牛线< 12 AND 牛熊线< 10.2,COLOR00FFFF,NODRAW;
顶分型:FILTER(HG46=1,3),NODRAW;
DRAWBAND(BBI,RGB(97,95,00),HG2,RGB(97,95,00));
DRAWBAND(BBI,RGB(25,75,150),HG3,RGB(25,75,250));
STICKLINE(HG0>REF(HG0,1),HIGH,LOW,0,1),COLORRED;
STICKLINE(HG0>REF(HG0,1),OPEN,HG0,3,0),COLOR000055;
STICKLINE(HG0>REF(HG0,1),OPEN,HG0,2.7,0),COLOR000077;
STICKLINE(HG0>REF(HG0,1),OPEN,HG0,2.1,0),COLOR000099;
STICKLINE(HG0>REF(HG0,1),OPEN,HG0,1.5,0),COLOR0000BB;
STICKLINE(HG0>REF(HG0,1),OPEN,HG0,0.9,0),COLOR0000DD;
STICKLINE(HG0>REF(HG0,1),OPEN,HG0,0.3,0),COLOR0000FF;
STICKLINE(HG0=REF(HG0,1),HIGH,LOW,0,1),COLORWHITE;
STICKLINE(HG0=REF(HG0,1),OPEN,HG0,3,0),COLOR555555;
STICKLINE(HG0=REF(HG0,1),OPEN,HG0,2.7,0),COLOR777777;
STICKLINE(HG0=REF(HG0,1),OPEN,HG0,2.1,0),COLOR999999;
STICKLINE(HG0=REF(HG0,1),OPEN,HG0,1.5,0),COLORBBBBBB;
STICKLINE(HG0=REF(HG0,1),OPEN,HG0,0.9,0),COLORDDDDDD;
STICKLINE(HG0=REF(HG0,1),OPEN,HG0,0.3,0),COLORFFFFFF;
STICKLINE(HG0< REF(HG0,1),HIGH,LOW,0,1),COLORCYAN;
STICKLINE(HG0< REF(HG0,1),OPEN,HG0,3,0),COLOR990000;
STICKLINE(HG0< REF(HG0,1),OPEN,HG0,2.7,0),COLORCC0000;
STICKLINE(HG0< REF(HG0,1),OPEN,HG0,2.1,0),COLORFF4400;
STICKLINE(HG0< REF(HG0,1),OPEN,HG0,1.5,0),COLORFF8800;
STICKLINE(HG0< REF(HG0,1),OPEN,HG0,0.9,0),COLORFFCC00;
STICKLINE(HG0< REF(HG0,1),OPEN,HG0,0.3,0),COLORCYAN;
DRAWTEXT(FILTER(HG30=1,5) AND 重心线< 10.5 AND 牛线< 12 AND 牛熊线< 10.2,L*0.97,'底分型'),COLORYELLOW;
DRAWTEXT(FILTER(HG46=1,3),H*1.02,'顶分型');