#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#define bool char
#define MAX 1000000
char buf[MAX + 2];
char fin[9000],fout[9000];
#if 0
FILE* readinput(const char* prompt, char* buff, int maxlen){
	int len;
	bool inok=0;
	FILE* openfile;
	do{
		inok=1;
		fprintf(stderr,"%s",prompt);
		fgets(buff, maxlen, stdin);
		len=strlen(fin);
		if(len == 1){
			fprintf(stderr,"你沒輸入！");
			inok=0;
		}else if(buff[len - 1] != '\n'){
			while(getchar()!='\n');	/* flush 掉 stdin buffer */
		}else{
			buff[len - 1] = '\0';
		}
		if(openfile=fopen())
	}while(!inok);
}

懶的寫這段了，註解掉！

#endif
int main(int argc, char* argv[])
{
	if(argc >= 2){
		fprintf(stderr,"這個程式不需要額外參數\n");
		return 2;
	}
	bool toolong=0,newsec=1,seccom=1;
	bool inok=0;
	int len;
	int c;
	FILE *in,*out;
	while(1){
		do{
			fprintf(stderr,"輸入檔名稱：");
			fgets(fin, 8999, stdin);
			len=strlen(fin);
			if(fin[len-1]=='\n'){
				fin[len-1]='\0';
			}else{
				while(getchar()!='\n'); /* flush stdin buffer */
			}
			if((in=fopen(fin,"r"))==NULL){
				perror(fin);
				inok=0;
			}else{
				inok=1;
			}
		}while(!inok);
		do{
			fprintf(stderr,"輸出檔名稱：");
			fgets(fout, 8999, stdin);
			len=strlen(fout);
			if(fout[len-1]=='\n'){
				fout[len-1]='\0';
			}else{
				while(getchar()!='\n'); /* flush stdin buffer */
			}
			if((out=fopen(fout,"w"))==NULL){
				perror(fin);
				inok=0;
			}else{
				inok=1;
			}
		}while(!inok);
		toolong=0,newsec=1,seccom=1;
		while(1){
			fgets(buf, MAX + 1, in);
			if(feof(in)){
				break;
			}
			toolong=0,seccom=0;
			len=strlen(buf);
			if(len == 0){ /* 應該不會發生，此段可刪 */
				fprintf(stderr,"發生不明錯誤，立即中止！\n");
				return 1;
			}
			if(len == 1){ /* 空白行 */
				if(newsec){ /* 判斷連續一堆空白行 */
					seccom=1;
					continue;
				}
				fprintf(out,");\n");
				newsec=1;
				seccom=1;
				continue;
			}
			if(buf[len - 1] != '\n'){ /* 如果字數超過 MAX */
				toolong=1;
			}else{
				buf[len - 1]='\0';
			}
			if(newsec){
				fprintf(out,"document.write(\n"
						"\'%s",buf);
				newsec=0;
			}else{
				fprintf(out,"+\'%s",buf);
			}
			if(toolong){
				do{
					fgets(buf, MAX + 1, in);
					len=strlen(buf);
					if(buf[len - 1] == '\n'){
						buf[len - 1]='\0';
						toolong=0;
					}
					fprintf(out,"%s",buf);
				}while(toolong);
			}
			fprintf(out,"\'\n");
		}
		if(!seccom){ /* 我不知結尾有沒有空白行，所以多一個判斷 */
			fprintf(out,");\n");
		}
		fclose(in);
		if(fclose(out)){
			perror(fout);
		}
		fprintf(stderr,"轉換下一個檔案？[Y] ");
		if((c=getchar()) == 'n' || c == 'N'){
			return 0;
		}else{
			if(c!='\n'){
				while(getchar()!='\n'); /* flush stdin buffer */
			}
		}
	}
	return 0;
}