runmode:0;

variable:redk=0;
variable:redbars=0;
variable:greenk=0;
variable:greenbars=0;
variable:upgap=0;
variable:upgapbars=0;
variable:downgap=0;
variable:downgapbars=0;
variable:totalbars=0;

totalbars:=totalbars+1;

if close>open then begin
 redk:=redk+(high-low);
 redbars:=redbars+1;
end

if close<open then begin
 greenk:=greenk+(high-low);
 greenbars:=greenbars+1;
end

hh:=ref(high,1);
ll:=ref(low,1);

if open>ref(high,1) then begin 
 upgap:=upgap+(open-hh);
 upgapbars:=upgapbars+1;
end

if open<ref(low,1) then begin
 downgap:=downgap+(ll-open);
 downgapbars:=downgapbars+1;
end

if islastbar then begin
 上涨日振幅:trimprice(redk/redbars),linethick0;
 上涨日天数:redbars,linethick0;
 上涨日概率:redbars/totalbars*100,linethick0;
 下跌日振幅:trimprice(greenk/greenbars),linethick0;
 下跌日天数:greenbars,linethick0;
 下跌日概率:greenbars/totalbars*100,linethick0;
 
 向上跳空幅度:trimprice(upgap/upgapbars),linethick0;
 向上跳空天数:upgapbars,linethick0;
 向上跳空概率:upgapbars/totalbars*100,linethick0;
 向下跳空幅度:trimprice(downgap/downgapbars),linethick0;
 向下跳空天数:downgapbars,linethick0;
 向下跳空概率:downgapbars/totalbars*100,linethick0;
end