分时成交揭秘指标更新，揭示真实成交与价格的关系 EA

分时成交揭秘指标更新，揭示真实成交与价格的关系

r

这是本指标的新版本，通过核对Level2行情的逐笔成交数据，确定了更加准确的成交量计算方法。
r 通过图形方式一目了然地揭示成交量变化与价格涨跌的直接关系，可以替代掉系统的分时走势曲线。
r 可用于实时盘口，或研究上一日交易的分时图

r

 可以直接下载附件中的指标进行导入。
r 提示：
r1、新版本坐标轴显示的是成交金额，但有些股票同花顺的坐标轴数据是错误的，图形没错。应该是同花顺的软件故障。
r2、新计算方法使用的函数不知道没有Level2行情是否支持，有问题请回馈
r—————————————–
r分时成交揭秘

r

 请设置三个参数：
rDD 1-4 默认1
r ZUOBIAO 0-2 默认0，
r （这个参数设置成2显示价格坐标，显示价格坐标时要到公式编辑里，进入曲线属性-纵坐标-数据零值，设置成昨日收盘价。设置成价格坐标后，可以叠加大盘指数）
rMODE 0-1 默认0
r LEVEL2 0-1 默认1

r

曲线属性的纵坐标里的数据零值设置成：等于零
r—————————————–
r源码：

r

r//Level2行情数据，经过核对逐笔数据，同花顺的这组成交量函数基本准确
rLEVEL2BUY := BIGBUYCOUNT1 + BIGBUYCOUNT2 + BIGBUYCOUNT3 + BIGBUYCOUNT4;
r LEVEL2SELL := BIGSELLCOUNT1 + BIGSELLCOUNT2 + BIGSELLCOUNT3 + BIGSELLCOUNT4;

r

 //普通行情数据，使用内外盘数据计算成交量，与Level2函数略有区别
rREALBUY := (OUTVOL – IF(ISNULL(REF(OUTVOL, 1)), 0, REF(OUTVOL, 1))) * NEW / 10000;//转化成金额
rREALSELL := (INVOL – IF(ISNULL(REF(INVOL, 1)), 0, REF(INVOL, 1))) * NEW / 10000;

r

 REALBUY := IF(LEVEL2=0, REALBUY, (LEVEL2BUY – IF(ISNULL(REF(LEVEL2BUY, 1)), 0, REF(LEVEL2BUY, 1))) * NEW / 10000);
r REALSELL := IF(LEVEL2=0, REALSELL, (LEVEL2SELL – IF(ISNULL(REF(LEVEL2SELL, 1)), 0, REF(LEVEL2SELL, 1))) * NEW / 10000);

r

ZF := NEW – REF(NEW, 1);

r

 YD1 := REALBUY > REALSELL * 5 AND ZF <= 0; //买入不上涨
rYD2 := REALSELL > REALBUY * 5 AND ZF >= 0; //卖出不下跌

r

//dd 缩放参数
r//以5%换手率为坐标的上下限，也同时是价格的上下10%
r //M1 := SHGZG * 0.05 / 100 / dd ;//手
r//M1 := IF(ZUOBIAO = 0, M1, M1 * 100 * PRE / 10000);        //以昨日收盘价来计算上下限
r//默认上下限设置成1000万元
rM1 := IF(DD=1, 500, 0);
r M1 := IF(DD=2, 1000, M1);
r M1 := IF(DD=3, 2000, M1);
r M1 := IF(DD=4, 5000, M1);

r

 SHOWBUY := IF(REALBUY > M1, M1, REALBUY);
r SHOWSELL := IF(REALSELL > M1, M1, REALSELL);

r

 //将成交数据以0%-10%的坐标显示
r//SHOWBUY := SHOWBUY / M1 * 10;
r //SHOWSELL := SHOWSELL / M1 * 10;

r

 LASTclose := PRE;
r //将价格切换到上下600000的数量级坐标
rPrice := (NEW – LASTclose) / LASTclose * 10 * M1;

r

 //1
r PRICE := IF(ZUOBIAO=0, PRICE, (NEW – PRE) / PRE * 100);
r SHOWBUY1 := IF(ZUOBIAO=0, SHOWBUY, SHOWBUY / (M1 / 10));
r SHOWSELL1 := IF(ZUOBIAO=0, SHOWSELL, SHOWSELL / (M1 / 10));
r //2
r PRICE := IF(ZUOBIAO=2, NEW, PRICE);
r SHOWBUY1 := IF(ZUOBIAO=2, SHOWBUY / (M1 / (PRE * 0.1)), SHOWBUY);
r SHOWSELL1 := IF(ZUOBIAO=2, SHOWSELL  / (M1 / (PRE * 0.1)), SHOWSELL);

r

 SHOWBUY := SHOWBUY1;
r SHOWSELL := SHOWSELL1;

r

 LPRICE: price;
r U10 := IF(ZUOBIAO=0, m1, 10);
r U10 := IF(ZUOBIAO=2, PRE * 1.1, U10);
r D10 := IF(ZUOBIAO=0, m1 * -1, -10);
r D10 := IF(ZUOBIAO=2, PRE * 0.9, D10);
r UP10:U10, colorred, POINTDOT;
r DOWN10:D10, colorcyan, POINTDOT;

r

 num := IF(MODE=0, 0, PRICE);

r

 STICKLINE(YD1 = 0, NUM, NUM+ SHOWBUY, 5, 0), colorred;
r STICKLINE(YD1 <> 0, NUM, NUM+ SHOWBUY, 5,0), colorwhite;
r STICKLINE(YD2 = 0, NUM, NUM- SHOWSELL, 5,0), colorgreen;
r STICKLINE(YD2 <> 0, NUM, NUM- SHOWSELL, 5,0), colorblue;

r

 //当真实买卖与价格变动相反时，属于异动
r 

r