通达信经典缠论操盘主图指标
N:=(0,1,1);
章鱼A:=BACKSET(LLV(L,5)<REF(LLV(L,4),1),4);
章鱼B:=BACKSET(章鱼A=0 AND REF(章鱼A,1)=1,2);
章鱼C:=IF(章鱼B=1 AND REF(章鱼B,1)=0,-1,0);
章鱼OA:=BACKSET(HHV(H,5)>REF(HHV(H,4),1),4);
章鱼OB:=BACKSET(章鱼OA=0 AND REF(章鱼OA,1)=1,2);
章鱼OC:=IF(章鱼OB=1 AND REF(章鱼OB,1)=0,1,0);
QKPD:=IF(L>REF(H,1),1,IF(H<REF(L,1),-1,0));
JQTG:=BARSLAST(章鱼OC=1);
章鱼O1:=BARSLAST(章鱼C=-1);
XZZQ:=LOWRANGE(L);
DZZQ:=TOPRANGE(H);
鱼哥AA:=IF(章鱼C=-1 AND REF(JQTG,1)>REF(章鱼O1,1) AND LLV(L,JQTG+1)<REF(LLV(L,JQTG+1),1),-1,0);
鱼哥AB:=IF(章鱼C=-1 AND REF(JQTG,1)<=REF(章鱼O1,1) AND (JQTG>=4 OR LLV(QKPD,JQTG)=-1 OR LLV(L,章鱼O1+2)<REF(LLV(L,章鱼O1+1),1)),-1,0);
鱼哥S:=IF((鱼哥AA=-1 OR 鱼哥AB=-1) AND L<REF(H,JQTG+1),-1,0);
DTIME:=11;
A:=H=HHV(H,DTIME*5) AND HHV(H,DTIME*5)>REF(HHV(H,DTIME*5),1);
B:=L=LLV(L,DTIME*5) AND LLV(L,DTIME*5)<REF(LLV(L,DTIME*5),1);
CC1:DRAWLINE(A,H,B,L,0),LINETHICK2,COLOR0000FF;
CC2:DRAWLINE(B,L,A,H,0),LINETHICK2,COLOR0000FF;
YP:=IF((章鱼O1<4 AND HHV(QKPD,章鱼O1)!=1) OR REF(鱼哥S,章鱼O1)=0,1,0);
PD:=IF(章鱼OC=1 AND REF(章鱼O1,1)<=REF(JQTG,1) AND YP=1 AND DZZQ>REF(XZZQ,章鱼O1+1) AND DZZQ>REF(XZZQ,章鱼O1) AND DZZQ>REF(DZZQ,JQTG),1,0);
章鱼哥A:=IF(章鱼OC=1 AND REF(章鱼O1,1)>REF(JQTG,1) AND HHV(H,章鱼O1+1)>REF(HHV(H,章鱼O1+1),1),1,0);
章鱼哥B:=IF(章鱼OC=1 AND REF(章鱼O1,1)<=REF(JQTG,1) AND REF(鱼哥S,章鱼O1)=-1 AND (章鱼O1>=4 OR HHV(QKPD,章鱼O1)=1),1,0);
章鱼哥:=IF((章鱼哥A=1 OR 章鱼哥B=1 OR PD=1) AND H>REF(L,章鱼O1+1),1,0);
YPA:=IF((JQTG<4 AND HHV(QKPD,JQTG)!=1) OR REF(章鱼哥,JQTG)=0,1,0);
PDA:=IF(章鱼C=-1 AND REF(JQTG,1)<=REF(章鱼O1,1) AND YPA=1 AND XZZQ>REF(DZZQ,JQTG+1) AND XZZQ>REF(DZZQ,JQTG) AND XZZQ>REF(XZZQ,章鱼O1),-1,0);
鱼哥A:=IF(章鱼C=-1 AND REF(JQTG,1)>REF(章鱼O1,1) AND LLV(L,JQTG+1)<REF(LLV(L,JQTG+1),1),-1,0);
鱼哥B:=IF(章鱼C=-1 AND REF(JQTG,1)<=REF(章鱼O1,1) AND (JQTG>=4 OR LLV(QKPD,JQTG)=-1 OR PDA=-1),-1,0);
鱼哥:=IF((鱼哥A=-1 OR 鱼哥B=-1) AND L<REF(H,JQTG+1),-1,0);
JQTGA:=BARSLAST(章鱼哥=1);
章鱼O1A:=BARSLAST(鱼哥=-1);
YPX:=IF((章鱼O1A<4 AND HHV(QKPD,章鱼O1A)!=1) OR REF(鱼哥,章鱼O1A)=0,1,0);
PDX:=IF(章鱼OC=1 AND REF(章鱼O1A,1)<=REF(JQTGA,1) AND YPX=1 AND DZZQ>REF(XZZQ,章鱼O1A+1) AND DZZQ>REF(XZZQ,章鱼O1A) AND DZZQ>REF(DZZQ,JQTGA),1,0);
章鱼哥XA:=IF(章鱼OC=1 AND REF(章鱼O1A,1)>REF(JQTGA,1) AND HHV(H,章鱼O1A+1)>REF(HHV(H,章鱼O1A+1),1),1,0);
章鱼哥XB:=IF(章鱼OC=1 AND REF(章鱼O1A,1)<=REF(JQTGA,1) AND REF(鱼哥,章鱼O1A)=-1 AND (章鱼O1A>=4 OR HHV(QKPD,章鱼O1A)=1),1,0);
章鱼哥X:=IF((章鱼哥XA=1 OR 章鱼哥XB=1 OR PDX=1) AND H>REF(L,章鱼O1A+1),1,0);
YPXA:=IF((JQTGA<4 AND HHV(QKPD,JQTGA)!=1) OR REF(章鱼哥XA,JQTGA)=0,1,0);
PDXA:=IF(章鱼C=-1 AND REF(JQTGA,1)<=REF(章鱼O1A,1) AND YPXA=1 AND XZZQ>REF(DZZQ,JQTGA+1) AND XZZQ>REF(DZZQ,JQTGA) AND XZZQ>REF(XZZQ,章鱼O1A),-1,0);
鱼哥XA:=IF(章鱼C=-1 AND REF(JQTGA,1)>REF(章鱼O1A,1) AND LLV(L,JQTGA+1)<REF(LLV(L,JQTGA+1),1),-1,0);
鱼哥XB:=IF(章鱼C=-1 AND REF(JQTGA,1)<=REF(章鱼O1A,1) AND (JQTGA>=4 OR LLV(QKPD,JQTGA)=-1 OR PDXA=-1),-1,0);
鱼哥X:=IF((鱼哥XA=-1 OR 鱼哥XB=-1) AND L<REF(H,JQTGA+1),-1,0);
章鱼大哥P:=BARSLAST(章鱼哥X=1);
章鱼O1YA:=BARSLAST(鱼哥X=-1);
YPYX:=IF((章鱼O1YA<4 AND HHV(QKPD,章鱼O1YA)!=1) OR REF(鱼哥X,章鱼O1YA)=0,1,0);
PDYX:=IF(章鱼OC=1 AND REF(章鱼O1YA,1)<=REF(章鱼大哥P,1) AND YPYX=1 AND DZZQ>REF(XZZQ,章鱼O1YA+1) AND DZZQ>REF(XZZQ,章鱼O1YA) AND DZZQ>REF(DZZQ,章鱼大哥P),1,0);
章鱼哥YXA:=IF(章鱼OC=1 AND REF(章鱼O1YA,1)>REF(章鱼大哥P,1) AND HHV(H,章鱼O1YA+1)>REF(HHV(H,章鱼O1YA+1),1),1,0);
章鱼哥YXB:=IF(章鱼OC=1 AND REF(章鱼O1YA,1)<=REF(章鱼大哥P,1) AND REF(鱼哥X,章鱼O1YA)=-1 AND (章鱼O1YA>=4 OR HHV(QKPD,章鱼O1YA)=1),1,0);
章鱼哥YX:=IF((章鱼哥YXA=1 OR 章鱼哥YXB=1 OR PDYX=1) AND H>REF(L,章鱼O1YA+1),1,0);
YPYXA:=IF((章鱼大哥P<4 AND HHV(QKPD,章鱼大哥P)!=1) OR REF(章鱼哥YXA,章鱼大哥P)=0,1,0);
PDYXA:=IF(章鱼C=-1 AND REF(章鱼大哥P,1)<=REF(章鱼O1YA,1) AND YPYXA=1 AND XZZQ>REF(DZZQ,章鱼大哥P+1) AND XZZQ>REF(DZZQ,章鱼大哥P) AND XZZQ>REF(XZZQ,章鱼O1YA),-1,0);
鱼哥YXA:=IF(章鱼C=-1 AND REF(章鱼大哥P,1)>REF(章鱼O1YA,1) AND LLV(L,章鱼大哥P+1)<REF(LLV(L,章鱼大哥P+1),1),-1,0);
鱼哥YXB:=IF(章鱼C=-1 AND REF(章鱼大哥P,1)<=REF(章鱼O1YA,1) AND (章鱼大哥P>=4 OR LLV(QKPD,章鱼大哥P)=-1 OR PDYXA=-1),-1,0);
鱼哥YX:=IF((鱼哥YXA=-1 OR 鱼哥YXB=-1) AND L<REF(H,章鱼大哥P+1),-1,0);
AAAD:=IF(章鱼哥YX=1 AND 鱼哥YX=-1 AND H>REF(H,REF(章鱼大哥P,1)+2),1,IF(章鱼哥YX=1 AND 鱼哥YX=-1 AND L<REF(L,REF(章鱼O1YA,1)+2),-1,0));
J鱼哥:=IF(AAAD=0,章鱼哥YX+鱼哥YX,AAAD);DRAWTEXT_FIX(C>O,0,0.2,0,'留下联系方式，稍后添加您！！'),COLORRED;
JBJD:IF(J鱼哥=-1,L,IF(J鱼哥=1,H,DRAWNULL)),CIRCLEDOT,COLORLIMAGENTA;DRAWTEXT_FIX(1,0.07,1,0,''),COLORC0C0C0;
DRAWTEXT(J鱼哥=1,JBJD,'卖'),COLORFFFFFF;DRAWTEXT(J鱼哥=-1,JBJD,'买'),COLORFFFFFF;
C1:DRAWLINE(J鱼哥=-1,JBJD,J鱼哥=1,JBJD,0),DOTLINE,COLORWHITE;
C2:DRAWLINE(J鱼哥=1,JBJD,J鱼哥=-1,JBJD,0),DOTLINE,COLORWHITE;
JD:=IF(N=1,C2=C1 AND 章鱼OA AND J鱼哥=1,DRAWNULL);
Μ×:=IF(N=1,C2=C1 AND 章鱼A AND J鱼哥=-1,DRAWNULL);
A1:=BARSLAST(JD);B1:=CURRBARSCOUNT=CONST(A1)+1;D1:=BARSLAST(B1); SS1:=CONST(REF(H,D1));
A2:=REF(A1,A1+1)+A1+1;B2:=CURRBARSCOUNT=CONST(A2)+1;D2:=BARSLAST(B2); SS2:=CONST(REF(H,D2));
A3:=REF(A2,A1+1)+A1+1;B3:=CURRBARSCOUNT=CONST(A3)+1;D3:=BARSLAST(B3); SS3:=CONST(REF(H,D3));
DA1:=BARSLAST( Μ×);DB1:=CURRBARSCOUNT=CONST(DA1)+1;DD1:=BARSLAST(DB1); 低1:=CONST(REF(L,DD1));
DA2:=REF(DA1,DA1+1)+DA1+1;DB2:=CURRBARSCOUNT=CONST(DA2)+1;DD2:=BARSLAST(DB2); 低2:=CONST(REF(L,DD2));
DA3:=REF(DA2,DA1+1)+DA1+1;DB3:=CURRBARSCOUNT=CONST(DA3)+1;DD3:=BARSLAST(DB3); 低3:=CONST(REF(L,DD3));
SJXFDA:= 低1< 低2 AND SS2> SS1 AND DA2>A1 AND A1>DA1 AND A2>DA2 AND CONST(C)> 低2;
章鱼大哥O1:=IF(SJXFDA AND CONST(C)< SS1,DB2,DRAWNULL);
STICKLINE(章鱼大哥O1,CONST(C), 低2,0,0),COLORLIMAGENTA;
章鱼大哥O2:=IF(SJXFDA AND CONST(C)< SS1,ISLASTBAR,DRAWNULL);
STICKLINE(章鱼大哥O2,CONST(C), 低2,0,0),COLORLIMAGENTA;
DRAWLINE(章鱼大哥O1=1,CONST(C),章鱼大哥O2=1,CONST(C),0),DOTLINE,COLORLIMAGENTA;
DRAWLINE(章鱼大哥O1=1, 低2,章鱼大哥O2=1, 低2,0),COLORLIMAGENTA;
章鱼大哥1:=IF(SJXFDA AND CONST(C)>= SS1,DB2,DRAWNULL);
STICKLINE(章鱼大哥1, SS1, 低1,0,0),COLORLIMAGENTA;
章鱼大哥2:=IF(SJXFDA AND CONST(C)>= SS1,ISLASTBAR,DRAWNULL);
STICKLINE(章鱼大哥2, SS1, 低1,0,0),COLORLIMAGENTA;
DRAWLINE(章鱼大哥1=1, SS1,章鱼大哥2=1, SS1,0),COLORLIMAGENTA;
DRAWLINE(章鱼大哥1=1, 低1,章鱼大哥2=1, 低1,0),COLORLIMAGENTA;
SJXFDB:= 低1> 低2 AND SS1> SS2 AND DA1>A1 AND A2>DA1 AND DA2>A2 AND CONST(C)< SS2;
ZSB1:=IF(SJXFDB AND CONST(C)> 低1,B2,DRAWNULL);
STICKLINE(ZSB1,CONST(C), SS2,0,0),COLORGREEN;
ZSB2:=IF(SJXFDB AND CONST(C)> 低1,ISLASTBAR,DRAWNULL);
STICKLINE(ZSB2,CONST(C), SS2,0,0),COLORGREEN;
DRAWLINE(ZSB1=1, SS2,ZSB2=1, SS2,0),COLORGREEN;
DRAWLINE(ZSB1=1,CONST(C),ZSB2=1,CONST(C),0),DOTLINE,COLORGREEN;
ZSBC1:=IF(SJXFDB AND CONST(C)<= 低1,B2,DRAWNULL);
STICKLINE(ZSBC1, SS2, 低1,0,0),COLORGREEN;
ZSBC2:=IF(SJXFDB AND CONST(C)<= 低1,ISLASTBAR,DRAWNULL);
STICKLINE(ZSBC2, SS2, 低1,0,0),COLORGREEN;
DRAWLINE(ZSBC1=1, SS2,ZSBC2=1, SS2,0),COLORGREEN;
DRAWLINE(ZSBC1=1, 低1,ZSBC2=1, 低1,0),COLORGREEN;
SJXSLA:= 低1> 低2 AND SS2> SS1 AND DA2>A1 AND A1>DA1 AND A2>DA2 AND CONST(C)> 低1;
ZSC1:=IF(SJXSLA AND CONST(C)< SS1,DB2,DRAWNULL);
STICKLINE(ZSC1,CONST(C), 低1,0,0),COLORYELLOW;
ZSC2:=IF(SJXSLA AND CONST(C)< SS1,ISLASTBAR,DRAWNULL);
STICKLINE(ZSC2,CONST(C), 低1,0,0),COLORYELLOW;
DRAWLINE(ZSC1=1,CONST(C),ZSC2=1,CONST(C),0),DOTLINE,COLORYELLOW;
DRAWLINE(ZSC1=1, 低1,ZSC2=1, 低1,0),COLORYELLOW;
ZSCC1:=IF(SJXSLA AND CONST(C)>= SS1,DB2,DRAWNULL);
STICKLINE(ZSCC1, SS1, 低1,0,0),COLORYELLOW;
ZSCC2:=IF(SJXSLA AND CONST(C)>= SS1,ISLASTBAR,DRAWNULL);
STICKLINE(ZSCC2, SS1, 低1,0,0),COLORYELLOW;
DRAWLINE(ZSCC1=1, SS1,ZSCC2=1, SS1,0),COLORYELLOW;
DRAWLINE(ZSCC1=1, 低1,ZSCC2=1, 低1,0),COLORYELLOW;
SJXSLB:= 低1> 低2 AND SS1< SS2 AND DA1>A1 AND A2>DA1 AND DA2>A2 AND CONST(C)< SS1;
ZSD1:=IF(SJXSLB AND CONST(C)> 低1,B2,DRAWNULL);
STICKLINE(ZSD1,CONST(C), SS1,0,0),COLORLICYAN;
ZSD2:=IF(SJXSLB AND CONST(C)> 低1,ISLASTBAR,DRAWNULL);
STICKLINE(ZSD2,CONST(C), SS1,0,0),COLORLICYAN;
DRAWLINE(ZSD1=1, SS1,ZSD2=1, SS1,0),COLORLICYAN;
DRAWLINE(ZSD1=1,CONST(C),ZSD2=1,CONST(C),0),DOTLINE,COLORLICYAN;
ZSDC1:=IF(SJXSLB AND CONST(C)<= 低1,B2,DRAWNULL);
STICKLINE(ZSDC1, SS1, 低1,0,0),COLORLICYAN;
ZSDC2:=IF(SJXSLB AND CONST(C)<= 低1,ISLASTBAR,DRAWNULL);
STICKLINE(ZSDC2, SS1, 低1,0,0),COLORLICYAN;
DRAWLINE(ZSDC1=1, SS1,ZSDC2=1, SS1,0),COLORLICYAN;
DRAWLINE(ZSDC1=1, 低1,ZSDC2=1, 低1,0),COLORLICYAN;
ZYG3:=LLV(H,240);
ZYG4:=100*(C-ZYG3)/ZYG3;
ZYG5:=(C-LLV(L,528))/(HHV(H,528)-LLV(L,528))*100;
ZYG6:=(C-LLV(C,530))/(HHV(C,530)-LLV(C,530))*100;
ZYG7:=0;
ZYG8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;
ZYG9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;
ZYG10:=IF(TROUGHBARS(3,16,1)=0 AND H>L+0.04,4,0);
ZYG11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);
ZYG12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);
ZYG13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);
ZYG14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);
ZYG15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);
ZYG16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);
ZYG17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);
ZYG18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);
ZYG19:=EMA(C,2)-EMA(C,150);
买１:=ZYG10;
买２:=(ZYG11+ZYG13+ZYG15+ZYG17);
卖１:=(ZYG12+ZYG14+ZYG16+ZYG18);
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) AND REF(PL5,1)<=REF(PL5,2) AND REF(PL5,2)<=REF(PL5,3);
EX1:=PL5<REF(PL5,1) AND REF(PL5,1)>=REF(PL5,2) AND REF(PL5,2)>=REF(PL5,3);
PL10:=ZIG(3,10);
EN2:=PL10>REF(PL10,1) AND REF(PL10,1)<=REF(PL10,2) AND REF(PL10,2)<=REF(PL10,3);
EX2:=PL10<REF(PL10,1) AND REF(PL10,1)>=REF(PL10,2) AND REF(PL10,2)>=REF(PL10,3);
PL20:=ZIG(3,20);
EN3:=PL20>REF(PL20,1) AND REF(PL20,1)<=REF(PL20,2) AND REF(PL20,2)<=REF(PL20,3);
EX3:=PL20<REF(PL20,1) AND REF(PL20,1)>=REF(PL20,2) AND REF(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));
章鱼大哥I5:=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);
章鱼大哥I10:=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(EN2 AND DTJZ10=1,L*0.97,' [类2买]'),COLORFFFFFF;
DRAWTEXT(EN3 AND 章鱼大哥I10=1,L*0.97,'[1买]'),COLORFFFFFF;
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.03,'[2卖]'),LINETHICK2,COLORFFFFFF;
DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND 章鱼大哥I10=2,L*0.97,'[2买]'),LINETHICK2,COLORFFFFFF;
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H*1.03,'[1卖]'),LINETHICK3,COLORFFFFFF;
M:=20;T:=10;
M1:MA(C,M),COLORMAGENTA,LINETHICK2;
判:IF(M1<REF(M1,1),M1,DRAWNULL),COLORGREEN,LINETHICK2;