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;

