char	ls[128];
char	fn[128];
int		lx;
int		bs;
int		cx;
int		hv;
int		mx;
int		gr;
int		tg;
{
	mx = 100;
	system("rm -f group???.tmp");
	gr = 1;
	sformat(fn,128,"group%03d.tmp",gr);
	setofn(fn);
	while(fgetls(ls,128))	{
		bs = atoi(ls);
		cx = cindex(ls,' ');
		if( (bs + hv) >= mx && tg)	{
			tg = hv = 0;
			gr += 1;
			sformat(fn,128,"group%03d.tmp",gr);
			setofn(fn);
			}
		hv += bs;
		tg += 1;
		puts(ls + cx);
		}
	setofn();
	printf("%d groups\n",gr);
}