[通达信指标]分享一款支撑压力主图自动画线指标

注意：本指标源码用于通达信、通达信金融终端和通达信期货通。

指标源码

{友情提示，该指标含有未来函数}

C2:=REF(C,1);

ZHANGTING:=IF((C-C2)*100/C2>=(10-0.01*100/C2),1,0);

STICKLINE(ZHANGTING,OPEN,CLOSE,2,0),COLORRED;

STICKLINE(ZHANGTING,H,L,0,0),COLORRED;

DIETING:=IF((C2-C)*100/C2>=(10-0.01*100/C2),1,0);

STICKLINE(DIETING,OPEN,CLOSE,2,0),COLORGREEN;

STICKLINE(DIETING,H,L,0,1),COLORGREEN;

TTS1Z:=(HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21))*100-10;

TTS2Z:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;

TTS3Z:=SMA(TTS2Z,13,8);

TTS4Z:=CEILING(SMA(TTS3Z,13,8));

TTS5Z:=SMA(TTS1Z,21,8);

AABB:=IF(L,CONST(L),DRAWNULL);

STICKLINE(TTS4Z-TTS5Z>75,AABB,AABB*0.99,15,1),COLOR0000FF;

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

TTS1:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36;

TTS2:=(HHV(TTS1,5)+HHV(TTS1,10)+HHV(TTS1,20))/3;

TTS3:=(LLV(TTS1,5)+LLV(TTS1,10)+LLV(TTS1,20))/3;

TTS4:=(HHV(TTS2,5)+HHV(TTS2,10)+HHV(TTS2,20))/3;

TTS5:=(LLV(TTS3,5)+LLV(TTS3,10)+LLV(TTS3,20))/3;

TTS6:=(LLV(TTS1,2)+LLV(TTS1,4)+LLV(TTS1,6))/3;

DRAWBAND(TTS1,RGB(155,50,50),TTS6,RGB(250,250,0));

DUANX:TTS1,COLORWHITE;

ZHONGX:TTS6,COLORYELLOW;

XIADIE:IF(TTS1=TTS6,TTS6,DRAWNULL),COLORGREEN;

TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>TTS1;

LIZHUANGL:=FILTER(TJ1,5);

TJ2:=IF(BARSLAST(LIZHUANGL)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(LIZHUANGL)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(LIZHUANGL)=3 AND CLOSE>REF(HIGH,3),1,0)));

TUPO:=TJ2=1;

STICKLINE(CLOSE,REF(HIGH,BARSLAST(LIZHUANGL)),REF(HIGH,BARSLAST(LIZHUANGL)),1,0),COLORCYAN;

STICKLINE(CLOSE,REF(LOW,BARSLAST(LIZHUANGL)),REF(LOW,BARSLAST(LIZHUANGL)),1,0),COLORYELLOW;

TJ3:=IF(BARSLAST(LIZHUANGL)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(LIZHUANGL)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(LIZHUANGL)=3 AND CLOSE>REF(LOW,3),1,0)));

SANTAIF:=TJ3=1;

CHENGLI:=SANTAIF AND TUPO;

TTCHENGLI:=FILTER(CHENGLI,3);

STICKLINE(C>=O,C,O,3,0),COLOR000045;

STICKLINE(C>=O,C,O,2.5,0),COLOR000065;

STICKLINE(C>=O,C,O,2,0),COLOR000085;

STICKLINE(C>=O,C,O,1.5,0),COLOR0000A5;

STICKLINE(C>=O,C,O,1,0),COLOR0000C5;

STICKLINE(C>=O,C,O,0.5,0),COLOR0000E5;

STICKLINE(C>=O,H,L,0,0),COLOR0000F5;

STICKLINE(C<O,C,O,3,0),COLOR353500;

STICKLINE(C<O,C,O,2.5,0),COLOR454500;

STICKLINE(C<O,C,O,2,0),COLOR555500;

STICKLINE(C<O,C,O,1.5,0),COLOR656500;

STICKLINE(C<O,C,O,1,0),COLOR757500;

STICKLINE(C<O,C,O,0.5,0),COLOR858500;

STICKLINE(C<O,H,L,0,0),COLOR959500;

HIGHN:=10;

LOWN:=10;

HIGHDISPLAY:=0;

LOWDISPLAY:=0;

ZGDISPLAY:=0;

MADISPLAY:=0;

AA:=REF(H,HIGHN)=HHV(H,2*HIGHN+1);

QY:=BACKSET(AA,HIGHN+1);

CC:=FILTER(QY,HIGHN) AND H=HHV(H,HIGHN+1);

DRAWICON(CC,H*1.02,2);

DDD:=BARSLAST(CC);

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

DINGBU:=IF(DDD,REF(H,DDD),H);

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

DINGBU1:=REF(DINGBU,DDD+1);

GDCS1:=CONST(DINGBUTS);

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

GDCS2:=CONST(DINGBUTS1);

DINGBU2:=REF(DINGBU1,DDD+1);

MM:=IF(CURRBARSCOUNT>GDCS2,0,1);

压力:DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1) COLORBLUE,LINETHICK1;

DRAWLINE(CURRBARSCOUNT=GDCS2,H,ISLASTBAR,REF(H,GDCS2-1),1),COLOR0055FF,POINTDOT;

DRAWLINE(CURRBARSCOUNT=GDCS1,H,ISLASTBAR,REF(H,GDCS1-1),1),COLORYELLOW,POINTDOT;

AA1:=REF(L,LOWN)=LLV(L,2*LOWN+1);

QY1:=BACKSET(AA1,LOWN+1);

CC1:=FILTER(QY1,LOWN) AND L=LLV(L,LOWN+1);

DRAWICON(CC1,L*0.98,1);

DD1:=BARSLAST(CC1);

DDTS:=IF(CC1,CURRBARSCOUNT,0);

YDB:=IF(DD1,REF(L,DD1),L);

DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);

DDCS1:=CONST(DDTS1);

ZDB:=REF(YDB,DD1+1);

DDTS2:=REF(DDTS1,DD1+1);

DDCS2:=CONST(DDTS2);

支撑:DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1) COLORRED,LINETHICK1;

ZGSTAR:=(压力+支撑)/2;

ZGEND:=CONST((压力+支撑)/2);

STARDAY:=IF(DDCS2<GDCS2,DDCS2,GDCS2);

DRAWLINE(CURRBARSCOUNT=STARDAY,ZGSTAR,ISLASTBAR,ZGEND,1),COLORFF55BB,LINETHICK1;

DRAWLINE(CURRBARSCOUNT=DDCS1,L,ISLASTBAR,REF(L,DDCS1-1),1),COLORMAGENTA,POINTDOT;

DRAWLINE(CURRBARSCOUNT=DDCS2,L,ISLASTBAR,REF(L,DDCS2-1),1),COLORCYAN,POINTDOT;

TTS7:=0;

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

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

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

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

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

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

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

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

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

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

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

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

QQQ1:=TTS10;

QQQ2:=(TTS11+TTS13+TTS15+TTS17);

QQQ3:=(TTS12+TTS14+TTS16+TTS18);

B:IF(QQQ1>0 OR QQQ2>0,LOW*0.99,DRAWNULL),CROSSDOT,LINETHICK3,COLORYELLOW;

DRAWTEXT(QQQ1>0 OR QQQ2>0,LOW*0.99,’买’),COLORRED;

S:IF(QQQ3>0,HIGH*1.01,DRAWNULL),CROSSDOT,LINETHICK3,COLORGREEN;

DRAWTEXT(QQQ3>0,HIGH*1.02,’卖’),COLORGREEN;

DRAWICON((ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)),LOW*0.98,1) ;

DRAWICON((ZIG(3,5)<REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)>=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)>=REF(ZIG(3,5),3)),HIGH*1.01,2);

ZB:=EMA(EMA(TTS3,5),5)*3, COLORSTICK;

TTSA:=IF(TTS9 AND CROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0);

K:=EMA(TTS7,5)*2, COLORFF00FF;

D:=EMA(K,5), COLORWHITE;

J:=K*3-D*2, COLORYELLOW;

TTSB:=BETWEEN(CLOSE,MA(CLOSE,3),MA(CLOSE,5)) AND J>10;

HS:=VOL/CAPITAL*100, , COLORGREEN;

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

TTSF:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);

DRAWTEXT(TTS11 AND COUNT(TTS11,30)=1,LOW*0.95,’机构进场’),LINETHICK1,COLORFF00FF;

TTS1A:=IF(TTSE>0,TTSE,0);

TTS1B:=IF(TTS14>=200 AND TTS13>=150,15,IF(TTS14<=-200 AND TTS13<=-150,-15,TTS16))+60;

TTS1C:=TTS1A>48 AND TTS1B>60 AND TTS19<100;

DRAWTEXT(TTS1C AND COUNT(TTS1C,30)=1,LOW*0.95,’大顶（底）’) COLORWHITE;

ZHIBWANG:=CROSS(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,3,1),SMA(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,3,1),3,1)) AND SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,3,1)<20;

DRAWTEXT(ZHIBWANG,L,’主力建仓’),COLORYELLOW;

DRAWTEXT(TTS1,L*0.98,’★短买’),COLORYELLOW;

DRAWTEXT(CROSS(MA(C,3),MA(C,9)) AND C>=REF(C,1) AND C>O,L*0.98,”),COLORMAGENTA;

DRAWLINE(HIGH>=HHV(HIGH,10),HIGH,LOW<=LLV(LOW,3),HHV(HIGH,3),1),LINETHICK2;

STICKLINE(CURRBARSCOUNT=2,L,L,10,0),COLORGREEN,;

DRAWNUMBER(ISLASTBAR,REF(L,1),REF(L,1));