#include "graphics.h"
#include <malloc.h>
#include "time.h"
#include "stdio.h"
#define M 10000
#define MAXNUM 1000
#define NIL 0


typedef struct SLNode
{
  int Data;
  struct SLNode *Next;
} slnodetype;

typedef struct        /* 定义带头结点队列链表*/
{ slnodetype *Head;
  slnodetype *Rear;

} slqtype;


int bankmoney=M;

int InitiateSLQueue(slqtype *client);
int AppendSLQueue(slqtype *client, int money);
int DeleteSLQueue(slqtype *client);
int inmoney(int money,int bankmoney);
int takemoney(int money, int bankmoney);


int main()
{   int  i=0,n,flag;
    slqtype client1,client2;
    int  money;
    double var,avertime,time,time1;
    clock_t start,end,begin;




   InitiateSLQueue(&client1); /*初始化队列1*/
   InitiateSLQueue(&client2); /*初始化队列2*/
   printf("Now the bank has 10000 yuan!\n");

   loop:
     printf("Do you want to input money or take money? input 0  or 1?\n "); /*0为存款，1为取款*/
     scanf("%d",&flag);
     start=clock();
     printf("please input your money.\n");
     scanf("%d",&money);
     i++;
     n=i;
    AppendSLQueue(&client1,money); /*进入队列1中*/

   if(flag==0)  /* 存款程序 */
   {
      bankmoney=inmoney(money,bankmoney);  /*调用存款函数*/
      DeleteSLQueue(&client1); /*删除此客户*/
      end=clock();
      /*time1=time1+(double)(end-start)/18.2;*/
      printf("The client takes %6.3f seconds!\n", (double)((end-start)/18.2));
      printf("Now the bank has %d yuan.\n",bankmoney);

      if(1)  /* 如果队列2不为空队列，检查队列2中的有没有满足条件的客户*/
      DeleteSLQueue(&client2);
      printf("窗口2中的人请稍侯！\n");
      goto loop;/*检查完转向询问条件*/


   }

   if (flag==1)  /*取款程序*/
   {
       if (bankmoney<=money)  /*取钱数大于银行数，排到队列2中去*/
       {
           printf("Now the bank has %d yuan.\n",bankmoney);
           printf("Sorry!Now the bank has not enough money,please wait for a moment!\n");
           AppendSLQueue(&client2, money);
           goto loop;  /*转向询问状态*/
       }

     if(bankmoney>money) /*取钱数小于银行数，直接取钱并删除客户记录*/
     {  bankmoney=takemoney(money,bankmoney);
        DeleteSLQueue(&client1);
         end=clock();
/*       time1=time1+(double)(end-start)/18.2;*/

       printf("The client takes %6.3f seconds.\n", (double)((end-start)/18.2));
       printf("Now the bank has %d yuan.\n",bankmoney);
     }
   }
  goto loop;
return 0;
}

int InitiateSLQueue(slqtype *client)  /*初始化队列*/
{
    if ((client->Head=(slnodetype *)malloc(sizeof(slnodetype)))==NULL)
    {
        printf("\ failed!");
        return 0;
    }
    client->Rear=client->Head;
    client->Head->Next=NULL;
   return 1;
}

int AppendSLQueue(slqtype *client, int money) /*入队列函数*/
{
      slnodetype *p;
      if((p=(slnodetype *)malloc(sizeof(slnodetype)))==NULL)
      {  printf("\n failed!");
          return 0;
      }

     p->Data=money;
     p->Next=NULL;
     client->Rear->Next=p;
     client->Rear=p; /*修改尾指针*/
     return 1;
}

int DeleteSLQueue(slqtype *client)  /*出队列函数*/
{
      slnodetype *p,*s;
      if((p=(slnodetype *)malloc(sizeof(slnodetype)))==NULL)
      {  printf("\n failed!");
          return 0;
      }
      if((s=(slnodetype *)malloc(sizeof(slnodetype)))==NULL)
      {  printf("\n failed!");
          return 0;
      }
      if(client->Head->Next==NULL) return NIL; /*空队列*/
     
      if(client->Head->Next==client->Rear) /*只有一个数据的队列*/
      { p=client->Rear;
        free(p);
        client->Rear=client->Head;
        client->Head->Next=NULL;
      }
     if(client->Head->Next!=client->Rear)  /*多个数据的队列*/
     {

         for(p=client->Head->Next;p!=client->Rear;p=p->Next) /*队列2中的第一个客户指针给client,检查到最后一个*/
        {
         
          if(p->Data<bankmoney) /*客户取款*/
          {  bankmoney=takemoney(p->Data,bankmoney); /*调用取款函数*/
             s=p;
             free(s);
           /*  end=clock();
            time1=time1+(double)(end-start)/18.2;
             printf("\1:takes %6.3f seconds.\n", (double)((end-start)/18.2)); */
             printf("Now the bank has %d yuan.\n",bankmoney);
          }
          
        }    
     
     }

}


int inmoney(int money,int bankmoney) /*存款函数*/
{ int a=bankmoney,b=money;
  a=a+b;
  return(a);
}


int takemoney(int money, int bankmoney) /*取款函数*/
{
  int c=bankmoney,d=money;
  c=c-d;
  return (c);
}