通达信难得一见的成交量公式(源码)

通达信难得一见的成交量公式－（源码）周换:SUM(V/CAPITAL*100,5),NODRAW,COLORMAGENTA;预测:IF(CURRBARSCOUNT=1ANDPERIOD=5,VOL*240/FROMOPEN,VOL),NODRAW;STICKLINE(CURRBARSCOUNT=1ANDPERIOD=5,预测,0,-1,-1),COLOR00C0C0;持币:IF(SAR(10,2,20)>=H,SAR(10,2,20),DRAWNULL),CIRCLEDOT,COLORGREEN;持股:IF(SAR(10,2,20)<=L,SAR(10,2,20),DRAWNULL),CIRCLEDOT,COLORMAGENTA;JJ:=(HIGH+LOW+CLOSE)/3;QJ9:=AMOUNT/IF(HIGH=LOW,4,HIGH-LOW);TD1:=QJ9*(MIN(OPEN,CLOSE)-LOW);XD1:=QJ9*(JJ-MIN(CLOSE,OPEN));XD2:=QJ9*(HIGH-MAX(OPEN,CLOSE));TD2:=QJ9*(MAX(CLOSE,OPEN)-JJ);日净:((TD1+XD1)-(TD2+XD2))/10000,NODRAW;周净:SUM(日净,5),NODRAW;QJ0:=(HIGH+LOW+CLOSE)/3;QJ1:=IF(HIGH=LOW,1,HIGH-MAX(OPEN,CLOSE));QJ2:=IF(HIGH=LOW,1,MAX(CLOSE,OPEN)-QJ0);QJ3:=IF(HIGH=LOW,1,MIN(OPEN,CLOSE)-LOW);QJ4:=IF(HIGH=LOW,1,QJ0-MIN(CLOSE,OPEN));QJ5:=VOL/(IF(HIGH=LOW,4,HIGH-LOW));特大:QJ4*QJ5,NODRAW;大单:QJ3*QJ5,NODRAW;中单:QJ1*QJ5,NODRAW;小单:QJ2*QJ5,NODRAW;AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));买量:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),LINETHICK0;卖量:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2)),LINETHICK0,COLORCYAN;主力净流入:MA(买量+卖量/2,3)*AMO/V/100000000,COLORYELLOW,LINETHICK1;量〗:VOL,NODRAW,VOLSTICK;STICKLINE(V>=3*REF(V,1),V/3,V/3,3.9,0),COLORGREEN;STICKLINE(V>=2*REF(V,1),V/2,V/2,3.9,0),COLORYELLOW;DRAWLINE(V>=HHV(V,30),V,V<=LLV(V,10),HHV(V,6),1),COLORFFCCCC;VAR7:=(HIGH-LOW);VAR8:=ABS((OPEN-CLOSE));VAR9:=(HIGH-IF((CLOSE>OPEN),CLOSE,OPEN));VAR10:=(IF((CLOSE>OPEN),OPEN,CLOSE)-LOW);VAR11:=((VAR8/VAR7)*VOL);VAR12:=((VAR9/VAR7)*VOL);VAR13:=((VAR10/VAR7)*VOL);VAR14:=IF(((VOL/CAPITAL)>0.001),1,EXP(ABS(LOG(((VOL/CAPITAL)*100)))));VARA:=(((CLOSE-MA(CLOSE,5))/MA(CLOSE,5))*100);VARB:=(((MA(CLOSE,5)>MA(CLOSE,10))AND(MA(CLOSE,10)>MA(CLOSE,30)))AND(MA(CLOSE,30)>MA(CLOSE,60)));VARC:=((MA(CLOSE,5)<MA(CLOSE,10))AND(MA(CLOSE,10)<MA(CLOSE,30)));VARD:=REF(CLOSE,1);DRAWTEXT(((VAR14>2)AND(VOL<(MA(VOL,5)/2))),V-15000,''),COLORFB2DFB;DRAWTEXT(((VAR14>2)AND(VOL<(MA(VOL,5)/2))),V+59000,'地'),COLORFB2DFB;换手率:=((VOL/CAPITAL)*100);DRAWTEXT((((VOL/REF((SUM(VOL,5)/5),1))>=2)AND(换手率>1)),(V+55000),'变'),COLORFFFFCC;量:=IF((CLOSE>200),(VOL/1000000),(VOL/100)),LINETHICK0;振幅:=(((HIGH-LOW)/LOW)*100);DRAWTEXT(VAR12>VAR11ANDVARA>2ANDVAR12>VAR13ANDCLOSE>MA(CLOSE,5)ANDCLOSE>MA(CLOSE,30)ANDHIGH>MA(CLOSE,60)ANDVOL>MA(VOL,5)ANDVAR12>=MA(VOL,5),V+5000,'高'),COLORGREEN;DRAWTEXT(VAR13>VAR11ANDVAR13>VAR12ANDVARA<-2ANDCLOSE<MA(CLOSE,30)ANDVAR13<MA(VOL,5)/2ANDMA(VOL,5)<MA(VOL,10),V+5000,'低'),COLORYELLOW;LC1:=REF(CLOSE,1);RSI1:=SMA(MAX(CLOSE-LC1,0),6,1)/SMA(ABS(CLOSE-LC1),6,1)*100;抓大牛:CROSS(RSI1,11);DRAWTEXT(抓大牛,V+55000,'抓'),COLORRED;EMA13:=EMA(C,13),COLORFF8080;DRAWTEXT(CROSS(HIGH,EMA13),V+5000,'底'),COLORYELLOW;A01:=DYNAINFO(7);A03:=BARSCOUNT(CLOSE);A04:=(SMA((CLOSE/HHV(HIGH,120)),3,1)*100);A05:=IF((A03>20),A04,0);A06:=IF((LOW>A01),0,IF((HIGH<A01),1,(((A01-LOW)+0.009)/((HIGH-LOW)+0.009))));A07:=DMA(A06,(VOL/CAPITAL))*60;A09:=IF((((A07>0)AND(A07>REF(A07,1)))AND(A05<=88)),A07,0);VAR1:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);VAR2:=EMA(VAR1,8);VAR3:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);趋势:=EMA(VAR3,3)-10;STICKLINE((A09>0)AND趋势<40,0,V/6,2,0),COLORMAGENTA;粉色机构建仓区:0,LINETHICK0,COLORMAGENTA;A011:=DYNAINFO(5);A013:=BARSCOUNT(HIGH);A014:=(SMA((HIGH/HHV(CLOSE,120)),3,1)*100);A015:=IF((A013>20),A014,0);A016:=IF((HIGH<A011),0,IF((LOW>A011),1,(((A011-HIGH)+0.009)/((LOW-HIGH)+0.009))));A017:=DMA(A016,(VOL/CAPITAL))*60;A019:=IF((((A017>0)AND(A017>REF(A017,1)))AND(A015>=88)),A017,0);VAR21:=3*SMA((CLOSE-HHV(HIGH,27))/(LLV(LOW,27)-HHV(HIGH,27))*100,5,1)-2*SMA(SMA((HIGH-HHV(HIGH,27))/(LLV(LOW,27)-HHV(HIGH,27))*100,5,1),3,1);VAR22:=EMA(VAR21,8);VAR23:=3*SMA((HIGH-HHV(HIGH,55))/(LLV(LOW,55)-HHV(HIGH,55))*100,5,1)-2*SMA(SMA((HIGH-HHV(HIGH,55))/(LLV(LOW,55)-HHV(HIGH,55))*100,5,1),3,1);趋势1:=EMA(VAR23,3)-10;STICKLINE((A019>0AND(趋势1<20OR趋势1>REF(趋势1,1)AND趋势1<50)),0,V/5,2,0),COLORGREEN;绿色机构出仓区:0,LINETHICK0,COLORGREEN;AB:DRAWLINE(V>=HHV(V,10),V,V<=LLV(V,3),HHV(V,3),1),COLORYELLOW;DRAWTEXT(CROSS(C,AB),C+5000,'B'),COLORYELLOW;{DRAWICON(CROSS(C,AB),L*0.98,7);};五日:MA(V,5)COLORFFFFFFLINETHICK2;三十四日:MA(V,34)COLORFF80FFLINETHICK2;一百四十四日:MA(V,144)COLOR00FFFFLINETHICK1;底部区域:=MA(IF(L<=LLV(L,15),MA(C,20),0),3)/200,VOLSTICK;入货点:=IF(REF(底部区域,1)>0ANDREF(C,1)<=REF(O,1)AND底部区域>0ANDC>O,1,0);DRAWICON(入货点=1,底部区域*1.2,1),COLORBLUE;DRAWTEXT(CROSS(0.9,1/VOL*1000>0.01AND"KDJ.J"<0),V,'☆地');