#include <stdio.h>
#include <malloc.h>
#include <stdlib.h>
typedef int ElemType;
#define MaxSize 100
#define QNODE struct QNode

typedef struct Node //車輛信息
{
 char AL;
 int NO;
 int time;
}Node;
typedef struct Stack //棧定義
{
 struct Node data[MaxSize];
 int top;
 int num;
}SqStack;
QNODE        //隊列節(jié)點
{
 struct Node data;
 QNODE *next;
};
typedef struct linkqueue    //隊列結(jié)構(gòu)體定義
{
 QNODE *front,*rear;
 int num;
}LinkQueue;

SqStack *Init_SeqStack() //置空棧
{
 SqStack *s;
 s=(SqStack*)malloc(sizeof(SqStack));
   s->top=-1;
 s->num=0;
 return s;
}
LinkQueue *Init_LQueue()    //創(chuàng)建空隊列
{

 LinkQueue *q;
   QNODE *p;
   q=(LinkQueue*)malloc(sizeof(LinkQueue));
   p=(QNODE*)malloc(sizeof(QNODE));
 p->next=NULL;
 q->front=q->rear=p;
 q->num=0;
 return q;
}
int ISEmpty_SeqStack(SqStack *s) //判斷棧是否為空，棧為空返回1
{
 if(s->top ==-1)
 return 1;
 else
 return 0;
}

int ISFULL_SeqStack(SqStack *s,int n) //判斷棧是否已滿，若棧滿返回1
{
 if(s->top==n-1)
 return 1;
 else
 return 0;
}
int ISEmpty_LQueue(LinkQueue *q) //判斷隊列是否為空，隊列為空返回1
{
 if(q->front==q->rear)
 return 1;
 else
 return 0;
}

void IN_Lqueue( LinkQueue *q,struct Node s)  //入隊
{
 QNODE *p;
 p=(QNODE*)malloc(sizeof(QNODE));
 p->data=s;
 q->num++;
 p->next=NULL;
 q->rear->next =p;
 q->rear =p;
}
void Push_SeqStack(SqStack *p,struct Node s)  //入棧
{
 p->top ++;
 p->data[p->top]=s;
 p->num++;
}
int POP_SeqStack(SqStack *s,struct Node car)//出棧
{
 SqStack *p;
 int t;
  p=Init_SeqStack();
 while(s->data[s->top].NO !=car.NO)//找到車牌號為P.NO的車，
 {
   Push_SeqStack(p,s->data[s->top]);
 s->top--;
 s->num--;
 }
 t=car.time-s->data[s->top].time;
 s->top--;
 s->num--;
 while(ISEmpty_SeqStack(p)==0)
 {
 Push_SeqStack(s,p->data[p->top]);
 p->top--;
 p->num--;
 }
 return t;
}

struct Node Out_LQueue(LinkQueue *q)  //出隊
{
 QNODE *p;
 p=q->front->next;
 q->front->next=p->next;
 q->num --;
 if( q->front->next==NULL)
  q->rear=q->front;
 return p->data;
 free(p);
}
int main()
{
 SqStack *parkstack;  //parkstack為表示停車場的棧
 LinkQueue *parkqueue;    //parkqueue為表示便道的隊列
 struct Node car;
 int n,a=0,t;        //n為停車場棧的最大容量
 float f;          //f為每小時收費
 parkstack=Init_SeqStack();
 parkqueue=Init_LQueue(); //初始界面
  printf("***************停車場信息查詢***************\n");
 printf("請輸入停車場最大容量n=");
 scanf("%d",&n);
 printf("\n請輸入每分鐘收取費用f=");
 scanf("%f",&f);
 printf("\n請輸入車輛信息\n");
  scanf("%c,%d,%d",&car.AL,&car.NO,&car.time);
 while(car.AL!='Q')
 {
  if(car.AL=='A' )
  {    // 汽車到達(dá)的情況
   if(ISFULL_SeqStack(parkstack,n)==1) //棧滿的情況
   {
   IN_Lqueue(parkqueue,car);  //進入隊列等待
    printf("這輛車在門外便道上第%d個位置\n",parkqueue->num);
   printf("\n");
   printf("請輸入車輛信息\n");
   }
   else
   {
   Push_SeqStack(parkstack,car); //入棧
   printf("這輛車在停車場內(nèi)第%d個位置\n",parkstack->num);
   printf("\n");
   printf("請輸入車輛信息\n");
   }
  }

  if(car.AL=='L' )   //汽車離開的情況
  {
        t=POP_SeqStack(parkstack,car);//出棧
  printf("這輛車停留時間為%d，收費為%f。\n",t,f*t);
  printf("\n");
  printf("請輸入車輛信息\n");
    if(ISEmpty_LQueue(parkqueue)==0)  //隊列不為空需要進棧
     Push_SeqStack(parkstack,Out_LQueue(parkqueue) );
  }
  if(car.AL=='P'&&car.NO==0&&car.time==0 )//顯示停車場的車數(shù)
  {
   printf("停車場的車數(shù)為%d\n",parkstack->num);
    printf("\n");
   printf("請輸入車輛信息\n");
  }
    if(car.AL=='W'&&car.NO==0&&car.time==0 )//顯示候車場的車數(shù)
  {
   printf("候車場的車數(shù)為%d\n",parkqueue->num);
  printf("\n");
  printf("請輸入車輛信息\n");
  }
 scanf("%c,%d,%d",&car.AL,&car.NO,&car.time);
 }

 printf("輸入結(jié)束\n");
 return 1;
}