MAXV:=CONST(HHV(VOL,21));   

MAXS:=CONST(HHV(HIGH,21));   

BS:=MAXV/MAXS;   

VOLUME:=VOL/BS*0.10;   

ORIGIN:=CONST(LLV(LOW,0))-CONST(0.5*HHV(VOLUME,0)),;   

STICKLINE(CLOSE>=OPEN,ORIGIN,ORIGIN+VOLUME,0.2,0),COLORRED;   

STICKLINE(CLOSE<OPEN,ORIGIN,ORIGIN+VOLUME,0.2,0),COLORGREEN;