通达信量价趋势2公式源码贴图）

{www.qill.cnVOL换手}
换手:=VOL/CAPITAL*100,POINTDOT COLORMAGENTA;
十换:SUM(换手,10),COLORRED,LINETHICK1,NODRAW;
三十换:SUM(换手,30),COLORGREEN,LINETHICK1,NODRAW;
 {www.qill.cn成交量比%}
AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主买:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL /2));
量比%:主买/VOL*100,COLOR00FFFF,LINETHICK1,NODRAW;
量:=V/CONST(HHV(V,90))*30,LINETHICK0,VOLSTICK;
 {www.qill.cn粉色}
STICKLINE(CLOSE>=OPEN,0,量*1,2.4,0),COLOR880088;
 STICKLINE(CLOSE>=OPEN,0,量*1,1.6,0),COLORAA00AA;
 STICKLINE(CLOSE>=OPEN,0,量*1,0.8,0),COLORCC00CC;
 STICKLINE(CLOSE>=OPEN,0,量*1,0,0),COLORFF00FF;
 {www.qill.cn蓝色}
STICKLINE(CLOSE<=OPEN,0,量*1,2.4,0),COLOREC0000;
 STICKLINE(CLOSE<=OPEN,0,量*1,1.6,0),COLORFF4600;
 STICKLINE(CLOSE<=OPEN,0,量*1,0.8,0),COLORFF6300;
 STICKLINE(CLOSE<=OPEN,0,量*1,0,0),COLORFF8B00;
 {www.qill.cn地量买点}
STICKLINE(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),量<0,-3,1.2,0),COLORGREEN,LINETHICK2;
 DRAWTEXT(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),量<0,'地量'),COLORGREEN,LINETHICK1;
 {www.qill.cn倍量}
倍量:(量/REF(量,1)>=1.91 AND COUNT(C>O,1)) OR (L>REF(H,1) AND COUNT(O>C,1) AND 量/REF(量,1)>=1.91),NODRAW,COLORYELLOW;
 STICKLINE(倍量,0,量,0.0001,0),COLOR00FFFF;
 DRAWTEXT(倍量,量*0.99,'倍'),COLORYELLOW,LINETHICK1;
 {www.qill.cn資金线}
VAR8:=LLV(LOW,21);
 VAR9:=HHV(HIGH,21);
 K:EMA((CLOSE-VAR8)/(VAR9-VAR8)*50,6),COLORRED,LINETHICK2;
 D:EMA(0.667*REF(K,1)+0.333*K,2),COLORGREEN;
 
 DRAWICON(LONGCROSS(D,K,0.1),D,2),COLORRED,LINETHICK1;
 DRAWICON(LONGCROSS(K,D,0.1),K,1),COLORGREEN,LINETHICK1;
 {www.qill.cn用法:一共三根线，红色线上穿绿色线，并且资金柱刚好上穿到趋势线，大胆买进，红色线下穿绿色
 线，趋势线开始下滑，一波比一波矮，资金开始撤离了，大胆卖出，空仓，！简直太神奇了！};
 {www.qill.cn绝顶公式}
VAR1:=(HHV(HIGH,8)-CLOSE)/(HHV(HIGH,8)-LLV(LOW,8))*100-70;
 VAR2:=SMA(VAR1,8,1)+100;
 VAR3:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
 VAR4:=SMA(VAR3,3,1);
 VAR5:=SMA(VAR4,3,1)+100;
 VAR6:=VAR5-VAR2;
绿线:IF(VAR6>100,VAR6-100,0),COLORGREEN,LINETHICK2;{www.qill.cn绿}
红线:IF(REF(绿线,1)<绿线,绿线,REF(绿线,1)),COLORRED,LINETHICK2;{www.qill.cn红}
白线:IF(REF(绿线,1)>绿线,绿线,REF(绿线,1)),COLORWHITE,LINETHICK2;{www.qill.cn白};
2.5,COLOR00FFFF,LINETHICK1;
 DRAWTEXT(ISLASTBAR,28,'强弱'),COLORRED,LINETHICK1;
 25,COLOR00FFFF,LINETHICK1,POINTDOT;
 45,COLORGREEN,LINETHICK1,POINTDOT;