分时公式DDEVOL（公式的原作者忘了是谁了，如果错了请原作者谅解）在股王我数据中能使用，附源码：（（附图下面有供下载的公式））{分时DDE}
d1:("DZHDDE@TDDC"())*sum(AMOUNT,0)/1000000,LINETHICK0;
d2:("DZHDDE@DDC"())*sum(AMOUNT,0)/1000000,LINETHICK0;主力净:=(d1+d2);
主力净买:主力净,COLOR00FFFF,LINETHICK0,PRECIS0;{分时}
DRAWTEXTREL(0,20,'分时'),COLORCCDD98,LINETHICK1;
DRAWTEXTREL(50,20,'9:3-10'),COLOR5858FF,LINETHICK1;
DRAWTEXTREL(145,20,'10-10:3'),COLOR00AAFF,LINETHICK1;
DRAWTEXTREL(250,20,'10:3-11'),COLOR00FFFF,LINETHICK1;
DRAWTEXTREL(355,20,'11-11:3'),COLORAAFFAA,LINETHICK1;
DRAWTEXTREL(470,20,'13-13:3'),COLOR00FF00,LINETHICK1;
DRAWTEXTREL(595,20,'13:3-14'),COLORFFFF00,LINETHICK1;
DRAWTEXTREL(700,20,'14-14:3'),COLORFFAA00,LINETHICK1;
DRAWTEXTREL(805,20,'14:3-15'),COLORFFAACC,LINETHICK1;{10点}
ZL10D:=REF(主力净,BARSLAST(TIME<=100000));
DRAWTEXTREL(70,300,STRRIGHT(NUMTOSTRN(ZL10D,0),9)),COLOR5858FF,LINETHICK2;
{10点半}
ZL10DB:=REF(主力净,BARSLAST(TIME>100000 AND TIME<=103000));
DRAWTEXTREL(175,300,STRRIGHT(NUMTOSTRN(ZL10DB-ZL10D,0),9)),COLOR00AAFF,LINETHICK2;
{11点}
ZL11D:=REF(主力净,BARSLAST(TIME>103000 AND TIME<=110000));
DRAWTEXTREL(280,300,STRRIGHT(NUMTOSTRN(ZL11D-ZL10DB,0),9)),COLOR00FFFF,LINETHICK2;
{11点半}
ZL11DB:=REF(主力净,BARSLAST(TIME>110000 AND TIME<=113000));
DRAWTEXTREL(385,300,STRRIGHT(NUMTOSTRN(ZL11DB-ZL11D,0),9)),COLORAAFFAA,LINETHICK2;
{13点半}
ZL13DB:=REF(主力净,BARSLAST(TIME>130000 AND TIME<=133000));
DRAWTEXTREL(515,300,STRRIGHT(NUMTOSTRN(ZL13DB-ZL11DB,0),10)),COLOR00FF00,LINETHICK2;
{14点}
ZL14D:=REF(主力净,BARSLAST(TIME>133000 AND TIME<=140000));
DRAWTEXTREL(630,300,STRRIGHT(NUMTOSTRN(ZL14D-ZL13DB,0),10)),COLORFFFF00,LINETHICK2;
{14点半}
ZL14DB:=REF(主力净,BARSLAST(TIME>140000 AND TIME<=143000));
DRAWTEXTREL(735,300,STRRIGHT(NUMTOSTRN(ZL14DB-ZL14D,0),10)),COLORFFAA00,LINETHICK2;
{15点}
ZL15D:=REF(主力净,BARSLAST(TIME>143000 AND TIME<=150000));
DRAWTEXTREL(850,300,STRRIGHT(NUMTOSTRN(ZL15D-ZL14DB,0),10)),COLORFFAACC,LINETHICK2;BBD1:=主力净;
ee:=if(bbd1=0,ref(主力净,BARSLAST(主力净)),主力净);
BBD:=ee;
BBD2:=BBD-ref(BBD,1);
十点:=sum(if(time<=100000,BBD2,0),0);
十点半:=sum(if(time<=103000,BBD2,0),0)-十点;
十一点:=sum(if(time<=110000,BBD2,0),0)-sum(if(time<=103000,BBD2,0),0);
十一点半:=sum(if(time<=113000,BBD2,0),0)-sum(if(time<=110000,BBD2,0),0);
十三点半:=sum(if(time<=133000,BBD2,0),0)-sum(if(time<=113000,BBD2,0),0);
十四点:=sum(if(time<=140000,BBD2,0),0)-sum(if(time<=133000,BBD2,0),0);
十四点半:=sum(if(time<=143000,BBD2,0),0)-sum(if(time<=140000,BBD2,0),0);
十五点:=sum(if(time<=150100,BBD2,0),0)-sum(if(time<=143000,BBD2,0),0);X:=-50;
Y:=250;
Q:=MAX(ABS(十点),ABS(十点半),ABS(十一点),ABS(十一点半),ABS(十三点半),ABS(十四点),ABS(十四点半),ABS(十五点))/300;DRAWRECTREL(0-X,600-十点/Q-Y,15-X,600-Y,RGB(200,0,0)),COLOR00FFFF;
DRAWRECTREL(100-X,600-十点半/Q-Y,115-X,600-Y,RGB(200,100,0)),COLOR00FFFF;
DRAWRECTREL(200-X,600-十一点/Q-Y,215-X,600-Y,RGB(200,200,0)),COLOR00FFFF;
DRAWRECTREL(300-X,600-十一点半/Q-Y,315-X,600-Y,RGB(100,250,0)),COLOR00FFFF;
DRAWRECTREL(440-X,600-十三点半/Q-Y,455-X,600-Y,RGB(0,250,0)),COLOR00FFFF;
DRAWRECTREL(550-X,600-十四点/Q-Y,565-X,600-Y,RGB(0,200,200)),COLOR00FFFF;
DRAWRECTREL(660-X,600-十四点半/Q-Y,675-X,600-Y,RGB(20,150,250)),COLOR00FFFF;
DRAWRECTREL(780-X,600-十五点/Q-Y,795-X,600-Y,RGB(150,0,250)),COLOR00FFFF;VOL,VOLSTICK,PRECIS0;附图是今天的数据。 |
