{
      head3=find_sub(r1,r2);
      r3=rear(head3,&time3);
      printf("\n- ");
      display(r3);
       }
      else if(p1->data<p2->data)
       {
      head3=find_sub(r2,r1);
      r3=rear(head3,&time3);
      printf("\n+ ");
      display(r3);
       }
      else
       printf("\n0\n");
      }


}

 if(flag2==1)flag2=0;
else if(flag2==0)flag2=1;
/*將第2個數的 符號位變成原來的*/
}


void  sum()
/*求2個數的和*/
{dnode *p1,*p2;
if(flag1==1&&flag2==1)
/*如果2個都是正數，直接求和，最后加+號*/
 {head3=find_sum();
  r3=rear(head3,&time3);
  printf("\n+  ");
  display(r3);
 }

 if(flag1==0&&flag2==0)
/*如果2個都是負數，直接求和，最后加-號*/
  {head3=find_sum();
  r3=rear(head3,&time3);
  printf("\n- ");
  display(r3);
  } 
    /*如果第一個是正數，第2個數是負數的話*/
 if(flag1==1&&flag2==0)
	 
    {if(time1>time2||(time1==time2&&head1->data>head2->data))
	 /*如果第一個數大于第2個數的話，第一個數減第2個數，再加+號*/
      {
      head3=find_sub(r1,r2);
      r3=rear(head3,&time3);
      printf("\n+ ");
      display(r3);
     }
    /*如果第一個數小于第2個數的話，第2個數減第1個數，再加-號*/
     if(time1<time2||(time1==time2&&head1->data<head2->data))
     {
      head3=find_sub(r2,r1);
      r3=rear(head3,&time3);
      printf("\n- ");
      display(r3);
     }
     if(time1==time2&&head1->data==head2->data)
     {
      p1=head1;
      p2=head2;
      while(p1->right&&p2->right&&p1->data==p2->data)
      {p1=p1->right;
       p2=p2->right;
      }
      if(p1->data>p2->data)
      {
		 /*如果第一個數大于第2個數的話，第一個數減第2個數，再加+號*/
      head3=find_sub(r1,r2);
      r3=rear(head3,&time3);
      printf("\n+ ");
      display(r3);
       }
      else if(p1->data<p2->data)
       {
		   /*如果第一個數小于第2個數的話，第2個數減第1個數，再加-號*/
      head3=find_sub(r2,r1);
      r3=rear(head3,&time3);
      printf("\n- ");
      display(r3);
       }
      else
       printf("\n0\n");
      }
}


 if(flag2==1&&flag1==0)
    /*如果第2個是正數，第1個數是負數的話，同上*/
    {if(time2>time1||(time1==time2&&head2->data>head1->data))
      {
      head3=find_sub(r2,r1);
      r3=rear(head3,&time3);
      printf("\n+ ");
      display(r3);
     }
     if(time2<time1||(time1==time2&&head2->data<head1->data))

     {
      head3=find_sub(r1,r2);
      r3=rear(head3,&time3);
      printf("\n- ");
      display(r3);
     }
    
  if(time1==time2&&head1->data==head2->data)
     {
      p1=head1;
      p2=head2;
      while(p1->right&&p2->right&&p1->data==p2->data)
      {p1=p1->right;
       p2=p2->right;
      }
      if(p1->data>p2->data)
      {
      head3=find_sub(r1,r2);
      r3=rear(head3,&time3);
      printf("\n- ");
      display(r3);
       }
      else if(p1->data<p2->data)
       {
      head3=find_sub(r2,r1);
      r3=rear(head3,&time3);
      printf("\n+ ");
      display(r3);
       }
      else
       printf("\n0\n");
      }


}
}


dnode * find_sub_mult(dnode * r1,int  data ,int  i)
/*將r1指向的數全乘于data，并向左位移i段*/
{dnode *head,*p,*s,*rr;
/*head為頭指針，p,s為臨時指針，rr為尾指針*/
int  k,inc=0;
/*k為循環用的，inc為進位*/


long  sum=0; 
/*求和*/

rr=r1;
head=(dnode*)malloc(sizeof(dnode));
p=head;
/*開辟空間*/


/*先將需要位移的段數全用0補齊*/
if(i!=0)
{for(k=1;k<=i;k++)
{
s=(dnode*)malloc(sizeof(dnode));
s->data=0;
p->right=s;
s->left=p;
p=s;
}
}









while(rr!=NULL)
/* 當rr沒有到頭時*/
{s=(dnode*)malloc(sizeof(dnode));
sum=rr->data*data+inc;
if(sum>10000)
{inc=sum/10000;
/*得到和的高4位*/
s->data=sum-inc*10000;
/*值為低4位的值*/
} 
else
{s->data=sum;
/*直接給值*/
inc=0;
}
p->right=s;
s->left=p;
p=s;
/*左移*/
rr=rr->left;
}


if(inc!=0)
/*如果還有進位，就需要新建一個節點*/
{
s=(dnode*)malloc(sizeof(dnode));
s->data=inc;
p->right=s;
s->left=p;
p=s;
}

head=head->right;
head->left=NULL;
p->right=NULL;
/*返回頭指針*/
return  head;
}




/*由一個數的尾指針得到頭指針*/
dnode * return_head(dnode *rear)
{
dnode *p;
p=rear;
while(p->left)
p=p->left;
return  p;
}

/*由一個數的頭指針得到尾指針*/
dnode * return_rear(dnode *head)
{
dnode *p;
p=head;
while(p->right)
p=p->right;
return  p;
}



/*將一個數的數據前后交換*/
dnode * tansfer_rear2(dnode *rear_temp)
{dnode *head,*p,*s,*rear;
rear=rear_temp;
head=(dnode*)malloc(sizeof(dnode));
p=head;
while(rear!=NULL)
/*將后面的節點向左一個一個用頭插法建立，就和原來相反了*/
{s=(dnode*)malloc(sizeof(dnode));
s->data=rear->data;
p->right=s;
s->left=p;
p=s;
rear=rear->left;
}
head=head->right;
head->left=NULL;
p->right=NULL;
return p;
}



/*求2個數的和，和前面的一樣，只是參數用的是指針*/
dnode  *find_sum2(dnode  *r1,dnode  *r2)
{dnode  *head,*p,*s,*p1,*p2;
 int  inc=0,sum=0,f1=0,f2=0;
head=(dnode*)malloc(sizeof(dnode));
p=head;
p1=r1;
p2=r2;
while(p1!=NULL&&p2!=NULL)
{sum=p1->data+p2->data+inc;
inc=0;
if(sum>=10000)
{sum=sum-10000;
inc=1;
}
s=(dnode*)malloc(sizeof(dnode));
s->data=sum;
p->right=s;
s->left=p;
p=s;
p1=p1->left;p2=p2->left;
}
if(p1==NULL&&p2==NULL)
if(inc==1)
{s=(dnode*)malloc(sizeof(dnode));
 s->data=1;
p->right=s;
s->left=p;
p=s;
}

while(p1!=NULL)
{f1=1;
s=(dnode*)malloc(sizeof(dnode));
sum=p1->data+inc;
inc=0;
if(sum>=10000)
{sum=sum-10000;
inc=1;
}
s->data=sum;
p->right=s;
s->left=p;
p=s;
p1=p1->left;
}

if(f1==1&&inc==1&&!p1)
{
s=(dnode*)malloc(sizeof(dnode));
s->data=1;
p->right=s;
s->left=p;
p=s;
}




while(p2!=NULL)
{f2=1;
s=(dnode*)malloc(sizeof(dnode));
sum=p2->data+inc;

inc=0;
if(sum>=10000)
{sum=sum-10000;
inc=1;
}
s->data=sum;
p->right=s;
s->left=p;
p=s;
p2=p2->left;
}
if(f2==1&&inc==1)
{s=(dnode*)malloc(sizeof(dnode));
s->data=1;
p->right=s;
s->left=p;
p=s;
}
head=head->right;
head->left=NULL;
p->right=NULL;
return  head;
}





/*2個數相乘，將第1個數乘于第2個數的每一段，要進行響應的移位處理，得到一系列的數，再相加*/
void multy(dnode  *r1,dnode  *r2)
{dnode  * p;int i=0,flag=0;
p=r2;
while(p!=NULL)
{head_temp=find_sub_mult(r1,p->data,i);
/*將r1中所有的數乘于p->data，并向左位移i段*/
 rear_temp=return_rear(head_temp);
 /*得到尾*/
 rear_temp=tansfer_rear2(rear_temp);
 /*求反*/
if(flag==0)
/*如果是第一個段，直接給r3*/
{r3=rear_temp;
flag=1;
}
else 
{
/*如果不是第一個段，將r3和當前的結果相加*/
head3=find_sum2(r3,rear_temp);
r3=return_rear(head3);
r3=tansfer_rear2(r3);
}

i++;
/*需要位移的段數增加*/

/*p左移*/
p=p->left;
}
r3=tansfer_rear2(r3);
/*交換*/
display(r3);
/*顯示最后結果*/
}






void mut(dnode  *r1,dnode  *r2)
{if((flag1==1&&flag2==1)||(flag1==0&&flag2==0))
/*2個數的符號相同時相乘為正數*/
printf("+ ");
else 
/*2個數的符號不同時為相乘負數*/
 printf("- ");
multy(r1,r2);

}

void  main_messsage()
/*菜單信息*/
{
printf("\t**************************************\n");
printf("\t\t1:init\t2:add\n\t\t3:sub\t4:mul\n\t\t5:exit\n");

printf("\t**************************************\n");
}

void  main()
{int  a; int  flag;
main_messsage();
/*菜單信息*/
scanf("%d",&flag);
/*輸入選擇*/
while(flag!=5)
/*輸入5：退出*/
{switch(flag)
{case  1:input_and_init();break;/*輸入1：初始2個數據*/
 case  2:sum();break;/*輸入2：求2個數據的和*/
 case  3:sub();break;/*輸入3：求2個數據的差*/
 case  4:mut(r1,r2);break;/*輸入4：求2個數據的乘*/
}
main_messsage();
/*菜單信息*/
scanf("%d",&flag);
/*輸入選擇*/
}


}