variable:n=0,shiti=0;
if c>o then begin
n:=n+1;
shiti:=c-o;
end
if c>o and c-o>shiti then shiti:=c-o;
if n:=20 then zuida:=shiti;
if ref(n=20,1) then begin
n:=0;
shiti:=0;
zuida就是20個陽線最大的實體
每20 重置全局變量