0916 编程实验一 词法分析程序

#include<stdio.h>
#include<string.h>
int plu(char a[200],int i)
{
    switch(a[i])
    {
        case '+':case '-':case '*':case '/':case '=':case ';':case '(':case ')':
            {
                return(1);
            }
        case ':':
            {
                if(a[i+1]=='=')
                {
                    return(2);
                }
                else
                    return(1);

            }
        case '<':
            {
                if(a[i+1]=='>')
                {
                    return(2);
   

             }

else if(a[i+1]=='=')
                {
                    return(2);
                }
                else
                return(1);

            }
        case '>':
            {
                if(a[i+1]=='=')
                {
                    return(2);
                }
                else
                return(1);

            }
        default:
            return(0);
            break;

    }
}
int dlc(char a[100],int i)
{
    switch(a[i])
    {
        case '+':
            {
                printf("(13，+)");
                return(1);    
            }
        
        case '-':
            {
                printf("(14，-)");
                return(1);
            }
        case '*':
            {
                printf("(15，*)");
                return(1);
            }
        case '/':
            {
                printf("(16，/)");
                return(1);
            }
        case ':':
            {
                if(a[i+1]=='=')
                {
                    printf("(18，:=)");
                    return(2);
                }
                else
                    printf("(17，:)");
                return(1);

            }
        case '<':
            {
                if(a[i+1]=='>')
                {
                    printf("(21，<>)");
                    return(2);
                }
                else if(a[i+1]=='=')
                {
                    printf("(22，<=)");
                    return(2);
                }
                else
                    printf("(20，<");
                return(1);

            }
        case '>':
            {
                if(a[i+1]=='=')
                {
                    printf("(24，>=)");
                    return(2);
                }
                else
                    printf("(23，>");
                return(1);

            }
        case '=':
            {
                printf("(25，=)");
                return(1);
            }
        case ';':
            {
                printf("(26，;)");
                return(1);
            }
        case '(':
            {
                printf("(27，()");
                return(1);
            }
        case ')':
            {
                printf("(28，)");
                return(1);
            }
        default:
            return(0);
            break;

    }
}
void number(char a[10])
{
    int i=0;
    char text[10];
    while(a[i]!='\0')
    {
        text[i]=a[i];
        i++;
    }
    text[i]='\0';
    printf("(11,%s)",text);
}
void discov(char a[10])
{
    int i=0;
    char text[10];
    while(a[i]!='\0')
    {
        text[i]=a[i];
        i++;
    }
    text[i]='\0';

    if( strcmp(text,"begin")==0)
    {
        printf("(1,begin)");
    }
    else if( strcmp(text,"if")==0)
    {
        printf("(2,if)");
    }
    else if( strcmp(text,"then")==0)
    {
        printf("(3,then)");
    }
    else if( strcmp(text,"while")==0)
    {
        printf("(4,while)");
    }
    else if( strcmp(text,"do")==0)
    {
        printf("(5,do)");
    }
    else if( strcmp(text,"end")==0)
    {
        printf("(6,end)");
    }
    else
    {
        printf("(10,%s)",text);
    }
} 

main(){
    int i=0,j=-1,l=0,x=0;
    char a[200],text[10];
    printf("输入源程序,以#号结束");
    gets(a);
    while(1)
    {
        if(a[i]>='0'&&a[i]<='9')
        {
            while(a[i]>='0'&&a[i]<='9')
                i++;

            l=0;
        
            for(++j;j<i;j++)
            {
                text[l]=a[j];
                l++;
            }
    
            text[l]='\0';

            number(text);
            i--;
        }
        else if(a[i]>='a'&&a[i]<='z'||a[i]>='A'&&a[i]<='Z')
        {l=0;
        
            for(i;a[i]>='a' && a[i]<='z' ||a[i]>='A'&&a[i]<='Z';i++)
            {
                text[l]=a[i];
                l++;
            }
            i--;
    
            text[l]='\0';
            discov(text);
            
        }
        else
        {
            if(a[i]=='#')
            {
                printf("(0,#)");
                break;
            }
            
            x=dlc(a,i);
            if(x==1)
            {
                j=i;
            }
            else if(x==2)
            {
                i++;
                j=i;
            }
        }
        i++;
        
    }