#include<stdio.h>
#include<stdlib.h>
#include<string.h>
int(PageLength)=56;
int PageWedth=60;
int LeftMargin=10;
int HeadingLength=5;
int FootingLength=5;
int StaringPageNumber=1;
int page=1;
int i=0;
char a[5];
char*aIndex=a;
void linageFull(FILE*fp2,int*linage,int*columns,int*page);


void printOut()
{
	printf("\n");
	printf("    格式化文本文件结束\n");
	printf("版面的参数如下:ln");
	printf("页长:%d\n",PageLength);
	printf("页宽:%d\n",PageWedth);
	printf("左空白:%d\n",LeftMargin);
	printf("头长: %d\n",HeadingLength);
	printf("脚长:%d\n",FootingLength);
	printf("起始页号:%d\n",StaringPageNumber);
	printf("\n");
}


void writeOut(FILE*fp2,char c1)
{
	char chl;
	chl = fputc(c1,fp2);
	printf("%c",ch1);
}


int zuokongbai(FILE*fp2)
{
	for(i=0; i<10; i++)
	    writeOut(fp2,' ');
	return i;
}


void pageNumber(FILE*fp2,char*aIndex,int*page)
{
	int m,n;
	m=*page;
	int i=0;
	while(m!=0)
	{
		n=m%10;
		*(aIndex+i)=n+'0';
		i++;
		m=m/10;
	}
	for(i=i-1;i>=0;i--)
	{
		writeOut(fp2,*(aIndex+i));
	}
	(*page)++;
}


void out(int*columns,char*array,int*linage,FILE*fp2,int*page,int*size)
{
	if(((*(columns))+1+strlen(array))>60)
	{
		if((*(linage))>50)
		{
			linageFull(fp2,linage,columns,page);
			for(i=0;i<*(size);i++)
			{
				writeOut(fp2,*(array+i));
				(*(columns))++;
			}
			(*(size))=0;
			(*(array))='\0';
		}
		else
		{
			writeOut(fp2,'\n');
			(*(linage))++;
			*(columns)=0;
			(*(columns))=zuokongbai(fp2);
			for(i=0;i<(*(size));i++)
			{
				writeOut(fp2,(*(array+i)));
				(*(columns))++;
			}
			(*(size))=0;
			(*(array))='\0';
		}
	}
	else
	{
		writeOut(fp2,' ');
		(*(columns))++;
		for(i=0;i<*size;i++)
		{
			writeOut(fp2,*(array+i));
			(*(columns))++;
		}
		(*(size))=0;
		(*(array))='\0';
	}
}


void linageFull(FILE*fp2,int*linage,int*columns,int*page)
{
	writeOut(fp2,'n');
	for(i=0;i<29;i++)
	{
		writeOut(fp2,' ');
	}
	pageNumber(fp2,aIndex,page);
	for(i=0;i<3;i++)
	{
		writeOut(fp2,'\n');
	}
	*linage=0;
	for(i=0;i<5;i++)
	{
		writeOut(fp2,'\n');
		*linage++;
	}
	*columns=zuokongbai(fp2);
}


void readIn(FILE*fp1,FILE*fp2)
{
	int blankNumber=0;
	int linage=0;
	int columns=0;
	char array[61]={"\0"};
	char*arrayIndex=array;
	int size=0;
	for(i=0;i<5;i++)
	{
		writeOut(fp2,'\n');
		linage++;
	} 
	columns=zuokongbai(fp2);
	for(i=0;i<7;i++)
	{
		writeOut(fp2,' ');
		columns++;
	}
	
	char c1;
	c1=fgetc(fp1);
	while(c1!=EOF)
	{
		if(c1==' ')
		{
			if(strlen(array)==0);
			else
			{
				out(&columns,array,&linage,fp2,&page,&size);
			}
		}
		else if(c1=='@')
		{
			if(strlen(array)==0);
			else
			{
				out(&columns,array,&linage,fp2,&page,&size);
			}
			if(linage>50)
			{
				linageFull(fp2,linage,columns,page);
				for(i=0;i<7;i++)
				{
				writeOut(fp2,' ');
				columns++;
				}
			}
			else
			{
				writeOut(fp2,' ');
				linage++;
				columns=0;
				columns=zuokongbai(fp2);
				for(i=0;i<7;i++)
				{
					writeOut(fp2,' ');
					columns++;
				}
			}
		}
		else
		{
			array[size]=c1;
			size++;
			array[size]='\0';
		}
		c1=fgetc(fp1);
		if(c1==EOF)
		{
			out(&columns,array,&linage,fp2,&page,&size);
			break;
		}
		if(strlen(array)>61)
		{
			printf("字符格式错误！\n");
			break;
		}
	}
}


int main()
{
	FILE*fpl,*fp2;
	char fileName_one[100];
	char fileName_two[100];
	
	printf("请输入要格式化文件的文件名(包括后缀名):\n");gets(fileName_one);
	if((fp1=fopen(fileName_one,"r"))==NULL)
	{
		printf("The file \"%s\" was not fopen!\n",fileName_one);
		exit(0);
	}
	printf("请输出要格式化文件的文件名(包括后缀名):\n");
	gets(fileName_two);
	if((fp2=fopen(fileName_two,"a"))==NULL)
	{
		printf("The file \"%s\" was not fopen! in",fileName_two);
		exit(0);
	}
	raedIn(fp1,fp2);
	printfOut();
	fclose(fp1);
	fclose(fp2);
}