1. #include "stdio.h"    
    2. #include "stdlib.h"   
    3. #include "io.h"  
    4. #include "math.h"  
    5. #include "time.h"
    7. #define OK 1
    8. #define ERROR 0
    9. #define TRUE 1
    10. #define FALSE 0
    11. #define MAXSIZE 20 /* 存储空间初始分配量 */
    13. typedef int Status; 
    15. typedef int SElemType; /* SElemType类型根据实际情况而定，这里假设为int */
    18. /* 两栈共享空间结构 */
    19. typedef struct 
    20. {
    21.         SElemType data[MAXSIZE];
    22.         int top1;    /* 栈1栈顶指针 */
    23.         int top2;    /* 栈2栈顶指针 */
    24. }SqDoubleStack;
    27. Status visit(SElemType c)
    28. {
    29.         printf("%d ",c);
    30.         return OK;
    31. }
    33. /*  构造一个空栈S */
    34. Status InitStack(SqDoubleStack *S)
    35. { 
    36.         S->top1=-1;
    37.         S->top2=MAXSIZE;
    38.         return OK;
    39. }
    41. /* 把S置为空栈 */
    42. Status ClearStack(SqDoubleStack *S)
    43. { 
    44.         S->top1=-1;
    45.         S->top2=MAXSIZE;
    46.         return OK;
    47. }
    49. /* 若栈S为空栈，则返回TRUE，否则返回FALSE */
    50. Status StackEmpty(SqDoubleStack S)
    51. { 
    52.         if (S.top1==-1 && S.top2==MAXSIZE)
    53.                 return TRUE;
    54.         else
    55.                 return FALSE;
    56. }
    58. /* 返回S的元素个数，即栈的长度 */
    59. int StackLength(SqDoubleStack S)
    60. { 
    61.         return (S.top1+1)+(MAXSIZE-S.top2);
    62. }
    64. /* 插入元素e为新的栈顶元素 */
    65. Status Push(SqDoubleStack *S,SElemType e,int stackNumber)
    66. {
    67.         if (S->top1+1==S->top2)    /* 栈已满，不能再push新元素了 */
    68.                 return ERROR;    
    69.         if (stackNumber==1)            /* 栈1有元素进栈 */
    70.                 S->data[++S->top1]=e; /* 若是栈1则先top1+1后给数组元素赋值。 */
    71.         else if (stackNumber==2)    /* 栈2有元素进栈 */
    72.                 S->data[--S->top2]=e; /* 若是栈2则先top2-1后给数组元素赋值。 */
    73.         return OK;
    74. }
    76. /* 若栈不空，则删除S的栈顶元素，用e返回其值，并返回OK；否则返回ERROR */
    77. Status Pop(SqDoubleStack *S,SElemType *e,int stackNumber)
    78. { 
    79.         if (stackNumber==1) 
    80.         {
    81.                 if (S->top1==-1) 
    82.                         return ERROR; /* 说明栈1已经是空栈，溢出 */
    83.                 *e=S->data[S->top1--]; /* 将栈1的栈顶元素出栈 */
    84.         }
    85.         else if (stackNumber==2)
    86.         { 
    87.                 if (S->top2==MAXSIZE) 
    88.                         return ERROR; /* 说明栈2已经是空栈，溢出 */
    89.                 *e=S->data[S->top2++]; /* 将栈2的栈顶元素出栈 */
    90.         }
    91.         return OK;
    92. }
    94. Status StackTraverse(SqDoubleStack S)
    95. {
    96.         int i;
    97.         i=0;
    98.         while(i<=S.top1)
    99.         {
    100.                 visit(S.data[i++]);
    101.         }
    102.         i=S.top2;
    103.         while(i<MAXSIZE)
    104.         {
    105.                 visit(S.data[i++]);
    106.         }
    107.         printf("\n");
    108.         return OK;
    109. }
    111. int main()
    112. {
    113.         int j;
    114.         SqDoubleStack s;
    115.         int e;
    116.         if(InitStack(&s)==OK)
    117.         {
    118.                 for(j=1;j<=5;j++)
    119.                         Push(&s,j,1);
    120.                 for(j=MAXSIZE;j>=MAXSIZE-2;j--)
    121.                         Push(&s,j,2);
    122.         }
    124.         printf("栈中元素依次为：");
    125.         StackTraverse(s);
    127.         printf("当前栈中元素有：%d \n",StackLength(s));
    129.         Pop(&s,&e,2);
    130.         printf("弹出的栈顶元素 e=%d\n",e);
    131.         printf("栈空否：%d(1:空 0:否)\n",StackEmpty(s));
    133.         for(j=6;j<=MAXSIZE-2;j++)
    134.                 Push(&s,j,1);
    136.         printf("栈中元素依次为：");
    137.         StackTraverse(s);
    139.         printf("栈满否：%d(1:否 0:满)\n",Push(&s,100,1));
    142.         ClearStack(&s);
    143.         printf("清空栈后，栈空否：%d(1:空 0:否)\n",StackEmpty(s));
    145.         return 0;
    146. }