遞歸下降文法分析程式設計

#include <stdio.h>

#include<dos.h>

#include<stdlib.h>

#include<string.h>

char a[50] ,b[50],d[200],e[10];

char ch;

int n1,i1=0,flag=1,n=5;

int total=0;

int E();

int E1();

int T();

int G();

int S();

int F();

void input();

void input1();

void output();

void main()

{

int f,p,j=0;

char x;

d[0]='E';

d[1]='=';

d[2]='>';

d[3]='T';

d[4]='G';

d[5]='#';

printf("請輸入字元串(長度<50,以#号結束）n");

do{

scanf("%c",&ch);

a[j]=ch;

j++;

}while(ch!='#');

n1=j;

ch=b[0]=a[0];

printf("步驟t文法t分析串tt分析字元t剩餘串n");

f=E1();

if (f==0)

return;

if (ch=='#')

{

printf("acceptn");

p=0;

x=d[p];

while(x!='#')

{

printf("%c",x);p=p+1;x=d[p];

}

}

else

printf("errorn");

printf("回車傳回n");

getchar();

getchar();

return;

printf("n");

printf("回車傳回n");

getchar();

getchar();

}

int E1()

{

int f,t;

printf("%dtE-->TGt",total);total++;

flag=1;

input();

input1();

f=T();

if (f==0)return(0);

t=G();

if (t==0)

return(0);

else

return(1);

int E()

{

printf("%dtE-->TGt",total);

total++;

e[0]='E';

e[1]='=';

e[2]='>';

e[3]='T';

e[4]='G';

e[5]='#';

output();

if (t==0)

int T()

printf("%dtT-->FSt",total);total++;

e[0]='T';

e[3]='F';

e[4]='S';

f=F();

if(f==0)

t=S();

if(t==0)

int G()

int f;

if(ch=='+')

{

b[i1]=ch;

printf("%dtG-->+TGt",total);total++;

e[0]='G';

e[1]='=';

e[2]='>';

e[3]='+';

e[4]='T';

e[5]='G';

e[6]='#';

output();

flag=0;

input();input1();

ch=a[++i1];

f=T();

if (f==0)

return(0);

G();

return(1);

printf("%dtG-->^t",total);total++;

e[0]='G';e[1]='=';e[2]='>';e[3]='^';e[4]='#';

flag=1;

int S()

if(ch=='*')

b[i1]=ch;printf("%dtS-->*FSt",total);total++;

e[0]='S';e[1]='=';e[2]='>';e[3]='*';e[4]='F';e[5]='S';e[6]='#';

input();

input1();

f=F();

t=S();

if (t==0)

else

return(1);

printf("%dtS-->^t",total);total++;

e[0]='S';e[1]='=';e[2]='>';e[3]='^';e[4]='#';

a[i1]=ch;

return(1);

int F()

if(ch=='(')

b[i1]=ch;printf("%dtF-->(E)t",total);total++;

e[0]='F';e[1]='=';e[2]='>';e[3]='(';e[4]='E';e[5]=')';e[6]='#';

f=E();

if(ch==')')

b[i1]=ch;

printf("%dtF-->(E)t",total);

total++;

flag=0;

input();

input1();

ch=a[++i1];

else

printf("errorn");

return(0);

else if(ch=='i')

b[i1]=ch;printf("%dtF-->it",total);total++;

e[0]='F';e[1]='=';e[2]='>';e[3]='i';e[4]='#';

output();

flag=0;input();input1();

printf("errorn");

void input()

int j=0;

for(;j<=i1-flag;j++)

printf("%c",b[j]);

printf("tt");

printf("%ctt",ch);

void input1()

int j;

for (j=i1+1-flag;j<n1;j++)

printf("%c",a[j]);

void output()

{

int m,k,j,q;

int i=0;

m=0;k=0;q=0;

i=n;

d[n]='=';d[n+1]='>';d[n+2]='#';n=n+2;i=n;

i=i-2;

while(d[i]!='>'&&i!=0)i=i-1;

i=i+1;

while(d[i]!=e[0]) i=i+1;

q=i;

m=q;k=q;

while(d[m]!='>') m=m-1;

m=m+1;

while(m!=q) {

d[n]=d[m];m=m+1;n=n+1;

d[n]='#';

for(j=3;e[j]!='#';j++){

d[n]=e[j];

n=n+1;

k=k+1;

while(d[k]!='=') {

d[n]=d[k];n=n+1;k=k+1;

d[n]='#';

system("pause");