真实成交量副图

張晨

一，飞狐源码
JE:=vol;SJ:=if(CURRENTTIME>93000 and CURRENTTIME<150000,
if(CURRENTTIME<113000,(TIMETOT0(CURRENTTIME)-34200)/60,
if(CURRENTTIME>130000,(TIMETOT0(CURRENTTIME)-39600)/60,120)),240);
预测额:IF(BARSTATUS=2,JE/SJ*240,JE),COLOR00FFFF,LINETHICK;
STICKLINE(BARSTATUS=2,0,预测额,9,1),COLOREEEEFF,LINEDOT;
jj:=(HIGH+LOW+CLOSE)/3;qj0:=vol/IF(HIGH=LOW,4,HIGH-LOW);
主买:=(qj0*(jj-MIN(CLOSE,OPEN)));
主卖:=(qj0*(MIN(OPEN,CLOSE)-LOW));
散买:=(qj0*(HIGH-MAX(OPEN,CLOSE)));
散卖:=(qj0*(MAX(CLOSE,OPEN)-jj));
STICKLINE(H=l and C<ref(c,1),0,JE,8,0),COLOR008800;
STICKLINE(H=l and C<ref(c,1),0,JE,5,0),COLOR00aa00;
STICKLINE(H=l and C<ref(c,1),0,JE,3,0),COLOR00cc00;
STICKLINE(H=l and C<ref(c,1),0,JE,1,0),COLOR00ee00;
STICKLINE(H=l and C>ref(c,1),0,JE,8,0),COLOR000088;
STICKLINE(H=l and C>ref(c,1),0,JE,5,0),COLOR0000aa;
STICKLINE(H=l and C>ref(c,1),0,JE,3,0),COLOR0000cc;
STICKLINE(H=l and C>ref(c,1),0,JE,1,0),COLOR0000ff;
STICKLINE(散卖>0,0,主买+主卖+散买+散卖,8,0),COLOR880000;
STICKLINE(散卖>0,0,主买+主卖+散买+散卖,5,0),COLORaa0000;
STICKLINE(散卖>0,0,主买+主卖+散买+散卖,3,0),COLORcc0000;
散户卖:STICKLINE(散卖>0,0,主买+主卖+散买+散卖,1,0),COLORee0000;
STICKLINE(散买>0,0,主买+主卖+散买,8,0),COLOR880088;
STICKLINE(散买>0,0,主买+主卖+散买,5,0),COLORaa00aa;
STICKLINE(散买>0,0,主买+主卖+散买,3,0),COLORcc00cc;
散户买:STICKLINE(散买>0,0,主买+主卖+散买,1,0),COLORee00ee;
STICKLINE(主卖>0,0,主买+主卖,8,0),COLOR008800;
STICKLINE(主卖>0,0,主买+主卖,5,0),COLOR00aa00;
STICKLINE(主卖>0,0,主买+主卖,3,0),COLOR00cc00;
主力卖:STICKLINE(主卖>0,0,主买+主卖,1,0),COLOR00ee00;
STICKLINE(主买>0,0,主买,8,0),COLOR000088;
STICKLINE(主买>0,0,主买,5,0),COLOR0000aa;
STICKLINE(主买>0,0,主买,3,0),COLOR0000cc;
主力买:STICKLINE(主买>0,0,主买,1,0),COLOR0000ff;
AA:=if(c>(h+l)/2,je,0);BB:=if(c<(h+l)/2,je,0);
F1:=sum(aa,5);F2:=sum(bb,5);F3:=ema(F1-F2,3);
T1:=主买>主卖 and cross(f3,ref(f3,1)) and f3<0;
T2:=主卖>主买 and cross(ref(f3,1),f3) and f3>0;
DRAWTEXT(T1,je*1.2,'+B'),COLOR00ffff;
DRAWTEXT(T2,je*1.2,'-S'),COLORffffff;
DRAWTEXT(BARPOS=SYSPARAM(2)+1,0,'证券代码:'+STKLABEL+' 证券名称:'+STKNAME+''),ALIGN3,PXUP90,ColorFF00FF;
二、大智慧新一代源码
JE:=vol;SJ:=if(CURRENTTIME>93000 and CURRENTTIME<150000,
if(CURRENTTIME<113000,(TIMETOT0(CURRENTTIME)-34200)/60,
if(CURRENTTIME>130000,(TIMETOT0(CURRENTTIME)-39600)/60,120)),240);
预测量:IF(BARSTATUS=2,JE/SJ*240,JE),COLOR00FFFF,LINETHICK0;
STICKLINE(BARSTATUS=2,0,预测量,10,1),COLORgreen,DOTLINE,LAYER7;
jj:=(HIGH+LOW+CLOSE)/3;qj0:=vol/IF(HIGH=LOW,4,HIGH-LOW);
主买:=(qj0*(jj-MIN(CLOSE,OPEN)));
主卖:=(qj0*(MIN(OPEN,CLOSE)-LOW));
散买:=(qj0*(HIGH-MAX(OPEN,CLOSE)));
散卖:=(qj0*(MAX(CLOSE,OPEN)-jj));
STICKLINE(H=l and C<ref(c,1),0,JE,8,0),COLOR008800;
STICKLINE(H=l and C<ref(c,1),0,JE,5,0),COLOR00aa00;
STICKLINE(H=l and C<ref(c,1),0,JE,3,0),COLOR00cc00;
STICKLINE(H=l and C<ref(c,1),0,JE,1,0),COLOR00ee00;
STICKLINE(H=l and C>ref(c,1),0,JE,8,0),COLOR000088;
STICKLINE(H=l and C>ref(c,1),0,JE,5,0),COLOR0000aa;
STICKLINE(H=l and C>ref(c,1),0,JE,3,0),COLOR0000cc;
STICKLINE(H=l and C>ref(c,1),0,JE,1,0),COLOR0000ff;
STICKLINE(散卖>0,0,主买+主卖+散买+散卖,8,0),COLOR880000;
STICKLINE(散卖>0,0,主买+主卖+散买+散卖,5,0),COLORaa0000;
STICKLINE(散卖>0,0,主买+主卖+散买+散卖,3,0),COLORcc0000;
散户卖:STICKLINE(散卖>0,0,主买+主卖+散买+散卖,1,0),COLORee0000;
STICKLINE(散买>0,0,主买+主卖+散买,8,0),COLOR880088;
STICKLINE(散买>0,0,主买+主卖+散买,5,0),COLORaa00aa;
STICKLINE(散买>0,0,主买+主卖+散买,3,0),COLORcc00cc;
散户买:STICKLINE(散买>0,0,主买+主卖+散买,1,0),COLORee00ee;
STICKLINE(主卖>0,0,主买+主卖,8,0),COLOR008800;
STICKLINE(主卖>0,0,主买+主卖,5,0),COLOR00aa00;
STICKLINE(主卖>0,0,主买+主卖,3,0),COLOR00cc00;
主力卖:STICKLINE(主卖>0,0,主买+主卖,1,0),COLOR00ee00;
STICKLINE(主买>0,0,主买,8,0),COLOR000088;
STICKLINE(主买>0,0,主买,5,0),COLOR0000aa;
STICKLINE(主买>0,0,主买,3,0),COLOR0000cc;
主力买:STICKLINE(主买>0,0,主买,1,0),COLOR0000ff;
AA:=if(c>(h+l)/2,je,0);BB:=if(c<(h+l)/2,je,0);
F1:=sum(aa,5);F2:=sum(bb,5);F3:=ema(F1-F2,3);
T1:=主买>主卖 and cross(f3,ref(f3,1)) and f3<0;
T2:=主卖>主买 and cross(ref(f3,1),f3) and f3>0;
DRAWTEXT(T1,je*1.2,'+B'),COLOR00ffff;
DRAWTEXT(T2,je*1.2,'-S'),COLORffffff;
DRAWTEXTREL(10,5,'证券代码:'+STKLABEL+' 证券名称:'+STKNAME+''),ColorFF00FF;
三、通达信源码
预测量:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW;
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,预测量,0,4,-1),COLOR00FF00;
JE:=VOL;JJ:=(HIGH+LOW+CLOSE)/3;QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
主买:=(QJ0*(JJ-MIN(CLOSE,OPEN)));
主卖:=(QJ0*(MIN(OPEN,CLOSE)-LOW));
散买:=(QJ0*(HIGH-MAX(OPEN,CLOSE)));
散卖:=(QJ0*(MAX(CLOSE,OPEN)-JJ));
庄净入:IF((主买-主卖)>0,主买-主卖,0)COLORRED,NODRAW;
庄净出:IF((主买-主卖)<0,主买-主卖,0)COLORGREEN,NODRAW;
散净入:IF((散买-散卖)>0,散买-散卖,0)COLORGREEN,NODRAW;
散净出:IF((散买-散卖)<0,散买-散卖,0)COLORRED,NODRAW;
STICKLINE(H=L AND C<REF(C,1),0,JE,3,0),COLOR00AA00;
STICKLINE(H=L AND C<REF(C,1),0,JE,1.5,0),COLOR00CC00;
STICKLINE(H=L AND C<REF(C,1),0,JE,1,0),COLOR00EE00;
STICKLINE(H=L AND C>REF(C,1),0,JE,3,0),COLOR0000AA;
STICKLINE(H=L AND C>REF(C,1),0,JE,1.5,0),COLOR0000CC;
STICKLINE(H=L AND C>REF(C,1),0,JE,1,0),COLOR0000FF;
STICKLINE(散卖>0,0,主买+主卖+散买+散卖,3,0),COLORAA0000;
STICKLINE(散卖>0,0,主买+主卖+散买+散卖,1.5,0),COLORCC0000;
散户卖:STICKLINE(散卖>0,0,主买+主卖+散买+散卖,1,0),COLOREE0000;
STICKLINE(散买>0,0,主买+主卖+散买,3,0),COLORAA00AA;
STICKLINE(散买>0,0,主买+主卖+散买,1.5,0),COLORCC00CC;
散户买:STICKLINE(散买>0,0,主买+主卖+散买,1,0),COLOREE00EE;
STICKLINE(主卖>0,0,主买+主卖,3,0),COLOR00AA00;
STICKLINE(主卖>0,0,主买+主卖,1.5,0),COLOR00CC00;
主力卖:STICKLINE(主卖>0,0,主买+主卖,1,0),COLOR00EE00;
STICKLINE(主买>0,0,主买,3,0),COLOR0000AA;
STICKLINE(主买>0,0,主买,1.5,0),COLOR0000CC;
主力买:STICKLINE(主买>0,0,主买,1,0),COLOR0000FF;
AA:=IF(C>(H+L)/2,JE,0);BB:=IF(C<(H+L)/2,JE,0);
F1:=SUM(AA,5);F2:=SUM(BB,5);F3:=EMA(F1-F2,3);
T1:=主买>主卖 AND CROSS(F3,REF(F3,1)) AND F3<0;
T2:=主卖>主买 AND CROSS(REF(F3,1),F3) AND F3>0;
DRAWTEXT(T1,JE,'+B'),COLOR00FFFF;
DRAWTEXT(T2,JE,'-S'),COLORFFFFFF;

注：对应该其色与其左上方名称便可，非原创，感谢原创千均老师！

feifeiyu

谢谢楼主分享！功德无量！

曲径通幽1

谢谢分享，辛苦了。。。

ds70651598

向高手学习

风中的阳光

点点点点点

谢谢楼主分享

股海静心

谢谢楼主分享
本文来自: 股海明灯  详细文章参考：http://www.178448.com/thread-344968-1-1.html

大雨晴

那么花啊，不过还是谢谢

王鹏

谢谢楼主分享

坐禅悟道

辛苦了，谢谢分享。

老兵新传

学习学习学习

红豆豆

谢谢楼主分享

雨娜

谢谢楼主分享

王君

谢谢楼主分享

意小利的邻居

真心感谢楼主分享，我一定努力学习，提高技术。

证券先锋

学习学习再学习,努力努力再努力

建国

谢谢楼主分享

帮杰放

看不懂啊。