博士成交量通达信公式 副图 源码附图

VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); 

主买

:IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORRED

,POINTDOT; 

主卖

:IF(CLOSE>OPEN,VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,VAR1*(HIGH-LOW),VOL/2)),COLORFFFF54

,POINTDOT; 

STICKLINE(主买>0,0,主买,2,0),COLORRED; 

{STICKLINE(主卖>0,主买,VOL,2,1),COLOR00FF80;} 

STICKLINE(主买<REF(主买,1)AND 主买>0,0,主买,2,0),COLOR00FFFF; 

换手:VOL/CAPITAL*100,POINTDOT; 

十日换手:SUM(换手,10); 

成交额（千万）:AMOUNT/10000000,POINTDOT; 

流通盘（亿）:CAPITAL/1000000,POINTDOT; 

流通市值（亿）:(CAPITAL/100*C)/10000,POINTDOT,COLOR33CCFF;

 

原理解析：
VAR1赋值:成交量/((最高价-最低价)*2-收盘价-开盘价的绝对值)
 
主买
:IF(收盘价>开盘价,VAR1*(最高价-最低价),IF(收盘价<开盘价,VAR1*((最高价-开盘价)+(收盘价-最低价)),成交量/2)),画红色 ,POINTDOT
 
主卖
:IF(收盘价>开盘价,VAR1*((最高价-收盘价)+(开盘价-最低价)),IF(收盘价<开盘价,VAR1*(最高价-最低价),成交量/2)),COLORFFFF54 ,POINTDOT
当满足条件主买>0时,在0和主买之间画柱状线
当满足条件主卖>0时,在主买和成交量之间画柱状线
} 
STICKLINE(主买<1日前的主买AND 主买>0,0,主买,2,0),COLOR00FFFF
 
输出换手:成交量/当前流通股本*100,POINTDOT
 
十日输出换手:10的换手日累和
 
输出成交额（千万）:成交额/10000000,POINTDOT
 
输出流通盘（亿）:当前流通股本/1000000,POINTDOT
 
输出流通市值（亿）:(当前流通股本/100*C)/10000,POINTDOT,COLOR33CCFF