1 #include <stdio.h> 2 #include<dos.h> 3 #include<stdlib.h> 4 #include<string.h> 5 char a[50] ,b[50],d[200],e[10]; 6 char ch; 7 int n1,i1=0,flag=1,n=5; 8 int total=0; 9 int E(); 10 int E1(); 11 int T(); 12 int G(); 13 int S(); 14 int F(); 15 void input(); 16 void input1(); 17 void output(); 18 void main() 19 { 20 int f,p,j=0; 21 char x; 22 d[0]='E'; 23 d[1]='='; 24 d[2]='>'; 25 d[3]='T'; 26 d[4]='G'; 27 d[5]='#'; 28 printf("请输入文法(长度<50,以#号结束): "); 29 do{ 30 scanf("%c",&ch); 31 a[j]=ch; 32 j++; 33 }while(ch!='#'); 34 n1=j; 35 ch=b[0]=a[0]; 36 printf("步骤 文法 分析串 分析字符 剩余串 "); 37 f=E1(); 38 if (f==0) return; 39 if (ch=='#') 40 { 41 printf("accept "); 42 p=0; 43 x=d[p]; 44 while(x!='#') { 45 printf("%c",x);p=p+1;x=d[p]; 46 } 47 }else { 48 printf("error "); 49 printf("回车返回 "); 50 getchar(); 51 getchar(); 52 return; 53 } 54 printf(" "); 55 printf("回车返回 "); 56 getchar(); 57 getchar(); 58 59 } 60 int E1() 61 { 62 int f,t; 63 printf("%d E-->TG ",total);total++; 64 flag=1; 65 input(); 66 input1(); 67 f=T(); 68 if (f==0) return(0); 69 t=G(); 70 if (t==0) return(0); 71 else return(1); 72 } 73 74 int E() 75 { 76 int f,t; 77 printf("%d E-->TG ",total);total++; 78 e[0]='E';e[1]='=';e[2]='>';e[3]='T';e[4]='G';e[5]='#'; 79 output(); 80 flag=1; 81 input(); 82 input1(); 83 f=T(); 84 if (f==0) return(0); 85 t=G(); 86 if (t==0) return(0); 87 else return(1); 88 } 89 int T() 90 { 91 int f,t; 92 printf("%d T-->FS ",total);total++; 93 e[0]='T';e[1]='=';e[2]='>';e[3]='F';e[4]='S';e[5]='#'; 94 output(); 95 flag=1; 96 input(); 97 input1(); 98 f=F(); 99 if (f==0) return(0); 100 t=S(); 101 if (t==0) return(0); 102 else return(1); 103 } 104 int G() 105 { 106 int f; 107 if(ch=='+') { 108 b[i1]=ch; 109 printf("%d G-->+TG ",total);total++; 110 e[0]='G';e[1]='=';e[2]='>';e[3]='+';e[4]='T';e[5]='G';e[6]='#'; 111 output(); 112 flag=0; 113 input();input1(); 114 ch=a[++i1]; 115 f=T(); 116 if (f==0) return(0); 117 G(); 118 return(1); 119 } 120 printf("%d G-->^ ",total);total++; 121 e[0]='G';e[1]='=';e[2]='>';e[3]='^';e[4]='#'; 122 output(); 123 flag=1; 124 input();input1(); 125 return(1); 126 } 127 int S() 128 { 129 int f,t; 130 if(ch=='*') { 131 b[i1]=ch;printf("%d S-->*FS ",total);total++; 132 e[0]='S';e[1]='=';e[2]='>';e[3]='*';e[4]='F';e[5]='S';e[6]='#'; 133 output(); 134 flag=0; 135 input();input1(); 136 ch=a[++i1]; 137 f=F(); 138 if (f==0) return(0); 139 t=S(); 140 if (t==0) return(0); 141 else return(1);} 142 printf("%d S-->^ ",total);total++; 143 e[0]='S';e[1]='=';e[2]='>';e[3]='^';e[4]='#'; 144 output(); 145 flag=1; 146 a[i1]=ch; 147 input();input1(); 148 return(1); 149 } 150 151 int F() 152 { 153 int f; 154 if(ch=='(') { 155 b[i1]=ch;printf("%d F-->(E) ",total);total++; 156 e[0]='F';e[1]='=';e[2]='>';e[3]='(';e[4]='E';e[5]=')';e[6]='#'; 157 output(); 158 flag=0; 159 input();input1(); 160 ch=a[++i1]; 161 f=E(); 162 if (f==0) return(0); 163 if(ch==')') { 164 b[i1]=ch;printf("%d F-->(E) ",total);total++; 165 flag=0;input();input1(); 166 ch=a[++i1]; 167 } 168 else { 169 printf("error "); 170 return(0); 171 } 172 } 173 else if(ch=='i') { 174 b[i1]=ch;printf("%d F-->i ",total);total++; 175 e[0]='F';e[1]='=';e[2]='>';e[3]='i';e[4]='#'; 176 output(); 177 flag=0;input();input1(); 178 ch=a[++i1]; 179 } 180 else {printf("error ");return(0);} 181 return(1); 182 } 183 void input() 184 { 185 int j=0; 186 for (;j<=i1-flag;j++) 187 printf("%c",b[j]); 188 printf(" "); 189 printf("%c ",ch); 190 } 191 192 void input1() 193 { 194 int j; 195 for (j=i1+1-flag;j<n1;j++) 196 printf("%c",a[j]); 197 printf(" "); 198 } 199 void output(){ 200 int m,k,j,q; 201 int i=0; 202 m=0;k=0;q=0; 203 i=n; 204 d[n]='=';d[n+1]='>';d[n+2]='#';n=n+2;i=n; 205 i=i-2; 206 while(d[i]!='>'&&i!=0) i=i-1; 207 i=i+1; 208 while(d[i]!=e[0]) i=i+1; 209 q=i; 210 m=q;k=q; 211 while(d[m]!='>') m=m-1; 212 m=m+1; 213 while(m!=q) { 214 d[n]=d[m];m=m+1;n=n+1; 215 } 216 d[n]='#'; 217 for(j=3;e[j]!='#';j++){ 218 d[n]=e[j]; 219 n=n+1; 220 } 221 k=k+1; 222 while(d[k]!='=') { 223 d[n]=d[k];n=n+1;k=k+1; 224 } 225 d[n]='#'; 226 system("pause"); 227 }