缠论底分型选股指标公式(缠论股票选股指标)
通达信指标公式源码概况:
指标类别: 通达信指标公式
授权方式: 免费版
指标评级: ★★★★★
指标分类: 策略
画线方法: 副图
一、缠论底分型选股指标公式
重心线:(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;
二、缠论股票选股指标
{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;
[源码注释]通达信公式动态翻译结果
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;
神奇指标网(https://www.shenqizhibiao.com/)所有指标公式及文章来源于网络仅供学习研究
网友评论
已有0人评论