#include<stdio.h>
#include<stdlib.h>
#define MAX 100

typedef enum {acaros, gramineas, epitelio}Alergia;

typedef struct{
   char nombre[50];
   char apellidos[100];
   char dni[10];
   int nnss;
   char direccion[100];
   Alergia al;
}Paciente;

int Menu(void)
{
   int op;
    
   printf("MENU\n");
   printf("\t1. Introducir datos de un paciente\n");    
   printf("\t2. Modificar datos de un paciente\n");
   printf("\t3. Mostrar datos de un paciente\n");
   printf("\t4. Eliminar datos de un paciente\n");
   printf("\t5. Salir\n");
   
   printf("Indique su opcion: ");
   scanf("%d", &op);
   
   return op;
}

void InsertarPac(Paciente p[], int npac)
{
   char c;
   
   if(npac < MAX) 
   {  
     fflush(stdin);      
     printf("Nombre: ");
     gets(p[npac].nombre);     
     printf("Apellidos: ");
     gets(p[npac].apellidos);
     printf("D.N.I: ");
     gets(p[npac].dni);
     printf("NNSS: ");
     scanf("%d", &p[npac].nnss);
     fflush(stdin); 
     printf("Direccion: ");
     gets(p[npac].direccion); 
     printf("Indique alergias, acaros(a), gramineas(g), epitelio (e): ");
     scanf("%c", &c);
     if(c == 'a')
       p[npac].al = acaros;
     if(c == 'g')
       p[npac].al = gramineas;
     if(c == 'e')
       p[npac].al = epitelio;
   }
   else
     printf("No puede introducir mas pacientes\n");       
}

void Modificar(Paciente p[], int pos)
{
  char c;
  printf("NUEVOS DATOS\n"); 
  fflush(stdin); 
  printf("Nombre: ");
  gets(p[pos].nombre);     
  printf("Apellidos: ");
  gets(p[pos].apellidos);
  printf("D.N.I: ");
  gets(p[pos].dni);
  printf("NNSS: ");
  scanf("%d", &p[pos].nnss);
  fflush(stdin); 
  printf("Direccion: ");
  gets(p[pos].direccion); 
  printf("Indique alergias, acaros(a), gramineas(g), epitelio (e): ");
  scanf("%c", &c);
  if(c == 'a')
    p[pos].al = acaros;
  if(c == 'g')
    p[pos].al = gramineas;
  if(c == 'e')
    p[pos].al = epitelio;     
}

void Mostrar(Paciente p[], int pos) 
{
  printf("Nombre: ");
  puts(p[pos].nombre);     
  printf("Apellidos: ");
  puts(p[pos].apellidos);
  printf("D.N.I: ");
  puts(p[pos].dni);
  printf("NNSS: %d\n", p[pos].nnss);
  printf("Direccion: ");
  puts(p[pos].direccion); 
  printf("Alergia: ");
  if(p[pos].al == acaros)
    printf("acaros\n");
  if(p[pos].al == gramineas)
    printf("gramineas\n");
  if(p[pos].al == epitelio)
    printf("epitelio\n");   
}

void Eliminar(Paciente p[], int pos)
{
   int i;
   
   for(i=pos+1;i<MAX;i++)
      p[i-1] = p[i];  
}

int main(void)
{
  Paciente p[MAX];
  int npac = 0, pos, op;
  
  op = Menu();
  while(op != 5)
  {
     switch(op)
     { 
        case 1: {InsertarPac(p, npac);
                npac++;
                break;}
        case 2: {printf("Posicion del paciente a modificar: ");
                 scanf("%d",&pos);
                 Modificar(p, pos); 
                 break;}
        case 3: {printf("Posicion del paciente a mostrar: ");
                 scanf("%d",&pos);
                 Mostrar(p, pos); 
                 break;}
        case 4: {printf("Posicion del paciente a eliminar: ");
                 scanf("%d",&pos);
                 Eliminar(p, pos); 
                 npac--;
                 break;}
        default:printf("Opcion incorrecta\n"); 
     } 
     op = Menu();
  }
  
  system("PAUSE");
  return 0;   
}