通达信L12虚V量公式(可安装,5.82版本)
{M10=35;
M30=135;
JL5=5;}
拟量(万手):IF(CURRBARSCOUNT=1 AND PERIOD=5,
VOL*240/FROMOPEN,DRAWNULL)/10000,NODRAW,COLORFFFFFF;
总量:VOL/10000,NODRAW,VOLSTICK,COLOREEEEEE;
{L2量}
{流通(亿手):=CAPITAL/1000000,NODRAW,COLORRED;
股净资:=FINANCE(34),NODRAW,COLORGREEN;
投资益:=FINANCE(24)/10000,NODRAW,COLORWHITE;
年益:FINANCE(33),NODRAW,COLORCYAN;
股东权益:=FINANCE(36),NODRAW,COLORMAGENTA;
股公积:FINANCE(18)/1,NODRAW,COLORGREEN;}
额(亿):=AMOUNT/100000000,NODRAW,COLORWHITE;
昨收:=REF(CLOSE,1),NODRAW,COLORGREEN;
L2买量:LARGEINTRDVOL/10000,COLOR3232FF,NODRAW;
L2卖量:LARGEOUTTRDVOL/10000,COLOR328800,NODRAW;
L2总量:L2买量+L2卖量,COLOREEEEEE,NODRAW;
L2净流:L2买量-L2卖量,COLOR00C0C0,NODRAW;{L2净流量}
⑤L2净流:SUM(L2净流,JL5),NODRAW,COLOR00C0C0{COLORFF9900};
⑩L2净流:=SUM(L2净流,10),NODRAW,COLORWHITE;
{虚实VOL}
拟换:=拟量(万手)/CAPITAL/10000*100,COLOR5657FF,NODRAW;{引用未来函数}
日换%:VOL/CAPITAL*100,NODRAW,COLORFF8889;
十换%:SUM(日换%,10),NODRAW,COLORFF8889;
{极品VOL}
L2倍量:IF(CURRBARSCOUNT=1,L2总量/FROMOPEN/REF(L2总量,1),
L2总量/REF(L2总量,1)),NODRAW,COLORYELLOW;{黄色}
{锋量:=(V>锋21/0.382),NODRAW,COLOR00C4C4;}
地量:VOL<=LLV(VOL,35)*1.001,NODRAW,COLOR8484FF; {橙色地量}
{涨跌停}
C3:=REF(C,1);
涨停:=IF((C-C3)*100/C3>=(10-0.01*100/C3),1,0);
跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);
{顶底背离}
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
顶背离:=CROSS(88,RSI);
底背离:=CROSS(FF,MA15);
{VOL}
总量柱:总量,VOLSTICK;
{虚拟成交量}
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,拟量(万手),0,3,-1),COLORFFFFFF;
STICKLINE(L2买量>L2卖量,0,L2总量,2.4,0),COLOR3232FF;
STICKLINE(L2买量<L2卖量,0,L2总量,2.4,0),COLOR328800;
STICKLINE(L2买量<L2卖量,0,L2买量,2.4,0),COLOR3232FF;
STICKLINE(L2买量>L2卖量,0,L2卖量,2.4,0),COLOR328800;
大值:=MAX(L2总量,总量);
L2买卖小值:=MIN(L2买量,L2卖量);
{换手>10}
STICKLINE(拟换>10 AND 拟换>REF(日换%,1)
||日换%>=10 && 日换%>REF(日换%,1),大值*0.88,大值*0.995,3.0,0),COLORFF8889;
{量比}
STICKLINE(L2净流>=REF(L2净流,1)*2 && L2净流>0.5 && L2倍量>2 || L2净流>=REF(L2净流,1)*4 && L2净流>0 && L2倍量>2 && L2净流>0.5
||拟量(万手)>=REF(总量,1)*1.9{ && 净流>0} ,
L2买卖小值{L2净流*1.1},大值*0.88,1.2,0),COLORYELLOW;{黄色,倍量};
STICKLINE(地量 ,0,大值,1.2,0),COLOR8484FF; {橙色地量};
绝对L2净流:=ABS(L2净流);
STICKLINE(顶背离,大值*0.88,大值,0.8,0), COLOR18AF00; ; {深绿}
STICKLINE(底背离 ,0,绝对L2净流/2,0.8,0),COLOR00FF00; {绿色}
STICKLINE(涨停,大值*0.5,大值,0.4,0),COLORRED; {红色}
STICKLINE(跌停,大值*0.5,0,0.4,0),COLOR000000; {黑色};
五均:MA(总量,5),COLORFF98FF,LINETHICK1;
十均:MA(总量,M10),COLORFF9900,LINETHICK1;
卅均:MA(总量,M30),COLORYELLOW,LINETHICK1;
{大值1:=MAX(五均*1.08,十均*1.08);
大值2:=MAX(卅均*1.08,VOL*1.08);
大值3:=MAX(大值1,大值2);}
{河图}
锋芒:IF(BARSCOUNT(C)>=21,EMA(总量,21),DRAWNULL),COLORGRAY,LINETHICK2;
{涨跌回调}
{N短 8 N长 16}
{短Z趋:=ZIG(3,5)NODRAW,COLORYELLOW,LINETHICK2;
短Z趋1:IF(ZIG(3,5),五均,DRAWNULL),COLOR0000FF,LINETHICK1;
短Z趋2:IF(短Z趋<=REF(短Z趋,1),五均,DRAWNULL)LINETHICK1,COLORGREEN;}
{未来顶底}
顶:=PEAKBARS(3,15,1)=1;
未来底:=TROUGHBARS(3,15,1)=0;
参考顶:DRAWICON(顶>REF(顶,1),大值,2);
参考底:DRAWICON(未来底>REF(未来底,1),大值,1);
超B:=L2_AMO(0,2)/10000.0;
大B:=L2_AMO(1,2)/10000.0;
中B:=L2_AMO(2,2)/10000.0;
小B:=L2_AMO(3,2)/10000.0;
超S:=L2_AMO(0,3)/10000.0;
大S:=L2_AMO(1,3)/10000.0;
中S:=L2_AMO(2,3)/10000.0;
小S:=L2_AMO(3,3)/10000.0;
净流入:=(超B+大B+中B+小B)-(超S+大S+中S+小S),NODRAW;
超大单:=(超B)-(超S),NODRAW;
大单:=(大B)-(大S),NODRAW;
中单:=(中B)-(中S),NODRAW;
小单:=(小B)-(小S),NODRAW;
DAZHI:=CONST(MAX(ABS(净流入),MAX(ABS(超大单),MAX(ABS(大单),MAX(ABS(中单),ABS(小单)))))),NODRAW;
DRAWRECTREL(0,0,180,999.4,IF(120,RGB(10,0,0),0));
DRAWRECTREL(0,CONST(830-(ABS(净流入)*500/DAZHI)),30,935,IF(CONST(净流入)>0,RGB(100,0,0{255,0,255}),RGB(0,100,100)));
DRAWRECTREL(35,CONST(830-(ABS(超大单)*500/DAZHI)),65,935,IF(CONST(超大单)>0,RGB(100,0,0),RGB(0,50,0)));
DRAWRECTREL(70,CONST(830-(ABS(大单)*500/DAZHI)),100,935,IF(CONST(大单)>0,RGB(100,0,0),RGB(0,50,0)));
DRAWRECTREL(105,CONST(830-(ABS(中单)*500/DAZHI)),135,935,IF(CONST(中单)>0,RGB(100,0,0),RGB(0,50,0)));
DRAWRECTREL(140,CONST(830-(ABS(小单)*500/DAZHI)),170,935,IF(CONST(小单)>0,RGB(100,0,0),RGB(0,50,0)));
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.002,0.98,0,'净流 超大 大单 中单 小单'),COLORYELLOW;
{DRAWTEXT_FIX(CURRBARSCOUNT=1,0.036,0.65,0,'超大'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.074,0.25,0,'大单'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.110,0.65,0,'中单'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.147,0.25,0,'小单'),COLORYELLOW;}
DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0,0,'资金搏弈 (万元)'),COLORYELLOW;
{DRAWTEXT_FIX(CURRBARSCOUNT=1,0.080,0,0,'(万元)'),COLORYELLOW;}
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.002,0.55,0,INTPART(净流入)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.036,0.30,0,INTPART(超大单)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.070,0.55,0,INTPART(大单)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.106,0.30,0,INTPART(中单)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.145,0.55,0,INTPART(小单)),COLORWHITE;
{43};