DZH成交量图(大智慧)
VAR0:=HOUR;
VAR1:=vol;
VAR2:=VAR1/CAPITAL;
VAR3:=BIGORDER(1,2) + BIGORDER(2,2);
VAR4:=BIGORDER(1,2) - BIGORDER(2,2);
VAR5:=VAR2 * VAR3 * 100;
VAR6:=VAR2 * VAR4 * 100;
IF VAR0 > 0 THEN BEGIN
VOLUME:VAR1,VOLstICK;
END
ELSE BEGIN
VAR7:=CAPITAL * VAR5/1000;
VAR8:=CAPITAL * VAR6/100;
VAR9:=CLOSE - REF(CLOSE,1);
LOOP1:=VAR9 >= 0;
LOOP2:=VAR7 * 3;
STICKLINE(LOOP1,LOOP2,VAR1,7.6,3);
LOOP3:=VAR9 < 0;
STICKLINE(LOOP3,LOOP2,VAR1,7.6,3);
VAR10:=VAR1/MA(VAR1,55) * 100;
END
STICKLINE(LOOP1,LOOP2,VAR1,7.6,3),COLORRED;
STICKLINE(LOOP3,LOOP2,VAR1,7.6,3),COLORGREEN;
STICKLINE(VAR8 < 0,VAR1 - VAR8,VAR1 + VAR8 * 5,8.5,0),COLOR777777;
STICKLINE(VAR8 < 0,VAR1 - VAR8,VAR1 + VAR8 * 5,8,0),COLOR111111;
STICKLINE(VAR8 < 0,VAR1 - VAR8,VAR1 + VAR8 * 5,7,0),COLOR333333;
STICKLINE(VAR8 < 0,VAR1 - VAR8,VAR1 + VAR8 * 5,6,0),COLOR555555;
STICKLINE(VAR8 < 0,VAR1 - VAR8,VAR1 + VAR8 * 5,5,0),COLOR777777;
STICKLINE(VAR8 < 0,VAR1 - VAR8,VAR1 + VAR8 * 5,4,0),COLOR999999;
STICKLINE(VAR8 < 0,VAR1 - VAR8,VAR1 + VAR8 * 5,3,0),COLORBBBBBB;
STICKLINE(VAR8 < 0,VAR1 - VAR8,VAR1 + VAR8 * 5,2,0),COLORDDDDDD;
STICKLINE(VAR8 < 0,VAR1 - VAR8,VAR1 + VAR8 * 5,1,0),COLORWHITE;