{大单监控}
笔均量:=(SUM(VOL,0) / BARSCOUNT(CLOSE));
第一笔买单:=REF(IF(BUYVOL,VOL,0),(BARPOS - 1));
第一笔卖单:=REF(IF(SELLVOL,VOL,0),(BARPOS - 1));
买盘:=IF(((CLOSE > REF(CLOSE,1)) AND (VOL >= 笔均量)),VOL,0);
卖盘:=IF(((CLOSE < REF(CLOSE,1)) AND (VOL >= 笔均量)),VOL,0);
主价能:(SUM((买盘 - 卖盘),0) * CLOSE),color0000FF;
A量比:(主价能 / SUM(VOL,0)),LINETHICK0,color0000FF;
AA:=IF((CLOSE > REF(CLOSE,1)),VOL,0);
BB:=IF((CLOSE < REF(CLOSE,1)),VOL,0);
价能:SUM((AA - BB),0),color00FFFF;
WB:=BARSLAST((CLOSE < REF(CLOSE,1)));
WZ:=BARSLAST((CLOSE > REF(CLOSE,1)));
BW:=HHV(((BARSSINCE((WB = 0)) = 0) * BARPOS),0);
ZW:=HHV(((BARSSINCE((WZ = 0)) = 0) * BARPOS),0);
MX:=(BARPOS < MAX(BW,ZW));
MI:=(BARPOS >= MIN(ZW,BW));
JK:=(DYNAINFO(4) >= DYNAINFO(3));
QH:=(BW > ZW);
KV:=SUM(IF((MX AND MI),VOL,0),0);
UV:=SUM(IF((MI = 0),VOL,0),0);
ZD:=((SUM(((WZ < WB) * VOL),0) + (QH * KV)) + (JK * UV));
BD:=((SUM(((WZ > WB) * VOL),0) + ((QH = 0) * KV)) + ((JK = 0) * UV));
主动:=IF(MX,((QH * KV) + (JK * UV)),ZD);
被动:=IF(MX,(((QH = 0) * KV) + ((JK = 0) * UV)),BD);
量能:(主动 - 被动),colorFFFFFF;
VAR1:=IF(((BUYVOL <= REF(ASKVOL(1),1)) AND (CLOSE = REF(ASKPRICE(1),1))),BUYVOL,0);
VAR2:=IF(((BUYVOL <= (REF(ASKVOL(1),1) + REF(ASKVOL(2),1))) AND (CLOSE = REF(ASKPRICE(2),1))),BUYVOL,0);
VAR3:=IF(((BUYVOL <= ((REF(ASKVOL(1),1) + REF(ASKVOL(2),1)) + REF(ASKVOL(3),1))) AND (CLOSE = REF(ASKPRICE(3),1))),BUYVOL,0);
VAR4:=IF((((CLOSE < REF(ASKPRICE(1),1)) AND (REF(BIDVOL(1),1) > 0)) AND (REF(ASKVOL(1),1) > 0)),BUYVOL,0);
VAR5:=IF((((BUYVOL > REF(ASKVOL(1),1)) AND (CLOSE >= REF(ASKPRICE(1),1))) AND (CLOSE <= REF(ASKPRICE(2),1))),BUYVOL,0);
VAR6:=IF((((BUYVOL > (REF(ASKVOL(1),1) + REF(ASKVOL(2),1))) AND (CLOSE >= REF(ASKPRICE(2),1))) AND (CLOSE <= REF(ASKPRICE(3),1))),BUYVOL,0);
VAR7:=IF(((SELLVOL <= REF(BIDVOL(1),1)) AND (CLOSE = REF(BIDPRICE(1),1))),SELLVOL,0);
VAR8:=IF(((SELLVOL <= (REF(BIDVOL(1),1) + REF(BIDVOL(2),1))) AND (CLOSE = REF(BIDPRICE(2),1))),SELLVOL,0);
VAR9:=IF(((SELLVOL <= ((REF(BIDVOL(1),1) + REF(BIDVOL(2),1)) + REF(BIDVOL(3),1))) AND (CLOSE = REF(BIDPRICE(3),1))),SELLVOL,0);
VARA:=IF((((CLOSE > REF(BIDPRICE(1),1)) AND (REF(ASKVOL(1),1) > 0)) AND (REF(BIDVOL(1),1) > 0)),SELLVOL,0);
VARB:=IF((((SELLVOL > REF(BIDVOL(1),1)) AND (CLOSE <= REF(BIDPRICE(1),1))) AND (CLOSE >= REF(BIDPRICE(2),1))),SELLVOL,0);
VARC:=IF((((SELLVOL > (REF(BIDVOL(1),1) + REF(BIDVOL(2),1))) AND (CLOSE <= REF(BIDPRICE(2),1))) AND (CLOSE >= REF(BIDPRICE(3),1))),SELLVOL,0);
VARD:=IF(((((REF(ASKVOL(1),1) + REF(ASKVOL(2),1)) + REF(ASKVOL(3),1)) = 0) AND (REF(BIDVOL(1),1) > 0)),BUYVOL,0);
VARE:=IF(((((REF(BIDVOL(1),1) + REF(BIDVOL(2),1)) + REF(BIDVOL(3),1)) = 0) AND (REF(ASKVOL(1),1) > 0)),SELLVOL,0);
主动买:=SUM((((VAR1 + VAR2) + VAR3) + VARD),0);
对敲买:=SUM(((VAR4 + VAR5) + VAR6),0);
主动卖:=SUM((((VAR7 + VAR8) + VAR9) + VARE),0);
对敲卖:=SUM(((VARA + VARB) + VARC),0);
涨跌停:=SUM((VARD + VARE),0);
主力买:=SUM(IF((AMOUNT >= 100000),((VAR1 + VAR2) + VAR3),0),0);
主力卖:=SUM(IF((AMOUNT >= 100000),((VAR7 + VAR8) + VAR9),0),0);
对敲:(对敲买 + 对敲卖),LINETHICK0,colorFF0000;
D量比:((对敲 / SUM(VOL,0)) * 100),LINETHICK0,colorFF0000;
对冲:(对敲买 - 对敲卖),color00FF00;
E量比:((对冲 / SUM(VOL,0)) * 100),LINETHICK0,color00FF00;
零轴:0,colorFFFFFF;
{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
