Subversion Repositories Kolibri OS

Rev

Go to most recent revision | Blame | Last modification | View Log | Download | RSS feed

  1. void GetNextParam()
  2. {
  3.         byte    kavichki = false;
  4.         int             i = strlen(#tagparam) - 1;
  5.        
  6.         WHILE((i > 0) && ((tagparam[i] == '"') || (tagparam[i] == ' ') || (tagparam[i] == '\'') || (tagparam[i] == '/')))
  7.         {
  8.                 IF (tagparam[i] == '"') || (tagparam[i] == '\'') kavichki=tagparam[i];
  9.                 tagparam[i] = 0x00;
  10.                 i--;
  11.         }
  12.  
  13.         IF (kavichki)
  14.         {
  15.                 i=find_symbol(#tagparam, kavichki);
  16.                 strcpy(#options, #tagparam + i);
  17.         }
  18.         ELSE
  19.         {
  20.                 WHILE((i > 0) && (tagparam[i] <>'=')) i--; //i=find_symbol(#tagparam, '=')+1;
  21.                 i++;
  22.                
  23.                 strcpy(#options, #tagparam + i); //êîïèðóåì îïöèþ
  24.                 WHILE (options[0] == ' ') strcpy(#options, #options+1);
  25.         }
  26.         tagparam[i] = 0x00;
  27.  
  28.         FOR ( ; ((tagparam[i] <>' ') && (i > 0); i--)
  29.         {
  30.                 IF (tagparam[i] == '=') //äåðçêàÿ çàãëóøêà
  31.                         tagparam[i + 1] = 0x00;
  32.         }
  33.  
  34.         strcpy(#parametr, #tagparam + i + 1); //êîïèðóåì ïàðàìåòð
  35.         tagparam[i] = 0x00;
  36. }
  37.