假设有10个条件。满足条件就+1，或者-1。最后在统计出来。
请教如下应该是改正哪里，谢谢。
tj1：....;
...;
...;
tj10：....;
a:=c<ref(c,1);
b:=c>ref(c,1);
p:=0;
for i=1 to i=20 do
if tj+i and a then p=p+1;
else
if k+i and b then p=p-1;
ll:sum(p,0);
variable:t[3]=0;
p:=0;
t[1]:=c>o;
t[2]:=c>0;
t[3]:=mod(time,500)=0;
for i=1 to 3 DO
begin
if t[i] then p:=p+1;
if c<o then p:=p-1; //这边我简单用c<o条件了，你自己定义自己的tj和k即可
end
ll:p;