【股票指标公式下载】-【通达信】主力压力线(阻力支撑)

1、【通达信】主力压力线（阻力、支撑）-指标公式源码 N:1,100,8 P:0,1,0N:=8;P:=0;ZGD:=HHV(H,60);ZGD2:=CONST(ZGD);ZDD:=LLV(L,60);ZDD2:=CONST(ZDD);GJ:=(C+H+L+O)/4;明日阻力:=L+(GJ-L)+(C-L);明日支撑:=L+(C-GJ);KOH:=L>REF(H,1);KOL:=H<REF(L,1);HIF:=L>REF(H,BARSLAST(KOH)+1);NHIF:=L<=REF(H,BARSLAST(KOH)+1);LIF:=H<REF(L,BARSLAST(K

2、OL)+1);NLIF:=H>=REF(L,BARSLAST(KOL)+1);下档线:=(CLOSE - LLV(LOW,13) / (HHV(HIGH,13) - LLV(LOW,13) * 100);RRRSV:=SMA(下档线,3,1);KKK:=SMA(RRRSV,3,1);DDDDD:=(3 * RRRSV) - (2 * KKK);JJ12:=(CLOSE - LLV(LOW,55) / (HHV(HIGH,55) - LLV(LOW,55) * 100);RSV24:=SMA(JJ12,3,1);K24:=SMA(RSV24,3,1);D24:=(3 * RSV24) -

3、(2 * K24);压力2:=IF(CROSS(D24,DDDDD),HIGH,REF(HIGH,BARSLAST(CROSS(D24,DDDDD),COLORFFFFFF;底部:=LLV(HIGH,30),COLOR00FF00;AA:=REF(H,N)=HHV(H,2*N+1); AA1:=REF(L,N)=LLV(L,2*N+1);QY:=BACKSET(AA,N+1); QY1:=BACKSET(AA1,N+1);CC:=FILTER(QY,N) AND H=HHV(H,N+1); CC1:=FILTER(QY1,N) AND L=LLV(L,N+1);DDD:=BARSLAST(CC

4、); DD1:=BARSLAST(CC1);GDTS:=IF(CC,CURRBARSCOUNT,0); DDTS:=IF(CC1,CURRBARSCOUNT,0);DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS); DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);GDCS1:=CONST(DINGBUTS); DDCS1:=CONST(DDTS1);GDCS13:=CONST(REF(HIGH,GDCS1-1); DDCS13:=CONST(REF(L,DDCS1-1);DINGBUTS1:=REF(DINGBUTS,DDD+1); DDTS2:=R

5、EF(DDTS1,DD1+1);GDCS2:=CONST(DINGBUTS1); DDCS2:=CONST(DDTS2);GDCS23:=CONST(REF(HIGH,DINGBUTS1-1); DDCS23:=CONST(REF(L,DDTS2-1);XG1:=BACKSET(ISLASTBAR,GDCS1); XD1:=BACKSET(ISLASTBAR,DDCS1);XG2:=BACKSET(ISLASTBAR,DINGBUTS1); XD2:=BACKSET(ISLASTBAR,DDTS2);XDD:=IF(DDCS13<=DDCS23,XD1,XD2);BCG:=SUM(XG1

6、,0); BCD:=SUM(XDD,0);今日阻力:REF(明日阻力 , 1),NODRAW;今日支撑:REF(明日支撑 , 1),NODRAW;压力位:IF(ISLASTBAR,压力2,DRAWNULL),NODRAW;底部位:IF(ISLASTBAR,底部,DRAWNULL),NODRAW;高点压力:DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1) ,COLORGREEN,LINETHICK2;低点支撑:DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1),COLORBL

7、UE,LINETHICK2;高:=CONST(MAX(MAX(MAX(ZGD2,高点压力),GDCS13),GDCS23);低:=CONST(MIN(MIN(MIN(ZDD2,DDCS23),DDCS13),低点支撑);ZGSTAR:=(高点压力+低点支撑)/2;ZGEND:=CONST(高点压力+低点支撑)/2);STARDAY:=IF(DDCS2<GDCS2,DDCS2,GDCS2);中轨:DRAWLINE(CURRBARSCOUNT=STARDAY,ZGSTAR,ISLASTBAR,ZGEND,1),COLOR555555,LINETHICK2;M:=INTPART(3*N/5);

8、AAA:=REF(H,M)=HHV(H,2*M+1);QYY:=BACKSET(AAA,M+1);CCC:=FILTER(QYY,M) AND H=HHV(H,M+1);DDDD:=BARSLAST(CCC),NODRAW;GDTSS:=IF(CCC,CURRBARSCOUNT,0);DINGBUTSS:=IF(DDDD,REF(GDTSS,DDDD),GDTSS);GDCS11:=CONST(DINGBUTSS);DINGBUTS11:=REF(DINGBUTSS,DDDD+1);GDCS22:=CONST(DINGBUTS11);上缺口:=P=0 AND HIF AND BARSLAST(

9、KOH)<BARSLAST(NHIF)AND BARSLAST(HIF)<BARSLAST(NHIF);HG:=IF(上缺口,REF(H,BARSLAST(KOH)+1),DRAWNULL);STICKLINE(上缺口,HG,HG*1.001,10,0),COLOR888888;下缺口:=P=0 AND LIF AND BARSLAST(KOL)<BARSLAST(NLIF) AND BARSLAST(LIF)<BARSLAST(NLIF);LG:=IF(下缺口,REF(L,BARSLAST(KOL)+1),DRAWNULL);STICKLINE(下缺口,LG,LG*0

10、.999,10,0),COLOR888888;高点压力M:DRAWLINE(CURRBARSCOUNT=GDCS22,H,CURRBARSCOUNT=GDCS11,H,1),COLORRED,LINETHICK1;AA11:=REF(L,M)=LLV(L,2*M+1);QY11:=BACKSET(AA11,M+1);CC11:=FILTER(QY11,M) AND L=LLV(L,M+1);DD11:=BARSLAST(CC11);DDTSS:=IF(CC11,CURRBARSCOUNT,0);DDTS11:=IF(DD11,REF(DDTSS,DD11),DDTSS);DDCS11:=CON

11、ST(DDTS11);DDTS22:=REF(DDTS11,DD11+1);DDCS22:=CONST(DDTS22);低点支撑M:DRAWLINE(CURRBARSCOUNT=DDCS22,L,CURRBARSCOUNT=DDCS11,L,1) COLORRED,LINETHICK1;STICKLINE(XG2,GDCS23,GDCS23,0.5,1),COLORWHITE;STICKLINE(XG1,GDCS13,GDCS13,0.5,1),COLORYELLOW;STICKLINE(XD2,DDCS23,DDCS23,0.5,1),COLORMAGENTA;STICKLINE(XD1,D

12、DCS13,DDCS13,0.5,1),COLORCYAN;STICKLINE(ISLASTBAR AND C>=今日阻力,今日阻力,今日阻力,10,1),COLOR0000FF;STICKLINE(ISLASTBAR AND C<今日阻力,今日阻力,今日阻力,10,1),COLOR00FF00;STICKLINE(ISLASTBAR AND C>=今日支撑,今日支撑,今日支撑,10,1),COLORFF00FF;STICKLINE(ISLASTBAR AND C<今日支撑,今日支撑,今日支撑,10,1),COLORFF8800;STICKLINE(ISLASTBAR

13、,压力位,压力位,120,0),COLORFFFFFF;STICKLINE(ISLASTBAR ,底部位,底部位,100,0),COLOR00FF00;MA5:MA(C,5),COLORCYAN;MA30:=MA(C,30);DD5:=MA5<REF(MA5,1);X:=(3*C+L+O+H)/6;多空线:=(20*X+19*REF(X,1)+18*REF(X,2)+17*REF(X,3)+16*REF(X,4)+15*REF(X,5)+14*REF(X,6)+13*REF(X,7)+12*REF(X,8)+11*REF(X,9)+10*REF(X,10)+9*REF(X,11)+8*R

14、EF(X,12)+7*REF(X,13)+6*REF(X,14)+5*REF(X,15)+4*REF(X,16)+3*REF(X,17)+2*REF(X,18)+REF(X,20)/210,COLORFF00FF,LINETHICK1;DD:=多空线<REF(多空线,1);IF(DD,多空线,DRAWNULL),COLORBLUE,POINTDOT;A:=(MA5>多空线);IF(A,多空线,DRAWNULL),COLORYELLOW,POINTDOT;A1:=(MA5<多空线);V1:=CLOSE*VOL;V2:=EMA(V1,13)/EMA(VOL,13);CYS:=(E

15、MA(CLOSE-V2)/V2,1)*100);AAAA:=CYS;MIDD:=MA(CYS,20);CCCC:=MIDD+0.85*STD(CYS,10);TM6:=AAAA>CCCC;MMM:=AMOUNT/V/100;VARA:=EMA(A-EMA(A,13)/EMA(A,13)*(0-100),5);X1:=EMA(VARA/10)+EMA(A,10),3);Y1:=EMA(A,3);Y2:=(C+0.618*REF(C,1)+0.382*REF(C,2)+0.236*REF(C,3)+0.146*REF(C,4)/2.382;X2:EMA(SLOPE(C,22)*20)+C),

16、55),LINETHICK2,COLORRED;压力:=MA(REF(HHV(C,30),1),2);支撑:=MA(REF(LLV(C,30),1),2);DA:=(EMA(C,1)+EMA(C,2)+EMA(C,3)+EMA(C,4)/4;DB:=(EMA(C,10)+EMA(C,20)+EMA(C,40)+EMA(C,80)/4;DRAWTEXT(60*(40*(EMA(EMA(CLOSE,12)-EMA(CLOSE,26),9)<0 AND COUNT(COUNT(CROSS(EMA(CLOSE,12)-EMA(CLOSE,26),EMA(EMA(CLOSE,12)-EMA(CLO

17、SE,26),9),BARSLAST(EMA(EMA(CLOSE,12)-EMA(CLOSE,26),9)>=0)=2,21)=1) AND SLOPE(MA(C,5),2)>0) AND MA(C,55)>REF(MA(C,55),1) AND REF(MA(C,55),1)<=REF(MA(C,55),2),L*0.95,'买入'),COLOR0080FF;JH:=SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1),5,1)*100;DRAWICON(60*(40*(EMA(EMA(CLOSE,12)-EMA(CLOSE,26),9)<0 AND COUNT(COUNT(CROSS(EMA(CLOSE,12)-EMA(CLOSE,26),EMA(EMA(CLOSE,12)-E