主题：请问我要求连续收阳或收阴的平均收盘价如何写？

多少个周期连续收阴或收阳？

variable:n=0;

variable:ss=0;

if c>o then begin

     n:=n+1;

     ss:=ss+close;

  end

if c<o then begin

        n:=0;

         ss:=0;

end

   pj:=ss/n;

求连续阴线和也是一样的

哦谢谢、