input:y(2008,1991,2099),m(10,1,12),d(30,1,31),y1(2009,1992,2099),m1(7,1,12),d1(31,1,31);
mm:=(y-1900)*10000+m*100+d;{最早日期}
mn:=(y1-1900)*10000+m1*100+d1;{最晚日期}
zz:=LAST(DATE>mm)+1;
zc:=LAST(DATE>mn)+1;
VERTLINE(zz=2,1);VERTLINE(zc=2,1);
{sum(AMOUNT,zz-zc)/sum(v,zz-zc);}
if zc>1 then begin 拦截:ref(ma(c,zz-zc),zc),COLOR00FF00;end;
  |
