神奇指标网

缠论底分型选股指标公式(缠论股票选股指标)

浏览 752次浏览
标签: 缠论
来源:神奇指标网 编辑:神奇指标网 发布日期:2023-06-15

通达信指标公式源码概况:


指标类别: 通达信指标公式


授权方式: 免费版


指标评级: ★★★★★


指标分类: 策略


画线方法: 副图



一、缠论底分型选股指标公式

  

重心线:(H+L+O+C*3)/6;NX:=(3*CLOSE+LOW+OPEN+HIGH)/6;  

牛线:(20*NX+19*REF(NX,1)+18*REF(NX,2)+17*REF(NX,3)+16*REF  

(NX,4)  

+15*REF(NX,5)+14*REF(NX,6)+13*REF(NX,7)+12*REF(NX,8)+11*REF(NX,9)  

+10*REF(NX,10)+9*REF(NX,11)+8*REF(NX,12)+7*REF(NX,  

13)+6*REF(NX,14)  

+5*REF(NX,15)+4*REF(NX,16)+3*REF(NX,17)+2*REF(NX,  

18)+REF(NX,20))/210;牛熊线:MA(牛线,6),COLORGREEN,LINETHICK2;  

顶:=BB1+3*STD(BB1,13),COLORO04AFF;底:=BB1-3*STD(BB1,13),  

COLOR67FF00;KU1:=IF(HIGH=HHV(HIGH,3),1,0);KD1:=IF(LOW=LLV  

(LOW,3),1,0);UL:=IF(REF(KU1,2)=1ANDREF(KU1,1)=0  

ANDKU1=0,REF(HIGH,2),REF(HIGH,2+BARSLAST(REF(KU1,2)=1  

ANDREF(KU1,1)=0ANDKU1=0)));DL:=IF(REF(KD1,2)=1  

ANDREF(KD1,1)=0  

ANDKD1=0,REF(LOW,2),REF(LOW,2+BARSLAST(REF(KD1,2)=1  

ANDREF(KD1,1)=0ANDKD1=0)));HV:=H>ULANDH>REF(H,1);LV:=L<DLANDL<REF(L,1);GP:=BARSLAST(HV);DP:=BARSLAST  

(LV);IP:=IF(GP=0,DP,GP)>3;HHV1:=HVANDIPANDH>=HHV  

(H,BARSLAST(LV));LV1:=LVANDIPANDL<=LLV(L,BARSLAST(HV));  

V00:=HIGH<REF(HIGH,1)ANDLOW<REF(LOW,1);V01:=HIGH<REF  

(HIGH,1)ANDLOW>REF(LOW,1);  

V03:=HIGH>REF(HIGH,1)AND  

LOW>REF(LOW,1);V04:=REF(HIGH,2)<HIGHANDREF(LOW,2)<LOWAND  

REF(HIGH,2)>REF(HIGH,1)ANDREF(LOW,2)<REF(LOW,1);  

V1:=COUNT(V00,6)>=3ANDCOUNT(VO1ORVO2,5)=0AND  

LLVBARS(LOW,6)=  

1ANDHHVBARS(HIGH,6)>=5ANDV03;V2:=COUNT(V00,7)>=3AND  

COUNT(VO1ORVO2,6)=1ANDLLVBARS(LOW,7)=  

2ANDHHVBARS(HIGH,7)>=6ANDVO4;V3:=COUNT(V00,7)>=3AND  

COUNT(VO1ORVO2,6)=1ANDLLVBARS(LOW,7)=  

1ANDHHVBARS(HIGH,7)>=6ANDVO3;V4:=COUNT(V00,8)>=3AND  

COUNT(VO1ORVO2,7)<=2ANDLLVBARS(LOW,8)  

=2ANDHHVBARS(HIGH,8)>=7ANDVO4;V5:=COUNT(V00,8)>=3  

ANDCOUNT(V01ORVO2,7)<=2ANDLLVBARS(LOW,8)  

=1ANDHHVBARS(HIGH,8)>=7ANDVO3;V6:=COUNT(V00,9)>=3  

ANDCOUNT(V01ORV02,8)<=3ANDLLVBARS(LOW,9)  

=2ANDHHVBARS(HIGH,9)>=8ANDVO4;V7:=COUNT(V00,9)>=3  

ANDCOUNT(VO1ORVO2,8)<=3ANDLLVBARS(LOW,9)  

=1ANDHHVBARS(HIGH,9)>=8ANDVO3;V8:=COUNT(V00,10)>=3  

ANDCOUNT(VO1ORVO2,9)<=4ANDLLVBARS(LOW,10)=2AND  

HHVBARS(HIGH,10)>=9ANDVO4;V9:=COUNT(V00,10)>=3AND  

COUNT(VO1ORVO2,9)<=4ANDLLVBARS(LOW,10)=1AND  

HHVBARS(HIGH,10)>=9ANDVO3;V10:=COUNT(V00,11)>=3AND  

COUNT(VO1ORVO2,10)<=5ANDLLVBARS(LOW,11)=2AND  

HHVBARS(HIGH,11)>=10ANDVO4;XG:=V1ORV2ORV3ORV4ORV5OR  

V6ORV7ORV8ORV9ORV10;HV00:=HIGH>REF(HIGH,1)AND  

LOW>REF(LOW,1);HV01:=HIGH<REF(HIGH,1)AND  

LOW>REF(LOW,1);HVO2:=HIGH>REF(HIGH,1)ANDLOW<REF(LOW,1);  

HVO3:=HIGH<REF(HIGH,1)ANDLOW<REF(LOW,1);  

HVO4:=REF(HIGH,2)>HIGHANDREF(LOW,2)>LOWAND  

REF(HIGH,2)>REF(HIGH,1)ANDREF(LOW,2)<REF(LOW,1);  

HV1:=COUNT(HV00,6)>=3ANDCOUNT(HVO1ORHVO2,5)=0AND  

HHVBARS(HIGH,6)=1ANDLLVBARS(LOW,6)>=5ANDHV03;  

HV2:=COUNT(HV00,7)>=3ANDCOUNT(HVO1ORHVO2,6)=1AND  

HHVBARS(HIGH,7)=2ANDLLVBARS(LOW,7)>=6ANDHV04;  

HV3:=COUNT(HV00,7)>=3ANDCOUNT(HVO1ORHVO2,6)=1AND  

HHVBARS(HIGH,7)=1ANDLLVBARS(LOW,7)>=6ANDHVO3;  

HV4:=COUNT(HV00,8)>=3ANDCOUNT(HVO1ORHVO2,7)<=2AND  

HHVBARS(HIGH,8)=2ANDLLVBARS(LOW,8)>=7ANDHVO4;  

HV5:=COUNT(HV00,8)>=3ANDCOUNT(HVO1ORHVO2,7)<=2AND  

HHVBARS(HIGH,8)=1ANDLLVBARS(LOW,8)>=7ANDHV03;  

HV6:=COUNT(HV00,9)>=3ANDCOUNT(HVO1ORHVO2,8)<=3AND  

HHVBARS(HIGH,9)=2ANDLLVBARS(LOW,9)>=8ANDHV04;  

HV7:=COUNT(HV00,9)>=3ANDCOUNT(HVO1ORHVO2,8)<=3AND  

HHVBARS(HIGH,9)=1ANDLLVBARS(LOW,9)>=8ANDHVO3;  

HV8:=COUNT(HV00,10)>=3ANDCOUNT(HV01ORHV02,9)<=4AND  

HHVBARS  

(HIGH,10)=2ANDLLVBARS(LOW,10)>=9ANDHV04;  

HV9:=COUNT(HV00,10)>=3ANDCOUNT(HVO1ORHVO2,9)<=4AND  

HHVBARS  

(HIGH,10)=1ANDLLVBARS(LOW,10)>=9ANDHV03;  

HV10:=COUNT(HV00,11)>=3ANDCOUNT(HVO1ORHVO2,10)<=5AND  

HHVBARS(HIGH,11)=2ANDLLVBARS(LOW,11)>=10ANDHVO4;  

HXG:=HV1ORHV2ORHV3ORHV4ORHV5ORHV6ORHV7ORHV8OR  

HV9  

ORHV10;  

底分型:FILTER(XG=1,5)AND重心线<10.5AND牛线<12AND牛熊线  

<10.2,COLORYELLOW,NODRAW;顶分型:FILTER(HXG=1,3),NODRAW;  

DRAWBAND(BBI,RGB(97,95,00),顶,RGB(97,95,00));DRAWBAND  

(BBI,RGB(25,75,150),底,RGB(25,75,250));DRAWTEXT_FIX  

(1,0.02,0,0,  

DRAWLINE(LV1,LOW,HHV1,HIGH,0),COLORYELLOW,LINETHICK2;  

DRAWLINE(HHV1,HIGH,LV1,LOW,O),COLORMAGENTA,LINETHICK2;  

STICKLINE(CLOSE>REF(CLOSE,1),HIGH,LOW,0,1),COLORRED;  

STICKLINE(CLOSE>REF(CLOSE,1),OPEN,CLOSE,3,0),COLOR000055;  

STICKLINE(CLOSE>REF(CLOSE,1),OPEN,CLOSE,2.7,0),COLOR000077;  

STICKLINE(CLOSE>REF(CLOSE,1),OPEN,CLOSE,2.1,0),COLOR000099;  

STICKLINE(CLOSE>REF(CLOSE,1),OPEN,CLOSE,1.5,0),COLOR0000BB;  

STICKLINE(CLOSE>REF(CLOSE,1),OPEN,CLOSE,0.9,0),COLOR0000DD;  

STICKLINE(CLOSE>REF(CLOSE,1),OPEN,CLOSE,0.3,0),COLORO000FF;  

MA5:=MA(c,5),LINETHICK1;  

V00:=h<REF(h,1)ANDl<REF(l,1);  

V01:=h<REF(h,1)ANDl>REF(l,1);  

V02:=h>REF(h,1)ANDl<REF(l,1);  

V03:=h>REF(h,1)ANDl>REF(l,1);  

V04:=REF(h,2)<hANDREF(l,2)<l  

ANDREF(h,2)>REF(h,1)ANDREF(l,2)<REF(l,1);  

V1:=COUNT(V00,6)>=3ANDCOUNT(V01ORV02,5)=0ANDLLVBARS(l,6)=1AND  

HHVBARS(h,6)>=5ANDV03;  

V2:=COUNT(V00,7)>=3ANDCOUNT(V01ORV02,6)=1ANDLLVBARS(l,7)=2AND  

HHVBARS(h,7)>=6ANDV04;  

V3:=COUNT(V00,7)>=3ANDCOUNT(V01ORV02,6)=1ANDLLVBARS(l,7)=1AND  

HHVBARS(h,7)>=6ANDV03;  

V4:=COUNT(V00,8)>=3ANDCOUNT(V01ORV02,7)<=2ANDLLVBARS(l,8)=2AND  

HHVBARS(h,8)>=7ANDV04;  

V5:=COUNT(V00,8)>=3ANDCOUNT(V01ORV02,7)<=2ANDLLVBARS(l,8)=1AND  

HHVBARS(h,8)>=7ANDV03;  

V6:=COUNT(V00,9)>=3ANDCOUNT(V01ORV02,8)<=3ANDLLVBARS(l,9)=2AND  

HHVBARS(h,9)>=8ANDV04;  

V7:=COUNT(V00,9)>=3ANDCOUNT(V01ORV02,8)<=3ANDLLVBARS(l,9)=1AND  

HHVBARS(h,9)>=8ANDV03;  

V8:=COUNT(V00,10)>=3ANDCOUNT(V01ORV02,9)<=4ANDLLVBARS(l,10)=2AND  

HHVBARS(h,10)>=9ANDV04;  

V9:=COUNT(V00,10)>=3ANDCOUNT(V01ORV02,9)<=4ANDLLVBARS(l,10)=1AND  

HHVBARS(h,10)>=9ANDV03;  

V10:=COUNT(V00,11)>=3ANDCOUNT(V01ORV02,10)<=5ANDLLVBARS(l,11)=2  

ANDHHVBARS(h,11)>=10ANDV04;  

DFX:V1ORV2ORV3ORV4ORV5ORV6ORV7ORV8ORV9ORV10ANDc>MA5;  

XG:DFXANDc>MA5;


image.png




二、缠论股票选股指标

  

{N1:1,100,10;N2:1,100,10;DISP:=1,3,2};  

N1:=10;N2:=10;DISP:=2;  

K:=IF(PERIOD=5,1,{日}  

IF(PERIOD=6,1,{周}  

IF(PERIOD=7,1,{月}  

IF(PERIOD=8,1,{多分钟}  

IF(PERIOD=9,1,{多日}  

IF(PERIOD=10,1,{季}  

IF(PERIOD=11,2,{年}  

IF(PERIOD=4,1,{60F}  

IF(PERIOD=3,1,{30F}  

IF(PERIOD=2,1,{15F}  

IF(PERIOD=1,1{5F},1{1F})))))))))))/10;  

P1:=PEAK(1,K*N1,1);  

P2:=PEAK(1,K*N1,2);  

WP1:=PEAKBARS(1,K*N1,1);  

WP2:=PEAKBARS(1,K*N1,2);  

T1:=TROUGH(2,K*N2,1);  

T2:=TROUGH(2,K*N2,2);  

WT1:=TROUGHBARS(2,K*N2,1);  

WT2:=TROUGHBARS(2,K*N2,2);  

TJ1:=P1>T1ANDP2>T2;  

ZD:=MAX(T1,T2);  

ZG:=MIN(P1,P2);  

LL:=MIN(T1,T2);  

HH:=MAX(P1,P2);  

TJ2:=FILTER(ZG>ZD,2);  

TJ3:=ZG=REF(ZG,BARSLAST(TJ2))ORZD=REF(ZD,BARSLAST(TJ2));  

TJ4:=TJ1&&TJ2&&NOT(TJ3);  

TJ5:=BETWEEN(ZD,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));  

TJ6:=BETWEEN(ZG,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));  

TJ7:=ZG>REF(ZG,REF(BARSLAST(TJ4),1))&&ZD<REF(ZD,REF(BARSLAST(TJ4),1));  

TJ8:=TJ4&&NOT(TJ5ORTJ6ORTJ7);  

ZSD:=IF(TJ8,ZD,DRAWNULL);  

ZSG:=IF(TJ8,ZG,DRAWNULL);  

ZSH:=IF(TJ8,HH,DRAWNULL);  

ZSL:=IF(TJ8,LL,DRAWNULL);  

STICKLINE(TJ8,ZSH,ZSL,0,-1),COLORMAGENTA;  

STICKLINE(TJ8,ZSD,ZSG,IF(DISP=1,3,0),1),COLORMAGENTA;  

DRAWTEXT(DISP=2,ZSH,'中枢'),COLORWHITE;  

中枢高:PLOYLINE(DISP=2,REF(ZSD,BARSLAST(TJ8))),CIRCLEDOT,COLORLIRED;  

中枢低:PLOYLINE(DISP=2,REF(ZSG,BARSLAST(TJ8))),CIRCLEDOT,COLORLIGREEN;  

{中枢最高:PLOYLINE(DISP=2,REF(ZSH,BARSLAST(TJ8))),POINTDOT,COLORRED;  

中枢最低:PLOYLINE(DISP=2,REF(ZSL,BARSLAST(TJ8))),POINTDOT,COLORGREEN;}  

趋势高:PLOYLINE(DISP=3,ZIG(1,K*N1)),COLORLIBLUE;  

趋势低:PLOYLINE(DISP=3,ZIG(2,K*N2)),COLORLIBLUE;  

局部低点预选A:=BACKSET(LLV(L,5)<REF(LLV(L,4),1),4);  

局部低点预选B:=BACKSET(局部低点预选A=0ANDREF(局部低点预选A,1)=1,2);  

局部低点预选C:=IF(局部低点预选B=1ANDREF(局部低点预选B,1)=0,-1,0);  

局部高点预选A:=BACKSET(HHV(H,5)>REF(HHV(H,4),1),4);  

局部高点预选B:=BACKSET(局部高点预选A=0ANDREF(局部高点预选A,1)=1,2);  

局部高点预选C:=IF(局部高点预选B=1ANDREF(局部高点预选B,1)=0,1,0);  

缺口判断:=IF(L>REF(H,1),1,IF(H<REF(L,1),-1,0));  

距前高天:=BARSLAST(局部高点预选C=1);  

距前低天:=BARSLAST(局部低点预选C=-1);  

小值周期:=LOWRANGE(L);  

大值周期:=TOPRANGE(H);  

低保留AA:=IF(局部低点预选C=-1ANDREF(距前高天,1)>REF(距前低天,1)ANDLLV(L,距  

前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);  

低保留AB:=IF(局部低点预选C=-1ANDREF(距前高天,1)<=REF(距前低天,1)AND(距前高  

天>=4ORLLV(缺口判断,距前高天)=-1ORLLV(L,距前低天+2)<REF(LLV(L,距前低天  

+1),1)),-1,0);  

低保留S:=IF((低保留AA=-1OR低保留AB=-1)ANDL<REF(H,距前高天+1),-1,0);  

预判:=IF((距前低天<4ANDHHV(缺口判断,距前低天)!=1)ORREF(低保留S,距前低  

天)=0,1,0);  

判断:=IF(局部高点预选C=1ANDREF(距前低天,1)<=REF(距前高天,1)AND预判=1AND  

大值周期>REF(小值周期,距前低天+1)AND大值周期>REF(小值周期,距前低天)AND大值  

周期>REF(大值周期,距前高天),1,0);  

高保留A:=IF(局部高点预选C=1ANDREF(距前低天,1)>REF(距前高天,1)ANDHHV(H,距前  

低天+1)>REF(HHV(H,距前低天+1),1),1,0);  

高保留B:=IF(局部高点预选C=1ANDREF(距前低天,1)<=REF(距前高天,1)ANDREF(低保  

留S,距前低天)=-1AND(距前低天>=4ORHHV(缺口判断,距前低天)=1),1,0);  

高保留:=IF((高保留A=1OR高保留B=1OR判断=1)ANDH>REF(L,距前低天+1),1,0);  

预判A:=IF((距前高天<4ANDHHV(缺口判断,距前高天)!=1)ORREF(高保留,距前高  

天)=0,1,0);  

判断A:=IF(局部低点预选C=-1ANDREF(距前高天,1)<=REF(距前低天,1)AND预判A=1  

AND小值周期>REF(大值周期,距前高天+1)AND小值周期>REF(大值周期,距前高天)  

AND小值周期>REF(小值周期,距前低天),-1,0);  

低保留A:=IF(局部低点预选C=-1ANDREF(距前高天,1)>REF(距前低天,1)ANDLLV(L,距前  

高天+1)<REF(LLV(L,距前高天+1),1),-1,0);  

低保留B:=IF(局部低点预选C=-1ANDREF(距前高天,1)<=REF(距前低天,1)AND(距前高  

天>=4ORLLV(缺口判断,距前高天)=-1OR判断A=-1),-1,0);  

低保留:=IF((低保留A=-1OR低保留B=-1)ANDL<REF(H,距前高天+1),-1,0);  

距前高天A:=BARSLAST(高保留=1);  

距前低天A:=BARSLAST(低保留=-1);  

预判X:=IF((距前低天A<4ANDHHV(缺口判断,距前低天A)!=1)ORREF(低保留,距前低天  

A)=0,1,0);  

周期:=5;  

K:=CURRBARSCOUNT,NODRAW;  

LH:DRAWLINE(L=LLV(L,周期),L,H=HHV(H,周期),H,0),COLORWHITE;  

HL:DRAWLINE(H=HHV(H,周期),H,L=LLV(L,周期),L,0),COLORLIBLUE;  

LT:BARSLAST(L=HL),NODRAW;LL:REF(L,LT),NODRAW;  

LT1:REF(LT,LT+1),NODRAW;LL1:REF(L,LT+LT1+1),NODRAW;  

HT:BARSLAST(H=HL),NODRAW;HH:REF(H,HT),NODRAW;  

HT1:REF(HT,HT+1),NODRAW;HH1:REF(H,HT+HT1+1),NODRAW;  

VV:SUM(V,LT),NODRAW;VV1:REF(VV,HT),NODRAW;  

ZF:(HH/LL-1)*100,NODRAW;DF:(LL/HH-1)*100,NODRAW;  

DRAWTEXT(HT=0,H*1.02,VARCAT(VAR2STR(ZF,1),'%')),COLORYELLOW;  

DRAWTEXT(HT=0,H*1.1,VARCAT(VAR2STR(LT,0),'')),COLORWHITE;  

DRAWTEXT(LT=0,L*0.98,VARCAT(VAR2STR(DF,1),'%')),COLORLIBLUE;  

DRAWTEXT(LT=0,L*0.9,VARCAT(VAR2STR(HT,0),'')),COLORWHITE;  

TJ1:LL>LL1,NODRAW;  

TJ2:HH/LL1<1.15,NODRAW;  

TJ3:CROSS(C,HH)AND(VV>VV1ORV>REF(HHV(V,LT),HT)),NODRAW;  

TJ4:HL=DRAWNULLANDHT<=20,NODRAW;  

XG:TJ1ANDTJ2ANDTJ3ANDTJ4,NODRAW;  

XGT:BARSLAST(XG=1),NODRAW;


image.png



[源码注释]通达信公式动态翻译结果


N赋值:5

RSV赋值:(收盘价-N日内最低价的最低值)/(N日内最高价的最高值-N日内最低价的最低值)*100

VARB2赋值:(RSV/2+22)*1

量赋值:成交量(手)的13日指数移动平均

资金赋值:成交额(元)的13日指数移动平均

过滤赋值:((资金 /量) / 100)

提纯赋值:(((收盘价 -过滤) / 过滤) * 100)

黄金赋值:((提纯 < (0)) AND 直线拟合)

低买赋值:如果黄金ANDRSV<VARB2-2,返回50,否则返回0

上涨分界赋值:25

KDJ提前金叉赋值:(上涨分界上穿低买)

输出极限抄底:KDJ提前金叉






推荐阅读:缠论顶底分型指标

  

{智能版:="核心指标.VAR100#DAY";}  

智能版:="指标.核心#DAY";  

MA1:MA(CLOSE,M1),COLORWHITE;  

MA2:MA(CLOSE,M2),COLORYELLOW;  

MA3:MA(CLOSE,M3),COLORCYAN;  

MA4:MA(CLOSE,M4),COLORCYAN;  

日线:=IF(PERIOD=5,1,0);  

CA3:=REF(C,1)*日线;  

A1:=REF(HIGH,3)=HHV(HIGH,笔周期*3+1)*智能版;  

B1:=FILTER(A1,3);C1:=BACKSET(B1,3+1);  

D1:=FILTER(C1,3);{高点}  

A2:=REF(LOW,3)=LLV(LOW,笔周期*3+1)*智能版;  

B2:=FILTER(A2,3);C2:=BACKSET(B2,3+1);  

D2:=FILTER(C2,3);{低点}  

E1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2;  

E2:=(HIGH+LOW)/2;{高低点出现在同一K线上时可作取舍}  

H1:=(D1ANDNOT(D2ANDE1>=E2))ORBARSTATUS=2ORBARSCOUNT(CLOSE)=1;  

H2:=D1ANDNOT(D2ANDE1>=E2);  

L1:=D2ANDNOT(D1ANDE1=E2);  

X1:=REF(BARSLAST(H1),1)+1;  

F1:=BACKSET(H1ANDCOUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1));  

G1:=F1>REF(F1,1);  

I1:=BACKSET(G1,2);  

LD:=I1>REF(I1,1);{过滤后低点}  

L2:=LDORBARSTATUS=2ORBARSCOUNT(CLOSE)=1;  

X2:=REF(BARSLAST(L2),1)+1;  

F2:=BACKSET(L2ANDCOUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2));  

G2:=F2>REF(F2,1);  

I2:=BACKSET(G2,2);  

HD:=I2>REF(I2,1);{过滤后高点}  

DRAWLINE(LD,L,HD,H,0),COLORYELLOW,LINETHICK1;  

DRAWLINE(HD,H,LD,L,0),COLORYELLOW,LINETHICK1;  

A3:=H;  

B3:=REF(H,REF(BARSLAST(HD),1)+1)>REF(H,REF(BARSLAST(HD),1)+2+REF(BARSLAST  

(HD),REF(BARSLAST(HD),1)+2));  

D3:=A3ANDB3ANDHD;  

E3:=BACKSET(D3,REF(BARSLAST(HD),1)+2);  

HH:=E3>REF(E3,1);{找出全部长期高点}  

A4:=L>REF(L,REF(BARSLAST(LD),1)+1);  

B4:=REF(L,REF(BARSLAST(LD),1)+1);  

D4:=A4ANDB4ANDLD;  

E4:=BACKSET(D4,REF(BARSLAST(LD),1)+2);  

LL:=E4>REF(E4,1);{找出全部长期低点}  

H3:=HHORBARSTATUS=2ORBARSCOUNT(C)=1;{后面进行过滤,方法同前。只是不用  

考虑高低点出现在同一K线}  

X3:=REF(BARSLAST(H3),1)+1;  

F3:=BACKSET(H3ANDCOUNT(LL,X3)>0,LLVBARS(IF(LL,L,POW(10,20)),X3));  

G3:=F3>REF(F3,1);I3:=BACKSET(G3,2);  

LZ:=I3>REF(I3,1);{长期低点,也可供引用}  

L4:=LZORBARSTATUS=2ORBARSCOUNT(C)=1;  

X4:=REF(BARSLAST(L4),1)+1;  

F4:=BACKSET(L4ANDCOUNT(HH,X4)>0,HHVBARS(IF(HH,H,-POW(10,20)),X4));  

G4:=F4>REF(F4,1);I4:=BACKSET(G4,2);HZ:=I4>REF(I4,1);{长期高点,也可供引用}  

{DRAWLINE(HZ,H,LZ,L,0),COLORGREEN,LINETHICK1;  

K1:=BACKSET(BARSTATUS=2,MIN(BARSLAST(HZ),BARSLAST(LZ))+1);  

K2:=K1>REF(K1,1);  

{DRAWLINE(K2,IF(HZ,H,L),BARSTATUS=2,C,0),COLORGREEN,LINETHICK1;最后的长期  

连线,连在收盘价上}  

UU:=BACKSET(BARSTATUS=2,BARSLAST(LD)+1);  

VV:=UU>REF(UU,1);  

WW:=BACKSET(VV,REF(BARSLAST(LD),1)+2);  

XX:=WW>REF(WW,1);  

WWQ:=BACKSET(XX,REF(BARSLAST(LD),1)+2);  

XXQ:=WWQ>REF(WWQ,1);  

下轨:DRAWLINE(XX,L,VV,L,1)*画趋势,COLORMAGENTA,LINETHICK1;{画趋势线}  

UU2:=BACKSET(BARSTATUS=2,BARSLAST(HD)+1);  

VV2:=UU2>REF(UU2,1);  

WW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);  

XX2:=WW2>REF(WW2,1);  

WW3Q:=BACKSET(XX2,REF(BARSLAST(HD),1)+2);  

XX3Q:=WW3Q>REF(WW3Q,1);  

WW4Q:=BACKSET(XX3Q,REF(BARSLAST(HD),1)+2);  

XX4Q:=WW4Q>REF(WW4Q,1);  

上轨:DRAWLINE(XX2,H,VV2,H,1)*画趋势,COLORMAGENTA,LINETHICK1;{画趋势线}  

上轨1:=DRAWLINE(XX2,H,VV2,H,1);  

低一:REF(L,BARSLAST(VV)),DOTLINE,COLOR99FF66;  

高一:REF(H,BARSLAST(VV2)),DOTLINE,COLOR99FF66;  

低二:REF(L,BARSLAST(XX)),DOTLINE,COLORFF66FF;  

高二:REF(H,BARSLAST(XX2)),DOTLINE,COLORFF66FF;  

DRAWTEXT(CURRBARSCOUNT=1,低一,STRCAT('低一:',CON2STR(低  

一,2))),COLOR99FF66;  

DRAWTEXT(CURRBARSCOUNT=1,高一,STRCAT('高一:',CON2STR(高  

一,2))),COLOR99FF66;  

DRAWTEXT(CURRBARSCOUNT=1,低二,STRCAT('低二:',CON2STR(低  

二,2))),COLORFF66FF;  

DRAWTEXT(CURRBARSCOUNT=1,高二,STRCAT('高二:',CON2STR(高  

二,2))),COLORFF66FF;  

Q0:=BARSLAST(XX2>0);  

Q1:=BARSLAST(XX>0);  

Q2:=BARSLAST(WW2>0);  

Q3:=BARSLAST(VV>0);  

Q4:=BARSLAST(XXQ>0);  

Q5:=BARSLAST(XX3Q>0);  

Q6:=BARSLAST(XX4Q>0);  

近0.382对数值:POW(低一,0.382对数值)*POW(高一,0.618对数值)COLORCYAN;  

DRAWTEXT(CURRBARSCOUNT=1,近0.382对数值,STRCAT('近0.382位:',CON2STR(近  

0.382对数值,2))),COLORCYAN;  

近半分位:POW(低一,0.5)*POW(高一,0.5),COLOR99FF66,LINETHICK2;  

DRAWTEXT(CURRBARSCOUNT=1,近半分位,STRCAT('近半分位:',CON2STR(近半分  

位,2))),COLORGREEN;  

近0.618对数值:POW(低一,0.618对数值)*POW(高一,0.382对数值),COLORMAGENTA;  

DRAWTEXT(CURRBARSCOUNT=1,近0.618对数值,STRCAT('近0.6182位:',CON2STR(近  

0.618对数值,2))),COLORMAGENTA;  

STICKLINE(VV,高一,低一,0,1),COLOR99FF66;  

STICKLINE(VV2,高一,低一,0,0),COLOR99FF66;  

DRAWTEXT(VV=1ANDQ0>Q1,L,'C')COLORMAGENTA;  

DRAWTEXT(VV2=1ANDQ0>Q1,H,'B')COLORMAGENTA;  

DRAWTEXT(XX=1ANDQ0>Q1,L,'A')COLORMAGENTA;  

DRAWTEXT(XX2=1ANDQ5>Q4,H,'◆')COLORMAGENTA;  

DRAWTEXT(XXQ=1ANDQ5>Q4,L,'★')COLORMAGENTA;  

DRAWTEXT(VV=1ANDQ0<Q1,L,'②')COLORMAGENTA;  

DRAWTEXT(VV2=1ANDQ0<Q1,H,'③')COLORMAGENTA;  

DRAWTEXT(XX2=1ANDQ0<Q1,H,'①')COLORMAGENTA;  

DRAWTEXT(XX=1ANDQ5<Q4,L,'◎')COLORMAGENTA;  

DRAWTEXT(XX3Q=1ANDQ5<Q4,H,'☆')COLORMAGENTA;  

V00:=HIGH<REF(HIGH,1)ANDLOW<REF(LOW,1);  

V01:=HIGH<REF(HIGH,1)ANDLOW>REF(LOW,1);  

V02:=HIGH>REF(HIGH,1)ANDLOW<REF(LOW,1);  

V03:=HIGH>REF(HIGH,1)ANDLOW>REF(LOW,1);  

V04:=REF(HIGH,2)<HIGHANDREF(LOW,2)<LOWANDREF(HIGH,2)>REF(HIGH,1)  

ANDREF(LOW,2)<REF(LOW,1);  

V1:=COUNT(V00,3)>=1ANDLLVBARS(LOW,3)=1ANDV03;  

V2:=COUNT(V00,4)>=1ANDLLVBARS(LOW,4)=2ANDV04;  

V3:=COUNT(V00,4)>=1ANDCOUNT(V01ORV02,4)=1ANDLLVBARS(LOW,4)=1AND  

V03;  

V4:=COUNT(V00,5)>=1ANDCOUNT(V01ORV02,5)=2ANDLLVBARS(LOW,5)=2AND  

V04;  

XG1:=V1ORV2ORV3ORV4;  

XG2:=C>REF(HIGH,1);  

XG:=XG1ANDXG2;  

涨停:=IF(REF(C,1)*1.095-C<0.01,1,0);  

STICKLINE(涨停,OPEN,CLOSE,3,0),COLORRED;  

STICKLINE(涨停,OPEN,CLOSE,2,0),COLORYELLOW;  

KX:='CHANLUN@KXIAN';  

KXG:='CHANLUN@KXG';  

KXD:='CHANLUN@KXD';  

KXFX:='CHANLUN@KXFX';  

笔:='CHANLUN@BI';  

笔周期:='CHANLUN@BILAST',LINETHICK0,COLORFF00FF;  

BILAST:='CHANLUN@BILAST';{笔周期};  

段:='CHANLUN@DUAN';  

段周期:='CHANLUN@DUANLAST',LINETHICK0,COLORFFFFFF;  

DUANLAST:='CHANLUN@DUANLAST';{段周期};  

中枢:='CHANLUN@ZS';  

ZSZG:='CHANLUN@ZSZG';  

ZSZD:='CHANLUN@ZSZD';  

ZSGG:='CHANLUN@ZSGG';  

ZSDD:='CHANLUN@ZSDD';  

ZSZZ:='CHANLUN@ZSZZ';  

ZSKS:='CHANLUN@ZSKSLAST';  

ZSJS:='CHANLUN@ZSJSLAST';  

BIFX:=-REF(笔,BILAST);  

DUANFX:=-REF(段,DUANLAST);  

KXQJ:='CHANLUN@KXQJ';  

{画中枢BEGIN}{以背景方式画}  

STICKLINE(ZSZG>ZSZDANDDUANFX=1,ZSZG,ZSZD,10,1),COLOR8E236B;  

STICKLINE(ZSZG>ZSZDANDDUANFX=-1,ZSZG,ZSZD,10,1),COLOR007700;  

{中枢震荡监视器}  

DRAWLINE(ZSKS=1,ZSZZ,ZSJS=1,ZSZZ,0),COLORFFFFFF;  

{画笔段}  

DRAWLINE(笔=1,H,笔=-1,L,0),COLORBLUE,LINETHICK2;  

DRAWLINE(笔=-1,L,笔=1,H,0),COLORFF00FF,LINETHICK2;  

DRAWLINE(段=1,H,段=-1,L,0),COLOR007700,LINETHICK2;  

DRAWLINE(段=-1,L,段=1,H,0),COLORRED,LINETHICK2;  

{笔高低点周期力度提示}  

DRAWTEXT(笔=1,H*1.038,''+H+''),COLORFFFFFF;  

DRAWTEXT(笔=-1,L*0.96,''+L+''),COLORFFFFFF;  

VAR3:=LLV(H,240);  

VAR4:=100*(C-VAR3)/VAR3;  

VAR5:=(C-LLV(L,528))/(HHV(H,528)-LLV(L,528))*100;  

VAR6:=(C-LLV(C,530))/(HHV(C,530)-LLV(C,530))*100;  

VAR7:=0;  

VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*10  

0;  

VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*1  

00;  

VAR10:=IF(TROUGHBARS(3,16,1)=0ANDH>L+0.04,4,0);  

VAR11:=ZIG(3,6)>REF(ZIG(3,6),1)ANDREF(ZIG(3,6),1)<=REF(ZIG(3,6),2)AND  

REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);  

VAR12:=ZIG(3,6)<REF(ZIG(3,6),1)ANDREF(ZIG(3,6),1)>=REF(ZIG(3,6),2)AND  

REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);  

VAR13:=ZIG(3,22)>REF(ZIG(3,22),1)ANDREF(ZIG(3,22),1)<=REF(ZIG(3,22),2)AND  

REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);  

VAR14:=ZIG(3,22)<REF(ZIG(3,22),1)ANDREF(ZIG(3,22),1)>=REF(ZIG(3,22),2)AND  

REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);  

VAR15:=ZIG(3,51)>REF(ZIG(3,51),1)ANDREF(ZIG(3,51),1)<=REF(ZIG(3,51),2)AND  

REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);  

VAR16:=ZIG(3,51)<REF(ZIG(3,51),1)ANDREF(ZIG(3,51),1)>=REF(ZIG(3,51),2)AND  

REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);  

VAR17:=ZIG(3,72)>REF(ZIG(3,72),1)ANDREF(ZIG(3,72),1)<=REF(ZIG(3,72),2)AND  

REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);  

VAR18:=ZIG(3,72)<REF(ZIG(3,72),1)ANDREF(ZIG(3,72),1)>=REF(ZIG(3,72),2)AND  

REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);  

VAR19:=EMA(C,2)-EMA(C,150);  

买1:=VAR10;  

买2:=(VAR11+VAR13+VAR15+VAR17);  

卖1:=(VAR12+VAR14+VAR16+VAR18);  

DRAWTEXT(买1>0OR买2>0,L*0.985,'买'),COLOR00FFFF;  

DRAWTEXT(卖1>0,H*1.01,'卖'),COLOR00FFFF;  

APP:=(VOL)/((H-L)*(2)-ABS(C-O));  

ZL:=IF((H>O),(APP)*(H-L),IF((L<O),(APP)*(H-O+C-L),(VOL)/(2)));  

SF:=IF((H>O),0-(APP)*(H-C+O-L),IF((L<O),0-(APP)*(H-L),0-(VOL)/(2)));  

库存能量:=MA(ZL+SF,2);  

库存平均:=MA(ZL+SF,5);  

GET:ZIG(3,5),COLORYELLOW,LINETHICK3;  

PL5:=ZIG(3,5);  

EN1:=PL5>REF(PL5,1)ANDREF(PL5,1)<=REF(PL5,2)ANDREF(PL5,2)<=REF(PL5,3);  

EX1:=PL5<REF(PL5,1)ANDREF(PL5,1)>=REF(PL5,2)ANDREF(PL5,2)>=REF(PL5,3);  

PL10:=ZIG(3,10);  

EN2:=PL10>REF(PL10,1)ANDREF(PL10,1)<=REF(PL10,2)ANDREF(PL10,2)<=REF(PL10,3);  

EX2:=PL10<REF(PL10,1)ANDREF(PL10,1)>=REF(PL10,2)ANDREF(PL10,2)>=REF(PL10,3);  

PL20:=ZIG(3,20);  

EN3:=PL20>REF(PL20,1)ANDREF(PL20,1)<=REF(PL20,2)ANDREF(PL20,2)<=REF(PL20,3);  

EX3:=PL20<REF(PL20,1)ANDREF(PL20,1)>=REF(PL20,2)ANDREF(PL20,2)>=REF(PL20,3);  

走强1:=BARSLAST(PL5<REF(PL5,1));  

走弱1:=BARSLAST(PL5>REF(PL5,1));  

走强2:=BARSLAST(PL10<REF(PL10,1));  

走弱2:=BARSLAST(PL10>REF(PL10,1));  

走强3:=BARSLAST(PL20<REF(PL20,1));  

走弱3:=BARSLAST(PL20>REF(PL20,1));  

ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强2),0);  

ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强2),0);  

DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱2),0);  

DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱2),0);  

ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走强3),0);  

ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强3),0);  

DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0);  

DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱3),0);  

DRAWTEXT(EN2ANDDTJZ10=1,L*0.93,'[类二买]'),COLORFFFFFF;  

DRAWTEXT(EN3ANDZTJZ10=1,L*0.95,'[一买]'),COLORFF00FF;  

DRAWTEXT(EX2ANDPL20>REF(PL20,1)ANDZTJD10=1,H*1.05,'[二  

卖]'),LINETHICK2,COLORFFFF00;  

DRAWTEXT(EN2ANDPL20>REF(PL20,1)ANDZTJZ10=2,L*0.95,'[二  

买]'),LINETHICK2,COLORFFFF00;  

DRAWTEXT(EX2ANDPL20>REF(PL20,1)ANDZTJD10=2OR(ZTJD10=0ORZTJD10=2)AND  

EX2,H*1.04,'[一卖]'),LINETHICK3,COLOR00FF00;  

MA5:MA(CLOSE,5),COLORWHITE,LINETHICK1;  

MA10:MA(CLOSE,10),COLORLIMAGENTA,LINETHICK1;  

KU1:=IF(HIGH=HHV(HIGH,3),1,0);  

KD1:=IF(LOW=LLV(LOW,3),1,0);  

UL:=IF(REF(KU1,2)=1ANDREF(KU1,1)=0  

ANDKU1=0,REF(HIGH,2),REF(HIGH,2+BARSLAST(REF(KU1,2)=1  

ANDREF(KU1,1)=0ANDKU1=0)));  

DL:=IF(REF(KD1,2)=1ANDREF(KD1,1)=0  

KD1=0,REF(LOW,2),REF(LOW,2+BARSLAST(REF(KD1,2)=1  

ANDREF(KD1,1)=0ANDKD1=0)));  

HV:=H>ULANDH>REF(H,1);  

LV:=L<DLANDL<REF(L,1);  

GP:=BARSLAST(HV);  

DP:=BARSLAST(LV);  

IP:=IF(GP=0,DP,GP)>3;  

HV1:=HVANDIPANDH>=HHV(H,BARSLAST(LV));  

LV1:=LVANDIPANDL<=LLV(L,BARSLAST(HV));  

DRAWLINE(LV1,LOW,HV1,HIGH,0),coloryellow,LINETHICK2;  

DRAWLINE(HV1,HIGH,LV1,LOW,0),colormagenta,LINETHICK2;  

///加入中枢判定  

//简化版  

N1:=10;N2:=10;DISP:=2;K:=1;  

P1:=PEAK(1,K*N1,1);  

P2:=PEAK(1,K*N1,2);  

WP1:=PEAKBARS(1,K*N1,1);  

WP2:=PEAKBARS(1,K*N1,2);  

T1:=TROUGH(2,K*N2,1);  

T2:=TROUGH(2,K*N2,2);  

WT1:=TROUGHBARS(2,K*N2,1);  

WT2:=TROUGHBARS(2,K*N2,2);  

TJ1:=P1>T1ANDP2>T2;  

ZD:=MAX(T1,T2);  

ZG:=MIN(P1,P2);  

LL:=MIN(T1,T2);  

HH:=MAX(P1,P2);  

TJ2:=FILTER(ZG>ZD,2);  

AND  

TJ3:=ZG=REF(ZG,BARSLAST(TJ2))ORZD=REF(ZD,BARSLAST(TJ2));  

TJ4:=TJ1ANDTJ2ANDNOT(TJ3);  

TJ5:=BETWEEN(ZD,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),  

1)));  

TJ6:=BETWEEN(ZG,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),  

1)));  

TJ7:=ZG>REF(ZG,REF(BARSLAST(TJ4),1))  

ZD<REF(ZD,REF(BARSLAST(TJ4),1));  

TJ8:=TJ4ANDNOT(TJ5ORTJ6ORTJ7);  

ZSD:=IF(TJ8,ZD,REF(ZD,1));//,coloryellow;  

ZSG:=IF(TJ8,ZG,REF(ZG,1));//,colormagenta;  

ZSH:=IF(TJ8,HH,REF(HH,1));//,colorblue;  

ZSL:=IF(TJ8,LL,REF(LL,1));//,colorgreen;  

STICKLINE(TJ8,ZSH,ZSL,0,-1),colormagenta;  

STICKLINE(TJ8,ZSD,ZSG,IF(DISP=1,3,0),1),colormagenta;  

DRAWTEXT(DISP=2,ZSH,''),colorwhite;  

//中枢高  

中枢高:ZSG,colormagenta;  

POLYLINE(DISP=2,REF(ZSG,BARSLAST(TJ8))),CIRCLEDOT,colormagenta;  

//中枢低:  

中枢低:ZSD,coloryellow;  

POLYLINE(DISP=2,REF(ZSD,BARSLAST(TJ8))),CIRCLEDOT,coloryellow;  

//中枢最高:  

中枢最高:ZSH,colorred;  

POLYLINE(DISP=2,REF(ZSH,BARSLAST(TJ8))),POINTDOT,colorred;  

//中枢最低:  

中枢最低:ZSL,colorgreen;  

POLYLINE(DISP=2,REF(ZSL,BARSLAST(TJ8))),POINTDOT,colorgreen;  

//趋势高:  

//QSGD1:POLYLINE(DISP=3,ZIG(1,K*N1)),colorblue;  

//趋势低:  

//QSDD1:POLYLINE(DISP=3,ZIG(2,K*N2)),colorblue;  

MA5:MA(CLOSE,5),COLORFF00FF,Linethick1;  

//COLORFF00FF,LINETHICK2;  

命真好:=MA5>REF(MA5,1);  

命真坏:=MA5<REF(MA5,1);  

//判定:  

PARTLINE(MA5,命真好,coloryellow,命真坏,colorblue,MA5,COLORFF00FF),linethick3;

image.png


神奇指标网(https://www.shenqizhibiao.com/)所有指标公式及文章来源于网络仅供学习研究

神奇指标收藏 收藏
神奇指标分享 分享

网友评论

已有0人评论

清除 发表评论