名称:ZQMC,colorwhite;
代码:CODE,colorred;
年月日:TOSTRING(DATE,8),NODRAW,colorwhite;
时间:TIME/10000,NODRAW,coloryellow; /* 时间数值输出方案设为“一般价格两位 */
星期:TOSTRING(WEEKDAY,8),NODRAW,colormagenta;
/* 恒生指数分时图专用 -︺△▽⊿∠∧☆◇○⊙◎▼★▲◆● */
a:=IF(ISNULL(NEW),PRE,NEW);
b:=SUBSAMEDAY(&VOL) ;
IF (VOL > 1)
{均价:=SUM(b*a,0)/VOL;}
最新:=IF(ISNULL(NEW),PRE,NEW);
涨幅:(NEW-PRE)/PRE*100;
五分钟涨幅:(NEW-REF(NEW,5))/REF(NEW,5)*100,NODRAW,colorwhite;
显示位:=MIN(BUYCOUNT,SELLCOUNT); /* 委买卖函数的价底者显示 */
委买:BUYCOUNT,coloryellow;
委卖:SELLCOUNT,color008800;
委差:委买-委卖; /* 设定-为柱图中心线+与用户设定值比较,数值设为 0 */
委比:(委买-委卖)/(委买+委卖)*100,coloryellow;
多空比:委买/委卖; /* 与用户设定值比较,数值设为 1,数值输出方案设为“涨跌两位”,不显示均线 */
委差创全天个高:(时间>10.30 AND 委差>0 AND 委差>=HHV(委差,340))*委差,colorwhite,LINETHICK2; /*5.5个小时交易时间330钟+尾盘10分钟=340分钟 */
委差水平线:IF(最新>20000,700000000,DRAWNULL),colorwhite,LINETHICK1,DOTLINE; /* 7个亿,连续性上涨或下跌后的有参与作用 */
/* 牛熊证黄线《委买》专用显示创新高“+”号 */
加号:=委买;
DRAWTEXT( 最新<1.9 AND 委买>=HHV(委买,200),加号,'+'),colorgreen; /*委买黄线创300分钟天新高,全天共330分钟,5.5个小时交易时间330钟+尾盘10分钟=340分钟 */
DRAWTEXT( 最新<1.9 AND 委买>=HHV(委买,340),加号,'+'),colorlired; /*委买黄线创300分钟天新高,全天共330分钟,5.5个小时交易时间330钟+尾盘10分钟=340分钟 */
/* 委比的黄色或绿色“+”号主要从创新高的的当天个数和时间来与前一天对比,黄的比昨天多说明多方强,绿的比昨天多说明空方强,还有从时间开始上分析,时间分析有待定 */
/* 恒生指数专用显示+号用 */
粗委卖20:= 最新>20000 AND 时间>15.00 AND 时间<=15.50 AND 委卖>=HHV(委卖,20);
DRAWTEXT( 粗委卖20,MIN(委买,委卖),'+'),color008800;
粗委卖410:=最新>20000 AND 时间>15.00 AND 时间<=15.50 AND 委卖>=HHV(委卖,410); /* 与昨天最高点相比用-定410分钟,只从昨天的15.00起算共70分钟+一天340分=410分钟 */
DRAWTEXT( 粗委卖410,MIN(委买,委卖),'+'),colorgreen;
/* 恒生指数《委卖》在15.58分钟时显示◎,分时图不支持CLOSE,OPEN这种函数 */
粗委买20:= 最新>20000 AND 时间>15.00 AND 时间<=15.50 AND 委买>=HHV(委买,20);
DRAWTEXT( 粗委买20,MAX(委买,委卖),'+'),coloryellow;
DRAWTEXT(时间=10.00,委买,'1 '),colorwhite;
DRAWTEXT(时间=10.00,委卖,'1 '),colorcyan;
DRAWTEXT(时间=15.00,委买,'3 '),colorwhite;
DRAWTEXT(时间=15.00,委卖,'3 '),colorcyan;
DRAWTEXT(时间>=15.58,委差水平线,'◎'),colorgray;
/* 分时副图上显数 */
上一日委卖高:HHV(委卖,410),NODRAW,colorgreen; /* 与昨天最高点相比用-定410分钟,只从昨天的15.00起算共70分钟+一天340分=410分钟 */
委卖高:HHV(委卖,70),NODRAW,colorwhite; /* 从15点开始到收盘10分钟共70分钟 */
上一日委卖高个数:=HHVBARS(委卖,410),NODRAW,colorgreen; /* 定410分钟 */
委卖高个数:=HHVBARS(委卖,70),NODRAW,colorwhite; /* 从15点开始到收盘10分钟共70分钟 */
DRAWTEXT_FIX(ISLASTBAR ,0.00,0.03,0 ,'上日委卖高:'+TOSTRING(上一日委卖高/100000000,2)+'亿'),colorligray;
DRAWTEXT_FIX(ISLASTBAR ,0.00,0.13,0 ,'最新委卖高:'+TOSTRING( 委卖高/100000000,2)+'亿'),colorligray;
大于上日委卖高:=委卖高>=上一日委卖高;
DRAWTEXT_FIX(ISLASTBAR AND 大于上日委卖高,0.00,0.13,0 ,'最新委卖高:'+TOSTRING(委卖高/100000000,2)+'亿'),colorgreen; /* 当天最大委卖大于上一日最大委卖高时显绿色 */
DRAWTEXT_FIX(ISLASTBAR ,0.00,0.26,0 ,'上日委卖高:'+TOSTRING(上一日委卖高个数,2)+' '),colorligray;
DRAWTEXT_FIX(ISLASTBAR ,0.00,0.36,0 ,'最新委卖高:'+TOSTRING(委卖高个数,2)+' '),colorligray;
大于上日委卖高个数:=委卖高个数>=上一日委卖高个数;
DRAWTEXT_FIX(ISLASTBAR AND 大于上日委卖高个数,0.00,0.36,0 ,'最新委卖高:'+TOSTRING(委卖高个数,2)+' '),colorgreen; /* 当天最大委卖个数大于上一日最大委卖高个数时显绿色 */
/* 恒生指数涨跌幅及收盘价在分时时图显示 */
恒指涨幅:=(INDEXDATA("HSI",&NEW)-INDEXDATA("HSI",&PRE))/INDEXDATA("HSI",&PRE)*100;
DRAWTEXT_FIX(ISLASTBAR ,0.00,0.55,0 ,'恒指涨幅:'+TOSTRING(恒指涨幅,2)+'% '),colorligray;
DRAWTEXT_FIX(ISLASTBAR ,0.00,0.65,0 ,'恒指收盘:'+TOSTRING(INDEXDATA("HSI",&NEW),0)+' '),colorligray;
