#include "malloc.h"
#include "mem.h"/*memset在这*/
#include "dos.h"
typedef struct abc
{
int a[100];
int b;
}AB;
int x=0;
AB * create()/*建栈*/
{ AB * p;
p=(AB *)malloc(sizeof(AB));
return p;
}
char full(AB *p)/*测试栈满*/
{
if(p->b<=0)
return 1;
else
return 0 ;
}
char kong(AB * p)/*测试栈空*/
{
if(p->b>=100)
return 1;
else
return 0;
}
void push(AB * p,int q) /*压栈*/
{
extern x;
if(full(p))
{
printf("stack full!\n");
sleep(2);
return ;
}
else
p->b--;
p->a[p->b]=q;
x++;
printf("number %d\n",x);
sleep(2);
return ;
}
void pop(AB * p,int q)/*出栈*/
{
extern x;
if(kong(p))
{ printf("stack kong!\n");
sleep(2);
return ;
}
else
q=p->a[p->b];
p->b+=1;
x--;
printf("%d\n",q);
printf("number %d\n",x);
sleep(2);
return ;
}
void traverse(AB * p)/*遍历输出*/
{
extern x;
int i=x;
if (!x)
{
printf("\nNULL!\n");
sleep(2);
return;
}
else
while(i--)
printf("%d ",p->a[p->b+i]);
sleep(5);
return ;
}
int main(void)
{
int s;
AB *ab;
ab=create();
memset(ab,0,sizeof(int)*101);
ab->b=100;
while(1)
{
clrscr();
printf("1.push\n");
printf("2.pop\n");
printf("3.traverse\n");
s=getch();
if(s==0x1b) break;/*ESC退出*/
else if(s<0x31||s>0x33) continue;
else
switch(s)
{
case 0x31:
printf("Please input a number!\n");
scanf("%d",&s);
push(ab,s);
break;
case 0x32:
printf("pop :");
pop(ab,s);
break;
case 0x33:
traverse(ab);break;
}
}
free(ab);
return 0;
}