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 重置全局变量