=====CLEANUP.TXT===========

/* "Enzime21" Text File digestion Tool:Ver1.021 ;*/

#include <stdio.h>;
#include <stdlib.h>;
#include <conio.h>;
#include <ctype.h>;
#include <string.h>;
#include <process.h>;

void main (int argc, char *argv[]){
if (argc< 1) {printf("Usage :Cleanup filenumber\n");}
int filecounter;
filecounter=atoi(argv[1]);
int i;
char str[30];
/*Main Action;*/

	for(i=0;i<=filecounter;i++)
	{
	sprintf(str,"del %d.txt",i);
	system(str);
	}

printf("Process Suceeded.\n");
/*Action, END;***=====***/
}

/*===================================================;*/





















=====PWINJP.TXT===========





/*;*/
#include<stdio.h>
#include<stdlib.h>
#include<string.h>

#include<time.h>

void main(int argc,char *argv[]){

/* Function.
1) make gogo.bat
2) make odrform.txt
;*/
FILE *writefp;
if(argv[1]==NULL){

writefp=fopen("gogo.bat","w");

fprintf(writefp,"REM ==gogo.bat=====\n");
fprintf(writefp,"echo off\n");
fprintf(writefp,"echo ==Display TXT list.=====\n");
fprintf(writefp,"echo If you want to BackUp,\n");
fprintf(writefp,"echo Then Stop by Ctrl+C, \n");
fprintf(writefp,"echo and move some TXT file to other.\n");
fprintf(writefp,"echo ========================\n");
fprintf(writefp,"\n");
fprintf(writefp,"\n");
fprintf(writefp,"echo on\n");
fprintf(writefp,"pause\n");
fprintf(writefp,"dir *.txt /p\n");
fprintf(writefp,"pause\n");
fprintf(writefp,"dir *.bak /p\n");
fprintf(writefp,"pause\n");
fprintf(writefp,"pwinjp 1\n");
fprintf(writefp,"pause\n");
fprintf(writefp,"start odrform.txt\n");
fprintf(writefp,"pause\n");
fprintf(writefp,"copy odrform.txt odrform.bat\n");
fprintf(writefp,"odrform\n");

fclose(writefp);

writefp=fopen("go31.bat","w");

fprintf(writefp,"REM ==go31.bat=====\n");
fprintf(writefp,"echo off\n");
fprintf(writefp,"echo ==Display TXT list.=====\n");
fprintf(writefp,"echo If you want to BackUp,\n");
fprintf(writefp,"echo Then Stop by Ctrl+C, \n");
fprintf(writefp,"echo and move some TXT file to other.\n");
fprintf(writefp,"echo ========================\n");
fprintf(writefp,"\n");
fprintf(writefp,"\n");
fprintf(writefp,"echo on\n");
fprintf(writefp,"pause\n");
fprintf(writefp,"dir *.txt /p\n");
fprintf(writefp,"pause\n");
fprintf(writefp,"dir *.bak /p\n");
fprintf(writefp,"pause\n");
fprintf(writefp,"pwinjp 1\n");
fprintf(writefp,"pause\n");
fprintf(writefp,"echo off\n");
fprintf(writefp,"echo odrform.txtをクリックして命令を選択して下さい.\n");
fprintf(writefp,"echo on\n");
fprintf(writefp,"pause\n");
fprintf(writefp,"copy odrform.txt odrform.bat\n");
fprintf(writefp,"odrform\n");

fclose(writefp);

writefp= fopen ("godos.bat","w");
fprintf(writefp,"echo off\n");
fprintf(writefp,"echo Multi-Functions　for　text　ver.1.021/(C)MIYAMA.1999　VYE00525@nifty.or.jp　　.\n");
fprintf(writefp,"echo.\n");
fprintf(writefp,"echo 新規ファイル作成。    newtxtjp（リターン）                          :YYMMDDaa.txt\n");
fprintf(writefp,"echo 総括ファイル作成。    txtasm  （リターン）                          :sumtxt.txt\n");
fprintf(writefp,"echo ファイル繰り込み機能。append   ファイル名１ ファイル名２            :FILE1.txt\n");
fprintf(writefp,"echo 目次添付機能。        addcont  ファイル名                           :FILE.txt\n");
fprintf(writefp,"echo 目次分離機能。        sepcont  ファイル名                           :FILE.txt\n");
fprintf(writefp,"echo 分離目次表示機能。    contcall（リターン）.bat\n");
fprintf(writefp,"echo 行数頁数添付機能。    segment  ファイル名 半角行数(キーワード省略可):output.txt\n");
fprintf(writefp,"echo 行数頁数削除機能。    rmvseg   ファイル名                           :FILE.txt\n");
fprintf(writefp,"echo ﾊﾞｯｸｱｯﾌﾟファイル復元。bak2txt  バックアップファイル名（*.bak）      :output.txt\n");
fprintf(writefp,"echo 検索事前強化（改行分割キーワード復元）。                            :output.txt\n");
fprintf(writefp,"echo                       refossil ファイル名 キーワード                :output.txt\n");
fprintf(writefp,"echo ファイル分割。        enzyme   ファイル名 キーワード                :0-9999.txt\n");
fprintf(writefp,"echo 分割数字テキスト結合。numasm   半角で結合する分割ファイル数         :output.txt\n");
fprintf(writefp,"echo 分割数字テキスト清掃。cleanup  半角で清掃する分割ファイル数         \n");
fprintf(writefp,"echo キーワード行抽出。    pickup   ファイル名 キーワード                :output.txt\n");
fprintf(writefp,"echo キーワード一括置換。  trans    ファイル名 キーワード１ キーワード２ :output.txt\n");
fprintf(writefp,"echo ＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝\n");
fprintf(writefp,"echo on\n");
fclose(writefp);
	}





opetion1:;
writefp=fopen("odrform.txt","w");
fprintf(writefp,"REM ******************************************\n");
fprintf(writefp,"REM * テキスト処理機能操作盤.(C).MIYAMA./1999\n");
fprintf(writefp,"REM ******************************************\n");
fprintf(writefp,"REM * 'REM'と半角スペースを削除し、コマンド.\n");
fprintf(writefp,"REM * を左に寄せると機能が動作します。      *\n");
fprintf(writefp,"REM ******************************************\n");
fprintf(writefp,"REM newtxtjp \n");
fprintf(writefp,"REM txtasm \n");
fprintf(writefp,"REM append   ????????.TXT ????????.TXT \nREM\n");

fprintf(writefp,"REM addcont  ????????.TXT \n");
fprintf(writefp,"REM sepcont  ????????.TXT \nREM\n");

fprintf(writefp,"REM segment  ????????.TXT 25 keyword \n");
fprintf(writefp,"REM rmvseg   ????????.TXT \nREM\n");

fprintf(writefp,"REM bak2txt  ????????.BAK \nREM\n");

fprintf(writefp,"REM enzyme   ????????.TXT Keyword \n");
fprintf(writefp,"REM numasm  30 \n");
fprintf(writefp,"REM cleanup 30 \nREM\n");

fprintf(writefp,"REM refossil ????????.TXT Keyword \n");
fprintf(writefp,"REM pickup   ????????.TXT Keyword \n");
fprintf(writefp,"REM trans    ????????.TXT Keyword1 Keyword2       \n");
fprintf(writefp,"REM *****************************************************\n");
fprintf(writefp,"REM *半角星印およびREMタグは命令抑制機能です。           \n");
fprintf(writefp,"REM *必要のないところは絶対に操作しないで下さい。        \n");
fprintf(writefp,"REM *Ｔａｂキー使用禁止です（誤動作のおそれあり）        \n");
fprintf(writefp,"REM *ファイル名にロングファイルネームは使えません。      \n");
fprintf(writefp,"REM *****************************************************\n");
fprintf(writefp,"REM *原本内容を変更する機能は、直前の内容を＊．ｂａｋに  \n");
fprintf(writefp,"REM *保存します。bak2txtでテキスト形式に復元可能。       \n");
fprintf(writefp,"REM *****************************************************\n");
fprintf(writefp,"REM *Usage:   機能と出力ファイル名                       \n");
fprintf(writefp,"REM *newtxtjp 本日の日付でファイルを作成(追加mode)       \n");
fprintf(writefp,"REM *txtasm   全テキストを結合        ＞sumtxt.txt      \n");
fprintf(writefp,"REM *append   ２テキストを結合        ＞先頭のファイル  \n");
fprintf(writefp,"REM *addcont  目次を付加              ＞入力ファイル    \n");
fprintf(writefp,"REM *sepcont  目次を分離              ＞入力ファイル    \n");
fprintf(writefp,"REM *segmant  頁と行番号付加          ＞output.txt      \n");
fprintf(writefp,"REM *remseg   頁と行番号削除          ＞入力ファイル    \n");
fprintf(writefp,"REM *bak2txt  ﾊﾞｯｸｱｯﾌﾟを一時テキストに＞output.txt      \n");
fprintf(writefp,"REM *preserch 改行キーワード復元      ＞入力ファイル    \n");
fprintf(writefp,"REM *enzyme   キーワードでファイル分割＞数字名ファイル  \n");
fprintf(writefp,"REM *numasm   enzyme生成物を順に再結合＞output.txt      \n");
fprintf(writefp,"REM *cleanup  enzyme生成物を除去      ＞除去            \n");
fprintf(writefp,"REM *pickup   キーワード該当行を検出  ＞output.txt      \n");
fprintf(writefp,"REM *trans    キーワード一括置換      ＞output.txt      \n");
fprintf(writefp,"REM *****************************************************\n");
fprintf(writefp,"REM *****************************************************\n");

fclose(writefp);


}/*======================================================================;*/










=====NEWTXTJP.TXT===========

/*;*/
#include<stdio.h>
#include<stdlib.h>
#include<string.h>

#include<time.h>

void main(void){

FILE *days;

char getdays[257],filename[257];

long nowtime;
time(&nowtime);
/*printf("%s",ctime(&nowtime));*/
strcpy(getdays,ctime(&nowtime));


filename[0]=getdays[22];
filename[1]=getdays[23];

/*==JPN edition=====;*/

if ((getdays[4]=='A')&&(getdays[5]=='p')){filename[2]='0';filename[3]='4';}
if ((getdays[4]=='M')&&(getdays[5]=='a')){filename[2]='0';filename[3]='5';}
if ((getdays[5]=='u')&&(getdays[6]=='n')){filename[2]='0';filename[3]='6';}
if ((getdays[5]=='u')&&(getdays[6]=='l')){filename[2]='0';filename[3]='7';}
if ((getdays[4]=='A')&&(getdays[5]=='u')){filename[2]='0';filename[3]='8';}
if ((getdays[4]=='S')&&(getdays[5]=='e')){filename[2]='0';filename[3]='9';}
if ((getdays[4]=='O')&&(getdays[5]=='c')){filename[2]='1';filename[3]='0';}
if ((getdays[4]=='N')&&(getdays[5]=='o')){filename[2]='1';filename[3]='1';}
if ((getdays[4]=='D')&&(getdays[5]=='e')){filename[2]='1';filename[3]='2';}
if ((getdays[4]=='J')&&(getdays[5]=='a')){filename[2]='0';filename[3]='1';}
if ((getdays[4]=='F')&&(getdays[5]=='e')){filename[2]='0';filename[3]='2';}
if ((getdays[4]=='M')&&(getdays[5]=='u')){filename[2]='0';filename[3]='3';}

filename[4]=getdays[8];
filename[5]=getdays[9];

filename[6]='a';
filename[7]='a';
filename[8]='.';
filename[9]='T';
filename[10]='X';
filename[11]='T';

filename[12]='\0';

/*sprintf(filename,"aa.TXT");*/


printf("%s",filename);


days=fopen(filename,"a");
fclose(days);
}/*======================================================================;*/










=====REFOSSIL.TXT===========

#include<stdio.h>
#include<conio.h>
#include<ctype.h>
#include<string.h>
#include<process.h>

#include<refossil.h>
#include<fileback.h>
void main(int argc,char *argv[])
{

if (argc!=3){printf("Usage: refossil filename.txt keyword.\n");}
FILE *read_fp;

if((read_fp=fopen(argv[1],"r"))!=NULL)
	{
	fclose(read_fp);
	char keyword[257];

	strcpy(keyword,argv[2]);
	repairfossil(argv[1],keyword,"dammy","refossil.txt");
	filebackup(argv[1],"refossil.txt");
	/*remove reffosil.txt as temporary-file.;*/
	remove("refossil.txt");


	printf("Process succeeded.\n");
	}
else
	{
	printf("Cannot file open %s.",argv[1]);
	exit(1);
	}


}/*==================================================================;*/










=====ADDCONT.TXT===========

/*;*/
#include<stdio.h>
#include<stdlib.h>
#include<string.h>

#include <process.h>
#include  <backup.h>

/*#include<time.h>*/

/*ThisProgram have 3 step;*/
/*1)inputted original filename check;*/
/*2)Take contents.txt or new created and write.;*/
/*3)Read Original-txt read and write to work-file(temp.txt)
	with checking exist of Original-file-txt.;*/
/*4)File rename process for original-bak files.;*/

void main(int argc,char *argv[])
{
/* Miss input Check;*/
if (argc!=2){printf("Usage:addcont filename.txt\n");exit(1);}

FILE *read_fp;
FILE *writefp;

char read_filename[257],buf[257];
strcpy(read_filename,argv[1]);

int i,j;	  		/* *argv[1]'s \n code remove.   ;*/

for(i=0;read_filename[i]!='\0';i++)
	{
	if(read_filename[i]=='\n')	{
					read_filename[i]='\0';
					}
	}

writefp=fopen("addcont.txt","w");	/* Open "temp.tmp" as OutputWrite.*/

if((read_fp=fopen("contents.txt","r"))==NULL)/*New make "contents.txt";*/
	{
	fprintf(writefp,"~~Contents~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n");
	/* Content zone Add to File Head;*/

	for (j=0;j!=5-1;j++)	{/* 5-lined \n;*/
				fprintf(writefp,"\n");
				}

	fprintf(writefp,"~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n");
	/* '~' char-s for Contents Remover.;*/

	fclose(read_fp);
	}

else			/*Take Old "contents.txt" and add to temp.txt;*/
	{
	while(fgets(buf,256,read_fp)!=NULL)
		{
		fputs(buf,writefp);
		}
	fclose(read_fp);
	}



/*Both cases, Togather same next process.==============================;*/

if((read_fp=fopen(read_filename,"r"))!=NULL)
				/*When Orignal-txt entirely exist.;*/
{				/* copy original-txt to temp.txt.;*/

while((fgets(buf,256,read_fp))!=NULL)
	{
	fputs(buf,writefp);
	}
fclose(read_fp);
fclose(writefp);			/*Two file Close.;*/

printf("ADD Contents Process Succeeded.\n");
filebackup(read_filename,"addcont.txt");	/*Original-file Rename;*/
}
else
{
printf("%s Text-File No exist.",read_filename);/*When Original-TXT Noexist;*/
remove("addcont.txt");
}
/*process.end;*/
}/*======================================================================;*/










=====SEPCONT.TXT===========

/*;*/
#include<stdio.h>
#include<stdlib.h>
/*#include<ctype.h>*/
#include<string.h>

#include <process.h>
/*#include<time.h>*/
# include <backup.h>

void main(int argc,char *argv[]){
if (argc!=2){printf("Usage:sepcont filename.txt\n");}


FILE *read_fp;
FILE *writefp;

char read_filename[257];
strcpy(read_filename,argv[1]);
int i;

for(i=0;read_filename[i]=='\0';i++)	/*\n code remove;*/
	{
	if(read_filename[i]=='\n')
		{
		read_filename[i]='\0';
		}
	}

if((read_fp=fopen(read_filename,"r"))!=NULL)/*When file really exists.;*/
	{
	char buf[257];

	int flagwfp;
	flagwfp=0;

	fgets(buf,256,read_fp);		/*1st line check Contents be or not;*/

	if((buf[0]=='~')&&(buf[1]=='~'))
		{
		writefp=fopen("contents.txt","w");
		flagwfp=1;

		fputs(buf,writefp);
		}
	else				/*When Contents is nothing.;*/
		{
		printf("This Text-file has No Contents.\n");
		printf("Or 1st line's left side is not Correct.\n");

		exit(1);
		}

	while((fgets(buf,256,read_fp))!=NULL)/*again roal of reading.*/

		{
		fputs(buf,writefp);

		if((flagwfp==1)&&(buf[0]=='~'))
					/*Discover contents's end,
					Change Write file. for main-trunk.;*/
			{
			flagwfp=-1;
			fclose(writefp);
			writefp=fopen("sepcont.txt","w");
			}

		}
	fclose(writefp);			/*Two file pointer ,close.;*/
	fclose(read_fp);

	filebackup(read_filename,"sepcont.txt");	/*Filename,backup.;*/


	remove("sepcont.txt");
	/*=============================================================;*/

	writefp=fopen("contcall.bat","w");	/*Making Call editor Batch.;*/

	char cmdstr[257];
	fprintf(writefp,"start contents.txt\n");

	strcpy(cmdstr,"start ");
	strcat(cmdstr,read_filename);
	fprintf(writefp,"%s\n",cmdstr);
	/*printf(cmdstr);*/

	fclose(writefp);
	/*system("contcall");                     Made system error.*/
	/*Please click "CONTCALL.BAT" Icon on UserSide.*/

	}
else
	{printf("Cannot file open.\n");
	fclose(read_fp);
	}

}/*======================================================================;*/










=====BAK2TXT.TXT===========

#include<stdio.h>

#include<process.h>
void main(int argc,char *argv[])
{
if (argc!=2){printf("Usage: bak2txt filename.bak.\n");
exit(1);
}
FILE *read_fp;
FILE *writefp;
if((read_fp=fopen(argv[1],"r"))!=NULL)
	{
	fclose(read_fp);

	writefp=fopen("output.txt","w");
	fclose(writefp);

	remove("output.txt");
	printf("%s changed to output.txt.\n",argv[1]);

	rename(argv[1],"output.txt");


	printf("Process succeeded.\n");
	}
else
	{
	printf("No exists %s.\n",argv[1]);
	fclose(read_fp);}

}/*======================================================================;*/










=====TXTASM.TXT===========

/*     ;*/
/* TXTASM.C ;*/

#include <stdio.h>;
#include <stdlib.h>;
#include <conio.h>;
#include <ctype.h>;
#include <string.h>;
#include <process.h>;
#include <time.h>
/*=========================================;*/
void main (void){
char guide[257],filename[257];

char buf[257];
int i,j;/*===================================================;*/
FILE *read_fp;
FILE *guidefp;

FILE *writefp;

system("dir *.txt > txtasm.tmp");/*Get TXT file List;*/
if((guidefp=fopen("txtasm.tmp","r"))==NULL){
printf("Error No Exist TXTASM.TMP as Temp-File for Operation.\n");
exit(1);
};/*Open TXT file list;*/

writefp=fopen("sumtxt.txt","a");/*TXT assemble file open as append Mode;*/

while((fgets(guide,256,guidefp))!=NULL)/*Read TXT filelist to EOF;*/
{
	if(guide[9]=='T'){
	if(guide[10]=='X'){
	if(guide[11]=='T'){	/*only "TXT" included line active.;*/

		for (i=0;i<=11;i++)
			{
			filename[i]=guide[i];
			if(guide[i]==' ')break;
			}

			filename[i]='.';
			filename[i+1]='\0';
						/*To get trunk of filename.;*/
			strcat(filename,"TXT");

			read_fp=fopen(filename,"r");/*Open TXT by filename got.;*/

		fprintf(writefp,"=====%s===========\n",filename);
			/*Type filename to SUM-TXT.;*/

		while((fgets(buf,256,read_fp))!=NULL)
			{
			fputs(buf,writefp);
			}
			/*Copy filename-TXT to SUM-TXT as apend.;*/

		fclose(read_fp);/*Bacuumed End from filename-TXT.;*/
		printf("%s Combined to Sumtxt.txt.\n",filename);

	}}}/*End of "TXT" hitted line case.;*/
}

fclose(guidefp);
fclose(writefp);



remove("txtasm.tmp");
}/*==================================================;*/





















=====PICKUP.TXT===========

#include<stdio.h>
#include<conio.h>
#include<ctype.h>
#include<string.h>
#include<process.h>

#include<refossil.h>
#include<fileback.h>
void main(int argc,char *argv[])
{

if (argc!=3){printf("Usage: pickup filename.txt keyword.\n");}
char buf[257];
int line_counter=0;
FILE *read_fp;
FILE *writefp;

if((read_fp=fopen(argv[1],"r"))!=NULL)
	{
	fclose(read_fp);
	char keyword[257];

	strcpy(keyword,argv[2]);
	repairfossil(argv[1],keyword,"dammy","pickup.txt");

	line_counter=0;
	if((read_fp=fopen("pickup.txt","r"))!=NULL)
		{
		writefp=fopen("output.txt","w");
		fprintf(writefp,"==InCreaced a little of all line number.=====\n");
		fprintf(writefp,"==Because CRLFed keyword reapaired.==========\n");
		while((fgets(buf,256,read_fp))!=NULL)
			{
			if(discover1st(buf,keyword)!=-1)
				{
				fprintf(writefp,"__%d::",line_counter);


				fputs(buf,writefp);
				}

			line_counter++;
			}
		fclose(writefp);
		fclose(read_fp);
		}
	remove("pickup.txt");
	printf("Process succeeded.\n");
	}

	else
	{
	printf("Cannot file open %s.",argv[1]);
	exit(1);
	}


}/*==================================================================;*/










=====SEGMENT.TXT===========

/* segment.c;*/
#include<stdio.h>
#include<stdlib.h>
#include<conio.h>

#include<ctype.h>
#include<string.h>

#include<process.h>

#include<refossil.h>
void main(int argc,char *argv[]){

if ((argc<3)&&(4<argc))
	{
	printf("Usage: segment filename.txt (keyword).\n");
	exit(1);
	}

int line_counter,fix_line_number;
	/*line_counter is total line number without paged vacant.;*/
	/*fix_line_number parameter inputted each-line number per pages.*/
int line_counter_page,page_counter;
	/*line counter on current pages.;*/
	/*Page counter just page counter.*/

int i;
char buf[257],keyword[257];	/*buf is read-line buffer.;*/

fix_line_number=atoi(argv[2]);


strcpy(keyword,argv[3]);	/*Togather when argv[3]==NULL;*/

FILE *read_fp;
FILE *writefp;

writefp=fopen("output.txt","w"); 	/*Out put file is not original source.txt,
				without tune User's tryal for page style;*/

line_counter=1;			/*Initialize;*/
line_counter_page=1;

page_counter=1;

/*Check file Existence.;*/
if ((read_fp=fopen(argv[1],"r"))!=NULL)
	{

	/*read again until EOF.;*/
	while(fgets(buf,256,read_fp)!=NULL)
		{printf("%d\n",line_counter_page);

		/*When Exist charper Keyword AS order.;*/
		if(keyword!=NULL)
			{
			/*When discover CKeyword on current line buffer.;*/
			if(discover1st(buf,keyword)!=-1)
				{


				/*Type many \n Until Page End.;*/
	for(i=0;i<=fix_line_number-line_counter_page;i++)
					{
					fprintf(writefp,"__::\n");
					}
				/*Page Footer,;*/
				fprintf(writefp,"___________%d___________\n",page_counter);

				/*Increacement Pagecounter.
				Initialize Line Counter of Each Page.;*/
				page_counter=page_counter+1;
				line_counter_page=0;

				line_counter_page++;

				/*Keyword Existence of line buf.
				Process's end.;*/
				}

			/*Keyword Ckeck Processes' end.;*/
			}

			/*Main normal process.;*/
			fprintf(writefp,"__%d/%d::",line_counter,line_counter_page);
			fputs(buf,writefp);

			/*When reach line page's end.;*/
			if(line_counter_page==fix_line_number)
				{
				/*Page-Footer.;*/
				fprintf(writefp,"___________%d___________\n",page_counter);
				page_counter=page_counter+1;

				line_counter_page=0;
				}




			line_counter++;
			line_counter_page++;
			/*Mainprocess's end.;*/
			}
		fclose(read_fp);
		fclose(writefp);
	}

	/*When Cannot Open Original-file.;*/
	else
	{
	printf("No exists %s.",argv[1]);
	exit(1);
	}
/*General end.;*/
}/*======================================================================;*/













=====APPEND.TXT===========
#include<stdio.h>
void main(int argc,char *argv[])
{
if(argc!=3){
printf("Usage: append filename(be connected) filename(copy source.)");}

char buf[257];
FILE *read_fp;
FILE *appendfp;
if((read_fp=fopen(argv[1],"r"))==NULL)
	{
	printf("No exists %s.\nOpened as New file.\n",argv[1]);
	fclose(read_fp);
	}

if((read_fp=fopen(argv[2],"r"))!=NULL)
	{
	appendfp=fopen(argv[1],"a");
	fprintf(appendfp,"== %s =====\n",argv[2]);

		while(fgets(buf,256,read_fp))
		{
		fputs(buf,appendfp);
		}

	fclose(appendfp);
	printf("Process succeeded.\n");
	}
else
	{
	printf("No exists %s. Cannot Copy to Append.\n",argv[2]);
	}
fclose(read_fp);

}/*====================================================================;*/










=====ENZYME.TXT===========
#include<stdio.h>


#include<stdlib.h>
#include<conio.h>


#include<ctype.h>
#include<string.h>
#include<process.h>

#include<refossil.h>
/*#include<fileback.h>*/
void main(int argc,char *argv[]){
if (argc!=3){printf("Usage: enzyme filename.txt keyword.\n");
		printf("\n");
		printf("Ez.exe Ver1.025.\n");
		exit(1);
		}
FILE *read_fp;
FILE *writefp;

char buf[257],remainbuf[257],write_filename[257],keyword[257];
int i,d1st,write_filecounter;

strcpy(keyword,argv[2]);

if((read_fp=fopen(argv[1],"r"))!=NULL)
	{

	fclose(read_fp);
	repairfossil(argv[1],keyword,"dammy","enzyme.txt");

	if((read_fp=fopen("enzyme.txt","r"))==NULL{
	printf("Error No Exist ENZYME.TXT as TEMP-Files for Operation.\n");


	exit(1);
	});

	write_filecounter=0;

	sprintf(write_filename,"%d.txt",write_filecounter);
	printf("%s\n",write_filename);
	writefp=fopen(write_filename,"w");
	fprintf(writefp,"== %s =====\n",write_filename);

	while(fgets(buf,256,read_fp)!=NULL)
		{
		againremain:;
		if(discover1st(buf,keyword)==-1)
			{
			fputs(buf,writefp);
			}


		if(discover1st(buf,keyword)!=-1)
			{
			d1st=discover1st(buf,keyword);
			for(i=0;i<=d1st-1;i++)
				{
				fprintf(writefp,"%c",buf[i]);
				}
			fprintf(writefp,"\n");
			fclose(writefp);

			printf("%s Created.\n",write_filename);
			write_filecounter=write_filecounter+1;

			if(9999<write_filecounter)
				{
				printf("Sorry Your file SO big.\n");
				exit(1);
				}
			sprintf(write_filename,"%d.txt",write_filecounter);
			writefp=fopen(write_filename,"w");
			fprintf(writefp,"== %s =====\n",write_filename);




			fprintf(writefp,"%s\n",keyword);
			for(i=d1st+strlen(keyword);buf[i]!='\0';i++)
				{
				remainbuf[i-(d1st+strlen(keyword))]=buf[i];
				}
				remainbuf[i-(d1st+strlen(keyword))]='\0';
				strcpy(buf,remainbuf);
				goto againremain;

			}
		}
		fclose(writefp);
		fclose(read_fp);
		printf("%s Created.\n",write_filename);
		remove("enzyme.txt");

		printf("Process succeeded.\n");
	}
else
	{
	printf("No exists %s",argv[1]);
	fclose(read_fp);

	exit(1);
	}

}/*==================================================================;*/









=====RMVSEG.TXT===========

#include<stdio.h>
#include<string.h>
#include<ctype.h>



#include<process.h>
#include<fileback.h>
void main(int argc,char *argv[]){
FILE *read_fp;
FILE *writefp;

char buf[257];
int ii,j,k;
if((read_fp=fopen(argv[1],"r"))!=NULL)
	{
	/*Nest-logic.
	1)if NO_ _ (2-underber)exist immediately write Buffer line
	to file for Safe.

	2)if _ _(2- under bar)exist,second check.
	2-1)if _..... seaquence exist after, No action any.
	2-2)if :: (double colon)discover on any place of buffer,
	until double colon, remove.theb write to file.

	(buf[x];x number to small tuning. Ex,

			     k
	(old)buf[x]= __????::********************\0
	(new)buf[x]= ********************\0
		 x   0123456789012345678901234567890
			       111111111122222222223.....

			(new)buf[n]=(old)buf[n+k]           );*/

	writefp=fopen("rmvseg.txt","w");
	while((fgets(buf,256,read_fp))!=NULL)
	{
	/*Remove Vacant scroll sequences.;*/
	if((buf[3]==':')&&(buf[4]=='\n'))
		{
		again:;
		fgets(buf,256,read_fp);
		if(buf==NULL)
			{
			fclose(read_fp);
			fclose(writefp);

			exit(1);
			}
		if((buf[3]==':')&&(buf[4]=='\n')){goto again;	}
		else {fprintf(writefp,"\n");	}
	}

		if((buf[0]=='_')&&(buf[1]=='_'))
			{
			if(buf[9]=='_')
				{
				/*No action. leave Buffer as Footer Contents.;*/
				}
			else
				{
				/*tag remove;*/
				for(ii=0;ii<=39;ii++)
					{
					if((buf[ii]==':')&&(buf[ii+1]==':'))
						{goto hit;}
					}
					goto irregurar;
					hit:;
				k=ii+1+1;
				for(j=k;buf[j]!='\0';j++)
					{
					buf[j-k]=buf[j];
					/*if j=k then buf[0];*/
					}
					buf[j-k]='\0';/*EOF;*/
					/*printf("tag branch\n");*/

					irregurar:
					fputs(buf,writefp);
				}/*Tag remove's end.;*/
			}/*'__' head/double underbar event's end.;*/
		else
			{
			fputs(buf,writefp);
			}
		}/*while's end.;*/
		fclose(read_fp);
		fclose(writefp);

		filebackup(argv[1],"rmvseg.txt");
	}/*File exist's check's end.;*/
else
	{
	printf("No file exists %s",argv[1]);
	}


}/*General end.;*/
/*=======================================================================;;;*/










=====TRANS.TXT===========
#include<stdio.h>
#include<stdlib.h>
#include<conio.h>
#include<ctype.h>
#include<string.h>
#include<process.h>

#include<refossil.h>
#include<fileback.h>
void main(int argc,char *argv[])
{
if (argc!=4){printf("Usage: trans filename.txt keyword.\n");
		printf("\n");
		printf("Trans.exe Ver1.025.\n");
		exit(1);
		}
FILE *read_fp;
FILE *writefp;

char buf[257],remainbuf[257],write_filename[257],keyword[257];
int i,d1st;

strcpy(keyword,argv[2]);

if((read_fp=fopen(argv[1],"r"))!=NULL)
	{
	printf("trans %s %s %s\n",argv[1],argv[2],argv[3]);
	fclose(read_fp);
	repairfossil(argv[1],keyword,"dammy","trans.txt");

	read_fp=fopen("trans.txt","r");
	writefp=fopen("output.txt","w");

	while(fgets(buf,256,read_fp)!=NULL)
		{
		againremain:;
		if(discover1st(buf,keyword)==-1)
			{
			fputs(buf,writefp);
			}


		if(discover1st(buf,keyword)!=-1)
			{
			d1st=discover1st(buf,keyword);
			for(i=0;i<=d1st-1;i++)
				{
				fprintf(writefp,"%c",buf[i]);
				}
			fprintf(writefp,"\n");


			fprintf(writefp,"%s\n",argv[3]);
			for(i=d1st+strlen(keyword);buf[i]!='\0';i++)
				{
				remainbuf[i-(d1st+strlen(keyword))]=buf[i];

				}
				remainbuf[i-(d1st+strlen(keyword))+1]='\0';
				strcpy(buf,remainbuf);
				goto againremain;
			}
		}
		fclose(writefp);
		fclose(read_fp);

		remove("trans.txt");
		printf("Process succeeded.\n");
	}
else
	{
	printf("No exists %s",argv[1]);
	fclose(read_fp);

	exit(1);
	}

}/*==================================================================;*/









=====NUMASM.TXT===========

#include<stdio.h>
#include<stdlib.h>

void main(int argc,char *argv[]){
if(argc!=2){printf("Usage: numasm Untilnumberlastfile.\n");}

FILE *read_fp;
FILE *writefp;
char buf[257],filename[257];
writefp=fopen("output.txt","w");


int i;
for(i=0;i<=atoi(argv[1]);i++)
	{
	sprintf(filename,"%d.txt\0",i);
	if((read_fp=fopen(filename,"r"))!=NULL)
		{
		fprintf(writefp,"==%d.txt=====\n",i);
		while((fgets(buf,256,read_fp))!=NULL)
			{
			fputs(buf,writefp);
			}
		fclose(read_fp);
		}
	else
		{
		printf("No exists %d.txt.\n",i);
		fprintf(writefp,"==%d.txt is No Exist.=====\n",i);
		}

	}
	fclose(writefp);
}/*=======================================================================;*/










=====PWINUS.TXT===========





/*;*/
#include<stdio.h>
#include<stdlib.h>
#include<string.h>

#include<time.h>

void main(int argc,char *argv[]){

/* Function.
1) make gogo.bat
2) make odrform.txt
;*/
FILE *writefp;
if(argv[1]==NULL){

writefp=fopen("gogo.bat","w");

fprintf(writefp,"REM ==gogo.bat=====\n");
fprintf(writefp,"echo off\n");
fprintf(writefp,"echo ==Display TXT list.=====\n");
fprintf(writefp,"echo If you want to BackUp,\n");
fprintf(writefp,"echo Then Stop by Ctrl+C, \n");
fprintf(writefp,"echo and move some TXT file to other.\n");
fprintf(writefp,"echo ========================\n");
fprintf(writefp,"\n");
fprintf(writefp,"\n");
fprintf(writefp,"echo on\n");
fprintf(writefp,"pause\n");
fprintf(writefp,"dir *.txt /p\n");
fprintf(writefp,"pause\n");
fprintf(writefp,"dir *.bak /p\n");
fprintf(writefp,"pause\n");
fprintf(writefp,"pwinus 1\n");
fprintf(writefp,"pause\n");
fprintf(writefp,"start odrform.txt\n");
fprintf(writefp,"pause\n");
fprintf(writefp,"copy odrform.txt odrform.bat\n");
fprintf(writefp,"odrform\n");

fclose(writefp);

writefp=fopen("go31.bat","w");

fprintf(writefp,"REM ==go31.bat=====\n");
fprintf(writefp,"echo off\n");
fprintf(writefp,"echo ==Display TXT list.=====\n");
fprintf(writefp,"echo If you want to BackUp,\n");
fprintf(writefp,"echo Then Stop by Ctrl+C, \n");
fprintf(writefp,"echo and move some TXT file to other.\n");
fprintf(writefp,"echo ========================\n");
fprintf(writefp,"\n");
fprintf(writefp,"\n");
fprintf(writefp,"echo on\n");
fprintf(writefp,"pause\n");
fprintf(writefp,"dir *.txt /p\n");
fprintf(writefp,"pause\n");
fprintf(writefp,"dir *.bak /p\n");
fprintf(writefp,"pause\n");
fprintf(writefp,"pwinus 1\n");
fprintf(writefp,"pause\n");
fprintf(writefp,"echo off\n");
fprintf(writefp,"echo Please click odrform.txt and command tune.\n");
fprintf(writefp,"echo on\n");
fprintf(writefp,"pause\n");
fprintf(writefp,"copy odrform.txt odrform.bat\n");
fprintf(writefp,"odrform\n");

fclose(writefp);

writefp= fopen ("godos.bat","w");
fprintf(writefp,"echo off\n");
fprintf(writefp,"echo MultiFunctions for text ver.1.021/(C)MIYAMA.1999 VYE00525@nifty.or.jp .\n");
fprintf(writefp,"echo.\n");
fprintf(writefp,"echo Making today-files.   newtxtjp(return)                         :YYMMDDaa.txt\n");
fprintf(writefp,"echo Making Sum-TXT.       txtasm  (return)                         :sumtxt.txt\n");
fprintf(writefp,"echo Append file.          append   file1.txt file2.txt             :FILE1.txt\n");
fprintf(writefp,"echo ADD contents to file. addcont  filename.txt                    :FILE.txt\n");
fprintf(writefp,"echo SEParation Contents.  sepcont  filename.txt                    :FILE.txt\n");
fprintf(writefp,"echo Contents-Call.        contcall (return).bat\n");
fprintf(writefp,"echo Segmentize File.      segment  filename.txt numberline (Keyword):output.txt\n");
fprintf(writefp,"echo Removing Segment.     rmvseg   filename.txt                    :FILE.txt\n");
fprintf(writefp,"echo Restore Bakeup-file.  bak2txt  filename.bak（*.bak）           :output.txt\n");
fprintf(writefp,"echo Repaire CRLFed keyword.                                        :output.txt\n");
fprintf(writefp,"echo                       refossil filename.txt keyword            :output.txt\n");
fprintf(writefp,"echo Desolve by keyword.   enzyme   filename.txt keyword            :0-9999.txt\n");
fprintf(writefp,"echo Combine all enzymed.  numasm   numberoffiles                   :output.txt\n");
fprintf(writefp,"echo Cleanup all enzymed.  cleanup  numberoffiles         \n");
fprintf(writefp,"echo Pickup Keyword-line.  pickup   filename.txt keyword            :output.txt\n");
fprintf(writefp,"echo Autotranslation       trans    filename.txt keyword1 keyword2  :output.txt\n");
fprintf(writefp,"echo =============================================================================\n");
fprintf(writefp,"echo on\n");
fclose(writefp);
	}





opetion1:;
writefp=fopen("odrform.txt","w");
fprintf(writefp,"REM ******************************************\n");
fprintf(writefp,"REM *TXT Action Operating file.(C).MIYAMA./1999\n");
fprintf(writefp,"REM ******************************************\n");
fprintf(writefp,"REM *Remove 'REM'and Sapce to Command         \n");
fprintf(writefp,"REM * to be left,Then Active the command.    *\n");
fprintf(writefp,"REM ******************************************\n");
fprintf(writefp,"REM newtxtjp \n");
fprintf(writefp,"REM txtasm \n");
fprintf(writefp,"REM append   ????????.TXT ????????.TXT \nREM\n");

fprintf(writefp,"REM addcont  ????????.TXT \n");
fprintf(writefp,"REM sepcont  ????????.TXT \nREM\n");

fprintf(writefp,"REM segment  ????????.TXT 25 keyword \n");
fprintf(writefp,"REM rmvseg   ????????.TXT \nREM\n");

fprintf(writefp,"REM bak2txt  ????????.BAK \nREM\n");

fprintf(writefp,"REM enzyme   ????????.TXT Keyword \n");
fprintf(writefp,"REM numasm  30 \n");
fprintf(writefp,"REM cleanup 30 \nREM\n");

fprintf(writefp,"REM refossil ????????.TXT Keyword \n");
fprintf(writefp,"REM pickup   ????????.TXT Keyword \n");
fprintf(writefp,"REM trans    ????????.TXT Keyword1 Keyword2       \n");
fprintf(writefp,"REM *****************************************************\n");
fprintf(writefp,"REM *Please absolutely remove other * and REM.           \n");
fprintf(writefp,"REM *  without your purpose.                             \n");
fprintf(writefp,"REM *Cannot use TAB key and DoubleQuartation.            \n");
fprintf(writefp,"REM *Cannot use LongFileName of VFAT/95//NT              \n");
fprintf(writefp,"REM *****************************************************\n");
fprintf(writefp,"REM *Making *.bak file when command change original file.\n");
fprintf(writefp,"REM *Bak2txt commnad filename.bak to output.txt.(without append.)\n");
fprintf(writefp,"REM *****************************************************\n");
fprintf(writefp,"REM *Usage:   Function and Output-filename.               \n");
fprintf(writefp,"REM *newtxtjp Making Today's file.(append-mode):YYMMDD.txt\n");
fprintf(writefp,"REM *txtasm   Making Sum-TXT.            :sumtxt.txt      \n");
fprintf(writefp,"REM *append   Append file2 to file1.     :FILE1.txt       \n");
fprintf(writefp,"REM *addcont  ADD contents.              :FILE.txt        \n");
fprintf(writefp,"REM *sepcont  Separation Contents.       :FILE.txt        \n");
fprintf(writefp,"REM *segmant  Tune line-page numbers.    :output.txt      \n");
fprintf(writefp,"REM *remseg   Remove l-p numbers.        :FILE.txt        \n");
fprintf(writefp,"REM *bak2txt  Restore backupfiles.       :output.txt      \n");
fprintf(writefp,"REM *preserch Repaire CRLFed Keyword.    :FILE.txt        \n");
fprintf(writefp,"REM *enzyme   Desolve by Keyword.        :0-9999.txt      \n");
fprintf(writefp,"REM *numasm   Recombine files enzymed.   :output.txt      \n");
fprintf(writefp,"REM *cleanup  Remove enzymed.            :Remove          \n");
fprintf(writefp,"REM *pickup   Pickup keyword-lines.      :output.txt      \n");
fprintf(writefp,"REM *trans    AutoTranslation.           :output.txt      \n");
fprintf(writefp,"REM *****************************************************\n");
fprintf(writefp,"REM *****************************************************\n");

fclose(writefp);


}/*======================================================================;*/