[通达信指标]波段通道支撑压力公式源码

MA5:MA(((SLOPE(C,4)*5)+C),5),COLORWHITE,LINETHICK2;

MA18:=MA(((SLOPE(C,10)*5)+C),18);

压力:MA(C,12)*IF(CAPITAL=0,1.035,1.12),LINETHICK1;

支撑:MA(C,10)*IF(CAPITAL=0,0.965,0.92),LINETHICK1;

TJ1:=REF(MA5,1)<MA5 AND REF(MA5,1)<REF(MA5,2) AND REF(MA5,2)<REF(MA18,2) AND

RANGE(REF(MA5,2),REF(MA5,1),REF(MA5,3)) AND REF(支撑,1)/REF(MA5,1)>=0.98;

TJ2:=REF(MA5,1)>压力 AND REF(MA5,1)>REF(MA5,2) AND REF(MA5,1)>MA5;

DRAWICON(TJ1,LOW*0.94,1);

DRAWICON(TJ2,1.02*HIGH,2);

VAR1:=(100 – ((90 * (HHV(HIGH,14) – CLOSE)) / (HHV(HIGH,14) – LLV(LOW,14))));

VAR2:=(100 – ((90 * (HHV(HIGH,14) – CLOSE)) / (HHV(HIGH,14) – LLV(LOW,14))));

VAR3:=(100 – MA(((100 * (HHV(HIGH,6) – CLOSE)) / (HHV(HIGH,6) – LLV(LOW,6))),34));

DIR1:=ABS(CLOSE-REF(CLOSE,5));

VIR1:=SUM(ABS(CLOSE-REF(CLOSE,1)),5);

ER1:=DIR1/VIR1;

CS1:=ER1*(0.8-2/8)+2/8;

CQ1:=CS1*CS1;

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

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

ER2:=DIR2/VIR2;

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

CQ2:=CS2*CS2;

STICKLINE(VAR2 < MA(VAR3,6),LOW,HIGH,0,1),COLORLIBLUE;

STICKLINE(VAR2 > MA(VAR3,6),LOW,HIGH,0,1),COLORRED;

STICKLINE(((OPEN>CLOSE)AND(VAR2<MA(VAR3,6))),(CLOSE-0.03),OPEN,3.05,0),COLORLIBLUE;

STICKLINE(((OPEN<CLOSE)AND(VAR2<MA(VAR3,6))),CLOSE,OPEN,3.05,1),COLORLIBLUE;

STICKLINE(((OPEN>CLOSE)AND(VAR2>MA(VAR3,6))),OPEN,(CLOSE-0.03),3.05,0),COLORRED;

STICKLINE(((OPEN<CLOSE)AND(VAR2>MA(VAR3,6))),OPEN,CLOSE,3.05,1),COLORRED;

PT:=REF(H,1)-REF(L,1);

CDP:=(REF(H,1)+REF(L,1)+REF(C,1)*2)/4;

AH:=CDP+PT;

AL:=CDP-PT;

NH:=CDP*2-REF(L,1);

NL:=CDP*2-REF(H,1);

强:IF(AH>REF(C,1)*1.1,REF(C,1)*1.1,AH)NODRAW;

阻:IF(NH>强,(强-CDP)*0.618+CDP,NH)NODRAW,COLORBLUE;

M:=IF(AL<REF(C,1)/1.1,REF(C,1)/1.1,AL);

撑:IF(NL<M,CDP-(CDP-M)*0.618,NL)NODRAW;

底:IF(AL<REF(C,1)/1.1,REF(C,1)/1.1,AL)NODRAW;

N:=75;

P:=5;

P1:=10;

A1:=REF(H,P)=HHV(H,2*P+1);

B1:=FILTER(A1,P);

C1:=BACKSET(B1,P+1);

D1:=FILTER(C1,P);

E1:=BACKSET(ISLASTBAR,BARSLAST(D1)+1);

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

短压:DRAWLINE(D1,H,F1,H,1),COLORCYAN;

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

B2:=FILTER(A2,P);

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

D2:=FILTER(C2,P);

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

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

短支:DRAWLINE(D2,L,F2,L,1),COLORLIRED;

AA1:=REF(H,P1)=HHV(H,2*P1+1);

BB1:=FILTER(AA1,P1);

CC1:=BACKSET(BB1,P1+1);

DD1:=FILTER(CC1,P1);

EE1:=BACKSET(ISLASTBAR,BARSLAST(DD1)+1);

FF1:=EE1>REF(EE1,1);

长压:DRAWLINE(DD1,H,FF1,H,1),COLORGREEN;

AA2:=REF(L,P1)=LLV(L,2*P1+1);

BB2:=FILTER(AA2,P1);

CC2:=BACKSET(BB2,P1+1);

DD2:=FILTER(CC2,P1);

EE2:=BACKSET(ISLASTBAR,BARSLAST(DD2)+1);

FF2:=EE2>REF(EE2,1);

长支:DRAWLINE(DD2,L,FF2,L,1),COLORRED;

高:=REFDATE(HHV(H,N),DATE);

低:=REFDATE(LLV(L,N),DATE);

H1:=高-(高-低)*0.191;

H2:=高-(高-低)*0.382;

H3:=高-(高-低)*0.5;

H4:=高-(高-低)*0.618;

H5:=高-(高-低)*0.809;

DRAWTEXT(CURRBARSCOUNT=1,高,’高’),COLORGREEN;

DRAWTEXT(CURRBARSCOUNT=1,H1,’809′),COLORCYAN;

DRAWTEXT(CURRBARSCOUNT=1,H2,’618′),COLORGRAY;

DRAWTEXT(CURRBARSCOUNT=1,H3,’中’),COLORYELLOW;

DRAWTEXT(CURRBARSCOUNT=1,H4,’382′),COLORLIRED;

DRAWTEXT(CURRBARSCOUNT=1,H5,’191′),COLORMAGENTA;

DRAWTEXT(CURRBARSCOUNT=1,低,’低’),COLORRED;

STICKLINE(CURRBARSCOUNT=13,高,高,100,-1),COLORGREEN;

STICKLINE(CURRBARSCOUNT=13,H1,H1,100,-1),COLORCYAN;

STICKLINE(CURRBARSCOUNT=13,H2,H2,100,-1),COLORGRAY;

STICKLINE(CURRBARSCOUNT=13,H3,H3,100,-1),COLORYELLOW;

STICKLINE(CURRBARSCOUNT=13,H4,H4,100,-1),COLORLIRED;

STICKLINE(CURRBARSCOUNT=13,H5,H5,100,-1),COLORMAGENTA;

STICKLINE(CURRBARSCOUNT=13,低,低,100,-1),COLORRED;