非常強大的分時主圖指標分享:
20221020:對此進行了修改,另外這個指標應該是大智慧的,不是通達信的~
{hs;ls;hhs;lls;us;ds;s1;p1;p0;upp;udd};
d1:=ema(abs("ddx.ddx"),60);
d2:=min("ddx.ddx"/d1,10);
能量級別:d2,linethick0;
N:=4;
時長:=if(HOUR>=10 AND HOUR<15 ,1,0);{10點至 15點}
均線:=IF(BETWEEN(C/(SUM(AMOUNT,0)/SUM(VOL*100,0)),1.05,0.95)=0,MA(C,0),(SUM(AMOUNT,0)/SUM(VOL*100,0)));
均線H:(均線*1.007 ),COLORFF6600,LINETHICK0,LAYER0;
均線L:(均線/1.005 ),COLOR00FF00,LINETHICK0;
均線橫盤:=C<均線H and C>均線L;
量比:=sum(vol,0)*240/dynainfo(38)/barscount(c);
量比5分鐘:=sum(量比,5);
量比10:=sum(量比,10);
上個5分鐘量比:=量比10-量比5分鐘;
放量:=sum(VOL,6)>REF(ma(VOL,30),1)*10;
CC:CLOSE,COLORWHITE,LINETHICK2;
partline(CC,CC>=ref(CC,1),rgb(255,151,255),CC<ref(CC,1),rgb(0,255,255)),linethick2,LAYER0;
橫盤:=((HHV(CLOSE,BARSCOUNT(CLOSE))-LLV(CLOSE,BARSCOUNT(CLOSE)))/CLOSE)<1;
橫漲:=橫盤 AND 放量 AND (C>均線H);
橫跌:=橫盤 AND 放量 AND CROSS(均線L,C) ;
突破:=FILTER(橫漲,100);
下破:=FILTER(橫跌,50);
DRAWTEXT(突破,均線H,'★突破'),COLORFF00FF;
MA30:=EMA(CLOSE,30);
強弱界定:EMA(CLOSE,900);
STICKLINE((MA30>強弱界定),MA30,強弱界定,1,0),COLOR0000FF;
STICKLINE((MA30<強弱界定),MA30,強弱界定,1,0),COLOR00FF00;
DRAWICON(CROSS(MA30,強弱界定),H,7);
H1:=MAX(DYNAINFO(3),DYNAINFO(5));
L1:=MIN(DYNAINFO(3),DYNAINFO(6));
P1:=H1-L1;
阻力:L1+P1*7/8,dotline,COLOR00DD00;
支撐:L1+P1*0.5/8,dotline,COLOR00DD00;
VERTLINE(突破,3),COLORFF00FF,LINETHICK2;
JX:IF(BETWEEN(C/(SUM(AMOUNT,0)/SUM(VOL*100,0)),1.05,0.95)=0,MA(C,0),(SUM(AMOUNT,0)/SUM(VOL*100,0))),COLORYELLOW;
{疊加大盤線}
TC:=STRCMP(STRLEFT(MARKETLABEL,2),'SZ');
DPSH:="SH000001$CLOSE"/HHV(STKINDI('SH000001','分超引用.昨收#DAY'),0);
DPSZ:="SZ399001$CLOSE"/HHV(STKINDI('SZ399001','分超引用.昨收#DAY'),0);
DPC:=IF(INBLOCK('A股板塊'),DYNAINFO(3)*IF(TC=0,DPSZ,DPSH),C);
POLYLINE(C>0,DPC),COLOR3399ff,LINETHICK1,LAYER0;
流通盤大小:=FINANCE2(37)/1000000*100;
DRAWTEXTABS(280,220,'流通盤大小:'+NUMTOSTRN(流通盤大小,2)+'億'),LINETHICK1,ColorYELLOW;
A1:=DYNAINFO(23) / DYNAINFO(22);
A2:=DYNAINFO(17);
DRAWTEXTREL(400,500,IFS((A1 >= 1),'能量:'+NUMTOSTRN(A1,2)+' 量比: '+NUMTOSTRN(A2,2),'')),linethick4,colorWhite;
DRAWTEXTREL(400,500,IFS((A1 < 1),'能量:'+NUMTOSTRN(A1,2)+' 量比: '+NUMTOSTRN(A2,2),'')),linethick4,colorWhite;
VAR1:=EMA(EMA(C,13),13);
控盤:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
無莊控盤:=控盤<0;
有莊控盤:=控盤>REF(控盤,1) AND 控盤>0;
VAR2:=100*WINNER(C*0.95);
主力出貨:=控盤<REF(控盤,1) AND 控盤>0;
高度控盤:= VAR2>50 AND COST(85)<C AND 控盤>0;
A10:=CROSS(控盤,0);
控盤B:=FILTER(IF(A10,1,0),5);
JJ:=DYNAINFO(11);
P:=55;S:=8;M1:=3;
能量:=(EMA(C,S)-EMA(C,P))*10;
空頭:=EMA(能量,M1);
BTJ1:=(C-JJ)/JJ<-0.005;
BTJ11:=(C-JJ)/JJ<-0.03;
BTJ12:=ref(LAST(JJ>=REF(JJ,1)),1)>=4 AND (C-JJ)/JJ<0.005;
STJ1:=(C-JJ)/JJ>0.005;
STJ01:=控盤<REF(控盤,1) AND 控盤>0.5;
STJ02:=控盤>0;
BTJ2:=控盤>REF(控盤,1) AND 控盤<-0.2;
BTJ22:=控盤>REF(控盤,1) AND 控盤<0 ;
a25:=HHVBARS(CLOSE,60);
突破1:FILTER(((CROSS(CLOSE,((REF(REF(CLOSE,a25),1))*1.001)))AND(REF((a25>= 5),1))),10),POINTDOT,linethick0;
STICKLINE(突破1,(CLOSE*0.99),CLOSE,5,0),ColorF600A9;{程序化指標 WWW.HONGHAIE.COM}
DRAWTEXT((((SUM((突破1>0),0))=1)AND 突破1),(CLOSE*0.99),'最佳買點'),colorWhite;
DRAWTEXT((((SUM((突破1>0),0))=2)AND 突破1),(CLOSE*0.99),'次佳買點'),colorWhite;
DRAWTEXT((((SUM((突破1> 0),0))>=5) AND 突破1),(CLOSE * 0.99),'突破'),colorWhite;
通達信測試不過去啊
試試大智慧,這個好像不是通達信的~要是大智慧也不行。。那就涼了
COLORFF6600未知
這只是一個顏色,你試試紅色:ColorFF0000,或者 綠色: Color00FF00,網上有些通達信顏色的,都可以試試