P1:=1011022;
	P:=31;
	MM1:=IF(DATE>P1,1,0);
	MM11:=SUM(MM1,0);
	MM:=MM11-1;
	MM2:=IF(MM>0,1,0);
	MMA1:=MM-INTPART((MM)/P)*P;
	MMB:=P-MMA1;
	MMB1:=IF(MMB=P,0,MMB);
	预测线:0;
	STICKLINE( MMA1=0,0,100000,1 ,0 ),LINETHICK2;
	AAQ:=DATE;
	AA1Q:=IF(AAQ>=P1,1,0);
	AA2Q:=SUM(AA1Q,0)-2;
	MMQ:=AA2Q;
	MM2Q:=IF(MMQ>0,1,0);
	MMA1Q:=MMQ-INTPART((MMQ)/P)*P;
	MMBQ:=P-MMA1Q;
	剩余:MMB1;
	{BP1:MMBQ;};
	