资金监测里的做主线上穿离合定位线）写个选股公式_炒股教程

求（资金监测里的做主线上穿离合定位线）写个选股公式 通达信版本

图中的粉红黄线为做主线，蓝白线为离合定位线，粉红黄线上穿了蓝白线写个选股，谢谢！！！！不胜感激。。。。(6月8日早上5点的时候网络好象有问题啊，点了发不出去，重发了几次一看吓到了发了那么多，在这里向斑竹们表示抱歉。。。。。）
公式如下：
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主动买盘:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
主动卖盘:=IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-VOL/2));
空:=(EMA(CLOSE,9)-EMA(CLOSE,2))/2*800000;
多:=(EMA(CLOSE,2)-EMA(CLOSE,9))/2*800000;
STICKLINE(C<O ,0,VOL,3.2,0),COLORFF1100;
STICKLINE(C<O ,0,VOL,2.7,0),COLORFF3300;
STICKLINE(C<O ,0,VOL,2.1,0),COLORFF5500;
STICKLINE(C<O ,0,VOL,1.5,0),COLORFF7700;
STICKLINE(C<O ,0,VOL,0.9,0),COLORFF9900;
STICKLINE(C<O ,0,VOL,0.3,0),COLORFFBB00;
STICKLINE(C=O AND C<REF(C,1),0,VOL,3.2,0),COLOR006000;
STICKLINE(C=O AND C<REF(C,1),0,VOL,2.7,0),COLOR007500;
STICKLINE(C=O AND C<REF(C,1),0,VOL,2.1,0),COLOR009100;
STICKLINE(C=O AND C<REF(C,1),0,VOL,1.5,0),COLOR00A600;
STICKLINE(C=O AND C<REF(C,1),0,VOL,0.9,0),COLOR00BB00;
STICKLINE(C=O AND C<REF(C,1),0,VOL,0.3,0),COLOR00CC00;
STICKLINE(C=O AND C>REF(C,1),0,VOL,3.2,0),COLOR555555;
STICKLINE(C=O AND C>REF(C,1),0,VOL,2.7,0),COLOR777777;
STICKLINE(C=O AND C>REF(C,1),0,VOL,2.1,0),COLOR999999;
STICKLINE(C=O AND C>REF(C,1),0,VOL,1.5,0),COLORBBBBBB;
STICKLINE(C=O AND C>REF(C,1),0,VOL,0.9,0),COLORDDDDDD;
STICKLINE(C=O AND C>REF(C,1),0,VOL,0.3,0),COLORFFFFFF;
STICKLINE(C>O,0,VOL,3.2,0),COLORFF11FF;
STICKLINE(C>O,0,VOL,2.7,0),COLORFF33FF;
STICKLINE(C>O,0,VOL,2.1,0),COLORFF55FF;
STICKLINE(C>O,0,VOL,1.5,0),COLORFF77FF;
STICKLINE(C>O,0,VOL,0.9,0),COLORFF99FF;
STICKLINE(C>O,0,VOL,0.3,0),COLORFFBBFF;
STICKLINE(主动买盘>0,0,主动买盘,3.2,0),COLOR000055;
STICKLINE(主动买盘>0,0,主动买盘,2.7,0),COLOR000077;
STICKLINE(主动买盘>0,0,主动买盘,2.1,0),COLOR000099;
STICKLINE(主动买盘>0,0,主动买盘,1.5,0),COLOR0000BB;
STICKLINE(主动买盘>0,0,主动买盘,0.9,0),COLOR0000DD;
STICKLINE(主动买盘>0,0,主动买盘,0.3,0),COLOR0000FF;
STICKLINE(主动卖盘<0,0,主动卖盘,3.2,0),COLOR006000;
STICKLINE(主动卖盘<0,0,主动卖盘,2.7,0),COLOR007500;
STICKLINE(主动卖盘<0,0,主动卖盘,2.1,0),COLOR009100;
STICKLINE(主动卖盘<0,0,主动卖盘,1.5,0),COLOR00A600;
STICKLINE(主动卖盘<0,0,主动卖盘,0.9,0),COLOR00BB00;
STICKLINE(主动卖盘<0,0,主动卖盘,0.3,0),COLOR00CC00;
VAR1A:=(CLOSE*2.5+HIGH+LOW)/4*600000;
VAR1D:=(CLOSE*2.5+HIGH+LOW)/4*800000;
离合:EMA(VAR1D,5)-EMA(VAR1D,13),COLORFFFFFF,LINETHICK2;
定位:1.1*EMA(EMA(VAR1D,5)-EMA(VAR1D,13),2),COLORFF5600,LINETHICK2;
做主:(多-空),COLOR00FFFF,LINETHICK3;
IF(做主<REF(做主,1),做主,DRAWNULL),COLORFFFF00,LINETHICK5;
IF(做主>REF(做主,1),做主,DRAWNULL),COLORFF00FF,LINETHICK4;
XJ:=VOL / ((H - L) * 2.5 - ABS(C - O));
XL:=IF(C > O,XJ * (H - L),IF(C < O,XJ * (H - O + (C - L)),VOL / 2)) + IF(C > O,0 - XJ * (H - C + (O - L)),IF(C < O,0 - XJ * (H - L),0 - VOL / 2));
HSL:=XL / 20 / 1.15;
STICKLINE(HSL *4 >= 0,HSL *4 *17,0,0.3,1),COLORYELLOW;
STICKLINE(HSL *4 < 0,HSL *4 *17,0,0.3,1),COLORWHITE;

 

解答如下：

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

主动买盘:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));

主动卖盘:=IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-VOL/2));

空:=(EMA(CLOSE,9)-EMA(CLOSE,2))/2*800000;

多:=(EMA(CLOSE,2)-EMA(CLOSE,9))/2*800000;

VAR1A:=(CLOSE*2.5+HIGH+LOW)/4*600000;

VAR1D:=(CLOSE*2.5+HIGH+LOW)/4*800000;

离合:=EMA(VAR1D,5)-EMA(VAR1D,13),COLORFFFFFF,LINETHICK2;

定位:=1.1*EMA(EMA(VAR1D,5)-EMA(VAR1D,13),2),COLORFF5600,LINETHICK2;

做主:=(多-空),COLOR00FFFF,LINETHICK3;

xg:cross(做主,离合) or cross(做主,定位) ;