非常喜欢卫东老师的成交量指标，现将其修改为DDE数据版本，源码如下：
{VOL,VOLSTICK;}
成交量:VOL,PRECIS2,LINETHICK0;
成交额:AMOUNT/100000000,PRECIS2,LINETHICK0;
五日均量:MA(VOL,M1),PRECIS2,LINETHICK1;
十日均量:MA(VOL,M2),PRECIS2,LINETHICK1;
廿日均量:MA(VOL,M3),PRECIS2,LINETHICK1;
预估今日成交量:IF((DYNAINFO(7)=CLOSE), DYNAINFO(38)*DYNAINFO(17),成交量)/10000,Color0000FF,LINETHICK0,PRECIS2;
{如果最新价=收盘价，选五日均量*量比，否则就选成交量}
FILLRGN(五日均量,十日均量,五日均量>=十日均量,RGB(255,0,0),五日均量<=十日均量,RGB(0,255,0));
{当五日均量>=十日均量时为红色飘带，反之为绿色飘带}
主买:=VOL*BIGORDER(1,2);
主买外:=VOL*(1-BIGORDER(1,2));
主卖:=VOL*BIGORDER(2,2);
主卖外:=VOL*(1-BIGORDER(2,2));
STICKLINE(主买>=主卖,成交量,主买外,7.5,0),Color0E96A9;{黄色柱表示主力的净买量}
STICKLINE(主买>=主卖,成交量,主买外,7,0),Color10A7BC;{黄色框2}
STICKLINE(主买>=主卖,成交量,主买外,6,0),Color11B5CC;{黄色框3}
STICKLINE(主买>=主卖,成交量,主买外,5,0),Color13C6DF;{黄色框4}
STICKLINE(主买>=主卖,成交量,主买外,4,0),Color1CD2EC;{黄色框5}
STICKLINE(主买>=主卖,成交量,主买外,2,0),Color39D8EE;{黄色框6}
STICKLINE(主买>=主卖,成交量,主买外,0.5,0),ColorFFFFFF;{黄色框7}
STICKLINE(主买>=主卖,0,主买外,7.5,0),ColorA200A2;{玫红柱1}
STICKLINE(主买>=主卖,0,主买外,7,0),ColorB700B7;{玫红柱2}
STICKLINE(主买>=主卖,0,主买外,6,0),ColorCE00CE;{玫红柱3}
STICKLINE(主买>=主卖,0,主买外,5,0),ColorE800E8;{玫红柱4}
STICKLINE(主买>=主卖,0,主买外,4,0),ColorFF00FF;{玫红柱5}
STICKLINE(主买>=主卖,0,主买外,2,0),ColorFF60FF;{玫红柱6}
STICKLINE(主买>=主卖,0,主买外,0.5,0),ColorFFD2FF;{玫红柱7}
STICKLINE(主买<主卖,成交量,主卖外,7.5,0),ColorCA6500;{蓝色柱主力的净卖量}
STICKLINE(主买<主卖,成交量,主卖外,7,0),ColorE17100;{蓝色框2}
STICKLINE(主买<主卖,成交量,主卖外,6,0),ColorF27900;{蓝色框3}
STICKLINE(主买<主卖,成交量,主卖外,5,0),ColorFF850B;{蓝色框4}
STICKLINE(主买<主卖,成交量,主卖外,4,0),ColorFF9326;{蓝色框5}
STICKLINE(主买<主卖,成交量,主卖外,2,0),ColorFFA042;{蓝色框6}
STICKLINE(主买<主卖,成交量,主卖外,0.5,0),colorFFFF00;{蓝色框7}
STICKLINE(主买<主卖,0,主卖外,7.5,0),ColorA200A2;{玫红柱1}
STICKLINE(主买<主卖,0,主卖外,7,0),ColorB700B7;{玫红柱2}
STICKLINE(主买<主卖,0,主卖外,6,0),ColorCE00CE;{玫红柱3}
STICKLINE(主买<主卖,0,主卖外,5,0),ColorE800E8;{玫红柱4}
STICKLINE(主买<主卖,0,主卖外,4,0),ColorFF00FF;{玫红柱5}
STICKLINE(主买<主卖,0,主卖外,2,0),ColorFF60FF;{玫红柱6}
STICKLINE(主买<主卖,0,主卖外,0.5,0),ColorFFD2FF;{玫红柱7}
BBB:=LONGCROSS(成交量,五日均量,4);{全红柱表示今天的成交量超过五日均量}
STICKLINE(BBB,0,成交量,7.5,0),color070084;{全红柱1}
STICKLINE(BBB,0,成交量,7,0),color0000A3;{全红柱2}
STICKLINE(BBB,0,成交量,6,0),color0000B7;{全红柱3}
STICKLINE(BBB,0,成交量,5,0),color0000CD;{全红柱4}
STICKLINE(BBB,0,成交量,4,0),color0000E9;{全红柱5}
STICKLINE(BBB,0,成交量,2,0),color0754E9;{全红柱6}
STICKLINE(BBB,0,成交量,0.5,0),Color68B8FF;{全红柱7}
DL:=FILTER(成交量=LLV(成交量,20),5);{全绿柱表示今天是最近5天的成交量中是20日均量的最低量}
STICKLINE(DL,0,成交量,7.5,0),Color006400;{全绿柱1}
STICKLINE(DL,0,成交量,7,0),Color007500;{全绿柱2}
STICKLINE(DL,0,成交量,6,0),Color008400;{全绿柱3}
STICKLINE(DL,0,成交量,5,0),Color009900;{全绿柱4}
STICKLINE(DL,0,成交量,4,0),Color00AE00;{全绿柱5}
STICKLINE(DL,0,成交量,2,0),Color00BD00;{全绿柱6}
STICKLINE(DL,0,成交量,0.5,0),Color8EFF8E;{全绿柱7}
{预计今天成交量}
今天成交额:=AMOUNT/10000;
昨天成交额:=REF(今天成交额,1);
交易分钟数:=if(CURRENTTIME>93000 and CURRENTTIME<150000 and DYNAINFO(7)=CLOSE AND DYNAINFO(10)=AMOUNT,
if(CURRENTTIME<113000,(TIMETOT0(CURRENTTIME)-34200)/60,
if(CURRENTTIME>130000,(TIMETOT0(CURRENTTIME)-39600)/60,120)),240);
预测今天:=今天成交额/交易分钟数*240;
交易分时:=FRACPART( 交易分钟数/60);
剩余分时:=交易分时*60;
剩余秒:=FRACPART( 剩余分时);
剩余秒时:=剩余秒*60;
交易小时:=交易分钟数/60 ;
{显示文字}
DRAWTEXTABS(125,0,'昨天金额：'+NUMTOSTRN(昨天成交额/10000,2)+'亿'),ColorF5FF00,LINETHICK1;
DRAWTEXTABS(125,13,'预计今天：'+NUMTOSTRN(预测今天/10000,2)+'亿'),COLOR00FFFF,LINETHICK1;
DRAWTEXTABS(450,2,'交易时间：'+INTPART(交易小时)+'小时'+NUMTOSTRN(剩余分时,0)+'分'+NUMTOSTRN(剩余秒时,0)+'秒'+' 已成交金额'+'：'+NUMTOSTRN(今天成交额/10000,2)+'亿元'),ColorF5FF00,LINETHICK2,PRECIS2;
DRAWFLAGTEXT(1,V,'<*t=80FF00*><*c=0000FF*><*p=95*>'+datestr(date)+'n'+'<*t=E7FFFF*><*c=111100*><*p=95*>'+'成交量 '+成交量+'<*t=E7FFFF*><*c=0000FF*><*p=95*>'+' 成交额'+NUMTOSTRN(成交额*10000,0)+'万元');
{柱图}
图长度像素:=230*0.5;
昨天图长度:=230+图长度像素;
预测今天图:=(预测今天/昨天成交额)*图长度像素+230;
目前成交图:=(今天成交额/昨天成交额)*图长度像素+230;
DRAWRECTABS(230,1,昨天图长度,9 ,RGB(0,255,150));
DRAWRECTABS(230,13,目前成交图, 23 ,RGB(255,73,20));
DRAWRECTABS(230,16,预测今天图,20 ,RGB(255,255,0));
{立柱说明}
DRAWRECTREL( 0,140,125,860,RGB(20,20,20));
DRAWRECTREL( 0,140,15,280,RGB(255,255,0));
DRAWTEXTREL(20,140,'DDX飘红主力买入量'),COLORYELLOW;
DRAWRECTREL( 0,280,15,420,RGB(0,255,255));
DRAWTEXTREL(20,280,'DDX变绿主力卖出量'),COLORFFFF00;
DRAWRECTREL( 0,420,15,560,RGB(255,25,0));
DRAWTEXTREL(20,420,'超过五日均量'),COLOR0025FF;
DRAWRECTREL( 0,560,15,700,RGB(0,255,0));
DRAWTEXTREL(20,560,'低于廿日均量'),COLOR00FF00;
DRAWRECTREL( 0,700,15,840,RGB(200,0,200));
DRAWTEXTREL(20,700,'主力外成交量'),COLORFF00FF;
DRAWTEXTREL(0,0,'成交量'),COLORYELLOW;
{DRAWTEXTREL(600,900,'证券代码: '+STKLABEL+' 证券名称: '+STKNAME+''),ColorFFAA00;};
DRAWTEXTABS(35,0,'《夏卫东-DDX版》'),COLOR0000FF;
指标说明：
本成交量副图基于基础模板上加以扩展，立柱的黄色表示DDX飘红时主力的买入量，天蓝色为DDX变绿时主力的卖出量，粉色为除主力以外的成交量，立柱全红表示当天的成交量超过5日的均量，立柱全绿表示当天的成交量低于前20日的均量。
增加了5日均量、10日均量、20日均量的显示。
增加了预估今日成交量，计算方法为：5日均量*量比。
增加了预计今天成交额，计算方法为：今天成交额/交易分钟数*240（交易分钟数是根据昨日成交额的交易速率：万元/分钟），增加了昨天成交额的横向坐标柱，增加了今天已完成交易额的横向坐标柱，增加了预计今天成交额的横向坐标柱。
增加了交易时间计时显示，上午9：30-11：30，下午1：00-3：00以秒计时，其余时间停止计时。
MA1、MA2、MA3分别为成交量的M1日、M2日、M3日均线
参数：M1、M2、M3一般取5日、10日、20日
欢迎各位老师指正！
|
