5-2 列车厢调度 (25分)

    1  ======   <--移动方向
     /

3 =====
\
2 ====== –>移动方向
大家或许在某些数据结构教材上见到过“列车厢调度问题”（当然没见过也不要紧）。今天，我们就来实际操作一下列车厢的调度。对照上方的ASCII字符图，问题描述如下：
有三条平行的列车轨道（1、2、3）以及1-3和2-3两段连接轨道。现有一列车厢停在1号轨道上，请利用两条连接轨道以及3号轨道，将车厢按照要求的顺序转移到2号轨道。规则是：
每次转移1节车厢；
处在1号轨道的车厢要么经过1-3连接道进入3号轨道（该操作记为”1->3”），要么经过两条连接轨道直接进入2号轨道（该操作记为”1->2”）；
一旦车厢进入2号轨道，就不可以再移出该轨道；
处在3号轨道的车厢，只能经过2-3连接道进入2号轨道（该操作记为”3->2”）；
显然，任何车厢不能穿过、跨越或绕过其它车厢进行移动。
对于给定的1号停车顺序，如果经过调度能够实现2号轨道要求的顺序，则给出操作序列；如果不能，就反问用户 Are(你) you(是) kidding(凯丁) me(么)?
输入格式:

两行由大写字母组成的非空字符串，第一行表示停在1号轨道上的车厢从左到右的顺序，第二行表示要求车厢停到2号轨道的进道顺序（输入样例1中第二行CBA表示车厢在2号轨道的停放从左到右是ABC，因为C最先进入，所以在最右边）。两行字符串长度相同且不超过26（因为只有26个大写字母），每个字母表示一节车厢。题目保证同一行内的字母不重复且两行的字母集相同。
输出格式:

如果能够成功调度，给出最短的操作序列，每个操作占一行。所谓“最短”，即如果1->2可以完成的调度，就不要通过1->3和3->2来实现。如果不能调度，输出 “Are you kidding me?”
输入样例1:

ABC
CBA
输出样例1:

1->3
1->3
1->2
3->2
3->2
输入样例2:

ABC
CAB
输出样例2:

Are you kidding me?

#include<stdio.h>
#include<stdlib.h>
struct Node{
    char Data;
    int i;
    int j;
    struct Node* Next;
};

typedef struct Node* PrtNode;
typedef PrtNode Stack;
Stack init();
int Top(Stack S,char *item);
int Push(Stack S,char ch);
int Pop_top(Stack S,char *item);
int main(){
    int i,j=0,k,flag;
    char ch;
    char str[30];
    char item;
    int a[100];
    Stack S1,S2,S3;
    S1=init();
    S2=init();
    S3=init();
    for(;(ch=getchar())!='\n';){
        flag=Push(S1,ch);
        if(!flag)return 0;
    }
    for(;;){
        if(Pop_top(S1,&item)){
            Push(S3,item);
        }
        else{
            break;
        }

    }
    gets(str);
    for(i=0;str[i]!='\0';){
        if(Top(S2,&item)){
            if(item==str[i]){
                a[j++]=3;
                a[j++]=2;
                i++;
                Pop_top(S2,&item);
                continue;
            }
        }
        if(Pop_top(S3,&item)){
            if(item==str[i]){
                a[j++]=1;
                a[j++]=2;
                i++;
                continue;
            }
            else{
                Push(S2,item);
                a[j++]=1;
                a[j++]=3;
                continue;
            }
        }
        if(!(S3->Next&&S2->Next)){
            printf("Are you kidding me?");
            return 0;
        }

    }
    k=j;
    for(i=0;i<k-1;i=i+2){
        printf("%d->%d\n",a[i],a[i+1]);
    }
    return 0;
}


Stack init(){
    Stack s;
    s=(Stack)malloc(sizeof(struct Node));
    if(!s)return NULL;
    s->Next=NULL;
    return s;
}

int Push(Stack S,char ch){
    Stack p;
    p=(Stack)malloc(sizeof(struct Node));
    if(!p)return 0;
    p->Data=ch;
    p->Next=S->Next;
    S->Next=p;
    return 1;
}
int Pop_top(Stack S,char *item){
    Stack top;
    if(!S->Next)return 0;
    top=S->Next;
    *item=top->Data;
    S->Next=S->Next->Next;
    free(top);
    return 1;
}
int Top(Stack S,char *item){
    Stack top;
    if(!S->Next)return 0;
    top=S->Next;
    *item=top->Data;
    return 1;
}