bbd比例,比正版直观还好看(大智慧)

VAR0:=HOUR;

VAR1:=vol;

VAR2:=VAR1/CAPITAL*100;

VAR4:=BIGORDER(1) - BIGORDER(2);

VAR6:VAR2 * VAR4 ;

IF VAR0 > 0 THEN BEGIN

VOLUME:VAR1,VOLstICK;

END

ELSE BEGIN

VAR8:=CAPITAL * VAR6;

END

STICKLINE(VAR8 < 0,0,VAR8 * -1,8.5,0),COLORff0000;

STICKLINE(VAR8 < 0,0,VAR8 * -1,8,0),COLORff3300;

STICKLINE(VAR8 < 0,0,VAR8 * -1,7,0),COLORff3300;

STICKLINE(VAR8 < 0,0,VAR8 * -1,6,0),COLORff5500;

STICKLINE(VAR8 < 0,0,VAR8 * -1,5,0),COLORff7700;

STICKLINE(VAR8 < 0,0,VAR8 * -1,4,0),COLORff9900;

STICKLINE(VAR8 < 0,0,VAR8 * -1,3,0),COLORffBB00;

STICKLINE(VAR8 < 0,0,VAR8 * -1,2,0),COLORffDD00;

STICKLINE(VAR8 < 0,0,VAR8 * -1,1,0),COLORffff00;

{red色bbd}

STICKLINE(VAR8 >= 0,0,VAR8 ,7.5,0),COLOR000055;

STICKLINE(VAR8 >= 0,0,VAR8 ,7.5,0),COLOR000055;

STICKLINE(VAR8 >= 0,0,VAR8 ,6,0),COLOR000066;

STICKLINE(VAR8 >= 0,0,VAR8 ,5,0),COLOR000077;

STICKLINE(VAR8 >= 0,0,VAR8 ,4,0),COLOR000099;

STICKLINE(VAR8 >= 0,0,VAR8 ,3,0),COLOR0000BB;

STICKLINE(VAR8 >= 0,0,VAR8 ,2,0),COLOR0000DD;

STICKLINE(VAR8 >= 0,0,VAR8 ,1,0),COLOR0000ff;