diguixiajiang.txt

一个递归下降的程序

#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 S();
int B();
int C();
void input();
void input1();
void output();


void main()                      /*递归分析*/
{
    int f,p,j=0;
    char x;
    d[0]='S';
    d[1]='=';
    d[2]='>';
    d[3]='a';
    d[4]='S';
    d[5]='e';
    d[6]='#';
    printf("请输入字符串(长度<50,以#号结束）\n");
    do
    {
        scanf("%c",&ch);
        a[j]=ch;
        j++;
    }while(ch!='#');
    n1=j;
    ch=b[0]=a[0];
    printf("文法\t分析串\t\t分析字符\t剩余串\n");
    f=S();
    if (f==0) return;
    if (ch=='#')  
    {   printf("accept\n");
        p=0;
        x=d[p];
        while(x!='#')
        {
            printf("%c",x);p=p+1;x=d[p];          /*输出推导式*/
        }
    }
    else {
        printf("error\n");
        printf("回车返回\n");
        getchar();getchar(); 
        return; 
    }
    printf("\n");
    printf("回车返回\n");
    getchar();
    getchar();
}
 int S()
{   int f;

    if (ch=='a')
     { b[i1]=ch;
       printf("S-->aSe\t");
       e[0]='S';e[1]='=';e[2]='>';e[3]='a';e[4]='S';e[5]='e';e[6]='#';
       output();
       flag=0;
       input();
       input1();
       ch=a[++i1];
       f=S();
       if (f==0) return(0);
       else ch=a[++i1];
         if(ch=='e')
        {
            b[i1]=ch;printf("S-->aSe\t");
            flag=0;input();input1();  
            ch=a[++i1];
        }
       }
      else
       {
        printf("S-->B\t");
         e[0]='S';e[1]='=';e[2]='>';e[3]='B'; e[4]='#';
         output();
         flag=0;
         input();
         input1();

         f=B();
         if (f==0) return(0);
          else return(1);
        }
 }

 int B()
 {  int f;
     if (ch=='b')
     { b[i1]=ch;
       printf("B-->bBe\t");
       e[0]='B';e[1]='=';e[2]='>';e[3]='b';e[4]='B';e[5]='e';e[6]='#';
       output();
       flag=0;
       input();input1();
       ch=a[++i1];
       f=B();
       if (f==0) return(0);
        else ch=a[++i1];
       if(ch=='e') {
            b[i1]=ch;printf("B-->bBe\t");
            flag=0;input();input1();  
            ch=a[++i1];
        }
      }
      else
       { b[i1]=ch;
        printf("B-->C\t");
         e[0]='B';e[1]='=';e[2]='>';e[3]='C'; e[4]='#';
         output();
         flag=0;
         input();
         input1();
         ch=a[++i1];
         f=C();
         if (f==0) return(0);
          else return(1);
        }
   }
    int C()
   { int f;
      if (ch=='c')
     { b[i1]=ch;
       printf("C-->cCc\t");
       e[0]='C';e[1]='=';e[2]='>';e[3]='c';e[4]='C';e[5]='c';e[6]='#';
       output();
       flag=0;
       input();
       input1();
       ch=a[++i1];
       f=C();
       if (f==0) return(0);
          else ch=a[++i1];
       if(ch=='c')
       {
            b[i1]=ch;printf("C-->cCc\t");
            flag=0;input();input1();  
            ch=a[++i1];
        }
      }

     else if(ch=='d')
     {
        b[i1]=ch;printf("C-->d\t");
        e[0]='C';e[1]='=';e[2]='>';e[3]='d';e[4]='#';
        output();
        flag=0;input();input1();
        ch=a[++i1]; 
    }
       else {printf("error\n");return(0);}
      return(1);

  }


     void input()                      
{
     int j=0;
     for (;j<=i1-flag;j++)
     printf("%c",b[j]);                    /*输出分析串*/
     printf("\t\t");
     printf("%c\t\t",ch);                  /*输出分析字符*/  
}

void input1()
{
     int j;
     for (j=i1+1-flag;j<n1;j++)
     printf("%c",a[j]);                     /*输出剩余字符*/
     printf("\n");
}

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]='#';
}