#include“cifa.h“
#define?N?100

string?Reservedword[]?=?{“program““begin““end““var““integer““real““while““if““then““else““do“};
string?Identifier[N];
void?change（char*?str）?????????????//將line中的大寫字母轉換成小寫便于分析
{
	for（int?i=0;i		if（str[i]>=‘A‘&&str[i]<=‘Z‘）
			str[i]+=32;
}
int?isReservedword（string?str）???//判斷保留字，并返回編號，不是保留字則返回-1
{
	int?i=0;
	for（i=0;i<11;i++）
	{
		if（!str.compare（Reservedword[i]））
			return?i+1;
	}
	return?-1;
}
int?isIdentifier（string?strint?count）??????//判斷已知標識符，并返回編號，不是保留字則返回-1
{
	int?i=0;
	for（i=0;i	{
		if（!str.compare（Identifier[i]））
			return?i+1;
	}
	return?-1;
}
void?addIdentifier（string?strint?count）????//添加標識符
{
	Identifier[count]=str;
}
void?LexicAlanalysis（fstream?&?infilefstream?&?outfile）
{
	char?line[180];
	char?str[180];
	int?count?=?0flag?=?1;??????????//count記錄標識符的個數??flag判斷是不是注釋	
	while（infile>>line）??????????????//讀取一個字符串
	{
		int?ijk;
		change（line）;
		for（i=0;i		{
			if（flag==0&&line[i]!=‘*‘）?{i++;continue;}
			if（line[i]>=‘a‘&&line[i]<=‘z‘）
			{
				j=i;k=0;
				while（（line[j]>=‘0‘&&line[j]<=‘9‘）||（line[j]>=‘a‘&&line[j]<=‘z‘））
					str[k++]=line[j++];
				str[k]=NULL;
				if（k>0）
				{
					if（isReservedword（str）>=0）??????//保留字
					{
						outfile<<“（3“<						i+=strlen（str）;
						continue;
					}
					if（isIdentifier（strcount）>=0）????//標識符
					{
						outfile<<“（4“<						i+=strlen（str）;
						continue;
					}
					else
					{
						addIdentifier（strcount）;
						count++;
						outfile<<“（4“<						i+=strlen（str）;
						continue;
					}
				}
			}

			j=i;?k=0;?????????????????????????????????//數字
			while（（line[j]>=‘0‘&&line[j]<=‘9‘）||line[j]==‘.‘）
				str[k++]=line[j++];
			str[k]=NULL;
			if（str[0]==‘.‘&&str[1]==NULL）
			{outfile<<“（8.）“<			else?if（k>0）
			{
				outfile<<“（5“<				i+=strlen（str）;
				continue;
			}

			if（line[i]==‘;‘）
			{outfile<<“（6;）“<			if（line[i]==‘‘）
			{outfile<<“（7）“<			if（line[i]==‘:‘）
			{
				if（line[i+1]!=NULL&&line[i+1]==‘=‘）
				{outfile<<“（10:=）“<				else
				{outfile<<“（9:）“<			}
			if（line[i]==‘+‘）
			{outfile<<“（11+）“<			if（line[i]==‘-‘）
			{outfile<<“（12-）“<			if（line[i]==‘*‘）
			{
				if（line[i+1]!=NULL&&line[i+1]==‘/‘&&flag==0）??//處理‘*/‘
				{flag=1;i+=2;continue;}
				else?if（flag==1）
				{outfile<<“（13*）“<				else
				{i++;continue;}
			}
			if（line[i]==‘/‘）
			{
				if（line[i+1]!=NULL&&line[i+1]==‘/‘）
				{infile.getline（line180）;break;}
				else?if（line[i+1]!=NULL&&line[i+1]==‘*‘）
				{flag=0;i+=2;continue;}
				else?
				{outfile<<“（14/）“<