[通达信指标]支撑压力主图公式

{该指标含有未来函数，谨慎使用}

DIR2:=ABS(CLOSE-REF(CLOSE,30));

VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),30);

ER2:=DIR2/VIR2;

CS2:=ER2*(0.8-2/24)+2/24;

CQ2:=CS2*CS2;

PJMA:EMA(DMA(CLOSE,CQ2),2),COLORGREEN,LINETHICK1;

DRAWKLINE(H,O,L,C);

IF(PJMA/REF(PJMA,1)>0.997,PJMA,DRAWNULL),COLORBLUE,LINETHICK1;

IF(PJMA/REF(PJMA,1)>1.001,PJMA,DRAWNULL),COLORRED,LINETHICK1;

XX1:=C>PJMA AND PJMA>REF(PJMA,1);

DRAWTEXT_FIX(ISLASTBAR AND XX1,0,0.01,0,’【处于牛区】’),COLORRED;

XX2:=C<PJMA AND PJMA<=REF(PJMA,1);

DRAWTEXT_FIX(ISLASTBAR AND XX2,0,0.01,0,’【处于熊区】’),COLORGREEN;

F111:=ZIG(3,15);

F211:=IF((F111> REF(F111,1)),100,80);

T01:=CONST(LLVBARS(LOW,10));

T11HIGH:=CONST(REF(HIGH,T01));

CC1:=CONST(CURRBARSCOUNT);

T02:=CONST(BARSLAST((CURRBARSCOUNT >(CC1+T01)) AND (HIGH>T11HIGH)));

T12HIGH:=CONST(REF(HIGH,T02));

T03:=CONST(BARSLAST((CURRBARSCOUNT >(CC1+T02)) AND (HIGH>T12HIGH)));

T13HIGH:=CONST(REF(HIGH,T03));

DRAWLINE(CURRBARSCOUNT=T03+1, T13HIGH, ISLASTBAR, T13HIGH, 1),DOTLINE,COLORFFFFFF;

AY:=REF(H,10)=HHV(H,2*10+1);

QYY:=BACKSET(AY,10+1);

CC:=FILTER(QYY,10) AND H=HHV(H,10+1);

DDD:=BARSLAST(CC);

GDTS:=IF(CC,CURRBARSCOUNT,0);

DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);

GDCS1:=CONST(DINGBUTS);

DINGBUTS1:=REF(DINGBUTS,DDD+1);

GDCS2:=CONST(DINGBUTS1);

DRAWLINE(HIGH>=HHV(HIGH,10),HIGH,LOW<=LLV(LOW,3),HHV(HIGH,3),1),COLORFFFF00,LINETHICK1,DOTLINE;

A2:=REF(L,5)=LLV(L,2*5+1);

B2:=FILTER(A2,5);

C2:=BACKSET(B2,5+1);

D2:=FILTER(C2,5);

E2:=BACKSET(ISLASTBAR,BARSLAST(D2)+1);

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

DRAWLINE(D2,L,F2,L,1),COLORLIRED,DOTLINE;

HHHH:=REF(HHV(H,150),3);

LLLL:=REF(LLV(L,150),3);

HH1:=HHHH-(HHHH-LLLL)*0.191;

CHONG:REFDATE(HH1,DATE),COLORLIGREEN;

TTZZ3:=LLV(HIGH,240);

TTZZ4:=100*(CLOSE-TTZZ3)/TTZZ3;

TTZZ5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;

TTZZ6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;

TTZZ7:=0;

TTZZ8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;

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

TTZZ10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);

TTZZ11:=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);

TTZZ12:=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);

TTZZ13:=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);

TTZZ14:=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);

TTZZ15:=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);

TTZZ16:=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);

TTZZ17:=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);

TTZZ18:=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);

TTZZ19:=EMA(CLOSE,2)-EMA(CLOSE,150);

TTSS1:=F211=100 AND TTZZ10;

TTSS2:=F211=100 AND (TTZZ11+TTZZ13+TTZZ15+TTZZ17);

TTSS3:=(TTZZ12+TTZZ14+TTZZ16+TTZZ18);

F1:=ZIG(3,15);

F21:=IF((F1> REF(F1,1)),100,80);

TTZZE1:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;

TTZZ1A:=IF(TTZZE1>0,TTZZE1,0);

TTZZ1B:=IF(TTZZ14>=200 AND TTZZ13>=150,15,IF(TTZZ14<=-200 AND TTZZ13<=-150,-15,TTZZ16))+60;

TTZZ1C:=TTZZ1A>48 AND TTZZ1B>60 AND TTZZ19<100;

TTSS4:=TTZZ1C AND COUNT(TTZZ1C,30)=1;

DRAWTEXT(TTSS4=1,H*1.03,’大顶!’),COLORWHITE;

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);

ZOUQIANG1:=BARSLAST(PL5<REF(PL5,1));

ZOURUO1:=BARSLAST(PL5>REF(PL5,1));

ZOUQIANG2:=BARSLAST(PL10<REF(PL10,1));

ZOURUO2:=BARSLAST(PL10>REF(PL10,1));

ZOUQIANG3:=BARSLAST(PL20<REF(PL20,1));

ZOURUO3:=BARSLAST(PL20>REF(PL20,1));

ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,ZOUQIANG2),0);

ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,ZOUQIANG2),0);

DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,ZOURUO2),0);

DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,ZOURUO2),0);

ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,ZOUQIANG3),0);

ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,ZOUQIANG3),0);

DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,ZOURUO3),0);

DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,ZOURUO3),0);

DRAWTEXT(EN1 AND DTJZ5=1,L*0.98,’㈠’),COLORFFFFFF;

DRAWTEXT(EX1 AND DTJD5=2,H*1.02,’㈡’),COLORGREEN;

DRAWTEXT(EN2 AND ZTJZ5=1,L*0.98,’㈢’),COLORFFFFFF;

DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJD5=1,H*1.02,’⑴’),COLORFFFFFF;

DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2,L*0.98,’⑵’),COLOR00FFFF;

DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJZ5=2,H*1.02,’⑶’),COLORFFFF00;

DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.98,’⑷’),COLOR00FFFF;

DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.02,’⑸’),COLORGREEN;

DRAWTEXT(EN2 AND DTJZ10=1,L*0.95,’Ⅰ’),COLORFFFFFF;

DRAWTEXT(EX2 AND DTJD10=2,H,’Ⅱ’),COLORGREEN;

DRAWTEXT(EN3 AND ZTJZ10=1,L*0.95,’Ⅲ’),COLORFF00FF;

DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.06,’①’),COLORFFFF00;

DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,L*0.94,’②’),COLORFF00FF;

DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H*1.06,’③’),COLORGREEN;

DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=3,L*0.94,’④’),COLORFF00FF;

M5:=MA(C,5);

M10:=MA(C,10);

M20:=MA(C,20);

M30:=MA(C,30);

M60:=MA(C,60);

MA5:=EMA(C,5);

MA13:=EMA(C,6);

UP:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS

(MA13,MA5))+1),H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS

(MA5,MA13))+1),0);

AAAL:=(3*C+H+L+O)/6;

TTZZ1L:=(8*AAAL+7*REF(AAAL,1)+6*REF(AAAL,2)+5*REF(AAAL,3)+4*REF(AAAL,4)

+3*REF(AAAL,5)+2*REF(AAAL,6)+REF(AAAL,8))/36;

TTZZ6L:=(LLV(TTZZ1L,2)+LLV(TTZZ1L,4)+LLV(TTZZ1L,6))/3;

Z:=ISLASTBAR;

DRAWTEXT (REF(C,2)>REF(O,2)&&REF(C,1)>REF(O,1)&&C<=O&&Z,0.98*REF(H,1),’防调’),COLORGREEN;

DRAWTEXT (REF(C,2)<=REF(O,2)&&REF(C,1)>REF(O,1)&&C<=O&&Z,0.98*REF(H,1),’跌势’),COLORGREEN;

AAA:=CONST(HHV(H,90));

A74:=MA(CLOSE,20);

A75:=(CLOSE > MA(CLOSE,5));

A76:=(MA(CLOSE,5) > MA(CLOSE,10));

A77:=(CLOSE > MA(CLOSE,10));

A78:=(MA(CLOSE,5) > MA(CLOSE,20));

A79:=(CLOSE > MA(CLOSE,20));

A710:=REF(A74,1);

A711:=(A74 > A710);

AVX:=(((((IF(A75,10,(0 – 10)) + IF(A76,10,(0 – 10))) + IF(A77,10,(0 – 10)))

+ IF(A78,10,(0 – 10))) + IF(A79,10,(0 – 10))) + IF(A711,10,(0 – 10)));

DSLX:=(CLOSE / INDEXC);

DSLX1:=MA(DSLX,5);

DSLX2:=MA(DSLX,10);

V1:=MA(VOL,5);

V2:=MA(VOL,10);

T23:=CONST(IF(C>200 AND C>M5 AND M5>REF(M5,1) AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)),1,0));

DRAWTEXT(T23=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)

,’大盘重拾升势。’),COLORWHITE;

T11:=CONST(IF(C<200 AND JS AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));

DRAWTEXT(T11=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)

,’进入风险区，随时警惕变盘。’),COLORFFFFFF;

T12:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));

DRAWTEXT(T12=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)

,’量能不足，反弹逢高空仓。’),COLORFFFF00;

T16:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));

现价线:STICKLINE(ISLASTBAR,C,C,2900,-1),COLORWHITE;

Y:=CLOSE/REF(CLOSE,1)>1.09;

X:=VOL>MA(VOL,5);

A1:=Y AND X;

STICKLINE(A1,C,O,1,0),COLORFFFFFF;

低2:=IF(CURRBARSCOUNT<=60, CONST(IF(ISLASTBAR=1,LLV(L, BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL);

T:=BARSLAST(C>REF(C,1)*1.095 AND C=H);

T2L:=BARSLAST(C<REF(C,1)*1.095 AND C>REF(C,1)*1.08);

T3L:=BARSLAST(C<REF(C,1)*1.08 AND C>REF(C,1)*1.07);

T4L:=BARSLAST(C<REF(C,1)*1.07 AND C>REF(C,1)*1.06);

T5L:=BARSLAST(C<REF(C,1)*1.06 AND C>REF(C,1)*1.05);

TJ1:=COUNT(T=0,100)=0;

TJ2:=COUNT(T2L=0,100)=0;

TJ3:=COUNT(T3L=0,100)=0;

TJ4:=COUNT(T4L=0,100)=0;

TJ5:=COUNT(T5L=0,100)=0;

TJA:=C>REF(C,1)*1.05;

AA:=REF(T,1)>100 AND REF(T2L,1)>100 AND REF(T3L,1)>100 AND REF(T4L,1)>100 AND REF(T5L,1)>80 AND TJA;

HHM:=HHV(MACD.MACD*100,200);

LLM:=LLV(MACD.MACD*100,200);

D1:=MIN(MIN(M5,M10),M20)<M60;

D3:=MIN(MIN(M5,M10),M20)>M60;

XGT:=BARSLAST(AA AND HHM<60 AND LLM>-55);

D6:=BARSSINCEN(MIN(MIN(M5,M10),M20)>M60,XGT+1);

XG:=CROSS((XGT=0 AND D3) OR D6=0,0.5);

TJ:=COUNT(XG,30)=2 AND XG;

SR1:=REF(HIGH,10)=HHV(HIGH,2*10+1);

SR2:=FILTER(SR1,10);

SR3:=BACKSET(SR2,10+1);

HD:=FILTER(SR3,10);

TTSS11:=REF(H,BARSLAST(HD));

TTSS10:=VOL/REF(VOL,1)>=1.9;

TTSS9:=CROSS(C,TTSS11);

YG:= TTSS10 AND TTSS9;

SJ:=BARSLAST(YG);

DIF:=MACD.DIF;

H300:=HHVBARS(DIF,300);

AL:=BOLL.UB;

TQ:=BARSLAST(CROSS(AL>=REF(AL,1),0.5));

E25:=EXPMA(C,25);

ZF:=EVERY(RANGE(C/REF(C,1),0.97,1.05),TQ+1);

ZFF:=(HHV(H,TQ+1)-LLV(L,TQ+1))/LLV(L,TQ+1)*100;

TJQ:=EVERY(MAX(C,O)/AL<1.02 ,TQ+1);

XL:=(ATAN((E25/REF(E25,TQ)-1)*100)*180/3.1415926);

TJ1Q:=CROSS(DIF>=REF(DIF,H300),0.5) AND ZFF<17 AND ZF AND TJQ;

TTSS8:=TJ1Q AND XL>75;

A1F:=REF(C,1);

A3F:=(DCLOSE-A1F)/A1F*100;

AA1F:=(A3F-REF(A3F,1));

TTSS7:=CROSS(AA1F,9.8);

A11F:=REF(V,1);

A13F:=DVOL/A11F;

AA3F:=(A13F-REF(A13F,1));

TTSS6:=CROSS(AA3F,500);

TTSS5:=TTSS7 AND TTSS6;

STICKLINE(TTSS5 OR TTSS8 OR CURRBARSCOUNT=CONST(SJ)+2 OR TJ OR (CCI<=100 AND L<=低2),O,C,1.5,0),COLORFF00FF;

DRAWTEXT_FIX(C>0,0.004,1,0,DYBLOCK),COLORYELLOW,LINETHICK2;

DRAWTEXT_FIX(C>0,0.06,1,0,HYBLOCK),COLORRED,LINETHICK2;

LT:=LLVBARS(L,60);

LTT:=BARSLAST(CURRBARSCOUNT=CONST(LT)+1);

HT:=FINDHIGHBARS(H,LT+1,60,1);

A:DRAWLINE(CURRBARSCOUNT=CONST(HT)+1,H,ISLASTBAR,REF(H,HT),0),COLORYELLOW,LINETHICK2;

TT:=BARSLAST(CURRBARSCOUNT=CONST(HT)+1);

AAG:=CROSS(C,CONST(A));

TJG:=COUNT(AAG,TT+1)=1 AND AA;

TJ1G:=COUNT(V<MA(V,277),TT+1) ;

BL:=TJ1G/(TT+1)*100;

XGG:=TJG AND TT>40 AND BL>70;

XGTG:=BARSLAST(CURRBARSCOUNT=CONST(BARSLAST(XGG))+1);

ZH:=REF(H,TT);

YL:=REF(L,LTT);

XC:=REF(C,XGTG);

YZ:=(XC-YL)/YL*100;

ZBL:=YZ/REF(LTT,XGTG);

XGA:=XG AND ZBL<2.95;

DRAWLINE(TT=0,H,LTT=0,L,0),COLORRED;

DRAWLINE(LTT=0,L,XGT=0,L,0),COLORRED;

DRAWICON(XGA,L*0.95,9);