variable:今高=0,今低=0,今開=0;

tb:=todaybar;

if tb=1 then

begin

  今高:=h;

  今低:=l;

  今開:=o;

end

else begin

  今高:=max(h,今高);

  今低:=min(l,今低);

end;

當日K線漲跌幅:=今高-今低;//百分比幅度，可以除今開或昨收