practico pilas 1 ejercicio 12 (no funciona)

#include <stdio.h>
#include <stdlib.h>
#include "pila.h"

int main()
{
    char OP = 'S';
    char PO = 'A';
    Pila MODELO;
    Pila DADA;
    Pila BASURA;
    Pila MOMENTO;
    inicpila(&BASURA);
    inicpila(&MOMENTO);
    inicpila (&MODELO);
    inicpila (&DADA);

    while (OP == 'S')
            {
            printf ("INGRESE EN PILA MODELO\n");
            leer (&MODELO);
            printf ("DESEA CONTINUAR S = SI / N= NO \n");
            fflush(stdin);
            scanf ("%c",&OP);
            }

    while (PO == 'A');
            {
            printf ("Que numero desea apilar en DADA\n");
            leer (&DADA);
            printf ("DESEA CONTINUAR A = SI / B= NO \n");
            fflush(stdin);
            scanf ("%c",&PO);
            }

        while (!pilavacia(&MODELO))
                    {
                        if (tope (&MODELO) == tope (&DADA))
                                {
                                apilar (&BASURA, desapilar (&DADA));
                                }
                        else
                                {
                                apilar (&MOMENTO, desapilar(&MODELO));
                                }
                    }

        while (!pilavacia(&MOMENTO))
                    {
                    apilar (&MODELO, desapilar (&MOMENTO));
                    }



    printf ("PILA DADA\n");
    mostrar (&DADA);
    printf ("PILA MODELO\n");
    mostrar (&MODELO);
    printf ("PILA BASURA\n");
    mostrar (&BASURA);




    return 0;
}



/*Suponiendo  la  existencia  de  una  pila  MODELO  (vacía  o  no),
  eliminar  de  la  pila  DADA todos los elementos que existan en MODELO */