#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#define INMEDIATO '#'
#define DIRECTO '$'
#define INDEXADO '['
 
void modoDireccionamiento(char *operando);
void direccionamientoIndexado(char *operando);
int esNumeroBase16(char caracter);
int esLetraBase16(char caracter);
int esOctal(char caracter);
int esBinario(char caracter);
 
int main()
{
    char *operando = "[D,PC]";
    modoDireccionamiento(operando);
    return 0;
}
 
void modoDireccionamiento(char *operando)
{
    int car,esInmediato,esDirecto,esIndexado,tam,i;
    tam = strlen(operando);
    car = operando[0];
    switch(car)
    {
        case INMEDIATO:
           esInmediato = 1;
           car = operando[1];
           switch(car)
           {
               case '\0':
                  printf("Es un formato invalido para un modo de direccionamiento inmediato\n");
                  break;
               case '$':
                  for(i = 2;((i < tam)&&(esInmediato));i++)
                  {
                      if((!esNumeroBase16(operando[i]))&&(!esLetraBase16(operando[i])))
                         esInmediato = 0;
                  }
                  if(!esInmediato)
                     printf("Se encontro un digito invalido para un numero de base 16");
                  break;
               case '@':
                  for(i = 2;((i < tam)&&(esInmediato));i++)
                  {
                      if(!esOctal(operando[i]))
                         esInmediato = 0;
                  }
                  if(!esInmediato)
                     printf("Se encontro un digito invalido para un numero de base 8");
                  break;
               case '%':
                  for(i = 2;((i < tam)&&(esInmediato));i++)
                  {
                      if(!esBinario(operando[i]))
                         esInmediato = 0;
                  }
                  if(!esInmediato)
                     printf("Se encontro un digito invalido para un numero de base 2");
                  break;
               default:
                  printf("Error");
           }
           break;
        case DIRECTO:
           esDirecto = 1;
           if(operando[1] == '\0')
              printf("Es un formato invalido para un modo de direccionamiento directo\n");
           else
           {
               for(i = 2;((i < tam)&&(esDirecto));i++)
               {
                   if((!esNumeroBase16(operando[i]))&&(!esLetraBase16(operando[i])))
                      esDirecto = 0;
               }
               if(!esDirecto)
                  printf("Se encontro un digito invalido para un numero de base 16");
           }
           break;
        case INDEXADO:
           esIndexado = 1;
           car = operando[1];
           switch(car)
           {
               case '\0':
                  printf("Es un formato invalido para un modo de direccionamiento indexado\n");
                  break;
               case ',':
                  printf("No puede haber una instruccion vacia antes de la coma");
                  break;
               case 'd':
               case 'D':
                  if(operando[2] == ',')
                  {
                      direccionamientoIndexado(operando);
                         //esIndexado = 0;
                  }
                  //if(!esIndexado)
                     //printf("Es un formato invalido para direccionamiento indexado");
                  break;
               default:
                  printf("Error");
           }
           break;
        default:
           printf("Error: es un formato invalido para los modos de direccionamiento inmediato\n");
    }
}
 
int esNumeroBase16(char caracter)
{
    if(caracter >= '0' && caracter <= '9')
       return 1;
    else
       return 0;
}
 
int esLetraBase16(char caracter)
{
    if((caracter >= 'A' && caracter <= 'F')||(caracter >= 'a' && caracter <= 'f'))
       return 1;
    else
       return 0;
}
 
int esOctal(char caracter)
{
    if(caracter >= '0' && caracter <= '7')
       return 1;
    else
       return 0;
}
 
int esBinario(char caracter)
{
    if(caracter == '1' || caracter == '0')
       return 1;
    else
       return 0;
}
 
void direccionamientoIndexado(char *operando)
{
    int i;
    char *cadena = NULL,c[2];
    cadena = calloc(2,sizeof(char));
    for(i = 3;operando[i] != ']';i++)
    {
        sprintf(c,"%c",operando[i]);
        strcat(cadena,c);
        printf("%s",cadena);
    }
}
 

int direccionamientoIndexado(char *operando)
{
    int i;
    char *cadena = NULL,c[2];
    cadena = calloc(2,sizeof(char));
    for(i = 3;operando[i] != ']';i++)
    {
        sprintf(c,"%c",operando[i]);
        strcat(cadena,c);
    }
    printf("%s",cadena);
    if((strcmp(cadena,"X") == 0)||(strcmp(cadena,"Y") == 0)||(strcmp(cadena,"SP") == 0)||(strcmp(cadena,"PC") == 0))
       return 1;
    else
       return 0;
}
 

#include <stdio.h>
#include <stdlib.h>
 
int fn(char *p);
 
int main(void)
{
   char pal[][4] = {
      "X]",
      "X}",
      "Y]",
      "Z]",
      "SP]",
      "XY]",
      "PC]",
      "PC)"
   };
   int i;
   int num_pals = (int) (sizeof pal / sizeof pal[0]);
 
   for (i = 0; i < num_pals; i++)
      printf("%s ==> %s\n", pal[i], fn(pal[i]) ? "OK" : "ERROR");
 
   return EXIT_SUCCESS;
}
 
int fn(char *p)
{
   char a[2];
   char b[2];
 
   return sscanf(p, "%1[XY]%1[]]", a, b) == 2 || sscanf(p, "SP%1[]]", b) == 1 || sscanf(p, "PC%1[]]", b) == 1;
}

$ ./main.exe
X] ==> OK
X} ==> ERROR
Y] ==> OK
Z] ==> ERROR
SP] ==> OK
XY] ==> ERROR
PC] ==> OK
PC) ==> ERROR