uva 127 ``Accordian'' Patience

//完全自己写的代码，用链表写的，很多细节没有修改，明天再改，时间是0.544

 

//关键是find_3和find_1和swap函数的使用，注意细节，注意有的内存是一定要free释放//掉的，注意指针的使用，有的是把指针的值传递过去，有的是把指针变量本身的地址传递//过去，两者完全不同，注意看

 

#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#define LEN1 sizeof(struct card)
#define LEN2 sizeof(struct list)
#define MAX 52    
struct card
{
    char s[3];
    struct card *next;
};
struct list
{
    int count;
    struct list *prior,*next;
    struct card *head;
}*L;

void test_print()
{
    struct list *temp=L;
    while(temp)
    { printf("count=%d %s\n",temp->count,temp->head->s); temp=temp->next; }
    temp=L;
    while(temp->next) temp=temp->next;
    while(temp)
    {printf("count=%d %s\n",temp->count,temp->head->s); temp=temp->prior;}

}
void print_card()
{
    struct list *p; struct card *temp;
    p=L;
    while(p)
    {
        printf("count=%d ",p->count); temp=p->head;
        while(temp) {printf("%s ",temp->s); temp=temp->next;}
        printf("\n");
        p=p->next;
    }
    printf("****************************\n");
}
void swap(struct list *s1 , struct list* *s2)  //是将s2移动到s1上面
{
    struct list *p1,*p2,*p3,*p;  struct card *temp;
    if((*s2)->count==1)  //只有唯一一个牌了
    {
        p=(*s2); p1=(*s2)->prior; p2=(*s2)->next; 
        if(p2) {p1->next=p2; p2->prior=p1;}  else p1->next=p2; 
        temp=p->head; 
        s1->count++; temp->next=s1->head; s1->head=temp;
        free(p);
    }
    else 
    {
        p=(*s2); p->count--; temp=p->head;  p->head=temp->next;  
        s1->count++; temp->next=s1->head; s1->head=temp;
    }
}
int find_3(struct list* *s)  
{//将一个牌的位置传递过来，寻找它的左边第3个牌是否匹配，不匹配有两种情况，一是根本没有这个牌，而是有但不匹配
    int i; struct list *temp=(*s);
    for(i=1; i<=3 && temp; i++)   temp=temp->prior;
    if(!temp || (temp->head->s[0]!=(*s)->head->s[0] && temp->head->s[1]!=(*s)->head->s[1]) )  return 0;  //前面已经不足3个了
    else  
    {swap(temp , s); (*s)=temp; /*print_card();*/ return 1;}
}
int find_1(struct list* *s) 
{//将一个牌的位置传递过来，寻找它的左边第1个牌是否匹配，不匹配有两种情况，一是根本没有这个牌，而是有但不匹配
    struct list *temp=(*s)->prior;
    if(!temp || (temp->head->s[0]!=(*s)->head->s[0] && temp->head->s[1]!=(*s)->head->s[1]) )  return 0;
    else 
    {swap(temp , s); (*s)=temp;  /*print_card();*/return 1;}
}
int main()
{
    struct list *l1,*l2;  struct card *H,*h1,*h2; int count,i,f;  int a[MAX];
    while(1)
    {
        L=l1=(struct list*)malloc(LEN2); L->prior=NULL; L->next=NULL; L->count=1; 
        L->head=(struct card*)malloc(LEN1); L->head->next=NULL;
        scanf("%s",L->head->s);  if(!strcmp(L->head->s , "#"))  {free(L); return 0;}
        for(i=2; i<=MAX; i++)
        {
            l2=(struct list*)malloc(LEN2); l2->prior=l1; l2->next=NULL; l2->count=1;
            l2->head=(struct card*)malloc(LEN1); l2->head->next=NULL; 
            l1->next=l2; l1=l2;
            scanf("%s",l2->head->s);
        }
//        test_print();
        l1=L;
        while(l1)
        {
            f=find_3(&l1); if(f)  continue;
            f=find_1(&l1);  if(f)  continue;
            l1=l1->next;
        }
        l1=L; count=0;
        while(l1)
        {a[count]=l1->count; count++; l1=l1->next;}
        if(count==1) printf("1 pile remaining: 52\n");
        else
        {
            printf("%d piles remaining:",count);
            for(i=0; i<count; i++) printf(" %d",a[i]);  printf("\n");
        }
    }
    return 0;
}