%>
{参数: M 缺省0.7 最小0.3 最大 0.9 ; N 缺省3.3 最小3.1 最大3.6}
VOL=AMOUNT;
VOL=AMOUNT;
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
VAR2:=DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT;
{IF(DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT,VAR1,VAR3),COLORGREEN;}
主买盘:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH- OPEN)+(CLOSE-LOW)),VOL/2));
主卖盘:=IF(CLOSE>OPEN,VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE< OPEN,VAR1*(HIGH-LOW),VOL/2));
STICKLINE(主买盘>0,0,主买盘,1,0),COLORRED;
STICKLINE(主卖盘<0,VOL,主买盘,1,0),COLOR00FF00;
换手:=VOL/CAPITAL*100;
STICKLINE(换手>0 ,0, 主买盘,0,0),COLORYELLOW;
STICKLINE(换手>0,VOL, 主买盘, 0,0) ,COLORRED;
bb:=(主买盘+主卖盘);
STICKLINE(资金进>资金出,资金进,资金出,6,0),colorred;
STICKLINE(资金进<资金出,资金出,资金进,6,0),colorgreen;
STICKLINE(资金进>资金出,资金进,资金出,6,0),colorred;
STICKLINE(资金进<资金出,资金出,资金进,6,0),colorgreen;
AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
STICKLINE(主买>0,0,主买,6,0 ),Color6666cc;
STICKLINE(主买>0,0,主买,5,0 ),COLOR7777dd;
STICKLINE(主买>0,0,主买,6.4 ,0 ),COLOR8888ee;
STICKLINE(主买>0,0,主买,4.1 ,0 ),COLOR9999ff;
STICKLINE( 主卖>0,0 ,主卖,6,0 ),COLORaaaaaa;
STICKLINE(主卖>0 ,0 ,主卖,5,0 ),Colorbbbbbb;
STICKLINE(主卖>0 ,0 ,主卖,6.4,0 ),Colorcccccc;
STICKLINE(主卖>0 ,0 ,主卖,6.1,0 ),ColorFF8800;
WJ:=(HIGH+LOW+CLOSE)/3;
VD1:=IF(HIGH=LOW,1,HIGH-MAX(OPEN,CLOSE));
VD2:=IF(HIGH=LOW,1,MAX(CLOSE,OPEN)-WJ);
VD3:=IF(HIGH=LOW,1,MIN(OPEN,CLOSE)-LOW);
VD4:=IF(HIGH=LOW,1,WJ-MIN(CLOSE,OPEN));
VD5:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
VD6:=(VD1*VD5);
VD7:=(VD2*VD5);
VD8:=(VD3*VD5);
VD9:=(VD4*VD5);
买入量:=(VD9+VD8);
卖出量:=(VD6+VD7);
买入资金:=买入量*CLOSE/100;
卖出资金:=卖出量*CLOSE/100;
资金进出:=买入资金-卖出资金;
买卖资金比:=买入资金/卖出资金;
DRAWTEXTEX(CLOSE,1,250,100,' ┃买入资金累计万元: '+NUMTOSTR(买入资金,2))Colorred,LINETHICK1;
DRAWTEXTEX(CLOSE,1,250,200,' ┃卖出资金累计万元: '+NUMTOSTR(卖出资金,2))Color00ff00,LINETHICK1;
DRAWTEXTEX(CLOSE,1,250,300,' ┃资金进出万元: '+NUMTOSTR(资金进出,2))Coloryellow,LINETHICK1;
{股票教程网-http://bkqg.net承接通达信软件和公式破解,普通加密破解,完全加密破解,导入密码破解,时间限制破解,公式编写,可按您的要求写公式指标,价格按难度不同报价,有需要可以找我们}