void BuildWordListFile()
{
	FILE *fp;
	int tmp_i;
	char tmp_c;

    static WORD_LIST_ITEM wordlist[35];
	int i;

	strcpy(wordlist[0].name,"program");

	strcpy(wordlist[1].name,"var");

	strcpy(wordlist[2].name,"procedure");

	strcpy(wordlist[3].name,"begin");

	strcpy(wordlist[4].name,"end");

	strcpy(wordlist[5].name,"if");

	strcpy(wordlist[6].name,"then");

	strcpy(wordlist[7].name,"else");

	strcpy(wordlist[8].name,"while");

	strcpy(wordlist[9].name,"do");

	strcpy(wordlist[10].name,"for");

	strcpy(wordlist[11].name,"step");

	strcpy(wordlist[12].name,"until");

	strcpy(wordlist[13].name,"call");

	strcpy(wordlist[14].name,"read");

	strcpy(wordlist[15].name,"write");

	strcpy(wordlist[16].name,"ident");

	strcpy(wordlist[17].name,"const");

	strcpy(wordlist[18].name,"+");

	strcpy(wordlist[19].name,"-");

	strcpy(wordlist[20].name,"*");

	strcpy(wordlist[21].name,"/");

	strcpy(wordlist[22].name,":=");

	strcpy(wordlist[23].name,"=");

	strcpy(wordlist[24].name,"<>");

	strcpy(wordlist[25].name,">");

	strcpy(wordlist[26].name,">=");

	strcpy(wordlist[27].name,"<");

	strcpy(wordlist[28].name,"<=");

	strcpy(wordlist[29].name,"(");

	strcpy(wordlist[30].name,")");

	strcpy(wordlist[31].name,",");

	strcpy(wordlist[32].name,";");

	strcpy(wordlist[33].name,".");

	strcpy(wordlist[34].name,"\n");


	
	
	if((fp=fopen("wordlist.config","wb"))!=NULL)
	{
		tmp_i=35;
		fwrite(&tmp_i,sizeof(int),1,fp);
		
		tmp_i=3;
		fwrite(&tmp_i,sizeof(int),1,fp);
		tmp_c=':';
		fwrite(&tmp_c,sizeof(char),1,fp);
		tmp_c='<';
		fwrite(&tmp_c,sizeof(char),1,fp);
		tmp_c='>';
		fwrite(&tmp_c,sizeof(char),1,fp);
		
		for(i=0;i<35;i++)
		{
			wordlist[i].type=i+1;
			fwrite(&wordlist[i],sizeof(WORD_LIST_ITEM),1,fp);
		}
	}
	else
	{
		printf("error");
	}
	fclose(fp);
}